Identificador de Regra

CPR-440TNSDE02

Módulo: CPR - Compras.

Finalidade: Sugerir as transações de produto e serviço na tela F440GNE [ Suprimentos > Gestão de Recebimento > Notas Fiscais de Entrada > Agrupada ].

Características: A regra é executada na saída do campo da série da nota fiscal de entrada.

Tela: F440GNE

Transação: Não se aplica.

Regra:

Definir Alfa VCprNCodEmp;
Definir Alfa VCprNCodFil;
Definir Alfa VCprNCodFor;
Definir Alfa VCprNTipNfe;
Definir Alfa VCprNNumNfc;

Definir Alfa CprACodSnf;
Definir Alfa CprASigUfs;
Definir Alfa CprATipMer;
Definir Alfa CprAInsEst;
Definir Alfa CprATnsPro;
Definir Alfa CprATnsSer;

Definir Alfa Quebra;
Definir Alfa StrAux;

inicio

RetornaAscii(13, Quebra);

IntParaAlfa(CprNCodEmp, VCprNCodEmp);
IntParaAlfa(CprNCodFil, VCprNCodFil);
IntParaAlfa(CprNCodFor, VCprNCodFor);
IntParaAlfa(CprNTipNfe, VCprNTipNfe);
IntParaAlfa(CprNNumNfc, VCprNNumNfc);

StrAux =
"CprNCodEmp: " + VCprNCodEmp + Quebra +
"CprNCodFil: " + VCprNCodFil + Quebra +
"CprNCodFor: " + VCprNCodFor + Quebra +
"CprNTipNfe: " + VCprNTipNfe + Quebra +
"CprNNumNfc: " + VCprNNumNfc + Quebra +
"CprACodSnf: " + CprACodSnf + Quebra +
"CprASigUfs: " + CprASigUfs + Quebra +
"CprATipMer: " + CprATipMer + Quebra +
"CprAInsEst: " + CprAInsEst + Quebra +
"CprATnsPro: " + CprATnsPro + Quebra +
"CprATnsSer: " + CprATnsSer + Quebra +
"[&OK]";
Mensagem(Retorna,StrAux);

XX = 0;
fim

Variáveis Disponibilizadas: