Ir para conteúdo
  • Cadastre-se

marcio pereira batista

Membros
  • Total de ítens

    66
  • Registro em

  • Última visita

  • Days Won

    1

Posts postados por marcio pereira batista

  1. boa tarde amigos, estou instalando o acbr no delphi rio comunnity edition e a instalação vai sem problema algum, porem quando fecho o delphi e abro novamente o acbr nao esta carregando junto com a inicialização do delphi e nao conseguo utilizar, porem se instalo o acbr novamente e entro no delphi esta tudo ok, ai se fecho o delphi e entro novamente o acbr nao esta instalado, alguem sabe oq pode estar acontecendo ? desde ja agradeço a quem puder me ajudar.

  2. boa noite amigos, meu problema e o seguinte, estou migrando minha aplicação de xe6 para delphi tokyo e ao tratar o evento de cancelamento no delphi tokyo dessa forma esta retornando erro  :

     ACBRNFCe.NotasFiscais.Clear;
              ACBRNFCe.NotasFiscais.LoadFromFile(qrNFCE.FieldByName('xml')
                .AsString);
              idLote := '1';
              ACBRNFCe.EventoNFe.Evento.Clear;
              ACBRNFCe.EventoNFe.idLote := StrToInt(idLote);
              with ACBRNFCe.EventoNFe.Evento.add do
              begin
                infEvento.dhEvento := Now;
                infEvento.tpEvento := teCancelamento;
                infEvento.detEvento.xJust := Justificativa;
              end;

              ACBRNFCe.EnviarEvento(StrToInt(idLote));
     

     

    esta me retornando erro undeclared identifier 'tecancelamento'   nesse evento :    infEvento.tpEvento := teCancelamento;

     

    porem no delphi xe6 esta indo normalmente, ja verifiquei as bibiliotecas acbr estao todas declaradas iguais nos 2 delphi e não achei o pq.

    desde ja agradeço a quem possa me ajudar

  3. boa tarde jose henrique, a unica mudança q fiz foi a que esta acima, vi que quando esta integrada TEF tem q passar uns parametros a+ conforme esse ex. q achei no site da oobj

    Deve-se informar o Grupo de Cartões. A NFC-e deverá ser corrigida como no exemplo abaixo:

    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    <pag>
        <tPag>04</tPag>
        <vPag>17.90</vPag>
        <card>
            <tpIntegra>1</tpIntegra>
            <CNPJ>99999999999999</CNPJ>
            <tBand>02</tBand>
            <cAut>180003</cAut>
        </card>
    </pag>
  4. boa tarde amigos, hj começou a aparecer esse erro acima, ja verifiquei aqui no forum a solução abaixo:

    <pag>
        <tPag>04</tPag>
        <vPag>17.90</vPag>
        <card>
            <!-- Tipo de Integração -->
            <tpIntegra>2</tpIntegra>
        </card>
    </pag>
     
    no meu caso o sistema nao é integrado com operadora de cartao, porem nao estou conseguindo implementar a solução no meu sistema, como colocaria isso no codigo abaixo ?
     
     else if pos('CARTAO CREDITO', ansiuppercase(cb_forma1.text)) > 0 then
            begin
              if ed_forma1.Value > 0 then
                with pag.add do // PAGAMENTOS apenas para NFC-e
                begin
                  tPag := fpCartaoCredito;
                  vPag := ed_forma1.Value;
                 end;
                end
            end
     
     
    desde ja agradeço a quem puder me ajudar
  5. boa tarde amigos, apos fazer a atualização do acbr começou a apresentar erros nos comando abaixo

              ACBRDANFENFCe.MostrarStatus := true;         

            ACBRDANFENFCe.Detalhado := false;
              ACBRDANFENFCe.vTroco := ed_troco.Value;

    aparece undeclared identifier mostrastatus

     undeclared identifier mostrapreview

     undeclared identifier vtroco

     undeclared identifier detalhado

     

    sendo que verifiquei no componente ACBRDANFENFCe  e os campos estão la.

    impressão sendo feita no fastreports

    ex. onde o erro esta sendo gerado:

       with frmmodulo do
            begin
                 ACBRDANFENFCe.FastFile := sPasta_sistema + 'DANFeNFCe.fr3';
              ACBRDANFENFCe.MostrarStatus := true;
              if FileExists(frmPrincipal.LerINi(sConfiguracoes, 'PDV',
                'CAMINHO_LOGO', '')) then
                ACBRDANFENFCe.Logo := frmPrincipal.LerINi(sConfiguracoes, 'PDV',
                  'CAMINHO_LOGO', '');
              ACBRDANFENFCe.Detalhado := false;
              ACBRDANFENFCe.vTroco := ed_troco.Value;

     


    desde ja agradeço a quem possa me ajudar

  6. boa tarde, fiz uns testes com o tacbrTCPSERVER e não consegui em momento algum pegar a informação que veio da catraca, a API da catraca usa o protocolo HTTP para a transferência de dados - arquitetura REST nesse caso ainda assim eu teria que monitorar a porta tcp para verificar um evento vindo da catraca ou teria que montar um servidor rest para receber essa informação ? (peço desculpa se o post e indevido aqui por usar rest/json, e que nao estou conseguindo e achei que poderia ser atraves do componente TacbrTCPSERVER por isso tentei tirar a duvida aqui).

  7. boa tarde amigos, meu problema e o seguinte, , estou configurando meu sistema para acessar a catraca controlID usando rest/json, eu consigo pegar as informações da catraca e liberar o acesso dela sem problema quando envio as requisiçoes pelo meu sistema, meu problema e que eu não estou conseguindo pegar as informaçoes que vem da catraca sem q eu tenha feito uma requisição, ex , a pessoa coloca a digital na catraca (nesse caso a catraca e quem envia a requisição para o servidor, envia para um IP:porta expecifica), gostaria de uma orientação sobre como fazer, pelo que entendi eu teria que criar um servidor  para receber essas informações e retornar o resultado, o componente acbrtcpserver seria o ideal para isso ?.

    desde ja agradeço a quem puder me ajudar

  8. boa tarde amigos, estou tentando gerar uma nota de devolução com fcp e não estou conseguindo fazer com que os campos de fcp da mercadoria sejam exportados para o xml, nao campo totalizador da nfe vai normalmente + no campo de importos de icms nao esta sendo gerado no xml, estou fazendo da forma abaixo + nao vai pro xml e da erro 861, sera que alguem poderia me auxiliar para descobrir oq estou fazendo errado(segue xml em anexo)? desde ja agradeço a quem puder me ajudar.

               csosn900:
                          begin
                            ICMS.modBC := dbiMargemValorAgregado;
                            ICMS.vBC := qrnota_item.fieldbyname
                              ('base_calculo').Value;
                            ICMS.pRedBC := qrnota_item.fieldbyname
                              ('icms_reduzido').Value;
                            ICMS.pICMS := qrnota_item.fieldbyname('ICMS').asfloat;
                            ICMS.vICMS := qrnota_item.fieldbyname
                              ('valor_icms').Value;
                            ICMS.modBCST := dbisMargemValorAgregado;
                            ICMS.pMVAST := qrnota_item.fieldbyname
                              ('margem_agregada').Value;
                            ICMS.pRedBCST := 00.00;
                            ICMS.vBCST := qrnota_item.fieldbyname('base_sub').Value;
                            ICMS.pICMSST := 00.00;
                            ICMS.vICMSST := qrnota_item.fieldbyname
                              ('icms_sub').Value;
                            ICMS.pCredSN := qrnota_item.fieldbyname('ICMS').asfloat;
                            // Colocar o percentual do Crédito
                            ICMS.vCredICMSSN :=
                              (qrnota_item.fieldbyname('valor_icms').asfloat *
                              qrnota_item.fieldbyname('ICMS').asfloat) / 100;
                            ICMS.pFCP:=qrnota_item.fieldbyname('fcpalicota').value;
                            ICMS.vFCP:=qrnota_item.fieldbyname('fcpvalor').value;
                          end;

     

     

    att, Márcio Pereira Batista

     

    33181114579644000190550010000005801000005805-nfe.xml

  9. boa tarde amigo, estou tendo esse erro em nota de devolução de 1 cliente :erro 521-863 rejeição total do ipi devolvido difere do somatorio dos itens

    + o campo vipidevol esta devidamente informado no xml, sera que alguem poderia me dau 1 auxilio pois não consegui achar o problema.

     

    segue o xml, 

    desde ja agradeço a quem puder me ajudar

    33180814579644000190550010000005211000005211-nfe.xml

  10. [RESOLVIDO] consegui resolver o problema,vprod.vOutro estava recebendo 3.52 (valor de outros 24,70 dividido pela quantidade de itens 7= 3,5285714) esta recebendo 3.52, sendo q 3.52 x 7 = 24,64 ae esta dando a msg de erro do voutro difere, arrendondei a divisão para cima e deu 3.53 x 7= 24,71  nessa caso a nota foi aceita e passou normalmente, agora me pergunto se esta correta a minha solução ?

     

    desde ja agradeço pela ajuda

    • Curtir 1
  11. boa tarde , 

    com obrigado pela sua dica bigwings, passou da parte do erro acima, so que agora esta dando outro erro 770 :

    770, rejeiçaõ : total do voutro difere do somatorio dos itens;

    eis a questão, eu tirei do somatorio da base de calculo icms a soma do valor de outros pois se fosse somado nesse campo a nota de devoluçao fica com o valor da base de calculo diferente do espelho que o fornecedor mandou e o mesmo não aceita, ela tem q ser identica.., sera q o erro acima é por isso ? se for nao sei como proceder nesse caso.

    segue o xml da nota de devolução 

    desde ja agradeço a quem possa me ajudar

     

     

    33180607841088000113550010000007701000007709-nfe.xml

  12. boa noite amigos, estou implementando a nfe4.0 e estou com problema na nota de devolução de um cliente, 

    esta aparecendo o erro acima relatado quando lanço os dados de devolução de acordo com o solicitado pelo fornecedor, 

    sera alguem poderia me dar uma ajuda nessa nota de devolução pois nao estou conseguindo resolver...

    desde ja agradeço a quem puder me ajudar

     

    33180607841088000113550010000007701000007709-nfe.xml

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