Esta versão do sistema foi descontinuada e não recebe atualizações e novas implementações. Acesse a documentação da versão 5.10.3 aqui

Identificador de Regra

FIN-616MANRD01

Módulo: FIN - Financeiro.

Finalidade: Esse identificador tem a finalidade de retornar uma data para a geração do lançamento manual no momento da aprovação ou desaprovação de um projeto.

Características: Caso a data passada for igual a "31/12/1900", o sistema irá considerar a data atual do movimento para a geração do lançamento manual.

Tela: F615PRJ

Transação: Não se aplica.

Regra:

Definir Numero VSLctCodEmp;
Definir Numero VSLctNumPrj;
Definir Data VSLctDatGer;

Definir Cursor CUR_E615PRJ;
VSLctDatGer = 0;

@Retorna a data de um campo de usuário da tabela E615PRJ@
CUR_E615PRJ.Sql "SELECT USU_DATE FROM E615PRJ WHERE
E615PRJ.CODEMP = :VSLctCodEmp AND
E615PRJ.NUMPRJ = :VSLctNumPrj";

CUR_E615PRJ.AbrirCursor();
se (CUR_E615PRJ.Achou)
VSLctDatGer = CUR_E615PRJ.USU_DATE;
CUR_E615PRJ.FecharCursor();

Variáveis Disponibilizadas:

Nome Tipo Observações Retorna Valor
VSLctCodEmp NÚMERO Código da empresa do projeto N
VSLctNumPrj NÚMERO Número do projeto N
VSLctSitAtu ALFA Situação Atual do Projeto N
VSLctSitDes ALFA Situação Destino do Projeto N
VSLctOperacao ALFA Operação (DEFERIMENTO ou APROVACAO) N
VSLctDatGer DATA Data de geração do lançamento manual S
VSLctDatApr DATA Data de aprovação do projeto S

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