-
Total de ítens
136 -
Registro em
-
Última visita
Sobre daniel_mirassol
Contact Methods
-
Website URL
http://www.admcitrino.com.br
Últimos Visitantes
1.487 visualizações
daniel_mirassol's Achievements
-
Mundanças Ct-e 4.0 captura de dados Retorno WebService
daniel_mirassol replied to daniel_mirassol's tópico in Dúvidas gerais
Entendi, teria me passar um exemplo de como proceder, estou com o exemplo aberto mas não consegui , fazer funcionar usei este código que peguei no exemplo do ACBR mas o Count retornou 0 for i := 0 to ACBrCTe1.WebServices.EnvEvento.EventoRetorno.retEvento.Count -1 do Grato, -
Mundanças Ct-e 4.0 captura de dados Retorno WebService
um tópico no fórum postou daniel_mirassol Dúvidas gerais
Bom dia, Com a mudança para a versão 4.0 estou tendo problema na captura do retorno do WebService para pegar o Status, Protoolo, etc ... Estou colocando parte do meu código que faz a captura que não está funcionando mais na 4.0 . Alguém poderia me ajudar ? for i_richtext:= RichEditStatusRetorno.lines.count - 1 downto 0 do begin if i_richtext > 0 then RichEditStatusRetorno.lines.delete(i); end; // replicando CTE ------ Aqui não pega mais na versão 4.0 for i:= 0 to ACBrCTe1.WebServices.Retorno.CteRetorno.ProtDFe.Count -1 do begin CopyFile(Pchar(v_mesano + ACBrCTe1.WebServices.Retorno.CTeRetorno.ProtDFe.Items[i].chDFe+'-cte.xml'), Pchar(QryPesqFilialCTE_PATH_AVERBACAO_SEGURO.AsString + '\' + ACBrCTe1.WebServices.Retorno.CTeRetorno.ProtDFe.Items[i].chDFe+'-cte.xml'), False); v_serie := copy((ACBrCTe1.WebServices.Retorno.CTeRetorno.ProtDFe.Items[i].chDFe),25,1); v_id_nf := strtoint(copy((ACBrCTe1.WebServices.Retorno.CTeRetorno.ProtDFe.Items[i].chDFe),26,9)); QryPesqCtrc.Close; QryPesqCtrc.ParamByName('p_ctrc' ).Value := v_id_nf; QryPesqCtrc.ParamByName('p_id_empresa' ).Value := dm1.EmpCod; QryPesqCtrc.ParamByName('p_id_filial' ).Value := dm1.FilCod; QryPesqCtrc.ParamByName('p_ser_ctrc' ).Value := v_serie; QryPesqCtrc.Open; QryAtualizaCte.Close; QryAtualizaCte.ParamByName('p_id').Value := QryPesqCtrc.FieldByName('id').value; QryAtualizaCte.Open; //ACBrCTe1.WebServices.Retorno.cStat status := ACBrCTe1.WebServices.Retorno.CTeRetorno.ProtDFe.Items[i].cStat; if status = 100 then begin QryAtualizaCte.Edit; QryAtualizaCte.FieldByName('CTE_ENVIADA' ).value := 'SIM'; QryAtualizaCte.FieldByName('CTE_NUM_PROTOCOLO_USO' ).AsString := ACBrCTe1.WebServices.Retorno.CTeRetorno.ProtDFe.Items[i].nProt; QryAtualizaCte.FieldByName('CTE_NUM_RECIBO' ).AsString := ACBrCTe1.WebServices.Retorno.CTeRetorno.nRec; QryAtualizaCte.FieldByName('DATA_MOV' ).Value := dm1.RetonaHoraFusoHorario; QryAtualizaCte.FieldByName('CTE_NUM_CHAVE_CANCELAMENTO').value := null; QryAtualizaCte.FieldByName('CTE_DATA_CANCELAMENTO' ).value := null; -
Geração de XML sem enviar
daniel_mirassol replied to daniel_mirassol's tópico in NFe/NFCe - Nota Fiscal Eletrônica
Obrigado deu certo . -
Geração de XML sem enviar
daniel_mirassol replied to daniel_mirassol's tópico in NFe/NFCe - Nota Fiscal Eletrônica
Diego, boa tarde ! Obrigado pelo retorno, sim estou fazendo como o modelo acima , só que não estou conseguindo salvar o arquivo XML . Rotina que ja funciona em Delphi : begin QryNotaFiscal.Close; QryNotaFiscal.ParamByName('p_id').Value := p_id_nota_fiscal; QryNotaFiscal.Open; GerarNFe(vAux); ACBrNFe1.NotasFiscais.Imprimir; ---- * preciso salvar o XML em um diretorio \conferencia\ xxxx.xml que foi demonstrado na impressão , ou seja, quando fechar a visualização salvar o arquivo XML ---- end; Obrigado. -
Geração de XML sem enviar
um tópico no fórum postou daniel_mirassol NFe/NFCe - Nota Fiscal Eletrônica
bom dia , Gostaria de uma ajuda, como faço para gerar xml de uma NFe antes de Enviar , para validar os dados . Vi que hoje é gerado um XML na pasta \LOG antes de enviar. Preciso que seja gerado este XML , o usuário visualize para depois enviar . Há possibilidade de fazer isso ? Caso afirmativo me de uma dica . Obrigado. -
AcbrNFSeX - Erro Envio de NFs-e - HTTPS
um tópico no fórum postou daniel_mirassol DFe - Documentos Fiscais Eletrônicos
bom dia, estou com problema no envio da NFS-eX e não consigo encontrar o problema, já atualizei a pasta schemas, dlls, etc . Estou com os fontes ACBR atualizados em Maio/2023 Anexo o print do problema -
ACBRNFSeX - Provedor Fiorilli Balsamo - Alteração de URL
um tópico no fórum postou daniel_mirassol DFe - Documentos Fiscais Eletrônicos
Bom tarde, A url da cidade de Balsamo-SP foi alterada , segue a nova URL: http://177.39.199.170:8085/IssWeb-ejb/IssWebWS/IssWebWS?wsdl No entanto, os fontes estão com o endereço antigo , li no manual de implantação do NFSeX , mas não esta conseguindo alterar no arquivo ACBrNFSeServicos.ini. Altero mas não salva como pode ser observado no print anexo. Qual o procediemento correto à fazer ? -
boa tarde, Estou tentandfo enviar NFSe para o Provedor Fiorilli para Prefeitura da cidade de Balsamo-SP , e esta apresentando um erro na validação (Sincrono does not match an operation). Procurei para saber o que possa ser mas não encontrei nada. Meus fontes estão atualizados até 15/04. Anexo print do erro. Obrigado. Daniel JR
-
Estou usando o componente ACBRGNREGuiaFR (Fast Report) com os parametros setados conforme imagem em anexo , mas na hora da impressão não parace a opção para o usuário selecionar a impressora , a impressão vai direto para default no Windows . OS demais componente (ACBRDANFEFR, ACBRCTREFR, Etc. ) por exemplo aparece normal , permite alterar a impressora. Atenciosamente. Daniel JR.
-
Diego, boa noite . Deu certo o procedimento ... Valeu pela dica era o que faltava !!!
-
boa tarde , seguindo o tópico fiz as correções , acima conforme o amigo Diego disse , mas mesmo assim não consigo imprimir , passei a utilizar o componente do Fortes e guia sai em branco , o que devo estar fazendo de errado ? Não sei se estou fazendo o processo correto, estou clicando em <Criar e Enviar> , depois <Imprimir Guia XML> ... Cheguei todos componentes estão ligados corretos, estou utilizando o XML anexo para imprimir a Guia . Anexo , XMLs e impressão . 001-gnre.xml
-
boa noite, quando faço o teste pelo exemplo apresenta outro erro ... Preenchi o exe de exemplo com os mesmo dados meus (teste), certificado, pastas etc Não funcionou ... 001-gnre.xml 20230320200556-env-lot.xml 20230320200557-rec.xml