Yo creo que el problema esta en como envías el fichero. Te pongo como lo hago yo
Código Delphi
[-]var
json : string;
RequestBody: TFileStream;
AResponse: IHTTPResponse;
begin
RequestBody := TFileStream.Create(FicheroComprimido, fmOpenRead);
EnvioBizkaia.SecureProtocols := [THTTPSecureProtocol.TLS12];
EnvioBizkaia.CustomHeaders['Accept-Encoding'] := 'gzip';
EnvioBizkaia.CustomHeaders['Content-Encoding'] := 'gzip';
EnvioBizkaia.CustomHeaders['Content-Type'] := 'application/octet-stream';
EnvioBizkaia.CustomHeaders['eus-bizkaia-n3-version'] := '1.0';
EnvioBizkaia.CustomHeaders['eus-bizkaia-n3-content-type'] := 'application/xml';
json := '{"con": "LROE","apa": "1.1","inte": {"nif": "'+ Factura.DatosAsesoria.CIF +'",';
if PersonaFisica then
json := json + '"nrs": "' + NombreP + '","ap1": "' + Apellido1P + '","ap2": "'+ Apellido2P +'"},'
else
json := json + '"nrs": "' + Nombre + '","ap1": "","ap2": ""},';
json := json + '"drs":{"mode": "' + Modelo + '","ejer": "2020"}}';
EnvioBizkaia.CustomHeaders['eus-bizkaia-n3-data'] := json;
AResponse := EnvioBizkaia.Post('https://pruesarrerak.bizkaia.eus/N3B4000M/aurkezpena',RequestBody);
end;
Espero que te sirva. Un Saludo