Executa uma instrução de sintaxe SQL (Structured Query Language) diretamente no banco de dados em que está conectado.

Sintaxe

TCSQLExec( < cStatement > )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

cStatement

caractere

Indica a instrução que será executada no banco de dados.

X


Retorno

Nome

Tipo

Descrição

nStatus

numérico

Retorna o status da execução. Se menor que 0 indica que a instrução não foi executada com sucesso.

Observações

Exemplos

USER FUNCTION TEST()
  TCLink()
  
  TCDelFile("T1")
  
  DBCreate("T1", {{"FIELD_NAME", "C", 10, 0}, ;
                  {"FIELD_TYPE", "C", 10, 0}}, "TOPCONN")
  
  nStatus := TCSqlExec("insert into t1 (field_name, field_type) values ('name', 'type')")
  
  if (nStatus < 0)
    conout("TCSQLError() " + TCSQLError())
  endif
  
  TCUnlink()
RETURN

Veja também