Identificador de Regra

VEN-140MDFEA07

Módulo: VEN - Vendas.

Finalidade: MDF-e Automático - Produto Perigoso. Ver Geração automática de MDF-e.

Telas: F145EBQ, F145GSM e F440MDF.

Transação: não se aplica.

Variáveis disponibilizadas:

Nome Tipo Observações Retorna Valor
VenAChaveMDFeAuto Alfa Chave de Gatilho da MDF-e Automática N
VenNCodEmp Número Empresa N
VenNCodFil Número Filial N
VenNNumEbq Número Número embarque N
VenACodSma Alfa Código da série do manifesto N
VenNNumMan Número Número do manifesto N
VenNLisPpe Número Lista de unidade de transporte do documento fiscal S
VenNLisPpe.FilNfv Numero Código da filial do documento fiscal S
VenNLisPpe.SnfNfv Alfa Código da série do documento fiscal S
VenNLisPpe.NumNfv Alfa Número do documento fiscal S
VenNLisPpe.SeqPpe Número Sequencia do produto perigoso (incremental) S
VenNLisPpe.CodOnu Alfa Número ONU S
VenNLisPpe.NomEbq Alfa Nome apropriado para embarque do produto S
VenNLisPpe.CodCla Alfa Classe ou subclasse/divisão e risco subsidiário/risco secundário S
VenNLisPpe.CodEmb Alfa Informação do grupo de embalagem do produto S
VenNLisPpe.QtdTot Alfa Quantidade total por produto S
VenNLisPpe.VolTip Alfa Quantidade e tipo de volumes S

Regra:

se (VenAChaveMDFeAuto = "1234") 
inicio

	ListaRegraNovaLinha(VenNLisPpe);           
	ListaRegraAddValorLinhaNumero(VenNLisPpe, "SeqPpe", 1, aAux);   
	ListaRegraAddValorLinhaAlfa(VenNLisPpe, "CodOnu", "1234", aAux);   
	ListaRegraAddValorLinhaAlfa(VenNLisPpe, "NomEbq", "321", aAux);   
	ListaRegraAddValorLinhaAlfa(VenNLisPpe, "CodCla", "222", aAux);   
	ListaRegraAddValorLinhaAlfa(VenNLisPpe, "CodEmb", "333", aAux);   
	ListaRegraAddValorLinhaAlfa(VenNLisPpe, "QtdTot", "444", aAux);   
	ListaRegraAddValorLinhaAlfa(VenNLisPpe, "VolTip", "555", aAux);   

	ListaRegraAddValorLinhaNumero(VenNLisPpe, "FilNfv", 3, aAux);
	ListaRegraAddValorLinhaAlfa(VenNLisPpe, "SnfNfv", "NFE", aAux);   
	ListaRegraAddValorLinhaNumero(VenNLisPpe, "NumNfv", 345, aAux);
	ListaRegraSalvarLinha(VenNLisPpe);   

	ListaRegraNovaLinha(VenNLisPpe);           
	ListaRegraAddValorLinhaNumero(VenNLisPpe, "SeqPpe", 2, aAux);   
	ListaRegraAddValorLinhaAlfa(VenNLisPpe, "CodOnu", "1234", aAux);   
	ListaRegraAddValorLinhaAlfa(VenNLisPpe, "NomEbq", "321", aAux);   
	ListaRegraAddValorLinhaAlfa(VenNLisPpe, "CodCla", "222", aAux);   
	ListaRegraAddValorLinhaAlfa(VenNLisPpe, "CodEmb", "333", aAux);   
	ListaRegraAddValorLinhaAlfa(VenNLisPpe, "QtdTot", "444", aAux);   
	ListaRegraAddValorLinhaAlfa(VenNLisPpe, "VolTip", "555", aAux);   

	ListaRegraAddValorLinhaNumero(VenNLisPpe, "FilNfv", 3, aAux);
	ListaRegraAddValorLinhaAlfa(VenNLisPpe, "SnfNfv", "NFE", aAux);   
	ListaRegraAddValorLinhaNumero(VenNLisPpe, "NumNfv", 345, aAux);
	ListaRegraSalvarLinha(VenNLisPpe);  
fim;

Este artigo ajudou você?