ExecutarComandoSQL

Esta função recebe e executa uma string com um comando INSERT ou UPDATE.

Sintaxe: Funcao ExecutarComandoSQL(Alfa pComando, Alfa pParalela, Numero End pLinhasAfetadas, Alfa End pResultado);

Parâmetros:

Nome Tipo Descrição
pParalela Alfa Indicativo se deve utilizar uma conexão paralela para execução do comando SQL. Valores possíveis: "S - Sim". Qualquer valor diferente de "S - Sim" será considerado como "N - Não".
pLinhasAfetadas Numero Variável de retorno contendo a quantidade de linhas afetadas pelo comando. Não será preenchida quando estiver utilizando conexão paralela. Quando o parâmetro pParalela for igual a "S - Sim", o pLinhasAfetadas retornará 0.
pResultado Alfa Variável com o resultado da execução. Receberá o valor de "OK" quando executar o comando com sucesso ou retornará a exceção quando ocorrer um erro na execução do comando.

Utilização: Nas regras LSP, o comando deve ser montado e passado para a função.

Exemplo:
Update do complemento do produto para "Teste":

Definir Alfa aSQL;
Definir Alfa aParalela;
Definir Numero aLinhasAfetadas;
Definir Alfa aResultado;
aSQL = " UPDATE E075PRO SET CPLPRO = 'Teste' WHERE CODPRO = '001' ";
ExecutarComandoSQL(aSQL, "N", aLinhasAfetadas, aResultado);
/*
Supondo que a execução dê certo e que uma linha seja alterada, então aLinhasAfetadas terá valor 1 e aResultado terá valor "OK".
Caso a execução do comando resulte em um erro, aLinhasAfetadas terá valor 0 e aResultado apresentará o erro gerado na execução do comando
*/

Este artigo ajudou você?