daniel_mirassol

Bom Dia! Ontem na cidade de São José do Rio Preto-(SP) ocorreu a troca de provedores (GINFES para GISS), atualizamos os schemas porem está apresentando o seguinte erro na hora do envio: Poderia ser URL incorreta que estamos utilizando?

boa tarde ! Tenho um cliente que me faz uma solicitação para ver se há possibilidade de consultar o a sistuação cadastral dos clientes no Sintegra via sistema , pois hoje , faz de forma manual. O ACBR tem algo neste sentido ou que possa indicar alguma solução para tal . Obrigado

Boa tarde , Obrigado pela dica , era a UF que estava cadatro errada. O cliente cadastrou errado . Mas obrigado pela ajuda ! Chamado resolvido

Atualizei tudo de novo , mas sem sucesso ! o problema está na func: AcbrCte.DistribuicaoDFePorUltNSU( zQueryEMPRESAUF.AsInteger, zQueryEMPRESACNPJ.AsString , UltNSu ); Retorno da Result := WebServices.DistribuicaoDFe.Executar; ('soap12', 'xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap12="http://www.w3.org/2003/05/soap-envelope"', 'cteCabecMsg', 'cteDistDFeInteresse', '', '<cteDadosMsg><distDFeInt xmlns="http://www.portalfiscal.inf.br/cte" versao="1.00"><tpAmb>1</tpAmb><cUFAutor>02</cUFAutor><CNPJ>09421857000150</CNPJ><distNSU><ultNSU>000000000000000</ultNSU></distNSU></distDFeInt></cteDadosMsg>', '<?xml version="1.0" encoding="UTF-8"?><soap12:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap12="http://www.w3.org/2003/05/soap-envelope"><soap12:Header><cteCabecMsg xmlns="http://www.portalfiscal.inf.br/cte/wsdl/CTeDistribuicaoDFe"><cUF>35</cUF><versaoDados>1.00</versaoDados></cteCabecMsg></soap12:Header><soap12:Body><cteDistDFeInteresse xmlns="http://www.portalfiscal.inf.br/cte/wsdl/CTeDistribuicaoDFe"><cteDadosMsg><distDFeInt xmlns="http://www.portalfiscal.inf.br/cte" versao="1.00"><tpAmb>1</tpAmb><cUFAutor>02</cUFAutor><CNPJ>09421857000150</CNPJ><distNSU><ultNSU>000000000000000</ultNSU></distNSU></distDFeInt></cteDadosMsg></cteDistDFeInteresse></soap12:Body></soap12:Envelope>', '<?xml version="1.0" encoding="utf-8"?><soap:Envelope xmlns:soap="http://www.w3.org/2003/05/soap-envelope" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema"><soap:Body><cteDistDFeInteresseResponse xmlns="http://www.portalfiscal.inf.br/cte/wsdl/CTeDistribuicaoDFe"><cteDistDFeInteresseResult><retDistDFeInt versao="1.00" xmlns="http://www.portalfiscal.inf.br/cte"><tpAmb>1</tpAmb><verAplic>2.0.5_2409060940</verAplic><cStat>215</cStat><xMotivo>Rejeicao: Falha no esquema xml</xMotivo><dhResp>2024-09-06T09:40:18</dhResp><ultNSU>000000000000000</ultNSU><maxNSU>000000000000000</maxNSU></retDistDFeInt></cteDistDFeInteresseResult></cteDistDFeInteresseResponse></soap:Body></soap:Envelope>', '<retDistDFeInt versao="1.00" xmlns="http://www.portalfiscal.inf.br/cte"><tpAmb>1</tpAmb><verAplic>2.0.5_24 ---- func do CTE function TACBrCTe.Distribuicao(AcUFAutor: integer; const ACNPJCPF, AultNSU, ANSU, AchCTe: String): Boolean; begin WebServices.DistribuicaoDFe.cUFAutor := AcUFAutor; WebServices.DistribuicaoDFe.CNPJCPF := ACNPJCPF; WebServices.DistribuicaoDFe.ultNSU := AultNSU; WebServices.DistribuicaoDFe.NSU := ANSU; WebServices.DistribuicaoDFe.chCTe := AchCTe; Result := WebServices.DistribuicaoDFe.Executar; if not Result then GerarException( WebServices.DistribuicaoDFe.Msg ); end;

boa tarde, Estou com problema na consulta do metodo DistribuicaoDFe , esou passando conforme linha abaixo descrita: - ACBrNFe.DistribuicaoDFe(zQueryEMPRESAUF.AsInteger, zQueryEMPRESACNPJ.AsString, UltNSu, ''); No entanto , retorna, a mensagem Falha Schemas XML ! Lembro que fiz todas as alterações nesta data (04/09/2024), mesmo assim persiste o problema . Não sei mais o que fazer , anexo imagem do evento ....

Bom dia, Na emissão do boleto do Banco Cresol está apresentando a sequinte mensagem: Banco não definido, impossivel listar boleto. Debugando , me deparei no código abaixo if Banco.Numero = 0 then raise Exception.Create( ACBrStr('Banco não definido, impossivel listar boleto') ); No entanto, comparando com os demais fontes de outros banco , observei que não tem a linha abaixo ACBrBoleto1.Banco.TipoCobranca := cobBancoCresol; Teria como fazer esta correção e disponibilzar para o boleto possa sair . Obrigado.

Segue em anexo (.PDF) Layout para implantações de remessas no modelo c400 (400 posições): Layout_de_Arquivo_Cobrança_400_Safra__QRCode Pix.pdf

Bom dia! Mas no caso precisa ser feito alguma correção no fonte ACBrBancoSafra ? devido ao Layout do banco estar incoerente ?

Grato, no aguardo!

Boa Tarde! Sim, tentamos na configuração BancoSafra, e a remessa não foi aceita pelo banco devido as posições não serem de acordo com o layout. Segue imagens: Imagem 01: Remessa abaixo foi gerada com parâmetro cobSafraBradesco, onde se enquadra com as solicitações do banco, Imagem 02: Layout Enviado do Banco.. Imagem 03: Fonte ACBrBancoSafra Imagem 04: Fonte ACBrBancoSafraBradesco ... Concluímos que conforme Layout enviado pelo banco Safra, deve se utilizar cobSafraBradesco;

bom dia , Pessoal estou com um problema junto, tenho um cliente que está homologando o banco safra no layout BradescoSafra. No entanto a remessa e o retorno estão ok, mas quando vou imprimir o boleto o mesmo sai com o logo do Bradesco . mesmo sendo que o banco está configurado como 422 e não 237 . Alguém poderia me ajudar nisso ? obrigado.

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,

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;

Obrigado deu certo .

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.