Ir para conteúdo
  • Cadastre-se

Valdir Dill

Membros Pro
  • Total de ítens

    935
  • Registro em

  • Última visita

  • Days Won

    5

Posts postados por Valdir Dill

  1. Confere se seu arquivo midas.dll está na versão correta e se encontra no system32 ou junto ao delphi!

    ou ainda pode adicionar o midaslib na uses do seu código!

    acho que resolve seu problema!

     

    Obrigado pelas dicas Juliomar.

    Fiz de tudo, inclusive em relação a midas que você sugeriu, mas não resolveu.

    Olha que estranho: eu tinha os componentes ACBrNFSeDANFSeFR1 e DANFSE.fr3 em um dataModule. Só mudei eles para o form onde a impressão é chamada e resolveu.

    Não sei o que pode estar gerando esse conflito, mas resolveu, que é o mais importantes, rs.

     

    Obrigado pela ajuda!

  2. Estou informado no campo de observações gerais da NFSE. O ACBR não possui um campo específico para tal informação no momento.

    ACBrNFSe.NotasFiscais.Add.NFSe.OutrasInformacoes. Algo assim:

    "texto da lei" + "- DAS " + ValorTotal * Percentual do imposto + "(valor aproximado)"

     

    Beleza Rodrigo, resolvido.

    No meu caso (issCuritiba), como esse servidor não aceita dados em "Outras Informações", coloquei na própria discriminação do serviço acrescentando o texto contendo o valor dos tributos.

     

    Obrigado pela ajuda!

  3. Caros colegas,
     
    Estou iniciando no envio de NFSe utilizando o ACBR para o servidor issCuritiba.
    Consegui enviar o RPS, a nota foi confirmada e recebo o xml de retorno da nota. Tudo certo.
    O problema está na hora de imprimir. Estou fazendo a impressão com ACBrNFSeDANFSeFR1 e utilizando o DANFSE.fr3. Ocorre que nesse .fr3, no campo "Nome / Razão Social" está configurado para imprimir apenas a razão social. Porém, o XML da NFSe retornado pela SEFAZ Curitiba, traz apenas o "NomeFantasia", sem a razão social. Aí, ao imprimir o DanfSe, esse campo ficam em branco.
    A solução seria simples, ou seja, apenas alterar o .fr3 e mudar esse campo. Aí é que vem o meu problema que não estou conseguindo resolver. Se abro o .fr3 e faço qualquer alteração e salvo ele, ao tentar imprimir ocorre o erro "cdsParametros: Missing data provider or data packet" (print anexo).
    Se eu utilizar o .fr3 do svn sem alterar nada nele, imprime normal, porém sem o nome fantasia.
     
    Alguma dica? Será que é alguma incompatibilidade do Fortes Report instalado em minha máquina? Como resolver?
     
    Obrigado.
  4. Olá,

     

    Gostaria de saber dos colegas quem emitem NFSe se estão lançando o total de tributos (lei 12.741).

    Se positivo, como estão calculando, onde estão encontrando alíquota. Pela tabela IBPT não encontrei como.

     

     

    Obs.: pelo que sei, essa informação é obrigatória, já que o serviço é destinado a consumidor final, correto?

     

    Obrigado!

  5. Acho que é pouco tempo pra alguém ler, pois veja temos uma enquete rodando a alguns dias e para a comunidade que tem muito mais que 15 cadastradas só uns 300 passaram por lá e nem todos votaram, acho que deveria aguardar para ver respostas!

     

    Ok Juliomar. Obrigado!

  6. Olá,

     

    Estou iniciando no envio de NFSe e estou enfrentando um probleminha.

    Consegui fazer o envio, impressão, etc. tudo está ok.

    Surgiu apenas um probleminha que é o seguinte: o nome do prestador é assim "Dill & Duarte". Aí, quando o ACBR recebe o retorno do envio (arquivo xml da nota) ele vem com esse caractere (&) que é gravado no xml da nota final, o qual é armazenado.

    Ao se tentar manusear ou abrir esse xml, esse caractere não deixa o arquivo ser aberto, pelo menos não no padrão xml, apenas como texto comum.

    Fiz a seguinte alteração no ACBRUtil.pas, o que resolveu o problema.

     

    function TiraAcento( const AChar : AnsiChar ) : AnsiChar ;
    begin
      case AChar of
        'à','á','ã','ä','â' : Result := 'a' ;
        'À','Á','Ã','Ä','Â' : Result := 'A' ;
        'è','é',    'ë','ê' : Result := 'e' ;
        'È','É',    'Ë','Ê' : Result := 'E' ;
        'ì','í',    'ï','î' : Result := 'i' ;
        'Ì','Í',    'Ï','Î' : Result := 'I' ;
        'ò','ó','õ','ö','ô' : Result := 'o' ;
        'Ò','Ó','Õ','Ö','Ô' : Result := 'O' ;
        'ù','ú',    'ü','û' : Result := 'u' ;
        'Ù','Ú',    'Ü','Û' : Result := 'U' ;
        'ç'                 : Result := 'c' ;
        'Ç'                 : Result := 'C' ;
        'ñ'                 : Result := 'n' ;
        'Ñ'                 : Result := 'N' ;
        '&'                 : Result := 'e'; //incluí esta linha
      else
        Result := AChar ;
      end;
    end ;
     
    Sugiro analisar a possibilidade de incluir essa linha também nos fontes do ACBR.
     
    Obrigado.

     

  7. Resolvido! Depois de muito tentar, descobri que na formação do token (cnpj+ano+'0001'), esse "ano" não é o ano atual, mas devemos considerar o literal '2013' que está no manual. Eu estava colocando o ano da emissão da nota, ou seja '2014'. Foi só mudar para '2013' que abre a nota certinho no browser e sem nenhum erro.

    Obrigado.

    Em consulta feita à SEFAZ-MT, fomos informados que o problema está no servidor SEFAZ. Nossa interpretação do manual estava correta, ou seja, o ano a ser utilizado na composição do token em homologação é realmente o ano atual e não o literal '2013'. Ainda segundo a SEFAZ-MT, esse problema vai estar corrigido até 16/01/201

  8.  

     

    Olá,

     

    Estou com dificuldades de geração do link para qrcode. Anexei o xml da nota. Se alguém puder dar uma olhada no que estou fazendo errado. acredito que seja no hash, mas já conferi e reconferi, inclusive com exemplos de colegas que postaram aqui no fórum, mas não consegui descobrir o erro.

     

    Agradeço

     

    String de para cálculo do Hash:
    chNFe=51140107469270000195650010000000101066998074&nVersao=100&tpAmb=2&dhEmi=323031342D30312D30365431373A33383A31392D30333A3030&vNF=14.80&vICMS=0.00&digVal=564B303753356552556A6C436266376C4657756A644C46563143343D&cIdToken=0000010746927020140001
     
    Hash gerado
    3DEA898B051211B881CA3906762F35143D22FE7F
     
    Link para o QrCode - Este link apresenta a nota, mas também mostra um erro de qrCode.

     

     

    Resolvido! Depois de muito tentar, descobri que na formação do token (cnpj+ano+'0001'), esse "ano" não é o ano atual, mas devemos considerar o literal '2013' que está no manual. Eu estava colocando o ano da emissão da nota, ou seja '2014'. Foi só mudar para '2013' que abre a nota certinho no browser e sem nenhum erro.

    Obrigado.

  9.  

    Olá,

     

    Estou com dificuldades de geração do link para qrcode. Anexei o xml da nota. Se alguém puder dar uma olhada no que estou fazendo errado. acredito que seja no hash, mas já conferi e reconferi, inclusive com exemplos de colegas que postaram aqui no fórum, mas não consegui descobrir o erro.

     

    Agradeço

     

    String de para cálculo do Hash:
    chNFe=51140107469270000195650010000000101066998074&nVersao=100&tpAmb=2&dhEmi=323031342D30312D30365431373A33383A31392D30333A3030&vNF=14.80&vICMS=0.00&digVal=564B303753356552556A6C436266376C4657756A644C46563143343D&cIdToken=0000010746927020140001
     
    Hash gerado
    3DEA898B051211B881CA3906762F35143D22FE7F
     
    Link para o QrCode - Este link apresenta a nota, mas também mostra um erro de qrCode.

     

  10. Olá,

     

    Estou com dificuldades de geração do link para qrcode. Anexei o xml da nota. Se alguém puder dar uma olhada no que estou fazendo errado. acredito que seja no hash, mas já conferi e reconferi, inclusive com exemplos de colegas que postaram aqui no fórum, mas não consegui descobrir o erro.

     

    Agradeço

     

    String de para cálculo do Hash:
    chNFe=51140107469270000195650010000000101066998074&nVersao=100&tpAmb=2&dhEmi=323031342D30312D30365431373A33383A31392D30333A3030&vNF=14.80&vICMS=0.00&digVal=564B303753356552556A6C436266376C4657756A644C46563143343D&cIdToken=0000010746927020140001
     
    Hash gerado
    3DEA898B051211B881CA3906762F35143D22FE7F
     
    Link para o QrCode - Este link apresenta a nota, mas também mostra um erro de qrCode.
  11. Boa tarde,

    Como forma de retribuir a imensa ajuda que os componentes do ACBr nos dão, já que não pago o SAC tento contribuir com código ou encontrar bugs.

    Criei um layout para NFC-e no FastReport com largura do papel de 8 cm para ser utilizado em impressoras não fiscais, mas nada impede de ser impresso em papel A4.

    As alterações foram feitas somente no carregamento dos dados para o ClientDataSet do FastReport (ACBrNFeDANFEFRDM.pas) como:

    * Criado o ClientDataSet para a tag "pag" (tag exlusiva para NFC-e)

    * Alterado o ClientDataSet "Identificacao" para carregar a "MensagemFiscal" e compatibilizado a tag "DEmi" para a NFCe mostrar Data e Hora.

    * Criado no CDS "Destinatario" o campo "Consumidor".

    Nenhuma destas alterações influenciam ou causa "problemas" na impressão da NF-e.

    Em anexo os arquivos ACBrNFeDANFEFRDM.pas e ACBrNFeDANFEFRDM.dfm com os últimos fontes do svn.

    Limitações:

    1. A impressão do QR Code vem de uma imagem externa, da mesma forma que é utilizado na impressão da logomarca da empresa.

    A fazer:

    1. Selecionar a URL dos Estados para gerar o endereço do site de consulta.

    Pág. 14 do Manual de Especificações Técnicas do DANFE NFC-e e QR Code - versão 3.1

    2. Criar uma nova propriedade no componente Danfe em FastReport para receber o caminho da imagem QR Code.

    Utilização:

    1. Caminho do arquivo FastReport:

    ACBrNFeDANFEFR1.FastFile := 'C:\DANFeNFCe.fr3';

    2. Caminho da imagem QR Code:

    ACBrNFeDANFEFR1.Logo := C:\QR.jpeg';

    3. Imprimir:

    ACBrNFe1.NotasFiscais.Clear;
    ACBrNFe1.NotasFiscais.LoadFromFile(PathDoXML);
    ACBrNFe1.NotasFiscais.Imprimir;
    

    Em anexo como ficou minha impressão, espero que ajude.

     

    Olá Leonardo!

    Você sabe dizer se essas suas alterações dos ACBrNFeDANFEFRDM.pas e ACBrNFeDANFEFRDM.dfm para impressão do danfe da NFCe vão ser disponibilizadas via svn oficial do componente?

    Fiz os testes e funciona perfeitamente. O problema é que gosto de manter os arquivos do ACBR atualizado via svn. Aí cada vez que atualizo pelo svn preciso depois fazer a cópia manual desses dois arquivos que você disponibilzou.

     

    Obrigado!

  12. Na verdade a tag dhEmi no XML já está no formato correto para NFCe, ou seja, no padrão yyyy-mm-dd7Thh:mm:ss-03:00.

    Para compor o texto que gerará o QrCode você pode pegar direto do xml ( NFe.NotasFiscais.Items.NFe.Ide.dEmi) ou então pegar a data/hora no formato normal (dd/mm/yyyy hh:mm:ss) da nota e transformar para o esse padrão pelo método DateTimeTodh(vDataHora) da pcnAuxiliar.

    Só complementando, a função completa seria que utilizo é DateTimeTodhUTC(vDataHora,GetUTC(VUF, vDataHora));

  13. qual mascara ou metodo voce usou para tirar a data do campo  NFe.NotasFiscais.Items.NFe.Ide.dEmi ?

    Na verdade a tag dhEmi no XML já está no formato correto para NFCe, ou seja, no padrão yyyy-mm-dd7Thh:mm:ss-03:00.

    Para compor o texto que gerará o QrCode você pode pegar direto do xml ( NFe.NotasFiscais.Items.NFe.Ide.dEmi) ou então pegar a data/hora no formato normal (dd/mm/yyyy hh:mm:ss) da nota e transformar para o esse padrão pelo método DateTimeTodh(vDataHora) da pcnAuxiliar.

  14. Amigo acho que encontrei alguma coisa eu fiz a conversao usando um convertor web usando o texto do manual 2012-09-27T16:20:34-03:00 e ele me retornou o hex certo 323031322D30392D32375431363A32303A33342D30333A3030, ai verifiquei qual era o valor retornado do meu formatdate to usando a mascara yyyy-mm-ddThh:nn:ss-03:00, ele me retorna 2012-09-2716:2016:20:34-03:00, acho que o valor retornado que e o nosso poblema, temos que deixar o campo no formato certinho "2012-09-27T16:20:34-03:00", devo ta com algum poblema na mascara, vou mexer mais aqui qualquer novidade so avisar.

    Não sei se é o valor, pois eu fiz um teste à parte do meu sistema e tentei converter o valor do campo como ele está no manual, ou seja, o texto 2012-09-27T16:20:34-03:00, sem nenhum formatDate ou outra formatação.

    Qual  conversor que você utilizou e que deu certo?

  15. Ja devo ta abusando... mas como vcs estao convetendo os campos dhEmi, digVal e cHashQr para gerar o texto do qrcode, eu estou usando uma função encontrada no google, mas ela gera codigos com mais bitys que o determinado, como exemplo o dhemi que pra mim gerou com 58 e nao 50.

    Como vcs estao gerando esse danado, graças as dicas do pessoal, so to pendente na geração do texto para o qrcode, fiz um usando um dos exemplos que tem no manual, mas os meus hexs ficaram diferentes dos do manual. Aguem pode me ajudar com a a gração do texto que vai para o qrcode.

     

     

    a função que to usando e essa:

    function StringToHex ( sValorC : String; pRemoverEspacos : Boolean = true ) : String;

    var

        I, I2: Integer;

        S: string;

    begin

        i2 := 1;

        for I := 1 to Length(sValorC) do begin

            Inc(i2);

            if i2 = 2 then begin

                s  := s + ' ';

                i2 := 1;

            end;

            S := S + IntToHex( Ord( sValorC ), 2 );

        end;

        if pRemoverEspacos then begin

            S := StringReplace( S, ' ', EmptyStr, [rfReplaceAll] );

        end;

        Result := s;

    end;

     

     

    Novamente obrigado pela ajuda pessoal.

    Bom dia Aecio!

    Conseguistes resolver esse problema do hexa do campo dhEmi?

    Testei vários exemplos de conversão de string para hexa e todos retornam 58 dígitos para o valor - 2012-09-27T16:20:34-03:00 - citado lá no exemplo hipotético 1 da nota técnica do QrCode .

    No exemplo, o manual traz o valor convertido em hexa com 50 dígitos, o que estaria de acordo com o manual, mas não consegui.

     

    Alguém teria alguma sugestão?

     

    Obrigado.

  16. Boa tarde,

    Como forma de retribuir a imensa ajuda que os componentes do ACBr nos dão, já que não pago o SAC tento contribuir com código ou encontrar bugs.

    Criei um layout para NFC-e no FastReport com largura do papel de 8 cm para ser utilizado em impressoras não fiscais, mas nada impede de ser impresso em papel A4.

    As alterações foram feitas somente no carregamento dos dados para o ClientDataSet do FastReport (ACBrNFeDANFEFRDM.pas) como:

    * Criado o ClientDataSet para a tag "pag" (tag exlusiva para NFC-e)

    * Alterado o ClientDataSet "Identificacao" para carregar a "MensagemFiscal" e compatibilizado a tag "DEmi" para a NFCe mostrar Data e Hora.

    * Criado no CDS "Destinatario" o campo "Consumidor".

    Nenhuma destas alterações influenciam ou causa "problemas" na impressão da NF-e.

    Em anexo os arquivos ACBrNFeDANFEFRDM.pas e ACBrNFeDANFEFRDM.dfm com os últimos fontes do svn.

    Limitações:

    1. A impressão do QR Code vem de uma imagem externa, da mesma forma que é utilizado na impressão da logomarca da empresa.

    A fazer:

    1. Selecionar a URL dos Estados para gerar o endereço do site de consulta.

    Pág. 14 do Manual de Especificações Técnicas do DANFE NFC-e e QR Code - versão 3.1

    2. Criar uma nova propriedade no componente Danfe em FastReport para receber o caminho da imagem QR Code.

    Utilização:

    1. Caminho do arquivo FastReport:

    ACBrNFeDANFEFR1.FastFile := 'C:\DANFeNFCe.fr3';

    2. Caminho da imagem QR Code:

    ACBrNFeDANFEFR1.Logo := C:\QR.jpeg';

    3. Imprimir:

    ACBrNFe1.NotasFiscais.Clear;
    ACBrNFe1.NotasFiscais.LoadFromFile(PathDoXML);
    ACBrNFe1.NotasFiscais.Imprimir;
    

    Em anexo como ficou minha impressão, espero que ajude.

    Consegui imprimir e funcionou beleza. Só não sei como gerar o QR. Precisa de algum componente externo ou como faz?

    Obrigado.

  17. Consegui fazer a instalação pelo ACBrInstal. Não houve nenhuma mudança na situação. Continua dando o erro. Também baixei e instalei o componente (revisão 5904) em máquina totalmente zerada, ou seja, sem possibilidade de haver fontes do Acbr desatualizados e que poderia conflitar. O mesmo erro acontece.

     

    Nessa nova instalação abri o ACBrNFeDANFEFRDM, dei um duplo clique no cdsDadosProdutos para abrir o fieldEditor desse clientDataSet e o VOutro não consta na lista.

    Insisto mais uma vez nas minhas colocações anteriores: será que não é essa falta do campo no fieldEditor que está causando o erro aqui?

     

     

    Obrigado.

  18. Bem, nunca conseguiu utilizar o ACBRinstall. Sempre dá o erro "pacote "synapse.dpk" não encontrado. Efetue o download do repositório novamente". Mas esse arquivo (synapse.dpk) está lá na PastaInstalACBR\ACBR\Pacotes\Delphi. Por causa desse erro sempre faço a instalação manualmente e dou um build all.
    Essa questão que levantei que talvez os dois novos campos (VOutro e VDesc) não estejam sendo criados no clienteDataSet não poderia ser a causa desse problema? Onde (qual .pas) é que o componente faz esse select para incluir os campos?
     
    Obrigado!
  19. Meus arquivos estavam atualizados sim JuaumKiko. Por desencargo, deletei os fontes anteriores atualize novamente neste momento. O problema persiste.

     

    Veja a linha 554 de ACBrNFeDANFEFRDM.pas. Nos arquivos atualizados ela está assim:

    wInfAdProd := wInfAdProd+' ('+FloatToStrF(((FieldByName('vTotTrib').AsFloat*100)/(FieldByName('VProd').AsFloat +
                                                                                                FieldByName('VOutro').AsFloat -
                                                                                                FieldByName('VDesc').AsFloat) ),ffNumber,15,2)+'%)';
    Nos arquivos anteriores essa linha era assim:
    wInfAdProd := wInfAdProd+' ('+FloatToStrF(((FieldByName('vTotTrib').AsFloat*100)/(FieldByName('VProd').AsFloat);
    Após minha sugestão, essa linha foi alterada conforme acima. Porém, como mencionei, me "parece" que a rotina que popula o fieldsEditor do cdsDadosProdutos não estão incluídos esses dois novos campos (VOutro e VDesc), entendeste?
     
    Tente fazer um teste imprimindo um Danfe com ACBrNFeDANFEFR.TributosPercentual = ptValorProdutos em uma nota que o item de produto tenha valor informado no campo de tributos.
     
    Obrigado.
×
×
  • 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.