><?xml version="1.0" encoding="utf-8"?> ><soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" >xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" >xmlns:xsd="http://www.w3.org/2001/XMLSchema" >xmlns:enc="http://schemas.xmlsoap.org/soap/encoding" > > ><soap:Body> > ><impl:hastaKabul xmlns:impl="http://servisler.ws.gss.sgk.gov.tr"> > ><provizyonGiris> > <devredilenKurum>3</devredilenKurum> > <hastaKarneNo>111111216</hastaKarneNo> > <hastaSosyalGuvNo>1111111111126</hastaSosyalGuvNo> > <hastaTCKimlikNo>49000719000</hastaTCKimlikNo> > <provizyonTarihi>22.12.2006</provizyonTarihi> > <provizyonTipi>N</provizyonTipi> > <saglikTesisKodu>10662</saglikTesisKodu> > <sigortaliTuru>2</sigortaliTuru> > <takipNo></takipNo> > <takipTuru>1</takipTuru> > <yakinlikKodu></yakinlikKodu> ></provizyonGiris> > ></impl:hastaKabul> > ></soap:Body> > ></soap:Envelope> > >>>No not really. The SOAP Toolkit requires XML DOM objects in order to represent complex types. It's a bit more involved than creating the proper XML string.
>>> <devredilenKurum>3</devredilenKurum> >>> <hastaKarneNo>111111216</hastaKarneNo> >>> <hastaSosyalGuvNo>1111111111126</hastaSosyalGuvNo> >>> <hastaTCKimlikNo>49000719000</hastaTCKimlikNo> >>> <provizyonTarihi>22.12.2006</provizyonTarihi> >>> <provizyonTipi>N</provizyonTipi> >>> <saglikTesisKodu>10662</saglikTesisKodu> >>> <sigortaliTuru>2</sigortaliTuru> >>> <takipNo></takipNo> >>> <takipTuru>1</takipTuru> >>> <yakinlikKodu></yakinlikKodu> >>>>>>I don't sure, if I put this xml to a string and I send this string as a parameter to the method?
>>>>><?xml version="1.0" encoding="utf-8"?> >>>>> >>>>><soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" >>>>>xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" >>>>>xmlns:xsd="http://www.w3.org/2001/XMLSchema" >>>>>xmlns:enc="http://schemas.xmlsoap.org/soap/encoding" > >>>>> >>>>><soap:Body> >>>>> >>>>><impl:hastaKabul xmlns:impl="http://servisler.ws.gss.sgk.gov.tr"> >>>>> >>>>><provizyonGiris> >>>>> >>>>><devredilenKurum>3</devredilenKurum><hastaKarneNo>111111216</hastaKarneNo><h >>>>>astaSosyalGuvNo>1111111111126</hastaSosyalGuvNo><hastaTCKimlikNo>4900071 >>>>>astaSosyalGuvNo>9000 >>>>></hastaTCKimlikNo><provizyonTarihi>22.12.2006</provizyonTarihi><provizyonTip >>>>>i>N</provizyonTipi><saglikTesisKodu>10662</saglikTesisKodu><sigortaliTur >>>>>i>u>2< >>>>>/sigortaliTuru><takipNo></takipNo><takipTuru>1</takipTuru><yakinlikKodu></ya >>>>>kinlikKodu> >>>>> >>>>></provizyonGiris> >>>>> >>>>></impl:hastaKabul> >>>>> >>>>></soap:Body> >>>>> >>>>></soap:Envelope> >>>>>>>>>>
>>>>>LOCAL loProvizyonIslemleri AS "XML Web Service" >>>>>LOCAL loException, lcErrorMsg, loWSHandler TRY >>>>> loWSHandler = >>>>>NEWOBJECT("WSHandler",IIF(VERSION(2)=0,"",HOME()+"FFC\")+"_ws3client.vcx") >>>>> loProvizyonIslemleri = >>>>>loWSHandler.SetupClient("http://43000210000:43000210000@test.sgk.gov.tr/sagl >>>>>ikws/services/ProvizyonIslemleri/wsdl/ProvizyonIslemleri.wsdl", >>>>>"ProvizyonIslemleriService", "ProvizyonIslemleri") >>>>> >>>>> leResult = loProvizyonIslemleri.hastaKabul(lcXml) >>>>> >>>>>CATCH TO loException >>>>> lcErrorMsg="Error: "+TRANSFORM(loException.Errorno)+" - "+loException.Message >>>>> DO CASE >>>>> CASE VARTYPE(loProvizyonIslemleri)#"O" >>>>> * Handle SOAP error connecting to web service >>>>> CASE !EMPTY(loProvizyonIslemleri.FaultCode) >>>>> * Handle SOAP error calling method >>>>> lcErrorMsg=lcErrorMsg+CHR(13)+loProvizyonIslemleri.Detail >>>>> OTHERWISE >>>>> * Handle other error >>>>> ENDCASE >>>>> * Use for debugging purposes >>>>> MESSAGEBOX(lcErrorMsg) >>>>>FINALLY >>>>>ENDTRY >>>>>