[xml nfce sem informacao do destinatario quando cfop 5656 e destinatario nao identificado]

Em 17/06/2018 at 11:52, carlosinfoteen disse:

Creio que o erro está em você não gerar a tag do codigo ANP para gás de cozinha ou outro erro. Mas como o bigWings falou nada a ver com a identificação do consumidor.

boa tarde, carlosinfoteen

obrigado pelo retorno, removendo as tag referente ao FCP autoriza normal, vou verificar se não deve ser informado essas tag para NFCe

[xml nfce sem informacao do destinatario quando cfop 5656 e destinatario nao identificado]

2 horas atrás, BigWings disse:

Não compreendi o problema.

Quando não há as tags referentes ao destinatário é o que caracteriza a venda a consumidor não identificado.

Para consumidor identificado, no mínimo é preciso informar o CPF/CNPJ/IdEstrangeiro.

Bigwings obrigado pelo retorno. Entendi a sua explanação. Mas vou explicar melhor o que acontece é que quando tentando emitir uma nfce para consumidor não identificado, por exemplo com CFOP 5656 gás de cozinha. Ele retorna erro não catalogado. Se informado um CPF autoriza normalmente. Eu citei as tags do destinatário pq foi a única coisa que é diferente de um xml para o outro.

[xml nfce sem informacao do destinatario quando cfop 5656 e destinatario nao identificado]

Boa noite, estou com um problema na geração de nfce para consumidor não identificado, quando cfop 5656 (gas de cozinha) ou com cfop 5405, em ambos cfop não gera o grupo de tag referente ao destinatário. Se informar um cliente com cpf ele gera normal, só acontece quando é cliente não identificado.Se alguém já passou por isso e poder dar uma dica agradeço.

[Nfse Para Palotina Pr]

Bom dia, implementei usando minhas próprias funções, pois a Elotech não tem o padrão ABRASF

[Integração Sicoob - Correspondente Bradesco]

Acredito que seja na hora de configurar o componente, esta dando Agencia\Conta do arquivo inválido, na hora que vai ler o arquivo, me tira uma duvida, as configurações para ler o retorno são as configurações da conta Sicoob, ou do banco correspondente?

[Integração Sicoob - Correspondente Bradesco]

Uma duvida Joel, os retornos você esta conseguindo ler normalmente com essa unit que você disponibilizou?

[Integração Sicoob - Correspondente Bradesco]

Bom Dia, realmente se for colocar o tamanho do nosso numero conforme pede o manual, ele fica do jeito que vc falou, e como estava com pressa para homologar e para não alterar os fontes do acbr eu setei o tamanho máximo  do nosso número para 1, assim deu certo.

outro detalhe ao gerar a remessa tem duas funçoes que tive que alterar no ACBrBancoBradescoSICOOB

na function GerarRegistroHeader400 deixei assim ->

with ACBrBanco.ACBrBoleto.Cedente do
   begin
      wLinha:= '0'                                             + // ID do Registro
               '1'                                             + // ID do Arquivo( 1 - Remessa)
               'REMESSA'                                       + // Literal de Remessa
               '01'                                            + // Código do Tipo de Serviço
               PadRight( 'COBRANCA', 15 )                          + // Descrição do tipo de serviço
               PadLeft( Agencia, 13, '0')                          + // Código da Cooperativa  estava assim -> PadLeft( Agencia + AgenciaDigito, 13, '0')       
               PadLeft( CodigoCedente, 7, '0')                     + // Código de Cobrança
               PadRight( Nome, 30)                                 + // Nome da Empresa
               IntToStr( 756 ) + PadRight('BANCOOB', 15)           + // Código e Nome do Banco(756 - Sicoob)
               FormatDateTime('ddmmyy',Now)  + Space(08)       + // Data de geração do arquivo + brancos
               'SX'                                            + // Identificação do Sistema
               IntToStrZero(NumeroRemessa,7) + Space(277)      + // Nr. Sequencial de Remessa + brancos
               IntToStrZero(1,6);                                // Nr. Sequencial de Remessa + brancos + Contador

      ARemessa.Text:= ARemessa.Text + UpperCase(wLinha);
   end;

outra function GerarRegistroTransacao400 linha 1347

 

 with ACBrBoleto do
      begin
         if Mensagem.Text <> '' then
            aMensagemCedente:= Mensagem[0];

         wLinha:= '1'                                                     + // ID Registro
                  StringOfChar( '0', 19)                                  + // Dados p/ Débito Automático
                  PadLeft( Cedente.Agencia, 10, '0')                      + // Código da Cooperativa  Estava assim ->PadLeft( Cedente.Agencia + Cedente.AgenciaDigito, 10, '0') + 
                  PadLeft( Cedente.CodigoCedente, 7, '0')                    + // Código de Cobrança
                  PadRight( SeuNumero, 25, ' ')                               + // Número de Controle de Participantes
                  StringOfChar( '0', 8)                                   + // ZEROS
                  PadRight(aNossoNumero , 11, '0')                            + // Nosso Número
                  aDigitoNossoNumero                                      + // Digito Verificador do Nosso Número
                  IntToStrZero( round( ValorDescontoAntDia * 100), 10)    + // Desconto bonificação por dia
                  TipoBoleto + 'N' + Space(14)                            + // Tipo Boleto(Quem emite) + 'N'= Nao registrar p/ Débito automático
                  aOcorrencia                                             + // Identificação da Instrução
                  PadRight( NumeroDocumento,  10)                             + // Número do Documento
                  FormatDateTime( 'ddmmyy', Vencimento)                   + // Data do Vencimento do Título
                  IntToStrZero( Round( ValorDocumento * 100 ), 13)        + // Valor do Título
                  StringOfChar('0',8) + PadRight(aEspecie,2) + 'N'            + // Zeros + Especie do documento + Idntificação(valor fixo N)
                  FormatDateTime( 'ddmmyy', DataDocumento )               + // Data de Emissão
                  aProtesto                                               + // 1ª Instrução + 2ª Instrução
                  IntToStrZero( round(ValorMoraJuros * 100 ), 13)         + // Valor a ser cobrado por dia de Atraso
                  IfThen(DataDesconto < EncodeDate(2000,01,01),'000000',
                         FormatDateTime( 'ddmmyy', DataDesconto))         + // Data Limite para Concessão de Desconto
                  IntToStrZero( round( ValorDesconto * 100 ), 13)         + // Valor do Desconto
                  StringOfChar('0',13)                                    + // Zeros
                  IntToStrZero( round( ValorAbatimento * 100 ), 13)       + // Valor do Abatimento a ser concedido ou cancelado
                  aTipoSacado + PadLeft(OnlyNumber(Sacado.CNPJCPF),14,'0')   + // Tipo de inscrição do sacado + Número de inscrição do sacado
                  PadRight( Sacado.NomeSacado, 40, ' ')                       + // Nome do Sacado
                  PadRight( Sacado.Logradouro + ' ' + Sacado.Numero + ' '     +
                        Sacado.Bairro + ' ' + Sacado.Cidade + ' '         +
                        Sacado.UF, 40)                                    + // Endereço Completo
                  space(12) + PadRight( Sacado.CEP, 8 )                       + // 1ª Mensagem + CEP
                  space(1)                                                + // Branco
                  PadLeft(OnlyNumber(Sacado.SacadoAvalista.CNPJCPF),14,'0')  + // Inscrição do Sacador / Avalista
                  aTipoSacador                                            + // Tipo do Documento do Sacador / Avalista
                  PadRight( Sacado.SacadoAvalista.NomeAvalista , 43, ' ')     ; // Sacador / Avalista

         wLinha := wLinha + IntToStrZero(aRemessa.Count + 1, 6); // Nº SEQÜENCIAL DO REGISTRO NO ARQUIVO
         wLinha := wLinha + DoMontaInstrucoes1;

         aRemessa.Text:= aRemessa.Text + UpperCase(wLinha);
      end;
   end;

[Integração Sicoob - Correspondente Bradesco]

Bom dia, Juliana Tamizou fiz a alteração sugerida e funcionou certinho, muito obrigado, boleto e arquivo remessa homologados. Muito Obrigado.

Sobre os fontes, como funcionaria? sera aplicada essa alteração no svn?

[Integração Sicoob - Correspondente Bradesco]

Boa Tarde, Joel  também estou homologando para este mesmo banco na mesma situação, com correspondente Bradesco, estou fazendo o procedimento de remessa, e estao me retornando erros, um dos erros, que se refere ao código da cooperativa eu tive que alterar a unit ACBrBancoBradescoSICOOB.pas nas funcoes GerarRegistroHeader400 e GerarRegistroTransacao400 ele concatenava  -> PadLeft( Cedente.Agencia + Cedente.AgenciaDigito, 10, '0') + // Código da Cooperativa fincando assim PadLeft( Cedente.Agencia, 10, '0') --  nas duas funções o mesmo detalhe, agora o erro no digito verificado que pede a letra 'P' isso ainda não consegui arrumar. vocêis teriam alguma dica? Obrigado a todos

[(ACBrNFeDANFeESCPOS) Impressao NFC-e Bematech MP4200 TH Imprimindo logo da propria Bematech]

Régys Obrigado pela dica.

Eu instalei o user software, mas não consegui ter sucesso. Não sei se estou fazendo errado, na net não consegui nada... sem querer abusar da sua boa vontade teria como me passar o nome ou link do software para limpar essa logo da impressora e como fazer isso?

[(ACBrNFeDANFeESCPOS) Impressao NFC-e Bematech MP4200 TH Imprimindo logo da propria Bematech]

Bom dia.

Estou imprimindo NFCe usando o componente DANFE SCPOS, ate entao tudo normal, mas chegou uma nova remessa de impressoras Bematech, que ao imprimir uma nova NFCe ou re-imprimir uma já autorizada, ela começou a imprimi a logo da própria Bematech! alguém já passou por algo parecido. Tenho duas Bematech que executo os testes, é a impressão da logo só acontece nas impressoras adquiridas recentemente.

Desde já Obrigado a Todos.

Segue em anexo uma impressão.

NFCE.pdf

[Erro Ao Inutilizar Numeração De Nf-E]

Bom dia,

o meu problema foi resolvido, exclui os fontes antigos, rodei o .bat e logo baixei novamente os fontes pelo svn,

instalei os componentes pelo acbrInstall e o erro parou.

Obrigado a todos.

[Erro Ao Inutilizar Numeração De Nf-E]

Juliomar vc estava certo, eu rodei o .bat e instalou tudo certinho. mas o erro na inutilização continua:

 

Versão Layout : 3.10

Ambiente : 2

Versão Aplicativo : PR-v3_2_5

Status Código : 502

Status Descrição : Erro na Chave de Acesso - Campo Id não corresponde à concatenação dos campos correspondentes

UF : PR

Recebimento : 15/12/2014 17:06:54

ERRO: Erro na Chave de Acesso - Campo Id não corresponde à concatenação dos campos correspondentes

 

eu uso esta função para enviar a Inutilização,

DM.ACBrNFe1.WebServices.Inutiliza(trim(SomenteNumeros(CNPJ)), Justificativa, Ano, Modelo, Serie, NumeroInicial, NumeroFinal);

[Erro Ao Inutilizar Numeração De Nf-E]

Eu recompilei os fontes com o ACBrinstall, mas deu erro.

Então eu deletei os .dcu arquivos temporarios, rodei o apagarAcbr.bat, baixei novamente os fontes acbr mas o erro continuou.

Em anexo esta o log gerado pelo ACBrInstall.

Desde já obrigado a Todos

log_Delphi_XE3.txt

[Erro Ao Inutilizar Numeração De Nf-E]

Ok Juliomar, vou fazer aqui e posto o resultado

[Erro Ao Inutilizar Numeração De Nf-E]

Bom dia Juliomar, Obrigado por responder.

Eu dei um Build nos fontes do meu programa. deletei o componente acbr nfe e inseri novamente no form.

[Erro Ao Inutilizar Numeração De Nf-E]

Boa Tarde.

Apos atualizar os fontes dia 13/12/2014 para adequar a minha aplicação a nova versão da nfe 310, testando a inutilização de nf-e esta retornando o seguinte erro:

 

Versão Layout : 3.10

Ambiente : 2

Versão Aplicativo : PR-v3_2_5

Status Código : 502

Status Descrição : Erro na Chave de Acesso - Campo Id não corresponde à concatenação dos campos correspondentes

UF : PR

Recebimento : 14/12/2014 14:15:21

ERRO: Erro na Chave de Acesso - Campo Id não corresponde à concatenação dos campos correspondentes

 

Verifiquei os fontes, configurei os schemas e a versão para nfe 200 mas o mesmo persiste, também testei o exemplo que acompanha nos fontes e o mesmo erro também acontece no exemplo. Alguém já passou por isso ou alguma sugestão do que pode estar acontecendo.

Desde já agradeço a Todos.

[Boleto Da Caixa Econômica Sigcb Não Passa Na Homologação]

Boa tarde, também estou nesse mesmo dilema, o boleto não homologa.O Pessoal da validação me enviaram este arquivo mas não estou conseguindo achar a falha, desde já agradeço a todos. em anexo esta o boleto e resultado da homologacao

TermoHomologacao.zip

BoletosHomologacao.rar

[Erro Ao Emitir Mdf-E Veictracao Is Incomplete According To The Dtd/schema.]

Consegui resolver o Problema era por que estava faltando duas tag no xml a <tpRod> e tambem a  <tpCar> que no exemplo que acompanha nos fontes da acbr não constam.

Consultando o Manual consegui resolver. Obrigado uma vez mais Italojjr.

[Erro Ao Emitir Mdf-E Veictracao Is Incomplete According To The Dtd/schema.]

Obrigado Italojjr vou verificar aqui, Por acaso voce teria algum xml do mdfe para eu comparar com o que estou gerando?

[Erro Ao Emitir Mdf-E Veictracao Is Incomplete According To The Dtd/schema.]

Bom dia, 

Estou iniciando a geração de MDF-e, e estou com esta mensagem de erro. já revi o código e as informações, mas não estou conseguindo entender o porque dessa mensagem. 

Alguém já passou por isso. Se poderem me dar alguma dica, desde já agradeço a todos.

 

Em anexo o xml que estou gerando.

41140480775034000197580010000000011000001046-mdfe.xml

[Dúvida Icms St 140]

Muito obrigado, Kiko Fernandes e Jorge Andrade, entendi perfeitamente, verifiquei aqui e deu certo! Valeu...

[Dúvida Icms St 140]

Boa tarde, estou com duvida de cst para emissão de uma nota de entrada, utilizo o componente acbrnfe

pela orientação do escritório o st a ser utilizado e o 140 por ser uma nota de entrada de importação.

o código que estou alimentando o componente e este

 

if dm.cdsitemnfe.FieldByName('st').AsString = '041' then

                ICMS.CST := cst41

              else if dm.cdsitemnfe.FieldByName('st').AsString = '000' then

                ICMS.CST := cst00

              else if dm.cdsitemnfe.FieldByName('st').AsString = '010' then

                ICMS.CST := cst10

              else if dm.cdsitemnfe.FieldByName('st').AsString = '020' then

                ICMS.CST := cst20

              else if dm.cdsitemnfe.FieldByName('st').AsString = '030' then

                ICMS.CST := cst30

              else if dm.cdsitemnfe.FieldByName('st').AsString = '040' then

                ICMS.CST := cst40

              else if dm.cdsitemnfe.FieldByName('st').AsString = '041' then

                ICMS.CST := cst41

              else if dm.cdsitemnfe.FieldByName('st').AsString = '045' then

                ICMS.CST := cst45

              else if dm.cdsitemnfe.FieldByName('st').AsString = '050' then

                ICMS.CST := cst50

              else if dm.cdsitemnfe.FieldByName('st').AsString = '051' then

                ICMS.CST := cst51

              else if dm.cdsitemnfe.FieldByName('st').AsString = '060' then

                ICMS.CST := cst60

              else if dm.cdsitemnfe.FieldByName('st').AsString = '140' then

                ICMS.CST := ???; -> não tem a opção cst140.

 

desde já agradeço a todos

[Erro Cte Versao 2.00 "versaomodal'' With Value ''2.00'' Failed To Parse.]

Boa Tarde,

GustavoKato ok, Obrigado!

[Erro Cte Versao 2.00 "versaomodal'' With Value ''2.00'' Failed To Parse.]

Era isso mesmo Italojjr.

Muito Obrigado pela Ajuda!