Histórico da Página

• Quando utilizar o tipo Data como input na Procedure, use a função DToS
• O Tamanho máximo de cada valor informado como parâmetro ou retorno da Stored Procedure não deve exceder 999 bytes.
• O Tamanho total de todos os parâmetros informados ou retornados não deve exceder 4 KB.

Create Procedure USRTESTE( @IN_VALUE@inValue int, @OUT_STR@outStr char(64) OUTOUTPUT, @OUT_VALUE@outValue int OUTOUTPUT) As
Begin
set @OUT_STR@outStr = 'Teste'
set @OUT_VALUE@outValue = @IN_VALUE@inValue + 3
End
End 

#include "totvs.ch"
User Function exemplo()

Local aResult := {}
  aResult := TCSPEXEC("USRTESTE", 100)
  
IF empty(aResult)
    Conout('Erro na execução da Stored Procedure : '+TcSqlError())
  Else
    Conout("Retorno String : "+aResult[1])
    Conout("Retorno Numerico : "+str(aResult[2]))
    MsgInfo("Procedure Executada")
  Endif

Return