{##############################################################################}
{# NexusDB: scrEcho.nxscript                                                  #}
{# Copyright (c) Nexus Database Systems Pty. Ltd. %COPYRIGHT%                 #}
{# All rights reserved.                                                       #}
{##############################################################################}
{# NexusDB: Scripted SQL Function to echo the input argument                  #}
{##############################################################################}
function RegisterSQLFunctions: string;
begin
  RegisteredSQLFunctions.AddObject('scrEcho', TnxSQLFunctionInfo.Create(
          'scrEcho', 1 , rttAsArg1x, true, '', '', nxtWideString, 0, 0, '', 0, '', 0));
  RegisteredSQLFunctions.AddObject('scrUpper', TnxSQLFunctionInfo.Create(
          'scrUpper', 1 , rttAsArg1x, true, '', '', nxtWideString, 0, 0, '', 0, '', 0));
end;

function scrEcho(aInput: variant): variant;
begin
  result:=aInput;
end;

function scrUpper(aInput: variant): variant;
begin
  result:=UpperCase(aInput);
end;

begin
end.



