Estou com o mesmo problema e debugando vi que na unit ACBrBancoBancoob ainda se encontra copiando a partir da posição 176, porem ela esta zerada no arquivo de retorno e realmente pelo manual que tenho aqui a posição é a 111
111
116
06
Data Entrada ou Liquidação
9(06)
(ddmmaa)
Conferindo o arquivo na posição 111-> 240117 já na posição 176 000000
Vou alterar o arquivo para pegar a informação correta porém na próxima atualização do ACBR irei perder essas alterações?
Alguém que passou por isso tratou como?
Como resolvi:
procedure TACBrBancoob.LerRetorno400(ARetorno: TStringList);
...
if StrToIntDef(Copy(Linha,176,6),0) <> 0 then
DataCredito:= StringToDateTimeDef( Copy(Linha,176,2)+'/'+
Copy(Linha,178,2)+'/'+
Copy(Linha,180,2),0, 'DD/MM/YY' )
Else DataCredito:= StringToDateTimeDef( Copy(Linha,111,2)+'/'+
Copy(Linha,113,2)+'/'+
Copy(Linha,115,2),0, 'DD/MM/YY' );