Ir para conteúdo
  • Cadastre-se

Datacaixa

Membros Pro
  • Total de ítens

    241
  • Registro em

  • Última visita

Tudo que Datacaixa postou

  1. OK, obrigado Juliomar, perguntei mais para saber se teria alguma questão relevante nesse caso, talvez não poder em função de ter que usar nessa sequência, etc.
  2. No exemplo do Curso de Distribuição DFe vocês trataram para pegar o XML Resumido dentre outros, mas por que dentro da mesma rotina não foi adicionado também a opção do XML Completo? Ou seja, por que aqui na rotina abaixo também não foi adicionado a seguinte condição: if (Trim(FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip[I].procNfe.chDFe) <> '') then //XMLCompleto Teria algum problema adicionar a condição acima no código abaixo do exemplo de vocês? lCStat := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.cStat; case lCStat of 137 : result:= False; //Nenhum Documento Localizado - Consulta deve ser interrompida por 1 hora 138 : begin //Documentos Encontrados FultNSU := StrToIntDef(FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.ultNSU,0); FmaxNSU := StrToIntDef(FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.maxNSU,0); for I := 0 to FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Count - 1 do begin if Terminated then Break; try FRetornoNSU:= TDFeRetornoNSU.Create(); FRetornoNSU.NSU := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].NSU; FRetornoNSU.schema := SchemaDFeToStr( FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].schema ); FRetornoNSU.XML := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].XML; FRetornoNSU.arquivo := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].NomeArq; FRetornoNSU.UltNSU := IntToStr(FUltNSU); if (Trim(FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip[I].resDFe.chDFe) <> '') then //ResumoDFe begin FRetornoNSU.chDFe := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resDFe.chDFe; FRetornoNSU.CNPJCPF := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resDFe.CNPJCPF; FRetornoNSU.xNome := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resDFe.xNome; FRetornoNSU.IE := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resDFe.IE; FRetornoNSU.dhEmi := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resDFe.dhEmi; FRetornoNSU.tpNF := tpNFToStr(FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resDFe.tpNF); FRetornoNSU.vNF := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resDFe.vNF; FRetornoNSU.digVal := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resDFe.digVal; FRetornoNSU.dhRecbto := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resDFe.dhRecbto; FRetornoNSU.cSitNFe := SituacaoDFeToStr( FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resDFe.cSitDFe ); FRetornoNSU.nProt := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resDFe.nProt; end; if (Trim(FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip[I].resEvento.chDFe) <> '') then //ResumoEvento begin FRetornoNSU.chDFe := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resEvento.chDFe; FRetornoNSU.CNPJCPF := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resEvento.CNPJCPF; FRetornoNSU.dhEvento := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resEvento.dhEvento; FRetornoNSU.tpEvento := tpEventoToStr(FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resEvento.tpEvento); FRetornoNSU.xEvento := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resEvento.xEvento; FRetornoNSU.nSeqEvento := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resEvento.nSeqEvento; FRetornoNSU.dhRecbto := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resEvento.dhRecbto; FRetornoNSU.cOrgao := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resEvento.cOrgao; FRetornoNSU.nProt := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].resEvento.nProt; end; if (Trim(FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip[I].procEvento.detEvento.versao) <> '' ) then //DetalhamentoEventos begin FRetornoNSU.chDFe := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.chDFe; FRetornoNSU.CNPJ := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.CNPJ; FRetornoNSU.dhEvento := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.dhEvento; FRetornoNSU.tpEvento := tpEventoToStr(FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.tpEvento); FRetornoNSU.verEvento := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.verEvento; FRetornoNSU.nSeqEvento := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.nSeqEvento; FRetornoNSU.Id := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.Id; FRetornoNSU.cOrgao := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.cOrgao; FRetornoNSU.descEvento := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.detEvento.descEvento; FRetornoNSU.xJust := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.detEvento.xJust; FRetornoNSU.xMotivo := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.detEvento.xCorrecao; FRetornoNSU.EmiCNPJ := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.detEvento.emit.CNPJ; FRetornoNSU.EmiIE := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.detEvento.emit.IE; FRetornoNSU.EmixNome := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.detEvento.emit.xNome; FRetornoNSU.cteNProt := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.detEvento.CTe.nProt; FRetornoNSU.cteChvCte := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.detEvento.CTe.chCTe; FRetornoNSU.cteDhemi := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.detEvento.CTe.dhEmi; FRetornoNSU.cteModal := tpModalToStr(FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.detEvento.CTe.modal); FRetornoNSU.cteDhRebcto := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.detEvento.CTe.dhRecbto; end; if (Trim(FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip[I].procEvento.RetinfEvento.Id) <> '' ) then //InfEvento begin FRetornoNSU.Id := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.RetinfEvento.Id; FRetornoNSU.VerAplic := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.RetinfEvento.verAplic; FRetornoNSU.tpAmb := TpAmbToStr(FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.RetinfEvento.tpAmb); FRetornoNSU.chDFe := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.RetinfEvento.chDFe; FRetornoNSU.CStat := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.RetinfEvento.cStat; FRetornoNSU.CNPJDest := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.RetinfEvento.CNPJDest; FRetornoNSU.cOrgaoAutor := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.RetinfEvento.cOrgaoAutor; FRetornoNSU.dhRegEvento := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.RetinfEvento.dhRegEvento; FRetornoNSU.tpEvento := tpEventoToStr(FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.RetinfEvento.tpEvento); FRetornoNSU.nSeqEvento := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.RetinfEvento.nSeqEvento; FRetornoNSU.xEvento := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.RetinfEvento.xEvento; FRetornoNSU.xMotivo := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.RetinfEvento.xMotivo; FRetornoNSU.dhRegEvento := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.RetinfEvento.dhRegEvento; FRetornoNSU.emailDest := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.RetinfEvento.emailDest; FRetornoNSU.nProt := FACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I].procEvento.RetinfEvento.nProt; end; finally if not Terminated then Synchronize(DoDFeRetornoNSU); FRetornoNSU.Free; end; end;
  3. Terminei de fazer o curso de Distribuição DFe mas fiquei com uma dúvida referente a rotina e sequência de NSU: - Caso eu der Ciência da Operação em um documento isso gera outro NSU, ou seja, essa nota vai para o final da fila? Por exemplo, se estou fazendo um repeat de acordo com último NSU até o máximo NSU, e no meio desse intervalo tem uma nota que ainda não tem o XML disponível e preciso dar Ciência da Operação, posso continuar rodando o repeat que essa nota vai vir depois com o XML completo?
  4. Estamos tentando emitir NFS-e da Prefeitura de Marília, mas está retornando o erro: Não é necessário informar a alíquota do Simples Nacional. Já estamos informando alíquota de 0%, tentamos com outras alíquotas também mas não foi.
  5. Boa tarde! Já implementei o preenchimento desses campos. vou testar e qq coisa retorno por aqui.
  6. Boa tarde! Estou recebendo uma mensagem de "Senha não pode ser verificada" ao emitir uma nota para o provedor SigISS- Marilia-SP. Em anexo um xml emitido direto pela prefeitura. Poderiam me auxiliar? 000000073-ger-nfse-soap.xml 000000073-lista-nfse-ger.xml 000000073-lista-nfse-ger-soap.xml 000000073-ger-nfse.xml Contribuinte_35578713000111_NF-e_69.xml
  7. Bom dia! Ok, então já está certo mesmo. Obrigado.
  8. Bom dia! Pelo link que recebi do SEMFI (Secretária de Finanças de Macapá) sobre o comunicado da mudança esse é o layout 2.03 https://macapa.ap.gov.br/comunicado-prefeitura-passa-por-atualizacao-de-sistemas-corporativos-para-nova-plataforma-tributaria/ Quanto a url de homologação não mencionam nada.
  9. Bom dia! Houve uma alteração no provedor da cidade de Macapá, agora eles utilizam o https://www.govbr.com.br/ Segue o link com as novas urls e wsdl para atualização do componente: http://macapa.govbr.cloud/NFSe.Portal.Integracao/services.svc
  10. Hum, era isso mesmo! Muito obrigado BigWings!
  11. Descobri que o erro ocorre aqui: TACBrNFe(FPDFeOwner).SetStatus(FPStatus);
  12. Não dá o erro, esse é problema!!!!! Sim, mesma consulta.
  13. Boa tarde, estou tentando identificar o problema aqui do erro de Argument out of range que ocorre no dmACBr.ACBrNFe1.WebServices.Consulta.Executar Já comparei com o exemplo do ACBr e está idêntico essa parte, não sei mais o que pode ser...
  14. Tem também essa propriedade no DANFE NF-e, ImprimeNomeFantasia, mas no caso só vai imprimir o nome fantasia mesmo. Mas já tá ótimo! Mesmo porque iria ficar muito grande colocar os dois. Muito obrigado Pessoal!
  15. No caso é na NF-e que geramos mesmo, o cliente gostaria de ter a razão social e o nome fantasia dele no DANFE, alguma sugestão?
  16. Como faço para exibir o Nome Fantasia e Razão Social do Emitente no DANFE? (vi um post aqui sobre isso, mas como era bem antigo resolvi perguntar novamente para saber se tem alguma novidade)
  17. Sim, é que tenho também a opção de fazer via LoadFromFile(), e nesse caso precisava puxar também a situação da NF-e.
  18. Certo, obrigado Daniel! E qual seria a forma correta para eu pagar a situação do xml que estou importando através do ACBrNFe1.NotasFiscais.Items[0]? Ou seja, saber se está Autorizada, Denegada, Cancelada...
  19. OK, obrigado, mas é que gostaria de uma forma fácil de consultar, sei que as propriedades seguem o padrão do XML, mas por exemplo, gostaria de saber também os valores possíveis de uma propriedade, como por exemplo: ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpNF: tnEnrada, tnSaida No caso eu precisava saber com puxar a situação da nota (Autorizada, Denegada, etc...), ou seja, qual propriedade eu usuaria?
  20. Vou atualizar, obrigado.
  21. Vocês tem a documentação de todas as propriedades do componente NFe ou alguma forma que eu possa consultar facilmente? Por exemplo, gostaria de saber como puxar a situação da nota a partir do dmAcbr.ACBrNFe1.NotasFiscais.Items[0].
  22. Boa tarde! Verifiquei que a cidade de Cachoeira Paulista-SP Cod. IBGE (3508603) não está na lista de cidades porém eles utilizam o provedor SiapNet, e este provedor já está incluso para as cidades de Lorena-SP, Guaratingueta-SP e Cruzeiro-SP. Sendo assim segue o link do webservice: https://pmcachoeirapaulista.geosiap.net.br/pmcachoeirapaulista/issonline/ws/?wsdl https://pmcachoeirapaulista.geosiap.net.br/pmcachoeirapaulista/issonline/ws/index.php 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.