Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How to create a SOAP message?
Message
From
09/05/2008 09:23:42
Jay Johengen
Altamahaw-Ossipee, North Carolina, United States
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
XML, XSD
Title:
How to create a SOAP message?
Environment versions
Visual FoxPro:
VFP 9 SP2
Miscellaneous
Thread ID:
01316053
Message ID:
01316053
Views:
72
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~"
Reply
Map
View

Click here to load this message in the networking platform