CalixtoJB

Boa tarde, Desculpe eu não sabia se eu deveria ter comentado no posto anexo, ou abrir um novo, se for necessário eu posso remover esse e comentar no post relacionado. Eu baixei o manual que o João havia anexado, porém, eu não estava conseguindo gerar o hash como a criptografia de senha, então mandei um email para a SilTecnologia pedindo ajuda e os manuais atualizados então segue anexo a resposta: "Bom dia Sr. Calixto, Sobre o e-mail abaixo, em Itapevi está funcionando a versão padrão Abrasf 2.3. Essa é a versão mais atual do webservice disponível. Segue abaixo as URL´s de homologação e produção: Homologação: https://homologacao.siltecnologia.com.br/tbitapevi/services/Abrasf23?wsdl Produção: https://itapevi.siltecnologia.com.br/services/Abrasf23?wsdl Segue anexo manual de integração, e exemplos de XML. O manual que vc verificou, é de uma versão mais antiga do webservice, que o link de acesso tinha o nome "WSEntrada". Ele é o que existia antes do padrão Abrasf, e para os novos contribuintes que desejam criar webservice, estamos orientando usar o padrão Abrasf." Estou anexando os arquivo que eles me mandaram e também alterei no arquivo ini a config, com isso consegui comunicar com Itapevi corretamente: ProRecepcionar=https://itapevi.siltecnologia.com.br/services/Abrasf23?wsdl Atenciosamente, Equipe SIL Tecnologia exemplo_gerarnfse_itapevi.xml ManualWebServiceAbrasf.pdf exemplo_cancelarnfse_itapevi.xml

Boa tarde, Infelizmente não tenho o ambiente para testar, atualmente usamos o delphi 2006. Como internamente o ACBrUtil já faz o direcionamento para as outras unit acredito que não teria problemas, mas é sempre bom testar. Inclusive alguns dos fontes já foram até corrigidos por esse commit: TK-2647 Warning @deprecated ACBrUtils

O Assigned estava sendo feito incorreto, segue a correção. ACBrMDFeDAMDFeRL.pas

Prezados, Reparei que na NFe, usando a opção Salvar do form de Pré - Visualização do Fortes, a opção default vem como Documento PDF Porém, no MDF-e vem como Documento padrão, que salva como .rpfACBrMDFeDAMDFeRL.pas Fiz um ajuste para ficar igual ao da NFe ACBrMDFeDAMDFeRL.pas ACBrMDFeDAMDFeRL.zip

Prezados, Segue em anexo alguns ajustes referentes a warnings e hints após a separação da unit ACBrUtil, espero ajudar. Atenciosanemente. ACBrDFe.rar

Bom dia Felipe E. Resende Mesquita, Realmente atualizei o windows e funcionou corretamente, só achei estranho o webservice de SC funcionou se a atualização, mas obrigado pela resposta.

Bom dia Estou com o mesmo problema, mas somente São Paulo ocorre o erro. SC por exemplo vai normal. Alguém sabe dizer se realmente está fora do ar ou se tem diferença entre um e outro webservice? Grato.

Bom dia, Desculpe a demora. ACBrEFDBloco_K_Class.pas \Fontes\ACBrTXT\ACBrSPED\ACBrSPEDFiscal\ACBrEFDBloco_K_Class.pas Também fiz umas correções e melhorias no exemplo do Sped, segue fontes para análise: Frm_SPEDFiscal.pas \Fontes\Exemplos\ACBrTXT\ACBrSPED\Delphi\Fiscal\Frm_SPEDFiscal.pas Frm_SPEDFiscal.dfm \Fontes\Exemplos\ACBrTXT\ACBrSPED\Delphi\Fiscal\Frm_SPEDFiscal.dfm

Boa tarde, No arquivo ACBrEFDBloco_K_Class.pas ao alterar: De: Add( LFill('K220') + LFill( DT_MOV ) + LFill( COD_ITEM_ORI ) + LFill( COD_ITEM_DEST ) + DFill( QTD, 3 ) ); Para: Add( LFill('K220') + LFill( DT_MOV ) + LFill( COD_ITEM_ORI ) + LFill( COD_ITEM_DEST ) + DFill( QTD, 3 )+ DFill( QTD_DEST, 3 )); Deveria ter a checagem igual ao arquivo ACBrEFDBloco_D_Class.pas IfThen(DT_INI >= EncodeDate(2018,01,01), Grato.

Bom dia a todos, Baixei todos os fontes hoje e estou validando o ACBrNFe_demo, estou tentando utilizar a opção Manif. Dest. - Conf. Operação em ambiente de produção e esta retornando: Erro Interno: 0 Erro HTTP: 500 Analisei os fontes e verifiquei o seguinte: O início do problema ocorre na procedure TDFeWebService.InicializarServico; Ao entrar na procedure TNFeEnvEvento.DefinirURL o código define a versão do serviço através da linha: VerServ := VersaoDFToDbl(FPConfiguracoesNFe.Geral.VersaoDF); (No caso v400) Após isso ao entrar na procedure TACBrDFe.LerServicoChaveDeParams há o seguinte código: LerServicoChaveDeParams( Sessao, NomeServico, VersaoAchada, URL ); LerDeParams( FPIniParams.ReadString(Sessao, 'WSDL', ''), NomeServico, VersaoAchada, Servico ); LerDeParams( FPIniParams.ReadString(Sessao, 'SoapAction', ''), NomeServico, VersaoAchada, SoapAction ); Ao entrar na primeira linha LerServicoChaveDeParams( Sessao, NomeServico, VersaoAchada, URL ) é feito uma tentativa para buscar a versão do evento no resource ACBrNFeServicos.res com a chave [NFe_AN_P], porém como ainda não existe a versão 4.00 em produção é retornado a primeira encontrada no caso RecepcaoEvento_1.00 = https://www.nfe.fazenda.gov.br/RecepcaoEvento/RecepcaoEvento.asmx. As proximas duas linhas retornam o Servico e o SoapAction vazios. Até aqui tudo certo. Porém ao voltar na procedure TDFeWebService.InicializarServico o código entra na proxima procedure DefinirServicoEAction; Nela esta o seguinte: procedure TNFeEnvEvento.DefinirServicoEAction; begin if (FPConfiguracoesNFe.Geral.VersaoDF >= ve400) then begin if EstaVazio(FPServico) then FPServico := GetUrlWsd + 'NFeRecepcaoEvento4'; if EstaVazio(FPSoapAction) then FPSoapAction := FPServico + '/nfeRecepcaoEvento'; end else begin FPServico := GetUrlWsd + 'RecepcaoEvento'; FPSoapAction := FPServico; end; end; Ai está o problema, pois a URL é da versão 1.00 achada no arquivo .res e agora é feito uma checagem pela versão configurada, sendo assim ao enviar a requisição ocorre erro. Um pouco a frente no código também ocorre o mesmo problema pois cai na procedure TNFeWebService.InicializarServico; procedure TNFeWebService.InicializarServico; begin { Sobrescrever apenas se necessário } inherited InicializarServico; FOldSSLType := FPDFeOwner.SSL.SSLType; FOldHeaderElement := FPHeaderElement; { Caso seja versão 4.0, deve certificar que está usando TLS1.2 } if FPConfiguracoesNFe.Geral.VersaoDF >= ve400 then begin // FPDFeOwner.SSL.SSLType := LT_TLSv1_2; // Servidor da BAHIA não está funcionando com esta configuração FPHeaderElement := ''; //Versão 4.00 não tem o elemento <soap12:Header> end; TACBrNFe(FPDFeOwner).SetStatus(FPStatus); end; Só que eu não sei qual seria a melhor solução, talvez mudar a configuração FPConfiguracoesNFe.Geral.VersaoDF temporariamente? Mas acho que não seria o ideal. O que vocês acham? Talvez ajustando esses pontos já solucione vários tópicos que vi a respeito de erro 500. Grato.

Bom dia, Atualizei o fonte e estou testando o AcbrMail, desculpe a pergunta mas gostaria de saber para que serve a propriedade From. Pergunto isso porque informando ou não esta propriedade sempre sai o email do UserName.

Boa tarde Senhores, A DANFE Eventos Fortes está formatando o CEP de forma incorreta fiz os ajustes de acordo com a DANFE da NFe, Segue o anexo. Att., ACBrNFeDANFeEventoRLRetrato.pas

Bom dia, Acho que esse link pode te ajudar... http://tdn.totvs.com/download/attachments/161352431/TSS_RN_Notas_de_Release_2_33_BRA_TPIAFD.pdf?version=1&modificationDate=1410899050000&api=v2

Bom dia, Ontem já foi aberto esse tópico...

Boa tarde, Está alteração foi feita pelo que me lembro porque determinado webservice estava recusando quando não possuia essa tag mesmo zerada, qual seria o problema da tag ser gerada no seu caso?