Antonio Gomes

é porque ao colar aqui, removeu os colchetes: Quando fala em ARetornoLido, tem que tratar ela assim: ARetornoLido [i ] voce mexe na linha com isso. Ah: Um detalhe que não pode esquecer, antes tem que analisar no arquivo se é do itau isso e se tem um cpf na posicao, no meu caso, eu coloquei no bordero de retorno, um campo para marcar que e de pessoa fisica.

Isso é treta doida do itau. mandam errado e pronto, nem perdi meu tempo pedindo eles para arrumar.

se for retorno do itau, tem que mudar a posicao onde colocam o tipo de pessoa, pois o acbr interpreta como está la e tenta validar um cpf, sendo que é cnpj que espera pelo numero que o itau muda: o que eu faço aqui se é um retorno de pessoa fisica do itau: var ArquivoDeRetorno : TStream; LS : TStrings; ArquivoDeRetorno := TMemoryStream.Create; LS := TStringList.Create; // CONTEUDO DO ARQUIVO LS.Text := TBlobField(IBDSPai.FieldByName('ARQUIVO_RETORNO_BOR')).AsString; P := LS.Count - 1; if (IBDSPai.FieldByName('RETORNO_PESSOA_FISICA_BOR').AsString = 'S') then MudarRetornoPosicao2_FisicaJuridica(LS); LS.SaveToStream(ArquivoDeRetorno); procedure TFCadBorderoBancario.MudarRetornoPosicao2_FisicaJuridica(var ARetornoLido: TStrings); var Linha: string; I : Integer; begin for I := 0 to ARetornoLido.Count - 1 do begin Linha := ARetornoLido; // Mexer nas linhas que correspondem a titulos apenas - iniciados com 1 if (Copy(Linha, 1, 1) = '1') and (Copy(Linha, 2, 2) = '02') then begin Delete(Linha, 2, 2); Insert('01', Linha, 2); ARetornoLido := Linha; end; end; end; testa ai, pode ser o seu problema também...

Entendi. vc parametrizar no seu programa, para aceitar esse campo, vai funcionar,: veja: na procedure: GerarRegistroHeader240 está assim: PadRight(DigitoVerificadorAgenciaConta, 1, ' ')+ // 72 - Dígito verificador Ag/Conta (zero) << aqui entra seu parametro, igual coloquei la em cima na procedure: TACBrBancoob.GerarRegistroTransacao240 está assim: PadLeft(ACBrBoleto.Cedente.ContaDigito , 1, '0') + //36 - Dígito da Conta Corrente ' '; //37 - DV Agência/COnta Brancos olha a tela, o parametro que pede no componente: vc repassa o valor direto como string, para permanecer como o usuario colocou: Cedente.DigitoVerificadorAgenciaConta := ADataSetConfigServicoBanco.FieldByName('DV_AGENCIA_CONTA_CCR').AsString;

Uai? Qual banco? Qual tipo de pessoa?

Ai ai, esses bancos piram a gente: Hearder do arquivo: Dígito Verificador da Ag/Conta: Preencher com zeros Header do lote: Dígito Verificador da Ag/Conta: Preencher com espaços em branco Estou anexando a planilha que solicitei a cooperativa hoje. LAYOUT PARA TROCA DE INFORMAÇÕES - ATUALIZADO.xls

Eu penso que ele fez confusão, o digito da agencia tem que enviar, pensei que estava falando do digitoAgenciaConta conforme imagem do manual, um deles tem que ir vazio mesmo, porem, não está sendo validado, o componente está correto, ele valida apenas o digito da agencia.

está funcionando sim, porem, a nota modelo 55, tem retornado com erro, problema do estado, não do ACbr, tem retornado como autorizada, sem estar..

Não faz, apenas remessa bancaria mesmo, padrao cnab400 e 240. Porém do segmento cobranca apenas. Mas se você olhar, consegue a partir de uma unit do banco processar um arquivo desse, fazendo a modificação. Seria outro componente, do meu ponto de vista.. @Juliana Tamizou pode confirmar isso para você.

Por isso nem perco meu tempo de enviar email para lá... resposta mais sem sentido.

já tem gente reclamando desde quinta. O estado é uma fera para atrapalhar, mas para arrumar... deixa para lá. So confirmando aqui, o modo que o italo fez, grava o arquivo de compartilhamento correto, sem aqueles namespace no final do xml de autorizacao. Realmente, isso atrapalharia quem usa o xml para processar no setor de compras da empresa destino.

Mas está autorizando as nfce paradas em contingencia?

@gutembergscosta

Outro dia teve um com esse problema, alguém indicou para ele reduzir a fonte.

esse trecho, pelo que foi modificado, vai fazer diferenca na validacao. if fsMultIni > fsMultFim then begin Dec( Base ) ; if Base < fsMultFim then Base := fsMultIni; end else begin Inc( Base ) ; if Base > fsMultFim then Base := fsMultIni ; end ; Segue imagem de como ficará após ser alterado. Pelo manual da caixa: a base deve iniciar em 2, pegando de taz para frente nos 17 dígitos do nosso numero: 14000000000000847

envia como faz isso. atribuir bo acbrboleto.

a NFC-e aqui em MG e RJ, que implementei o envio, tem limite de 5 min desde o inicio. O que eu faço aqui é uma treta, sempre que vou mexer no xml, eu atualizo a hora do xml para o atual. e atualizo no banco de dados apenas esse campo. Tipo, a hora é colocado no final do processamento da nfce. para nao ficar comendo mosca por conta do operador demorar lançar os itens.

interessante, não mexi em nada... vc não estaria enviado isso pelo sicob? Unit "ACBrBancoCaixaSICOB"

@Juliana Tamizou tem como incorporar ao fonte?

então, peguei para testar baseado no que reportou. o nosso numero gerado no seu programa foi dv = 3 ? Segue imagem do boleto

se pensar no contexto de somar da direita para esquerda, está certo... Eu tenho esse banco funcionando, e desse jeito. Qual problema reportaram para vc? Coloca os dados da conta e carteira para testarmos junto.

Não, vc tem que fazer a treta certa, vou passar como faço: TFuncBoleto.ACBrBoleto.DirArqRemessa := ExcludeTrailingPathDelimiter(ADirRemessa); TFuncBoleto.ACBrBoleto.NumeroArquivo := IBDSPai.FieldByName('SEQ_ARQUIVO_BOR').AsLargeInt; TFuncBoleto.ACBrBoleto.NomeArqRemessa := AArqRemessa; AArqRemessa := TFuncBoleto.ACBrBoleto.GerarRemessa(IBDSPai.FieldByName('SEQ_ARQUIVO_BOR').AsLargeInt);

Isso tem que ser salvo no banco, no cadastro da conta corrente, vinculado ao banco, para caso o segundo usuario da rede for gerar, ter o mesmo resultado. Sugestão de ter apenas as pastas iguais nas maquinas.

vc pode enviar o comando especifico, mas geralmente é mais fácil implementar essa alteracao pelo gerenciador do proprio banco. é uma coisa que quase nao se usa dentro do sistema... seu bordero de envio pode fazer alteração também.