Retorna o último erro produzido em comandos SQL.
Sintaxe
TCSQLERROR ( )-> Caracter
| Retorno | Descrição |
Caracter | Texto com descrição do erro. Se não houve erro, retorna texto vazio. |
Descrição
Esta função obtém as mensagens de erros em ordem inversa. Portanto, às vezes é necessário fazer várias chamadas a esta função para obter todos os erros, caso eles sejam múltiplos.
Exemplo
nRet = TCSQLEXEC(“INSERT INTO SALES/CUSTOMER(NAME) VALUES(‘JOHN DOE’)”)
If nRet == 0
conout(“Inserção executada”)
Else
conout( “Inserção com erro (s) : “)
cRet = TCSQLERROR()
Do While !Empty(cRet)
conout(cRet)
cRet = TCSQLERROR()
EndDo
EndIf