Jump to content

Datalogical Informática

Usuários SAC
  • Content Count

    28
  • Joined

  • Last visited

Community Reputation

11 Good

About Datalogical Informática

  • Rank
    Membro

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. Prezados, Bom dia. Eu já trabalho com NFe para serviços / ISS, e estou agora configurando a emissão de NFe para venda de produtos com cálculo de ICMS. No entanto, ao gerar o xml da nota, não está aparecendo a tag com valor do ICMS mesmo informando no código abaixo: ...... Produto.Imposto.ICMS.CST := cst00; // pegar do cadastro da empresa Produto.Imposto.ICMS.orig := oeNacional; Produto.Imposto.ICMS.modBC := dbiValorOperacao; Produto.Imposto.ICMS.vBC := aqyTitBusca.FieldByName('VL_BASECALC').AsCurrency; Produto.Imposto.ICMS.pICMS := aqyTitBusca.FieldByName('VL_ALIQ_ICMS').AsFloat; Produto.Imposto.ICMS.vICMS := aqyTitBusca.FieldByName('VL_ICMS').AsCurrency; Produto.Imposto.ICMS.modBCST := dbisMargemValorAgregado; Produto.Imposto.ICMS.pMVAST := 0; Produto.Imposto.ICMS.pRedBCST:= 0; Produto.Imposto.ICMS.vBCST := 0; Produto.Imposto.ICMS.pICMSST := 0; Produto.Imposto.ICMS.vICMSST := 0; Produto.Imposto.ICMS.pRedBC := 0; Produto.Imposto.ICMS.CSOSN := csosn101; ...... E, ao enviar a Nota Fiscal, recebo a seguinte mensagem: "531-Rejeicao: Total da BC ICMS difere do somatorio dos itens" Poderiam verificar se falta preencher alguma propriedade do componente? Obrigado. Marcelo Antunes NFe ERRO ICMS.xml
  2. Prezados, Como posso obter o número da chave de uma nota fiscal de serviço (NFSe)? No componente NFe, consigo através da propriedade ACBrNFe1.NotasFiscais.Items[0].NFe.infNFe.ID. No componente NFSe, a propriedade ACBrNFSe1.NotasFiscais.Items[0].NFSe.InfId.Id traz apenas o número da Nota Fiscal. Obrigado, Marcelo Antunes
  3. Prezados, Ao gerar Nota Fiscal de Serviço (NFSe), em especial, utilizando o provedor ISSNET, não estou sabendo recuperar o xml de resposta que gerou o erro. Por exemplo, ao enviar um número de nota (RPS) que já existia, através do método Enviar(), o componente me gerou o seguinte erro: RPS ja informado. Numero do RPS em que ocorreu o erro: 1 etc etc. E gerou o evento abaixo na pasta de log: ================================================= inicio =========================================================== <?xml version="1.0" encoding="UTF-8"?> -<ConsultarSituacaoLoteRpsResposta xmlns="http://www.issnetonline.com.br/webserviceabrasf/vsd/servico_consultar_situacao_lote_rps_resposta.xsd"> -<ListaMensagemRetorno> -<MensagemRetorno> <Codigo xmlns="http://www.issnetonline.com.br/webserviceabrasf/vsd/tipos_complexos.xsd">E010</Codigo> <Mensagem xmlns="http://www.issnetonline.com.br/webserviceabrasf/vsd/tipos_complexos.xsd"> RPS ja informado. Numero do RPS em que ocorreu o erro: 1</Mensagem> <Correcao xmlns="http://www.issnetonline.com.br/webserviceabrasf/vsd/tipos_complexos.xsd">Para essa Inscricao Municipal/CNPJ ja existe um RPS informado com o mesmo numero, serie e tipo.</Correcao> </MensagemRetorno> </ListaMensagemRetorno> </ConsultarSituacaoLoteRpsResposta> ================================================= fim =========================================================== No entanto, não consigo recuperar este xml de erro para gravar em meu bd. Tentei as propriedades abaixo, mas não deu certo. Alguém consegue dar uma dica? Marcelo Antunes
  4. Só para exemplificar: ... if aqyNF.FieldByName('CO_MODELODF').AsInteger = 55 then begin // NF-e ACBrNFe1.DANFE:=ACBrNFeDANFeRL1; end else begin ACBrNFe1.DANFE:=ACBrNFeDANFCeRL1; end; ACBrNFe1.NotasFiscais.Imprimir; ... Tudo certo.
  5. Desculpe. Descobri que preciso mudar a propriedade DANFE da Nota Fiscal para o template "ACBrNFeDANFCeFortes1". Obrigado.
  6. Prezados, Gostaria de imprimir a NFC-e em papel A4 (laser). Estou gerando NFC-e (65) e, ao imprimir, está saindo no modelo NF-e (55). As configurações que utilizei foram: 1 - Gerar a NFC-e: ... NotaF := ACBrNFe1.NotasFiscais.Add; ... if Assigned( ACBrNFe1.DANFE ) then begin if iModelo=55 then begin // NFe NotaF.NFe.Ide.tpImp := ACBrNFe1.DANFE.TipoDANFE; // tipo de impressao: tiSemGeracao, tiRetrato, tiPaisagem, tiSimplificado, tiNFCe, tiMsgEletronica end else begin // NFC-e NotaF.NFe.Ide.tpImp := tiNFCe; // ACBrNFe1.DANFE.TipoDANFE; // tipo de impressao: tiSemGeracao, tiRetrato, tiPaisagem, tiSimplificado, tiNFCe, tiMsgEletronica end; end; ... ////////////////////////////////////////////////////// // QR-CODE ///////////////////////////////////////////////////// if iModelo = 55 then begin // 55 = NFC-e ACBrNFe1.Configuracoes.Geral.VersaoQRCode:=TpcnVersaoQrCode.veqr000; // (veqr000, veqr100, veqr200); end else begin // 65 = NFC-e ACBrNFe1.Configuracoes.Geral.VersaoQRCode:=TpcnVersaoQrCode.veqr200; // (veqr000, veqr100, veqr200); if UpperCase(aqyNFBusca.FieldByName('co_ambiente').AsString)='P' then begin // P=Producao ACBrNFe1.Configuracoes.Geral.IdCSC:=aqyEmp.FieldByName('ID_NF_CSC1').AsString; ACBrNFe1.Configuracoes.Geral.CSC:=aqyEmp.FieldByName('CO_NF_CSC1').AsString; end else begin // H=Homologacao //showmessage('homologacao!! id:' + aqyEmp.FieldByName('ID_NF_CSC1H').AsString + ' CSC:' + aqyEmp.FieldByName('CO_NF_CSC1H').AsString); ACBrNFe1.Configuracoes.Geral.IdCSC:=aqyEmp.FieldByName('ID_NF_CSC1H').AsString; ACBrNFe1.Configuracoes.Geral.CSC:=aqyEmp.FieldByName('CO_NF_CSC1H').AsString; end; end; // gera a nota fiscal ACBrNFe1.NotasFiscais.GerarNFe; 2 - Para imprimir: ACBrNFe1.NotasFiscais.Clear; // recupera xml de nota fiscal assinada e/ou autorizada (5=transmitida) ACBrNFe1.NotasFiscais.LoadFromString(sXml, False); ACBrNFe1.NotasFiscais.Imprimir; // ver opcao de imprimir direto sem visualizar
  7. Prezado Ítalo, Os demais campos estão sendo preenchidos corretamente. No caso da "NotaF.NFe.infNFeSupl.urlChave", você consegue identificá-la pelo provedor do certificado? Obrigado pronto atendimento.
  8. Quais propriedades devo definir para gerar o QRCode para NFC-e? Eu informei as seguintes: ACBrNFe1.Configuracoes.Geral.VersaoQRCode:=TpcnVersaoQrCode.veqr200; // (veqr000, veqr100, veqr200); ACBrNFe1.Configuracoes.Geral.IdCSC:='1'; ACBrNFe1.Configuracoes.Geral.CSC:='A89D7B99-F2ED-4DAE-F083-E71486FTESTE'; Tem alguma outra que preciso setar para que o componente ACBR gere o QRCode? Sou obrigado a informar NotaF.NFe.infNFeSupl.urlChave? Obrigado.
  9. Você possui alguma função, em Delphi, que gere o Hash do QR Code, conforme descrito no manual?
×
×
  • Create New...