Ir para conteúdo
  • Cadastre-se

Gabriel Souza Lopes

Membros
  • Total de ítens

    46
  • Registro em

  • Última visita

Posts postados por Gabriel Souza Lopes

  1. Bom dia,

    Ao fazer a consulta de notas destinadas utilizando do DistribuicaoDFe, o componente cria os diretórios e baixa o xml dos eventos vinculados às nfe's em questão. A situação que me deparei foi que um evento apresenta "/" na descrição criando problema na criação dos diretórios. O evento em questão é "Registro de Passagem de NFe propagado pelo MDFe/CTe". 

    Fiz modificação na função TpEventoToDescStr na unit pcnConversao, mudando o texto de "Registro de Passagem de NFe propagado pelo MDFe/CTe" para "Registro de Passagem de NFe propagado pelo MDFe-CTe"

    pcnConversao.pas

  2. Bom dia!

    Estou com um sat da elgin que estou vinculando assinatura do AC, porém ao tentar estou tendo continuamente a mesma mensagem de erro desconhecido 13099. Não achei nada sobre esse codigo de erro, verifiquei o codigo de vinculação junto ao sistema de retaguarda da sefaz, ele é valido. O sat já estava e continua operacional , vinculado com outra software house. Ao consultar status e consultar sat retorna sucesso. Estou fazendo pelo Aplicativo da elgin, é um Linker II. Já tentei reinstalar os drivers do sat e o proprio aplicativo de vinculação. Alguém já passou por essa situação?

  3. Bom dia, 

    Estou com o seguinte problema, em um cliente meu, ao tentar enviar nfe não retorna nenhum erro, porem a consulta não localiza no sefaz. Realmente a nfe não está sendo enviada, mas sem retorno de erro nenhum. O PC foi formatado e o certificado renovado à pouco tempo. Tentamos inutilizar as numerações que não deram certo para refazer as notas, a inutilização retorna que o numero da faixa já foi utilizado, porém no sefaz não consta nem envio nem inutilização dessas numerações.

    A mesma versão compilada nesse cliente está rodando e enviado nfe normalmente em outros lugares. Alguém já passou por algo semelhante, tem ideia do que possa ser ?

    muito obrigado pela atenção!

  4. Bom dia !
    Outra alteração necessária no  ACBrNFSEDANFSEFR e DANFSENovo.fr3 necessárias para o provedor Governa.
    Na procedure CarregaParametros, para carregar o "CódigoMunicipio" hj faz da seginte forma:

    FieldByName('CodigoMunicipio').AsString     := IfThen(CodigoMunicipio <> '', CodCidadeToCidade(StrToInt(CodigoMunicipio)), '');

    porém no caso do Governa a estrutura do XML não me possibilita passar o Codigo do IBGE do municipio, logo não tenho de onde carregar a informação para impressão do DANFSE. E no IfThen tenta executar CodCidadeToCidade(StrToInt(CodigoMunicipio)) com o Codigo do municipio = '', dando erro de conversão de StrToInt. Fiz a seguinte alteração:

            if not (CodigoMunicipio.IsEmpty) then
              FieldByName('CodigoMunicipio').AsString := CodCidadeToCidade(StrToInt(CodigoMunicipio))
            else
              FieldByName('CodigoMunicipio').AsString :=  '';

    que funcionará para ambos os casos. 

    Outra alteração foi no DANFSENovo.fr3 foi colocar máscara para casa decimal no Valor total do serviço e aumentada um pouco a altura do Memo18 (que preenche ItemListaServiço), a antiga altura estava cortando parte da informação.

    Seguem arquivos para análise.
    Muito obrigado!

    DANFSeNovo.fr3

    ACBrNFSeDANFSeFR.pas

  5. Boa tarde! 
    Atualizei os fontes hj e foram necessárias duas pequenas alterações:

    1) Na unit pnfsConversao, os prefixos do provedor Governa realmente não possuem ':',  

    " // Provedor Governa, os prefixos não tem ":" ????
    // XML := StringReplace( XML, 'tc', '', [rfReplaceAll] );
    // XML := StringReplace( XML, 'ts', '', [rfReplaceAll] ); " foi necessário remoção dos comentários;

    2) Na unit ACBrNFSeDANFSeFR, na procedure CarregaItensServiço, hj está da seguinte forma:

    for I := 0 to ANFSe.Servico.ItemServico.Count - 1 do
          with ANFSe.Servico.ItemServico.Items do
          begin
               //preenche itens
          end;

     if (ANFSe.Servico.ItemServico.Count < 12) then
          begin
            for I := 1 to 12 - ANFSe.Servico.ItemServico.Count do
              begin
               //preenche linhas vazias 
              end;
          end;

    caso possua, preenche os itens da nfse. Logo abaixo preenche linhas  vazias, porem não confere se preencheu algum item antes para preenche-las. Como resultado, esta imprimindo uma tabela com 'Item', 'Quantidade', 'Valor unitário' e 'Valor Total' sobre a discriminação dos itens no DANFSE (utilizando o modelo DANFSENovo.fr3).

    Fiz a seguinte alteração:

     if (ANFSe.Servico.ItemServico.Count < 12) and (ANFSe.Servico.ItemServico.Count > 0) then
          begin
            for I := 1 to 12 - ANFSe.Servico.ItemServico.Count do
              begin
               //preenche linhas vazias 
              end;
          end;

    Verificando se havia algum serviço preenchido antes de preencher as linhas vazias. Seguem em anexo os arquivos alterados.

     

    ACBrNFSeDANFSeFR.pas

    pnfsConversao.pas

  6. Boa tarde, estou trabalhando na integração da NFSe da prefeitura de Iturama, cujo provedor é Governa. Ao tentar enviar, aparece a mensagem 'Requisião não enviada 12029 - um conexão com o servidor não pode ser estabelecida'. O erro ocorre ao tentar consumir o ws, com a função HttpSendRequest, ele é consumido, a nfse é enviada, porém não tenho o retorno do serviço após o erro. Eu imagino que seja pq o ws não retorna um padrão xml, ele retorna algo assim

     

    <string xmlns="http://tempuri.org/">
    <tcRetornoLoteRps><tcValidaLoteRps><tsFlgEtt>V</tsFlgEtt><tsDesOco>Estrutura do Arquivo XML OK!</tsDesOco></tcValidaLoteRps><tcRetRps><tcInfRetRps><tsNumRps>1</tsNumRps><tsNumNot>xxxx</tsNumNot><tsCodVer>XXXXX0000</tsCodVer><tsFlgRet>V</tsFlgRet><tsDesOco>RPS já Importado.</tsDesOco></tcInfRetRps></tcRetRps></tcRetornoLoteRps>
    </string> 
     
     
    ele tem uma tag <string> e preenche nela, mas ao analisar o conteudo, o proprio navegador considera uma string com caracteres especiais e não um xml, mas não tenho certeza, alguém poderia me dar uma luz?!
  7. Deu certo aqui! O problema não era na estrutura, era no valor preenchido na data da nf referenciada. Até mês passado creio que não era validado pela receita, pois até então ela mandava dia/mes(DDMM) apos alterar e preencher com a estrutura certa (cuja a propria TAG ja indica) ano/mes (AAMM) deu certo o envio. Muito obrigado a todos pelas respostas!!

    :D

    • Curtir 1
  8. entendi, a estrutura do bloco de ref esta assim

    -<NFref>
    -<refNFP>

    <cUF>52</cUF>

    <AAMM></AAMM>

    <CPF></CPF>

    <IE></IE>

    <mod>01</mod>

    <serie></serie>

    <nNF></nNF>

    </refNFP>

    </NFref>

     

    Resalva que somente os dados foram retirados do bloco, e é a mesma estrutura q até mês passado estava enviando normal

  9. Um cliente está tentando enviar uma Nfe esta retornando a mensagem 'Erro não catalogado: Codigo do status 312' da receita. Já fucei em tudo que conhecia, no manual da NFe, nas Notas Técnicas, não encontro esse bendito erro. Alguma alma caridosa poderia me dar uma luz? é uma nota de Compra de Produtor Rural que meu cliente esta dando entrada por NFe

  10. Boa tarde,

    Quando consulta nfse por rps, estava gravando um xml 'vazio', somente com o cabeçalho. Notei que na unit ACBrNFSeWebServices, na função ExtrairNotasRetorno,

    estava sendo usada a variavel 'j' da seguinte forma : 

    j := Pos('</' + Prefixo3 + 'CompNfse>', FRetListaNFSe);

    e mais abaixo usa a variavel J em um for para percorrer a lista de FNotasFiscais. Porem abaixo desse for utilizava o valor de j para:

    FRetNFSe := Copy(FRetListaNFSe, 1, j - 1);

    logo o valor dele estava com o do for e não o declarado no começo da função. Alterei a unit, instanciando uma nova variavel para o for, deixando o 'j' exclusivo para a outra função.

    Segue a unit alterada em anexo

     

    Obs.: Essa mesma unit fora alterada para integração com Provedor Governa, o qual estou aguardando término de análise por parte do ACBr.

    ACBrNFSeWebServices.pas

  11. Bom dia,

    Estou integrando um novo provedor ao ACBr, o Portal Governa, porém o retorno no WS não possui uma 'estrutura' XML, retorna assim :

    <string xmlns="http://tempuri.org/">
    <tcRetornoLoteRps><tcValidaLoteRps><tsFlgEtt>F</tsFlgEtt><tsDesOco>Retorno</tsDesOco></tcValidaLoteRps><tcRetRps/></tcRetornoLoteRps>
    </string>
     
    como faço para tratar as configurações na função GetRetornoWS? O ACBr vai entender o conteudo da Tag <string> como um xml válido?
  12. Bom bia Gabriel,

    Abra a unit pmdfeConversaoMDFe que esta na pasta: ...\Fontes\ACBrDFe\ACBrMDFe, altere a string 'LayMDFeEvento' por 'RecepcaoEvento' nas functions LayIOutToServico e ServicoToLayOut.

    Compile a sua aplicação com a opção Build e tente novamente.

     

    Olá Italo

    fiz o que vc sugeriu, porem ao tentar encerrar o mdfe recebo a seguinte mensagem:

    ERRO: 
    Erro Interno: 0
    Erro HTTP: 4Erro: Requisição não enviada.
    0 - A operação foi concluída com êxito

    att

    Fiz o mesmo, mas o problema persiste. 

×
×
  • 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.