Gracias Casimiro, por la edición.
Bueno después de tanto buscar, encontré la solución y la comparto con ustedes por si alguien la ocupa!
Lo único que tuve que hacer fue iniciar el campo XSDecimal y asignarle el valor en string por medio de su procedimiento
XSToNative
Código Delphi
[-]
Arreglo.RFCReceptor := 'TES030201001';
Arreglo.Total := TXSDecimal.Create;
Arreglo.Total.XSToNative(FloatToStr('1571.43'));
Arreglo.UUID := '34999FE8-7E57-7E57-7E57-7DE3AD8F6F1B';
Y con es funcionó
saludos y gracias.