Regra por processo 579 - Processar duplicação local

Esta regra será chamada ao clicar no botão Processar da rotina de Reestruturação do Organograma, disponível em Tabelas > Organogramas > Reestruturar, a cada local processado.

Recursos utilizados: Nesta regra o usuário poderá efetuar o tratamento necessário para a Tabela de Usuário, e para isto estarão disponíveis as seguintes variáveis de sistema:

NomeTabela - nome da tabela que está sendo processada;
Organograma - estrutura de organograma da reestruturação;
DataProcesso - data da reestruturação;
LocalOrigem - local origem que está sendo processado (NumLoc); e
LocalDestino - respectivo local destino (NumLoc).

Ejemplo:

Definir data aDatAlt;
Definir alfa aNomTab;

aTabOrg = Organograma;
aDatAlt = DataProcesso;
aNomTab = NomeTabela;
aLocOri = LocalOrigem;
aLocDes = LocalDestino;

ExecSQL "UPDATE [Nome da Tabela] SET [Campo Local] =:aLocDes WHERE [Campo Organograma] =:aTabOrg AND [Campo Local] =:aLocOri AND [Campo Data] <=:aDatAlt";

Utilização: Esta regra por processo está relacionada à rotina de Reestruturação do Organograma, disponível em Tabelas > Organogramas > Reestruturar.