Identificador de Regra

CPR-440IMPNF01

Módulo: CPR - Compras.

Finalidade: Imprimir notas fiscais de saída geradas através das notas fiscais de entrada dos tipos 3, 6 e 7, no momento em que a nota de entrada for fechada, o usuário será questionado se deseja ou não imprimir a nota.

Características: Apartir da versão 5.7.2 é possível utilizar as variáveis:
CprNCodEmp, CprNCodFil, CprNCodFor, CprNTipNfe, CprNNumNfc, CprACodSnf, CprNIMPRE01 e CprNMExbMsg.

Transação: Não se aplica.

Regra:

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

Definir Alfa CprACodSnf;

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);
IntParaAlfa(CprNMExbMsg, VCprNMExbMsg);
IntParaAlfa(CprNIMPRE01, VCprNIMPRE01);

StrAux =
"CprNCodEmp: " + VCprNCodEmp + Quebra +
"CprNCodFil: " + VCprNCodFil + Quebra +
"CprNCodFor: " + VCprNCodFor + Quebra +
"CprNTipNfe: " + VCprNTipNfe + Quebra +
"CprNNumNfc: " + VCprNNumNfc + Quebra +
"CprACodSnf: " + CprACodSnf + Quebra +
"CprNMExbMsg: " + VCprNMExbMsg + Quebra +
"CprNIMPRE01: " + VCprNIMPRE01 + Quebra +
"[&OK]";
Mensagem(Retorna,StrAux);

XX = 0;
fim

Variáveis Disponibilizadas: