Luiz Carlos Rodrigues

Já Consegui fazer a requisição e estou Fazendo a leitura do XML com XMLDocument o problema que todos os serviços estão retornando a mesma informação. Todos os campos nos XSDs estão como String (Mesmo os campos de Valores/Datas). A Estrutura dos XSDs são iguais para todos os tipos de registros (Só muda a qtde de campos) ou seja como saber se um determinado tipo de registro pode vir várias vezes.

Alguém já fez alguma integração com Acerta Essencial do Boa Vista ? (É uma consulta tipo SPC) Recebi alguns arquivos XSD / Usuário / Senha e estou meio perdido pra entender. Desculpe se o assunto não for pertinente ao fórum

Sim. Aconteceu a mesma coisa. Até 15 dias atrás estava funcionando mais tive que atualizar para indy 10 devido envio de SMS da Zenvia usar TLS 1.2 e depois da atualização parou de funcionar. Inclusive os envios de e-mails com imagem no corpo da mensagem que eu utilizava indy tive que mudar para a classe TIdMessageBuilderHtml.

Estranho Funcionava normalmente e parou depois que atualizei para indy 10.6.2. Fica só o quadro onde seria a imagem e a imagem vai como anexo.

Alguém está com problema ao enviar email (ACBrEmail) com imagem no corpo da mensagem. Estava funcionando normalmente e depois que atualizei para o Indy 10 não exibe mais a imagem no corpo da mensagem. Parece que no Indy 10 a forma de enviar imagem no corpo da mensagem mudou tem agora o TIdMessageBuilderHtml para isso.

Bom dia Aqui também voltou a funcionar o cancelamento em homologação. Bom dia Aqui também voltou a funcionar o cancelamento em homologação.

Bom dia Aqui também voltou a funcionar o cancelamento em homologação.

Também estou com o mesmo problema, percebi apenas hoje.

Estou com a mesma mensagem de erro no cancelamento/carta de correção da NFe

Estou com o mesmo problema no Cancelamento/Carta de correção da NFe.

Voltou a acontecer novamente. Enviei o primeiro lote com 3 NFs, tudo OK. Enviei o segundo lote com mais 3 NFs, tudo OK. Enviei o terceiro lote com mais 5 NFs. Aqui não retornou o número do protocolo mais as NFs foram geradas. Só hoje Tive cancelar mais umas 10 NFs no total de 16.

Com a condição if FProvedor <> proGINFES then TagGrupo := FPrefixo3 + TagGrupo; O cancelamento voltou a funcionar Grato

Também estou com esse erro, GINFES São Caetano do Sul - SP

Denernun Você tentou enviar lotes de NFSe ? Uma nota apenas provavelmente funcione, o problema maior é quando se envia lote de NFSe.

Ainda continuo com o problema. Não tenho fontes de março para comparar.

Ainda não já fiz vários testes no ambiente de homologação e também dá os mesmos erros. Tanto a NF quanto o cancelamento as vezes dá erro mais as NFs/Cancelamentos foram realizados.

Tudo estava funcionando perfeitamente. Hoje começou a dar vários erros no envio de lote de RPS. Tem hora que dá erro aí meu sistema não grava o Número do Protocolo devido ao erro mais os RPS foram enviados/gerados notas. Tem hora que os RPS vão ok. Tem hora que dá erro de falha na validação do lote (the elemento {http://www.ginfes.com.br/servico_enviar_lote_rps_envio_v03.xsd} LoteRps is used but not declared in the DTD/Schema. Tem hora que dá erro em ACBrNFSe.ConsultarNFSeporRps outra hora não isso em um mesmo RPS. Não estou entendendo, alguns erros estão aleatórios. Só hoje tive que cancelar umas 15 notas no total de 23. E o pior é que cancelo a nota gero outro RPS com as mesmas informações e daí não dá o erro. Se alguém puder ajudar. Agradeço

Fiz as chamadas na unit Boletos: type TACBrTipoCobranca = (cobNenhum, cobBancoDoBrasil, cobSantander, cobCaixaEconomica, cobCaixaSicob, cobBradesco, cobItau, cobBancoMercantil, cobSicred, cobBancoob, cobBanrisul, cobBanestes, cobHSBC, cobBancoDoNordeste, cobBRB, cobBicBanco, cobBradescoSICOOB, cobBancoSafra, cobSafraBradesco, cobBancoCECRED, cobCitiBank ); Uses Forms, Math, dateutils, strutils, ACBrUtil, ACBrBancoBradesco, ACBrBancoBrasil, ACBrBancoBanestes, ACBrBancoItau, ACBrBancoSicredi, ACBrBancoMercantil, ACBrBancoCaixa, ACBrBancoBanrisul, ACBrBancoSantander, ACBrBancoBancoob, ACBrBancoCaixaSICOB ,ACBrBancoHSBC, ACBrBancoNordeste , ACBrBancoBRB, ACBrBancoBic, ACBrBancoBradescoSICOOB, ACBrBancoSafra, ACBrBancoSafraBradesco, ACBrBancoCecred, ACBrBancoCitiBank; procedure TACBrBanco.SetTipoCobranca(const AValue: TACBrTipoCobranca); begin if fTipoCobranca = AValue then exit; fBancoClass.Free; case AValue of cobBancoDoBrasil : fBancoClass := TACBrBancoBrasil.create(Self); {001} cobBancoDoNordeste:fBancoClass := TACBrBancoNordeste.create(Self); {004} cobBanestes : fBancoClass := TACBrBancoBanestes.create(self); {021} cobSantander : fBancoClass := TACBrBancoSantander.create(Self); {033,353,008} cobBanrisul : fBancoClass := TACBrBanrisul.create(Self); {041} cobBRB : fBancoClass := TACBrBancoBRB.create(self); {070} cobBancoCECRED : fBancoClass := TACBrBancoCecred.Create(Self); {085} cobCaixaEconomica : fBancoClass := TACBrCaixaEconomica.create(Self); {104} cobCaixaSicob : fBancoClass := TACBrCaixaEconomicaSICOB.create(Self); {104} cobBradesco : fBancoClass := TACBrBancoBradesco.create(Self); {237} cobItau : fBancoClass := TACBrBancoItau.Create(self); {341} cobBancoMercantil : fBancoClass := TACBrBancoMercantil.create(Self); {389} cobSicred : fBancoClass := TACBrBancoSicredi.Create(self); {748} cobBancoob : fBancoClass := TACBrBancoob.create(self); {756} cobHSBC : fBancoClass := TACBrBancoHSBC.create(self); {399} cobBicBanco : fBancoClass := TACBrBancoBic.create(self); {237} cobBradescoSICOOB : fBancoClass := TAcbrBancoBradescoSICOOB.create(self); {237} cobBancoSafra : fBancoClass := TACBrBancoSafra.create(Self); {422} cobSafraBradesco : fBancoClass := TACBrBancoSafraBradesco.Create(Self); {422 + 237} cobCitiBank : fBancoClass := TACBrBancoCitiBank.Create(Self); {745} else fBancoClass := TACBrBancoClass.create(Self); end; fTipoCobranca := AValue; end; procedure TACBrBoleto.ChecarDadosObrigatorios; begin // LUIZ if (Cedente.Nome= '') or (cedente.Conta = '') or ((Cedente.ContaDigito ='') and (not (Banco.TipoCobranca in [cobBanestes,cobCitiBank]))) or (Cedente.Agencia = '') or ((Cedente.AgenciaDigito = '') and (not (Banco.TipoCobranca in [cobBanestes,cobCitiBank]))) then raise Exception.Create(ACBrStr('Informações do Cedente incompletas')); end; ACBrBancoCitiBank.pas Cobranca240CitiBank.pdf Manual técnico operacional de Cobrança V.6_BoletoCitiBank.pdf 745_Colorido.bmp 745_PretoBranco.bmp

Desenvolvi Emissão de Boleto / Arquivo de Envio do Citibank e já está em Produção, falta ainda o arquivo de retorno (No momento estou sem tempo para devolver o retorno) Por não ser um conhecedor profundo dos componentes ACBr pode ser que tenha algum ajuste. Posso enviar a UNIT?

ACBrNFSeDANFSeFR.pas

Fiz uma alteração na unit ACBrNFSeDANFSeFR para exibir a mensagem DE: FieldByName('Mensagem0').AsString := IfThen(DANFSeClassOwner.NFSeCancelada, 'NFSe CANCELADA', ''); PARA: FieldByName('Mensagem0').AsString := IfThen(ANFSe.Cancelada = snSim, 'NFSe CANCELADA', '');

Após as últimas atualizações já testei a consulta de lote e consulta de nota e estão funcionando Só falta testar o RPS

ACBrNFSe.ConsultarNFSeporRps está funcionando foi só preencheros os dados da empresa em ACBrNFSe.Configuracoes.Geral.Emitente ACBrNFSe.ConsultarLoteRps não está retornand a Situação, a mesma está vindo em branco.

Devo estar deixando de setar alguma cosa mais não descobri o que é pois estava funcionando pelo menos ACBrNFSe.ConsultarNFSeporRps e agora não está mais.

Foi o que eu Fiz, atualizei tudo e reinstalei os componentes.