Quantcast
Channel: FiveTech Software tech support forums
Viewing all articles
Browse latest Browse all 26233

Webservices

$
0
0
Estimados, Estoy trabajando con webservices y tengo la siguiente inquietud al momento de utilizar los metodos POST y GET. El web service esta alojado en esta URL Para probar el servicio y depurar consultas se puede usar esta pagina: El servicio espera dos parámetros, uno GET, siempre es el mismo f=ws, de modo que hay que llamar a la url de esta manera y el otro parámetro es POST, mensaje. El mensaje se envía en formato xml de acuerdo a la siguiente especificación: [b:160d7b16]EJEMPLO DE MENSAJE DE LLAMADA InteraccionFarmacologica[/b:160d7b16] (se puede colocar en la pagina de pruebas)COLFARMRNSISTEMASRNFM00001COLFARMRNInteraccionFarmacologica1.0.1xmlAlfaBeta3514212907 [b:160d7b16]EJEMPLO XML de respuesta[/b:160d7b16]COLFARMRNSISTEMASRNFM00001COLFARMRN1InteraccionFarmacologica1.0.1xmlAlfaBeta351421290704/03/16 01:03:532645Interacciones encontradas: 1Interaccion1IBUPROFENOENALAPRILIBUPIRAC 600 MGENALAPRIL RICHET Los AINE pueden disminuir el efecto antihipertensivo y natriurético de los IECA, el mecanismo puede implicar la atenuación de la efectividad de los agentes antihipertensivos secundario a la interferencia con la producción de prostaglandinas vasodilatadoras y natriuréticas que son estimuladas por los agentes antihipertensivos. Si bien no se conocen interacciones farmacocinéticas significativas entre los AINE y los inhibidores de la ECA, la combinación de los AINE y los inhibidores de la ECA pueden producir efectos secundarios tales como bradicardia marcada debido a hiperpotasemia. Se debe monitorear la eficacia antihipertensiva en especial en la insuficiencia renal, en pacientes ancianos, en pacientes deshidratados. Cuando el uso concomitante es necesario, monitorear la eficacia antihipertensiva de los IECA y la función renal periódicamente para detectar signos de insuficiencia renal. ///////////////////////////////////////////////////////////////////////////////////////////////////// [b:160d7b16] ESTE ES UN EJEMPLO DE MI FUNCION CONSULTAR() QUE NO OBTIENE LOS VALORES DE RESULTADO COMO EN EL EJEMPLO[/b:160d7b16] ///////////////////////////////////////////////////////////////////////////////////////////////////// //....................... FUNCTION Consultar() //...................... local odoc,ohttp,cUrl,cXml //..crea objeto XML TRY oHttp:=createobject( 'Microsoft.XMLHTTP') CATCH try oHttp:=createobject( 'Microsoft.XMLHTTP') catch Alert('Error en la creacion del objeto Microsoft.XMLHTTP : ' + Ole2TxtError()) return .F. end END //.. Creo Objeto XML TRY oDoc := CreateObject( 'MSXML2.DOMDocument' ) CATCH try oDoc := CreateObject( 'MSXML2.DOMDocument' ) catch Alert('Error en la creacion del objeto MSXML2.DOMDocument : ' + Ole2TxtError()) return .F. end END cUrl:="http://ws.medicamentosrothlin.com.ar/?f=ws" cXml:='' cXml+='' + CRLF cXml+='' + CRLF cXml+='' + CRLF cXml+=' COLFARMRN' + CRLF cXml+=' SISTEMAS' + CRLF cXml+=' RNFM00001' + CRLF cXml+=' COLFARMRN' + CRLF cXml+='' + CRLF cXml+=' ' + CRLF cXml+=' InteraccionFarmacologica' + CRLF cXml+=' 1.0.1' + CRLF cXml+=' xml' + CRLF cXml+=' ' + CRLF cXml+=' ' + CRLF cXml+=' ' + CRLF cXml+=' AlfaBeta' + CRLF cXml+=' 35142' + CRLF cXml+=' 12907' + CRLF cXml+=' ' + CRLF cXml+=' ' + CRLF cXml+='' + CRLF PREGUNTA : Como debería hacer para que GET y POST funcionen correctamente y obtener una respuesta del webservice como la del ejemplo...?? ///...................... oHttp:Open( 'POST' , cUrl , .F. ) oDoc:LoadXML( cXml ) //carga el documento a xml oHttp:send(oDoc:xml) // envio xml cRespuesta:= oHttp:responseText ? cRespuesta //..................... retu .t. Muchas gracias, Saludos Mariano

Viewing all articles
Browse latest Browse all 26233

Trending Articles