Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Bloco de código
languagecpp
themeEclipse
linenumberstrue
collapsefalse
User Function teste()

  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

...