Nenhum grupo de documento foi encontrado no (CT-e, CT, NF-e, NF, MDF-e) municipio sem documento...

samuelxingu · Terça as 18:43

Olá amigos, Hoje um cliente preciosou emitir um MDF-e, poré retornou a mensagem do título, fiz o teste e percebi que as chaves de NF-e não estavam sendo implementadas como naturalmente acontece, peguei o componente atualizado e depois de fazer alguns teste percebi que CT-e gera normalmente, mas nfe não, fiz algumas pequisas porém sem sucesso, não sei se para nfe não precisa mais emitir mdfe, alguém poderia me dar uma ajuda, vou postar a parte do codigo para que alguem possa ver se mudou a forma de identificar nfe:

with infNFe.New do
begin
chNFe := '35220522595344000123550010000027261709160129';

// Informações das Unidades de Transporte (Carreta/Reboque/Vagão)

with infUnidTransp.New do
begin
//TpcnUnidTransp = ( utRodoTracao, utRodoReboque, utNavio, utBalsa, utAeronave, utVagao, utOutros );
tpUnidTransp := utRodoTracao;
idUnidTransp := 'ABC1234'; // informar a placa se rodoviário

with lacUnidTransp.New do
begin
nLacre := '123';
end;

// Informações das Unidades de carga (Containeres/ULD/Outros)
with infUnidCarga.New do
begin
// TpcnUnidCarga = ( ucContainer, ucULD, ucPallet, ucOutros );
tpUnidCarga := ucOutros;
idUnidCarga := 'AB45'; // informar o numero da unidade da carga

with lacUnidCarga.New do
begin
nLacre := '123';
end;

qtdRat := 1.0;
end;

qtdRat := 1.0;
end;
end; // fim do with

with infCTe.New do
begin
chCTe := '35110803911545000148570010000001021000001023';

// Informações das Unidades de Transporte (Carreta/Reboque/Vagão)

with infUnidTransp.New do
begin
//TpcnUnidTransp = ( utRodoTracao, utRodoReboque, utNavio, utBalsa, utAeronave, utVagao, utOutros );
tpUnidTransp := utRodoReboque;
idUnidTransp := 'XYZ5678';

with lacUnidTransp.New do
begin
nLacre := '321';
end;

// Informações das Unidades de carga (Containeres/ULD/Outros)
with infUnidCarga.New do
begin
// TpcnUnidCarga = ( ucContainer, ucULD, ucPallet, ucOutros );
tpUnidCarga := ucOutros;
idUnidCarga := 'DD98';

with lacUnidCarga.New do
begin
nLacre := '321';
end;

qtdRat := 1.0;
end;

qtdRat := 1.0;
end;
end; // fim do with
end;

samuelxingu · Terça as 19:08

Olá assim que postei, consegui matar a charada, não tinha prestado atenção que tinha sido escolhido a opção : Ide.tpEmit := teTransportadora; nesse caso so permite CT-e, a escolha correta é: Ide.tpEmit := teTranspCargaPropria;

case FLancMDFe.CbTipoEmitente.ItemIndex of
0: Ide.tpEmit := teTransportadora;
1: Ide.tpEmit := teTranspCargaPropria;
end;

Pode fechar o topico.