Ir para conteúdo
  • Cadastre-se

tiago Selecto

Membros
  • Total de ítens

    158
  • Registro em

  • Última visita

Posts postados por tiago Selecto

  1. boa tarde amigo

     

    assim as postagem que me sugeriu eu li, foi de proveito, mas ainda tenho duvida

    vamos ver se consigo tirar-la..

    minha duvida e como testar a conexão da internet sem dar erro 12007, que e a falta de internet, por exemplo.

    pois quando eu envio ele ja me retorna este erro ,  então seria certo pegar o retorno de que não tem internet, ou não tem retorno e tratar isto

    mandado em of line e imprimindo duas vias uma pro consumidor e outra não, esta questões esta a principio clara na minha cabeça.

    então primeiro pensei que deveria testar a conexão toda a vez que imprime o cupom  e ai mudar pra of line se necessario, mas vi em video da webnar que não e prudente fazer esta operação, pois vou prejudicar a conexão , conforme explicação no video

    então a pergunta e como faço pra testar se a internet esta funcionado corretamente pra depois enviar ou imprimir em contigencia

    devo consulta a internet ou o retorno sem dar erro como?

  2. vamos la

    vi o video e o manual para tratar a contigencia.. muito bom!

    so tenho duvidas em relação a quando vou emitir uma nota e ela da erro 12007, por exemlo, que da quando esta of line, como eu trato o comando

    acbr.enviar(vnumlote,true, sincrono) para pegar o retorno do erro ... visto que no exemplo nfce quando da o erro ele e explicito na tela pro usuario .. depois que a linha de execução passa pela linha de codigo acima

    não sei se me fiz entender , tipo

    tentei enviar não tem conexão emite em contigencia...

    tem um exemplo de como faz isto? como eu pego o retorno antes da msn de erro

     

  3. Bom dia Amigos

    Sou novato e não achei no fórum algumas respostas para minhas duvidas..

    Para tratar um cupom que não foi transmitido(contigencia) ele deve verificar se a internet ou se teve retorno do sefaz de origem, tendo o retorno negativo ele deve pular a numeração  emitindo em contingência testando o status ate que se solucione a conexão, impriminndo duas vias uma pro cliente e outra pra estabelecimento guardando ate que as mesmas sejam transmitidas ..me corrija se estiver errado

    a pergunta e se existe ja exemplo que trata isto em delphi e/ou como  trato isto nos componentes?

     

  4. Bom dia amigo

    Tudo bem?

    Voltamos aos trabalhos!

     

    Então agora que consegui fazer meu projeto copilar no delphi d10 compativel com os componentes acbr, vamos começar a colocar codigo pra dentro dele.

    A minha primeira pergunta sobre o arquivo de configuração acbrnfedemo e os campos de configuração de certificado e empresa emissora e etc...aonde e quais os componentes acbr se comunicam com estas informações de configuração e como e passado via codigo ou setado o arquivo .ini?

    amigo

     

    perdão mas não precissa mais responder esta pergunta , me achei aqui nos esquema...

    obrigado

  5. Beleza amigo!

     

    com sito me sinto entusiasmado a começar a programar no meu projeto!

    Porem não sei se vc vai poder me ajudar nesta, mas uma orientação..

    Eu programei ate então no delphi 7 e ate onde sei esta verão estas desatualizada pro projeto acbr, ou não?

    e se a resposta for sim eu pulo pra outro problema, que os meus relatórios fora feitos no quick report e não consigo os arquivos de instalação pra p o delphi  2010

    vc tem algum link ou alguma sugestão para poder conseguir este quick report para p delphi 2010?

  6. Realmennte deu certo amigo, esta no sefaz!

    so deixa eu verificar uns detalhes a nivel de entendimento

    como  faço pra não dar esta mns ?

    Verifiquei que na pasta C:\trunk2\Exemplos\ACBrDFe\ACBrNFe\Delphi\Logs existe os arquivos de lotes!

    como funciona  estes arquivos de lotes?

    depois disto gerei nfe e ele pediu o numero da nota a ser gerado, informei a primeira nota e ele gerou todas as notas que tinha feito como teste ou ja existia e não tinha visto...
     e na tentativa de imprimir danfe tomei a liberdade de seta o compontente de relatorio forte que tenho instalado no delphi 2010 e deu certo, imprimiu.beleza!
      so acho interesante ter um manual das outras funcionalidades de cada botão existe isto, pode me passar o link?
     como faço pra configurar uma impressora termica para a impressão fisica do cupom eletronico?
     

  7. ainda não resolveu amigo depois testei com a maquina reiniciada

    segue em anexo os dois status resultante do prompt nos dois processos

     

    ////////////////// antes de fazer o procedimento indicado /////////////
    C:\trunk2\DLLs\Capicom>if EXIST C:\Windows\SysWOW64 goto Win64

    C:\trunk2\DLLs\Capicom>ECHO *** Copiando as DLLs x64 ***
    *** Copiando as DLLs x64 ***

    C:\trunk2\DLLs\Capicom>if NOT EXIST C:\Windows\SysWOW64\capicom.dll copy capicom.dll C:\Windows\SysWOW64

    C:\trunk2\DLLs\Capicom>if NOT EXIST C:\Windows\SysWOW64\msxml5.dll copy msxml5.dll  C:\Windows\SysWOW64

    C:\trunk2\DLLs\Capicom>if NOT EXIST C:\Windows\SysWOW64\msxml5r.dll copy msxml5r.dll C:\Windows\SysWOW64

    C:\trunk2\DLLs\Capicom>ECHO *** Registrando as DLLs x64 ***
    *** Registrando as DLLs x64 ***

    C:\trunk2\DLLs\Capicom>regsvr32 C:\Windows\SysWOW64\capicom.dll /s

    C:\trunk2\DLLs\Capicom>regsvr32 C:\Windows\SysWOW64\msxml5.dll /s

    C:\trunk2\DLLs\Capicom>goto end

    C:\trunk2\DLLs\Capicom>pause
    Pressione qualquer tecla para continuar. . .


    ////////////////// depois de fazer o procedimento indicado /////////////

    C:\trunk2\DLLs\Capicom>if EXIST C:\Windows\SysWOW64 goto Win64

    C:\trunk2\DLLs\Capicom>ECHO *** Copiando as DLLs x64 ***
    *** Copiando as DLLs x64 ***

    C:\trunk2\DLLs\Capicom>if NOT EXIST C:\Windows\SysWOW64\capicom.dll copy capicom.dll C:\Windows\SysWOW64
            1 arquivo(s) copiado(s).

    C:\trunk2\DLLs\Capicom>if NOT EXIST C:\Windows\SysWOW64\msxml5.dll copy msxml5.dll  C:\Windows\SysWOW64
            1 arquivo(s) copiado(s).

    C:\trunk2\DLLs\Capicom>if NOT EXIST C:\Windows\SysWOW64\msxml5r.dll copy msxml5r.dll C:\Windows\SysWOW64
            1 arquivo(s) copiado(s).

    C:\trunk2\DLLs\Capicom>ECHO *** Registrando as DLLs x64 ***
    *** Registrando as DLLs x64 ***

    C:\trunk2\DLLs\Capicom>regsvr32 C:\Windows\SysWOW64\capicom.dll /s

    C:\trunk2\DLLs\Capicom>regsvr32 C:\Windows\SysWOW64\msxml5.dll /s

    C:\trunk2\DLLs\Capicom>goto end

    C:\trunk2\DLLs\Capicom>pause
    Pressione qualquer tecla para continuar. . .

  8. não esta registrando as dll...

     

    fiz assim, verifiquei as pasta schemas e que posso te mostrar e a estrutura de pasta C:\trunk2\Exemplos\ACBrDFe\Schemas que ela fica.

    enquanto ao registro da dll capicom eu fiz destas maneiras primeiro tentei executar o arquivo instala com adm , sem sucesso. Depois tentei seguir o manual deste end ..

    http://acbr.sourceforge.net/drupal/?q=node/36 e tive problemas em registrar as dll's no camando regsvr32 capicom.dll regsvr32 msxml5.dll no executar do windowns dando esta msn em anexo e depois tentei ir pelo prompt de comando executando como adm  seguir este manual 

    porem meu windowns10 64 pode me ajudar ?

    Sem título.jpg

  9. certo

     

     

    não so zerei as trib conforme me indicaste.

    O certificado e A1  e esta dando erro ao tentar enviar uma nota exemplo que o componente acbr nf demo tem previamente configurado, eu so ajustei as alicotas conforme a situação da empresa do certificado e ele ocorre o erro depois que informo  o numero da nota e o lote e o Protocologo de envio danado o seguinte erro:

    comunication erro 2: o sistema não pode encontrar o arquivo especificado.

     

    obs so apaguei parte das informações no cliente , pois quero sigilo dos dados

    conf certificado.jpg

  10. a situação do certificado digital e a seguinte:

    e um certificado que esta instalado na maquina, que ja emite nota em produção em outra maquina, porem estou tentando enviar notas testes exemplos pelo programa da acbr em homologação, neste esta reconhecido, pois quando clico para visualizar ele ou o prazo de vencimento etc nos campos da ferramenta ele aparece ok.

    teria outra opção para verificar?

     

     

  11. bom dia amigo

     

    Perfeito! 

     

    Ve se vc pode me dar uma ajuda neste erro: Total da BC ICMS difere do somatório dos itens!

    confesso que terei que estudar mais estas regras de negocios

    caso tenha algum material me me indicar agradeço! obrigado!!

    vo te mandar exemplo pra vc dar uma olhada:

     with ACBrNFe1.NotasFiscais.Add.NFe do
       begin

         Ide.cNF       := StrToInt(NumNFe); //Caso não seja preenchido será gerado um número aleatório pelo componente
         Ide.natOp     := 'VENDA';
         Ide.indPag    := ipVista;
         Ide.modelo    := 65;
         Ide.serie     := 1;
         Ide.nNF       := StrToInt(NumNFe);
         Ide.dEmi      := now;
         Ide.dSaiEnt   := now;
         Ide.hSaiEnt   := now;
         Ide.tpNF      := tnSaida;
         Ide.tpEmis    := TpcnTipoEmissao(cbFormaEmissao.ItemIndex); ;
         Ide.tpAmb     := taHomologacao;  //Lembre-se de trocar esta variável quando for para ambiente de produção
         Ide.cUF       := UFtoCUF(edtEmitUF.Text);
         Ide.cMunFG    := StrToInt(edtEmitCodCidade.Text);
         Ide.finNFe    := fnNormal;
         Ide.tpImp     := tiNFCe;
         Ide.indFinal  := cfConsumidorFinal;
         Ide.indPres   := pcPresencial;

          Emit.CNPJCPF           := edtEmitCNPJ.Text;
          Emit.IE                := edtEmitIE.Text;
          Emit.xNome             := edtEmitRazao.Text;
          Emit.xFant             := edtEmitFantasia.Text;

          Emit.EnderEmit.fone    := edtEmitFone.Text;
          Emit.EnderEmit.CEP     := StrToInt(edtEmitCEP.Text);
          Emit.EnderEmit.xLgr    := edtEmitLogradouro.Text;
          Emit.EnderEmit.nro     := edtEmitNumero.Text;
          Emit.EnderEmit.xCpl    := edtEmitComp.Text;
          Emit.EnderEmit.xBairro := edtEmitBairro.Text;
          Emit.EnderEmit.cMun    := StrToInt(edtEmitCodCidade.Text);
          Emit.EnderEmit.xMun    := edtEmitCidade.Text;
          Emit.EnderEmit.UF      := edtEmitUF.Text;
          Emit.enderEmit.cPais   := 1058;
          Emit.enderEmit.xPais   := 'BRASIL';

           Emit.IEST              := '';
                                        // a inclusão de serviços na NFe
          Emit.CRT               := crtSimplesNacional;// (1-crtSimplesNacional, 2-crtSimplesExcessoReceita, 3-crtRegimeNormal)

          Dest.CNPJCPF           := '05481336000137';
          Dest.ISUF              := '';
          Dest.xNome             := 'D.J. COM. E LOCAÇÃO DE SOFTWARES LTDA - ME';
          Dest.indIEDest:= inNaoContribuinte;
          Dest.EnderDest.Fone    := '1533243333';
          Dest.EnderDest.CEP     := 18270170;
          Dest.EnderDest.xLgr    := 'Rua Coronel Aureliano de Camargo';
          Dest.EnderDest.nro     := '973';
          Dest.EnderDest.xCpl    := '';
          Dest.EnderDest.xBairro := 'Centro';
          Dest.EnderDest.cMun    := 3554003;
          Dest.EnderDest.xMun    := 'Tatuí';
          Dest.EnderDest.UF      := 'SP';
          Dest.EnderDest.cPais   := 1058;
          Dest.EnderDest.xPais   := 'BRASIL';

    //Adicionando Produtos
          with Det.Add do
           begin
             Prod.nItem    := 1; // Número sequencial, para cada item deve ser incrementado
             Prod.cProd    := '123456';
             Prod.cEAN     := '7896523206646';
             Prod.xProd    := 'Descrição do Produto';
             Prod.NCM      := '20021000'; // Tabela NCM disponível em http://www.receita.fazenda.gov.br/Aliquotas/DownloadArqTIPI.htm
             Prod.EXTIPI   := '';
             Prod.CFOP     := '5101';
             Prod.uCom     := 'UN';
             Prod.qCom     := 1 ;
             Prod.vUnCom   := 100;
             Prod.vProd    := 100 ;

             Prod.cEANTrib  := '7896523206646';
             Prod.uTrib     := 'UN';
             Prod.qTrib     := 1;
             Prod.vUnTrib   := 100;

             Prod.vOutro    := 0;
             Prod.vFrete    := 0;
             Prod.vSeg      := 0;
             Prod.vDesc     := 0;

             Prod.CEST := '1704000';

    //         infAdProd      := 'Informação Adicional do Produto';

             with Imposto do
              begin
                // lei da transparencia nos impostos
                vTotTrib := 0;

                with ICMS do
                 begin
                   //CST          := cst00;
                   //ACBrNFe1.NotasFiscais.Add.NFe.Det.Add.Imposto.ICMS.CSOSN := StrToCSOSNIcms(okConversao, '102');//Dependendo do CSOSN
                   CSOSN   := csosn102;

                   ICMS.orig    := oeNacional;
                   ICMS.modBC   := dbiValorOperacao;
                   ICMS.vBC     := 100;
                   ICMS.pICMS   := 18;
                   ICMS.vICMS   := 18;
                   ICMS.modBCST := dbisMargemValorAgregado;
                   ICMS.pMVAST  := 0;
                   ICMS.pRedBCST:= 0;
                   ICMS.vBCST   := 0;
                   ICMS.pICMSST := 0;
                   ICMS.vICMSST := 0;
                   ICMS.pRedBC  := 0;

                   // partilha do ICMS e fundo de probreza
                   with ICMSUFDest do
                    begin
                      vBCUFDest      := 0.00;
                      pFCPUFDest     := 0.00;
                      pICMSUFDest    := 0.00;
                      pICMSInter     := 0.00;
                      pICMSInterPart := 0.00;
                      vFCPUFDest     := 0.00;
                      vICMSUFDest    := 0.00;
                      vICMSUFRemet   := 0.00;
                    end;
                 end;
              end;
           end ;

          Total.ICMSTot.vBC     := 100;
          Total.ICMSTot.vICMS   := 18;
          Total.ICMSTot.vBCST   := 0;
          Total.ICMSTot.vST     := 0;
          Total.ICMSTot.vProd   := 100;
          Total.ICMSTot.vFrete  := 0;
          Total.ICMSTot.vSeg    := 0;
          Total.ICMSTot.vDesc   := 0;
          Total.ICMSTot.vII     := 0;
          Total.ICMSTot.vIPI    := 0;
          Total.ICMSTot.vPIS    := 0;
          Total.ICMSTot.vCOFINS := 0;
          Total.ICMSTot.vOutro  := 0;
          Total.ICMSTot.vNF     := 100;

          // partilha do icms e fundo de probreza
          Total.ICMSTot.vFCPUFDest   := 0.00;
          Total.ICMSTot.vICMSUFDest  := 0.00;
          Total.ICMSTot.vICMSUFRemet := 0.00;


          Total.ISSQNtot.vServ   := 0;
          Total.ISSQNTot.vBC     := 0;
          Total.ISSQNTot.vISS    := 0;
          Total.ISSQNTot.vPIS    := 0;
          Total.ISSQNTot.vCOFINS := 0;

          Transp.modFrete := mfSemFrete; // NFC-e não pode ter FRETE

          with pag.Add do //PAGAMENTOS apenas para NFC-e
           begin
             tPag := fpDinheiro;
             vPag := 100;
           end;

          InfAdic.infCpl     :=  '';
          InfAdic.infAdFisco :=  '';

     

  12. Boa tarde 

     

    Verifiquei mais a fundo as regras de tributação para emissão de nfce ... e acho que o erro estar na situação tributaria do ICMS que pra este certificado digital desta empresa do simples nacional deve ser ou 500 para cfop 5405 ou 102 para tributado no 5102, e nesta situação notei que as minhas opções no codigo demostrativo da acbr ele vai do 00,10,20..ate 90 mas esta situação e pra lucro real ou presumido.. aonde eu como faço pra passar as situações trib de icms para simples nacional que vai do 102,...500? ou sera que em homologação tem que validar outro campo?

    Sem título.jpg

  13. ola boa tarde 

    compilando o acbrnfe demo e esta dando que o certificado não encontrado e o status do serviço não esta definido quando clico em status do serviço e ao clicar em criar em enviar ele da a mesma coisa, porem foi configurado e ate da o retorno das informações dele quando clico em validar valida e numero de serie por exemplo, o que esta faltando? precisa configurar também no próprio componente quando copilo o projeto?

  14. Bom Dia!

     

    Estou com dificuldades pra instalar Delphi compatível com os componentes ACBR...atualmente utilizo o D7..

    Não sei se o SAC do projeto pode me ajudar nesta questão? O problema e que já instalei o delphi 2010, porem os componentes geradores de relatório fast report e fortes report (Precisa dos pois geradores de relatorio?) que instalou no Delphi da erro na execução do ACBrInstall_Trunk2 ao tentar instalar componentes ref. ao geradores de relatório..

     

    Nesta situação veio por meio deste tópico solicitar se possível links e ou manuais de instalação dos geradores de relatórios e ate mesmo um link para instalação do Delphi , por que acho melhor instalar "do zero" pra começar certo

     

     

     

  15. Juliomar, bom dia

     

    Estou com dificuldades de instalar os componentes acbr no meu atualizado delphi 2010, conforme me sugeriste , o caso e que não tenho bem certeza se os componentes de relatório fast report e fortes report estão instalado corretamente, acredito que não pois da erro na instalação de componentes acbr para estes recursos.. , embora tenho seguido manual  do regys Silveira

     

    Então vou formar uma maquina de teste que tenho e pretendo começar do zero! e ai vem meu pedido, vc tem um link ou manual passo a passo pra poder me ajudar nesta questão com a instalação do delphi com versão compatível com os componentes acbr?

     

    eu ate baixei do site da Embarcadero um instalador free porem verifiquei que não existia componentes de conexão com bancos de dados....

    Me de uma luz, pois estou meio perdido com esta migração para outra ferramenta que não estou acostumado a trabalhar

    Agradeço desde ja

  16. Boa tarde juliomar

    o caso e o seguinte estou com o d7 e pretendo migrar pra uma versão mais recente que não me gere muito ou nenhum onus, alguma sugestão?
    No entanto nesta minha versão D7 que utilizo fiz os seguintes procedimentos para a copilação dos exemplos citado acima:

    * Instalei fortes Report
    * Intalei o Fast Report

    obs : Visto que o quick Report não existem mais suporte , conforme informação de membros do Projeto ACBR; e antes destes novos compontes instaldos na testativa de copilação do ACBrNFe - Demostração o delphi reclamava na       falta de componentes... o mesmo na instalação do ACBRInstal reclamava que falta estes componentes quanto setava todos os componetes na instalação do acbrintall..

    Mas mesmo assim, depois de instalados sem erro tanto no acbrintall como nos componentes de relatorios, aprincipio, esta dando as mesmas msn de erro em anexo

    o que esta falatando no meu delphi? e como procedo?

     

    errro ao abrir nfe demo acbr.jpg

  17. Julimar boa tarde

     

     

    Estive olhando os fontes que baixei da ACBR  e gostaria de tirar uma duvida , existe um modelo de emissão de nfce , com produtos e forma de pagamento etc .. qual exemplos vc me sugere a estudar... quais as etapas de geração de nfce, tipo 1 VALIDA  2 ASSINA 3 TRANSMITE  4 PEGA O RETORNO  5 EXPORTO 6 MANDA XML
    7 MANDA PDF 8 EMITE EMAIL ... poderia me dar uma orientação sobre estas etapas e quais exemplos posso me basear?

     

    obrigado pela atenção

  18. Julimar 

     

    Sobre este assunto gostaria te tirar algumas duvidas com vc se possível.

    Sou Novato em programação utilizo ate então o d7, porem vi que não tem mais suporte pra ele, porem o delphi 2010 que instalei em outra maquina que não sei se funciona gratuito, e tal.. e outra coisa e em relação aos componentes pra relatório que funciona com o delphi 2010 e o projeto os componentes acbr ..

    vc pode me dar uma orientação sobre como proceder , pois ate então achava que conseguia trabalhar com ferramentas baixadas na internet

     

    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.