Identificador de Regra

GER-030AGEVC01

Módulo: GER - Gerais.

Finalidade: Disponibiliza os campos da tabela de agências bancárias (E030AGE) para que sejam controlados pelo usuário estabelecendo a obrigatoriedade via regra.

Características: Para a regra são passados todos os campos da tabela "E030AGE" através de variáveis que seguem a nomenclatura "VS" + (Ex.: para o campo "NomAge" a variável se chama "VSNomAge"). A tipagem das variáveis é análoga a dos campos na tabela.

É disponibilizada a variável "VSEstado" que indica a operação sendo realizada e pode assumir os seguintes valores:
a) "INSERINDO": Indica que o registro está sendo inserido;
b) "ALTERANDO": Indica que o registro está sendo alterado;
c) "EXCLUINDO": Indica que o registro está sendo excluído;

Nenhum dos campos retorna valor.

Tela: F030BAN

Transação: Não se aplica.

Regra:

Definir Alfa VSEstado;
Definir Alfa VSCodBan;
Definir Alfa VSCodAge;
Definir Alfa VSNomAge;
Definir Alfa VSCidAge;
Definir Alfa VSFonAge;

Definir Alfa ENTER;
CaracterParaAlfa(10, ENTER);

Definir Alfa vCodTraStr;
Definir Alfa vMsg;
IntParaAlfa(VSCodTra, vCodTraStr);

se (VSEstado = "INSERINDO")
vMsg = "Inserindo agência '" + VSCodAge + "' no banco '" + VSCodBan + "'!";
senao
se (VSEstado = "ALTERANDO")
vMsg = "Alterando agência '" + VSCodAge + "' no banco '" + VSCodBan + "'!";
senao
se (VSEstado = "EXCLUINDO")
vMsg = "Excluindo agência '" + VSCodAge + "' no banco '" + VSCodBan + "'!";

vMsg = vMsg + ENTER + "Valores:" + ENTER;
vMsg = vMsg + "NomAge: " + VSNomAge + ENTER;
vMsg = vMsg + "CidAge: " + VSCidAge + ENTER;
vMsg = vMsg + "FonAge: " + VSFonAge + ENTER;

vMsg = vMsg + "[&Ok]";

Mensagem(Retorna, vMsg);

Variáveis Disponibilizadas:

Nome Tipo Observações Retorna Valor
VSEstado ALFA Indicativo da operação sendo realizada ("INSERINDO", "ALTERANDO" ou "EXCLUINDO") 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.

Este artigo ajudou você?