Identificador de Regra

GER-095FORAO02

Módulo: GER - Gerais.

Finalidade: Permite efetuar consistências em todos os campos da tabela de fornecedor, além de permitir atribuir valores para campos de usuário desta tabela. Embora na regra também seja possível atribuir valores para campos de sistema, tais valores são desconsiderados após a execução da regra.

Características: Os campos da tabela podem ser acessados no formato NOMETABELA.NOMECAMPO, tanto para campos de sistema como para campos de usuário.

Exemplo: E095FOR.CODFOR, E095FOR.USU_FORBLO.

Para verificar os nomes dos campos da tabela pode ser utilizado o aplicativo Central de Banco de Dados Senior (CDBS) ou através da tela de Tabelas e Campos disponível pelo menu em Diversos > Campos/Tabelas.

Tela: F095CAD, Serviços - Cadastro Fornecedores

Transação: Não se aplica.

Regra:

Definir Alfa VSEstado;
Definir Alfa ENTER;
Definir Alfa vMsg;
Definir Alfa vCodFor;

CaracterParaAlfa(10, ENTER);
IntParaStr(E095FOR.CodFor,vCodFor);

vMsg = "";

se ((E095for.USU_CodCon = 0) e ((VSEstado = "INSERINDO") ou (VSEstado = "ALTERANDO")))
vMsg = "Informe o campo de usuário XXXX!";

se (VSEstado = "INSERINDO")
vMsg = "Fornecedor " + vCodFor + " criado!";
senao
se (VSEstado = "ALTERANDO")
vMsg = "Fornecedor " + vCodFor + " alterado!";
senao
se (VSEstado = "EXCLUINDO")
vMsg = "Fornecedor " + vCodFor + " excluído!";

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ê?