Identificador de Regra

CPA-501SRVTP01

Módulo: CPA - Contas a Pagar.

Finalidade: Tem como finalidade, permitir alteração de todos os campos do serviço "Gestão Empresarial | ERP - Financeiro - Contas a pagar - Geração do Título".

Características: Aplicável somente a chamada do Serviço, não interfere em rotinas do sistema.

Tela: Serviço Geração de Título Contas à Pagar

Transação: Não se aplica.

Regra:

@ Exemplo de regra CPA-501SRVTP01 @

Definir Numero VSCPACodEmp;
Definir Numero VSCPACodFil;
Definir Alfa VSCPANumTit;
Definir Alfa VSCPACodTpt;
Definir Numero VSCPACodFor;
Definir Alfa VSCPACodTns;
Definir Data VSCPADatEnt;
Definir Data VSCPADatEmi;
Definir Data VSCPADatVct;
Definir Numero VSCPAVlrOri;
Definir Numero VSCPACtaRed;
Definir Numero VSCPACtaFin;
Definir Alfa VSCPACodCcu;
Definir Alfa VSCPANumPrj;
Definir Alfa VSCPACodFpj;
Definir Alfa VSCPAObsTcp;

Inicio
Se (VSCPACodEmp = 1)
Inicio
Se (VSCPACodFil = 1)
Inicio
Se (VSCPAObsTcp = "GECEX")
Inicio
@ Força transação quando a origem for do sistema GECEX @
VSCPACodTns = "90500";
@ Prorroga o vencimento do título além da data de vencimento enviada 10 dias @
VSCPADatVct = VSCPADatVct + 10;
@ Altera observação do título @
VSCPAObsTcp = "Titulo Gerado através do Sistema GECEX";
Fim;
Fim;
Fim;
Senao
Inicio
Se (VSCPACodEmp = 2)
Inicio
Se (VSCPACodFil = 1)
Inicio
Se (VSCPAObsTcp <> "GECEX")
Inicio
@ Força alteração da transação quando não for do sistema GECEX para a empresa 2 e filial 1 @
VSCPACodTns = "90501";
@ Altera o fornecedor para 1 @
VSCPACodFor = 1;
Fim;
Fim;
Fim;
fim;
Fim;

Variáveis Disponibilizadas: