Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How to create a SOAP message?
Message
De
09/05/2008 09:23:42
Jay Johengen
Altamahaw-Ossipee, Caroline du Nord, États-Unis
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
XML, XSD
Titre:
How to create a SOAP message?
Versions des environnements
Visual FoxPro:
VFP 9 SP2
Divers
Thread ID:
01316053
Message ID:
01316053
Vues:
73
UPDATE:

I'm trying this, but it still gives me the same error:
TEXT TO XMLMessage
<?xml version="1.0" encoding="UTF-8"?>
<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
	<soapenv:Body>
		<ns1:submitRealtimeRequest soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xmlns:ns1="urn:realtime">
			<request xsi:type="xsd:string">ISA*BlahBlahBlah~</request>
		</ns1:submitRealtimeRequest>
	</soapenv:Body>
</soapenv:Envelope>
ENDTEXT

LOCAL oRequest
oRequest = CREATEOBJECT("MSSOAP.SoapClient30")
oRequest.MSSoapInit(ResponseText)
lcXML = oRequest.submitRealtimeRequest(XMLMessage)
lcRequestACK = oRequest.pullRealtimeResponse()
RELEASE oRequest
How do I convert a block of text to a SOAP message?

Code block:
LOCAL oRequest
oRequest = CREATEOBJECT("MSSOAP.SoapClient30")
oRequest.MSSoapInit(ResponseText)
* This next line times out and returns an error from the server that it was unable to understand what was sent
lcXML = oRequest.submitRealtimeRequest(TextRequestMessage) 
lcRequestACK = oRequest.pullRealtimeResponse()
RELEASE oRequest
The message I need to send using SOAP:
* Test Message
TextRequestMessage = ;
	"ISA:00:          :00:          :ZZ:123456         :ZZ:MCKESSON_TSH   :051013:0132:U:00401:000000111:0:P:;~" + ;
	"GS:HS:123456name:ZZCERT:20051013:013205:11:X:004010X092~" + ;
	"ST:270:601864~" + ;
	"BHT:0022:13:60186-4:20051013:013205~" + ;
	"HL:1::20:1~" + ;
	"NM1:PR:2:O/P MOLINA HEALTHCARE MICHIGAN:::::PI:ZZCERT~" + ;
	"HL:2:1:21:1~" + ;
	"NM1:1P:2:PROVIDER NAME:::::SV:987654321~" + ;
	"HL:3:2:22:0~" + ;
	"NM1:IL:1:ROSSI:ZIPPORAH::::MI:PRVINTG002~" + ;
	"REF:SY:001008961~" + ;
	"N4:GRAND RAPIDS:MI:49507~" + ;
	"DMG:D8:19411210:F~" + ;
	"DTP:472:RD8:20051013-20051013~" + ;
	"EQ:30~" + ;
	"SE:14:601864~" + ;
	"GE:1:11~" + ;
	"IEA:1:000000111~"
Répondre
Fil
Voir

Click here to load this message in the networking platform