ChangeCharset(charsetOccidental)
sXmlcotent is string = [
GetBalance
Get
1.0
B1iadmin
SAPB1Admin
TR
Select ItemCode,ItemName from OITM
]
site is string = "http://127.0.0.1:8080/B1iXcellerator/exec/soap/vP.001sap0003.in_WCSX/com.sap.b1i.vplatform.runtime/INB_WS_CALL_SYNC_XPT/INB_WS_CALL_SYNC_XPT.ipo/proc"
l_ws is httpRequest
cMyResponse is httpResponse
l_ws.URL = site
l_ws.Method=httpPost
l_ws.Content = sXmlcotent
l_ws.User = "B1iadmin"
l_ws.Password = "SAPB1Admin"
l_ws.ContentType="text/xml"
l_ws.UserAgent = "ylan"
cMyResponse = HTTPSend(l_ws)
EDT_Text1=cMyResponse..Content
Info(l_ws..Content)