TCSPExec

Executa uma stored procedure do banco de dados.

Sintaxe

aResult := tcSPExec(<cStoredProcedure>[, <xParam>])

Parâmetro	Tipo	Obrigatório	Descrição
cStoredProcedure	Caractere		Indica o nome da stored procedure a ser executada
xParam	Qualquer		Indica uma ou mais expressões, separadas por vírgula, indicando os parâmetros necessários para a execução da stored procedure

Retorno	Tipo	Descrição
aResult	Array	Retorna um array que contêm os valores de retorno da stored procedure. O retorno será nulo se nenhum valor for retornado pela stored procedure ou ocorrer algum erro na chamda da procedure.

Exemplo

Exemplo de Stored Procedure

Exemplo de stored procedure para o banco SQL Server

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

Exemplo de chamada AdvPL

#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

Árvore de páginas

TCSPExec

Sintaxe

Exemplo

Exemplo de Stored Procedure

Exemplo de chamada AdvPL