Go

Peoplevox WMS Authentication

See more HTTP Examples

Provides an example of a call to the Peoplevox WMS Authenticate using SOAP 1.1. Go

    success := false

    // This example requires the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    // Sends a POST that looks like this:

    // 	POST /PEOPLEVOX_CLIENT_ID/resources/integrationservicev4.asmx HTTP/1.1
    // 	Content-Type: text/xml;charset=UTF-8
    // 	SOAPAction: http://www.peoplevox.net/Authenticate
    // 	Content-Length: (automatically computed and added by Chilkat)
    // 	Host: qac.peoplevox.net
    // 
    // 	<?xml version="1.0" encoding="utf-8"?>
    // 	<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:peop="http://www.peoplevox.net/">
    // 	   <soapenv:Header/>
    // 	   <soapenv:Body>
    // 	      <peop:Authenticate>
    // 	         <peop:clientId>PEOPLEVOX_CLIENT_ID</peop:clientId>
    // 	         <peop:username>PEOPLEVOX_USERNAME</peop:username>
    // 	         <peop:password>PEOPLEVOX_BASE64_PASSWORD</peop:password>
    // 	      </peop:Authenticate>
    // 	   </soapenv:Body>
    // 	</soapenv:Envelope>
    // 

    sbSoapXml := chilkat.NewStringBuilder()
    sbSoapXml.Append("<?xml version=\"1.0\" encoding=\"utf-8\"?>")
    sbSoapXml.Append("<soapenv:Envelope xmlns:soapenv=\"http://schemas.xmlsoap.org/soap/envelope/\" xmlns:peop=\"http://www.peoplevox.net/\">")
    sbSoapXml.Append("   <soapenv:Header/>")
    sbSoapXml.Append("   <soapenv:Body>")
    sbSoapXml.Append("      <peop:Authenticate>")
    sbSoapXml.Append("         <peop:clientId>PEOPLEVOX_CLIENT_ID</peop:clientId>")
    sbSoapXml.Append("         <peop:username>PEOPLEVOX_USERNAME</peop:username>")
    sbSoapXml.Append("         <peop:password>PEOPLEVOX_BASE64_PASSWORD</peop:password>")
    sbSoapXml.Append("      </peop:Authenticate>")
    sbSoapXml.Append("   </soapenv:Body>")
    sbSoapXml.Append("</soapenv:Envelope>")

    // Base64 encode the password and update the SOAP XML.
    crypt := chilkat.NewCrypt2()
    passwordBase64 := crypt.EncodeString("PEOPLEVOX_PASSWORD","utf-8","base64")
    numReplacements := sbSoapXml.Replace("PEOPLEVOX_BASE64_PASSWORD",*passwordBase64)

    req := chilkat.NewHttpRequest()
    req.SetHttpVerb("POST")
    req.SetSendCharset(true)
    req.SetCharset("utf-8")
    req.AddHeader("Content-Type","text/xml")
    req.AddHeader("SOAPAction","http://www.peoplevox.net/Authenticate")
    req.SetPath("/PEOPLEVOX_CLIENT_ID/resources/integrationservicev4.asmx")
    success = req.LoadBodyFromString(*sbSoapXml.GetAsString(),"utf-8")

    http := chilkat.NewHttp()
    http.SetFollowRedirects(true)

    resp := chilkat.NewHttpResponse()
    success = http.HttpSReq("qac.peoplevox.net",443,true,req,resp)
    if success == false {
        fmt.Println(http.LastErrorText())
        sbSoapXml.DisposeStringBuilder()
        crypt.DisposeCrypt2()
        req.DisposeHttpRequest()
        http.DisposeHttp()
        resp.DisposeHttpResponse()
        return
    }

    // We should expect a 200 response if successful.
    if resp.StatusCode() != 200 {
        fmt.Println("Response StatusCode = ", resp.StatusCode())
        fmt.Println("Response StatusLine: ", resp.StatusLine())
        fmt.Println("Response Header:")
        fmt.Println(resp.Header())
        sbSoapXml.DisposeStringBuilder()
        crypt.DisposeCrypt2()
        req.DisposeHttpRequest()
        http.DisposeHttp()
        resp.DisposeHttpResponse()
        return
    }

    // A successful response returns this XML:

    // <?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">
    //     <soap:Body>
    //         <AuthenticateResponse xmlns="http://www.peoplevox.net/">
    //             <AuthenticateResult>
    //                 <ResponseId>0</ResponseId>
    //                 <TotalCount>1</TotalCount>
    //                 <Detail>PEOPLEVOX_CLIENT_ID,7fe13431-c67f-4d52-bcfd-b60fbfa3b0ca</Detail>
    //                 <Statuses />
    //                 <ImportingQueueId>0</ImportingQueueId>
    //                 <SalesOrdersToDespatchIds />
    //             </AuthenticateResult>
    //         </AuthenticateResponse>
    //     </soap:Body>
    // </soap:Envelope>
    // 

    xmlResponse := chilkat.NewXml()
    success = xmlResponse.LoadXml(resp.BodyStr())
    fmt.Println(*xmlResponse.GetXml())

    // Show how to get the Detail, which must be the ClientId,SessionId
    detail := xmlResponse.ChilkatPath("soap:Body|AuthenticateResponse|AuthenticateResult|Detail|*")
    fmt.Println("Detail = ", *detail)

    sbSoapXml.DisposeStringBuilder()
    crypt.DisposeCrypt2()
    req.DisposeHttpRequest()
    http.DisposeHttp()
    resp.DisposeHttpResponse()
    xmlResponse.DisposeXml()