Identificador de Regra

VEN-140MDFEA07

Módulo: VEN - Vendas.

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

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;

PORTAL DE DOCUMENTAÇÃO
Gestão Empresarial \| ERP - versão 5.10.3 (XTended)