cComandoSQLCaracterObrigatório
Comando SQL enviado ao banco de dados por meio do DBAccess/TopConn.
FUNçãOPublicado
TCSqlExec
TCSqlExec( <cComandoSQL> ) --> nRetExecuta um comando SQL diretamente via TopConn/DBAccess.
Visão geral
TCSqlExec() executa comandos SQL que não retornam cursor de consulta, como instruções de atualização, criação temporária ou manutenção controlada. Deve ser usada com muito critério, porque contorna parte das proteções usuais das rotinas de negócio do Protheus.
Sintaxe
TCSqlExec( <cComandoSQL> ) --> nRetParâmetros
Retorno
Numérico. Retorna o código de execução informado pela camada TopConn/DBAccess; valide o comportamento no ambiente e versão utilizados.
Executar comando SQL controlado
#Include "TOTVS.ch"
User Function ExTCSqlExec()
Local cSql := "UPDATE " + RetSqlName("SA1") + " SET A1_XOBS = 'OK' WHERE D_E_L_E_T_ = ' ' AND A1_COD = '000001'"
Local nRet := TCSqlExec(cSql)
MsgInfo("Retorno SQL: " + CValToChar(nRet))
ReturnResultado esperado
Executa um UPDATE restrito por chave e mostra o código de retorno. Use apenas como exemplo didático e valide em homologação.
- Use TCSqlExec() para comandos SQL sem cursor de retorno.
- Para leitura de dados, prefira TCQUERY quando a intenção for percorrer um resultado.
- Em tabelas Protheus, respeite filial, D_E_L_E_T_ e regras de negócio antes de escrever diretamente.
- Evite montar SQL com concatenação de dados de usuário sem tratamento.
- Não use para atualizar tabelas de negócio quando existir API, rotina ou mecanismo oficial mais seguro.
- Teste em homologação: um comando SQL direto pode afetar muitos registros rapidamente.
Comentários
Ainda não há comentários aprovados.
Entre com Google ou Microsoft para comentar.