No genera ningún error. el código es tan simple como ese solo colocar un parámetro del tipo String en una funcion y al asignarle un texto XML el metodo simplemente se cierra no lo manda llamar
y si por el contrario regreso un texto XML la funcion no recibe el dato
en la siguiente funcion se pueden observar los dos detalles si le envias un texto XML y colocas un break point en vCadena := pIXMLDocumentoI; nunca se detenie y desde el navegador en Server Function Invoker simplemente se cierra la funcion
si por el contrario le mandas texto plano como "Hola" deberla de regresar el XML asignado al result y simplemente no regresa nada se cierra la funcion en Server Function Invoker
Cita:
function TServerMethodsI.GeneraDocumento(
pIXMLDocumentoI: String): String;
var
vCadena: String;
begin
vCadena := pIXMLDocumentoI;
Result := '<DocumentoI xmlns="http://www.go2uti.com/canonical/nouns/20060605"><Encabezado><Documento cFolio="12345"/></Encabezado><Detalle><DetalleDocumento cIdProdu01="25"/></Detalle></DocumentoI>';
end;
|
Saludos