Ir para conteúdo
  • Cadastre-se

dev botao

  • Este tópico foi criado há 1820 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Administradores
Postado

Boa tarde.

Anexe um pdf exemplificando seu problema.

Att.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

  • Moderadores
Postado
4 horas atrás, ALA disse:

Bom dia. Esta ocorrendo um erro ao imprimir a NFC-e em A4. Mesmo não informando as tags de endereço o componente mostra a informação na impressão da NFC-e. Exemplo em anexo

Testei a impressão carregando o XML e o mostrado na imagem não aconteceu.

Se você estiver imprimindo logo após o envio pode ser que esteja pegando dados informados no componente mas que não chegaram a ser gerados no XML.

Como você está informando os dados do endereço nesse caso?

Equipe ACBr BigWings
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

 

Postado

Boa tarde. Estou imprimindo logo apos o envio, assim

                  ACBrNFe.NotasFiscais.Imprimir;
                  if dmbo_UsarFortes then // ala 22/10/2019
                  begin
                     ACBrNFe.NotasFiscais.ImprimirPDF; // ALA 16/12/2019 //
                  end;
 

Se tentar a reimpressão funciona blzinha...

Os dados do endereço do cliente, sempre são informados nas tags especificas. 

     // *** INICIO DADOS DO CLIENTE *** //
     if ( Trim( DMXML.CDS_VENDA.FieldByName( 'VEN_CNPJ_CIC' ).AsString ) <> EmptyStr      ) and
        ( Trim( DMXML.CDS_VENDA.FieldByName( 'VEN_CNPJ_CIC' ).AsString ) <> dmco_CNPJ_CIC ) then
     begin
        Dest.CNPJCPF   := DMXML.CDS_VENDA.FieldByName( 'VEN_CNPJ_CIC' ).AsString;
        Dest.indIEDest := inNaoContribuinte; // sempre mover 9 e não informa IF
        Dest.ISUF      := '';
     end;

     if DMXML.CDS_VENDA.FieldByName( 'VEN_NOME_CLIENTE' ).AsString <> dmco_NomeClienteConsumidor then
     begin
         Dest.indIEDest := inNaoContribuinte; // sempre mover 9 e não informa IF
         Dest.ISUF      := '';
         Dest.xNome     := DMXML.CDS_VENDA.FieldByName( 'VEN_CODIGO_CLIENTE' ).AsString + '-' +
                           DMXML.CDS_VENDA.FieldByName( 'VEN_NOME_CLIENTE'   ).AsString;
         if Trim( DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_UF' ).AsString ) = Trim( dmst_EmitSiglaUF ) then // ala 28/05/2019
         begin
             //if Trim( DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_CLIENTE' ).AsString ) <> EmptyStr then   d
             if Length( DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_CLIENTE' ).AsString ) > 2 then
             begin
                Dest.EnderDest.xLgr := DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_CLIENTE' ).AsString;
             end;
             if Trim( DMXML.CDS_VENDA.FieldByName( 'VEN_CIDADE_CLIENTE'  ).AsString ) <> EmptyStr then
             begin
                Dest.EnderDest.xMun := DMXML.CDS_VENDA.FieldByName( 'VEN_CIDADE_CLIENTE' ).AsString;
             end;
             if Trim( DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_CODIGO_PAIS' ).AsString ) <> EmptyStr then
             begin
                Dest.EnderDest.cPais := DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_CODIGO_PAIS' ).AsInteger; // ala 10/05/2019 //
             end;
             if Trim( DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_NOME_PAIS'  ).AsString ) <> EmptyStr then // ala 10/05/2019
             begin
                Dest.EnderDest.xPais := DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_NOME_PAIS'  ).AsString; // ala 10/05/2019
             end;
             if ( Trim( DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_NUMERO'  ).AsString ) = EmptyStr ) or
                ( Trim( DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_NUMERO'  ).AsString ) = '0'      ) then
             begin
                Dest.EnderDest.nro  := 'SEM NUMERO';//DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_NUMERO' ).AsString; // ALA 10/05/2019
             end
             else
             begin
                Dest.EnderDest.nro  := DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_NUMERO' ).AsString; // ALA 10/05/2019
             end;
             if Trim( DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_REFERENCIA' ).AsString ) <> EmptyStr then
             begin
                Dest.EnderDest.xCpl := DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_REFERENCIA' ).AsString; //'complemento';;
             end;
             if Trim( DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_CODIGO_MUNICIPIO' ).AsString ) <> EmptyStr then
             begin
                Dest.EnderDest.cMun := DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_CODIGO_MUNICIPIO' ).AsInteger; // ala 10/05/2019 //
             end;
             if Length( DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_BAIRRO' ).AsString ) > 2  then
             //if Trim( DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_BAIRRO' ).AsString ) <> EmptyStr then
             begin
                Dest.EnderDest.xBairro := DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_BAIRRO' ).AsString; //'bairro';;
             end
             else
             begin
                Dest.EnderDest.xBairro := 'SEM NUMERO';
             end;
             Dest.EnderDest.UF      := DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_UF'               ).AsString; // deve ser igual a UF do estabelecimento //;
             Dest.EnderDest.Fone    := Copy(Trim(util.Retorna_Numeros(DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_FONE' ).AsString)), 1, 11); //#4608 //
             if Length( Dest.EnderDest.Fone ) < 11 then
             begin
                Dest.EnderDest.Fone := EmptyStr;
             end;
             if Trim( DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_CEP'  ).AsString ) <> EmptyStr then
             begin
                Dest.EnderDest.CEP := DMXML.CDS_VENDA.FieldByName( 'VEN_ENDERECO_CEP' ).AsInteger; // ala 10/05/2019
             end;
end;

  • Moderadores
  • Solution
Postado
8 minutos atrás, ALA disse:

Os dados do endereço do cliente, sempre são informados nas tags especificas. 

Acredito que você ajustar sua rotina pra não preencher o nome e endereço caso o CPF/CNPJ/IDEstrangeiro não esteja informado.

Ou, o mais indicado, sempre carregar novamente o XML na impressão para evitar qualquer discrepância.

  • Curtir 1
Equipe ACBr BigWings
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

 

  • Este tópico foi criado há 1820 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...