Identificador de Regra
GER-085HISCL01
Módulo: GER - Gerais.
Finalidade: Disponibiliza os campos da tabela de histórico de clientes (E085HCL) para que sejam validados via regra.
Executado também na importação de dados para a tabela "E085HCL".
Características: Todos os campos da tabela "E085HCL", inclusive os de usuário, são passados para a regra por meio deste identificador. Eles podem ser acessados como variáveis pelo de nome "VS +
Tela: F085CAD, F085HCL
Transação: Não se aplica.
Regra:
Definir Numero VSCodCli;
Definir Numero VSCodEmp;
Definir Numero VSCodFil;
Definir Numero VSSalDup;
Definir Alfa VSCodCpg;
Definir Alfa VSUsu_CampoAlfa;
Definir Numero VSUsu_CampoNum;
Definir Data VSUsu_CampoData;
Definir Numero VSUsu_CampoHora;
@ Caractere ENTER @
Definir Alfa ENTER;
CaracterParaAlfa(10, ENTER);
Definir alfa auxAlf;
Definir alfa msgStr;
msgStr = "";
@ Mostrar o valor dos campos chave @
msgStr = msgStr + "Campos chave:" + ENTER;
IntParaAlfa(VSCodCli, auxAlf);
msgStr = msgStr + "- CodCli: " + auxAlf + "." + ENTER;
IntParaAlfa(VSCodEmp, auxAlf);
msgStr = msgStr + "- CodEmp: " + auxAlf + "." + ENTER;
IntParaAlfa(VSCodFil, auxAlf);
msgStr = msgStr + "- CodFil: " + auxAlf + "." + ENTER;
@ Mostrar campos de sistema @
msgStr = msgStr + "Campos de sistema:" + ENTER;
IntParaAlfa(VSSalDup, auxAlf);
msgStr = msgStr + "- SalDup: " + auxAlf + "." + ENTER;
auxAlf = VSCodCpg;
msgStr = msgStr + "- CodCpg: " + auxAlf + "." + ENTER;
@ Mostrar campos de usuário (supondo que eles existam no TBS) @
msgStr = msgStr + "Campos de usuário:" + ENTER;
auxAlf = VSUsu_CampoAlfa;
msgStr = msgStr + "- CampoAlfa: " + auxAlf + "." + ENTER;
IntParaAlfa(VSUsu_CampoNum, auxAlf);
msgStr = msgStr + "- CampoNum: " + auxAlf + "." + ENTER;
ConverteMascara(3, VSUsu_CampoData, auxAlf, "dd/mm/yyyy");
msgStr = msgStr + "- CampoData: " + auxAlf + "." + ENTER;
ConverteMascara(4, VSUsu_CampoHora, auxAlf, "hh:mm");
msgStr = msgStr + "- CampoHora: " + auxAlf + "." + ENTER;
Mensagem(retorna, msgStr);
Variáveis Disponibilizadas:
Nome | Tipo | Observações | Retorna Valor |
---|---|---|---|
VSCODCLI | NÚMERO | Código do cliente (chave do registro) | N |
VSCODEMP | NÚMERO | Código da empresa (chave do registro) | N |
VSCODFIL | NÚMERO | Código da filial (chave do registro) | N |
VSESTADO | ALFA | Indica a operação sendo realizada: "ALTERANDO" ou "INSERINDO". | N |
Atenção
Caso o parâmetro global LisVarReg esteja habilitado, a variável ListaVariaveis estará disponível em todos os identificadores de regras do sistema. O conteúdo desta variável lista os campos disponibilizados no identificador de regras em questão.
Não é aconselhada a ativação desse parâmetro global para o uso cotidiano. Esse recurso de listagem dos campos de identificadores auxilia a construção de regras e o Suporte para, por exemplo, depuração ou quando não houver acesso à documentação dos identificadores de regras.