MARX#37122 SOAPAction ondersteunen in bedrijfadres

svn path=/Website/trunk/; revision=30235

APPL/PRS/prs_edit_bedrijfadres.asp

@@ -46,6 +46,8 @@ else
       + "     , a.prs_bedrijfadres_password"
       + "     , a.prs_bedrijfadres_authmethod"
       + "     , a.prs_bedrijfadres_ordermode"
+      + "     , a.prs_bedrijfadres_soapversion"
+      + "     , a.prs_bedrijfadres_soapaction"
       + "     , a.prs_bedrijfadres_certificate"
       + "     , a.prs_bedrijfadres_xsl"
       + "     , a.prs_bedrijfadres_ext"
@@ -69,6 +71,8 @@ else
   var password      = oRs('prs_bedrijfadres_password').value;
   var authmethod    = oRs('prs_bedrijfadres_authmethod').value;
   var prs_ordermode = oRs("prs_bedrijfadres_ordermode").value;
+  var soapversion   = oRs('prs_bedrijfadres_soapversion').value;
+  var soapaction    = oRs('prs_bedrijfadres_soapaction').value;
   var prs_cert      = oRs("prs_bedrijfadres_certificate").value;
   var prs_xsl       = oRs("prs_bedrijfadres_xsl").value;
   var prs_ext       = oRs("prs_bedrijfadres_ext").value;
@@ -203,7 +207,9 @@ else
                                });
 
         RWFIELDTR("prs_ordermode", "fld", L("lcl_prs_companies_order_mode"),        prs_ordermode, {maxlength: 3});
-        RWFIELDTR("prs_cert",      "fld", L("lcl_prs_companies_order_certificate"), prs_cert,      {maxlength: 255});
+// future use        RWFIELDTR("soapversion",   "fld", L("lcl_prs_bedrijfadres_soapversion"),    soapversion,      {maxlength: 10});
+        RWFIELDTR("soapaction",    "fld", L("lcl_prs_bedrijfadres_soapaction"),     soapaction,       {maxlength: 128});
+        RWFIELDTR("prs_cert",     "fld", L("lcl_prs_companies_order_certificate"), prs_cert,      {maxlength: 255});
         var att_f = Server.MapPath(custpath + "/xsl");
         var objFso = Server.CreateObject("Scripting.FileSystemObject");
         var selfilehtml = "";

APPL/PRS/prs_edit_bedrijfadres_save.asp

@@ -60,6 +60,8 @@ else
                   , { dbs: "prs_bedrijfadres_password",    typ: "varchar",  frm: "prs_password" }
                   , { dbs: "prs_bedrijfadres_authmethod",  typ: "number",   frm: "authmethod" }
                   , { dbs: "prs_bedrijfadres_ordermode",   typ: "number",   frm: "prs_ordermode" }
+                  , { dbs: "prs_bedrijfadres_soapversion", typ: "varchar",  frm: "soapversion" }
+                  , { dbs: "prs_bedrijfadres_soapaction",  typ: "varchar",  frm: "soapaction" }
                   , { dbs: "prs_bedrijfadres_certificate", typ: "varchar",  frm: "prs_cert" }
                   , { dbs: "prs_bedrijfadres_xsl",         typ: "varchar",  frm: "prs_xsl" }
                   , { dbs: "prs_bedrijfadres_ext",         typ: "varchar",  frm: "prs_ext" }

APPL/PRS/prs_show_bedrijfadres.asp

@@ -45,6 +45,8 @@ FCLTHeader.Requires({plugins:["jQuery"]})
       + "     , a.prs_bedrijfadres_password"
       + "     , a.prs_bedrijfadres_authmethod"
       + "     , a.prs_bedrijfadres_ordermode"
+      + "     , a.prs_bedrijfadres_soapversion"
+      + "     , a.prs_bedrijfadres_soapaction"
       + "     , a.prs_bedrijfadres_certificate"
       + "     , a.prs_bedrijfadres_xsl"
       + "     , a.prs_bedrijfadres_ext"
@@ -68,8 +70,10 @@ FCLTHeader.Requires({plugins:["jQuery"]})
   var prs_url          = oRs("prs_bedrijfadres_url").value;
   var username         = oRs('prs_bedrijfadres_username').value;
   var password         = oRs('prs_bedrijfadres_password').value;
-  var authmethod    = oRs('prs_bedrijfadres_authmethod').value;
+  var authmethod       = oRs('prs_bedrijfadres_authmethod').value;
   var prs_ordermode    = oRs("prs_bedrijfadres_ordermode").value;
+  var soapversion      = oRs('prs_bedrijfadres_soapversion').value;
+  var soapaction       = oRs('prs_bedrijfadres_soapaction').value;
   var prs_cert         = oRs("prs_bedrijfadres_certificate").value;
   var prs_xsl          = oRs("prs_bedrijfadres_xsl").value;
   var prs_ext          = oRs("prs_bedrijfadres_ext").value;
@@ -133,6 +137,8 @@ FCLTHeader.Requires({plugins:["jQuery"]})
         if (username || password)
             ROFIELDTR("fld", L("lcl_prs_bedrijfadres_authmethod"),     authval,          {suppressEmpty:true});
         ROFIELDTR("fld", L("lcl_prs_companies_order_mode"),        prs_ordermode,    {suppressEmpty:(prs_ordermode==0?false:true)});
+        ROFIELDTR("fld", L("lcl_prs_bedrijfadres_soapversion"),    soapversion,      {suppressEmpty:true});
+        ROFIELDTR("fld", L("lcl_prs_bedrijfadres_soapaction"),     soapaction,       {suppressEmpty:true});
         ROFIELDTR("fld", L("lcl_prs_companies_order_certificate"), prs_cert,         {suppressEmpty:true});
         ROFIELDTR("fld", L("lcl_prs_companies_xsl"),               prs_xsl,          {suppressEmpty:true});
         ROFIELDTR("fld", L("lcl_prs_bedrijfadres_ext"),            prs_ext,          {suppressEmpty:true});

UTILS/PutOrders/puo_allorders.js

@@ -108,7 +108,9 @@ function send1Order(Bedrijf_key, XMLnode, OpdrKey, ordernr, Sender, cust)
              + "       ba.prs_bedrijfadres_ext, "
              + "       ba.prs_bedrijfadres_username,"
              + "       ba.prs_bedrijfadres_password,"
-             + "       ba.prs_bedrijfadres_authmethod"
+             + "       ba.prs_bedrijfadres_authmethod,"
+             + "       ba.prs_bedrijfadres_soapversion,"
+             + "       ba.prs_bedrijfadres_soapaction"
              + "  FROM prs_bedrijfadres ba "
              + " WHERE ba.prs_bedrijf_key = " + Bedrijf_key;
 
@@ -171,7 +173,9 @@ function send1Order(Bedrijf_key, XMLnode, OpdrKey, ordernr, Sender, cust)
                              XSLbedr:         oRsB("prs_bedrijfadres_xsl").value.toLowerCase(),
                              username:        oRsB("prs_bedrijfadres_username").value,
                              password:        oRsB("prs_bedrijfadres_password").value,
-                             authmethod:      oRsB("prs_bedrijfadres_authmethod").value || 0
+                             authmethod:      oRsB("prs_bedrijfadres_authmethod").value || 0,
+                             soapversion:     oRsB("prs_bedrijfadres_soapversion").value,
+                             soapaction:      oRsB("prs_bedrijfadres_soapaction").value
                            };
         oRsB.Close();
 
@@ -211,6 +215,8 @@ function send1Order(Bedrijf_key, XMLnode, OpdrKey, ordernr, Sender, cust)
                 Log2File(4, "AttachFile=" + bedrijfadres.AttachFile);
                 Log2File(4, "username=" + bedrijfadres.username);
                 Log2File(4, "authmethod=" + bedrijfadres.authmethod);
+                Log2File(4, "soapversion=" + bedrijfadres.soapversion);
+                Log2File(4, "authmethod=" + bedrijfadres.soapaction);
 
                 var SendOrderResult = SendOrder( connect
                                                 , xml_content

UTILS/PutOrders/puo_sendsoap.js

@@ -25,7 +25,7 @@ function submitDOMXSLSOAP( p_connect
     // p_bedrijfadres.ordermode
     //              bit 0 [0=xml, 1 soap]
     //              bit 1 [alleen voor mail attachment encryptie]
-    //              bit 2 [0=2*base64 encoding, 1=plain]
+    //              bit 2 [0=2*base64 encoding, 1=plain]  JGL Aug-2016: komt volgens mij in de praktijk niet voor
     //              bit 3 [0=xml tag encoding, 1=plain]
     //
     var XMLpayloadNode = XMLenvelope.createElement("SOAPEnvelope");
@@ -60,10 +60,9 @@ function submitDOMXSLSOAP( p_connect
     params.data = XMLresult.xml;
     params.headers = { "Content-Type": "text/xml; charset=utf-8" };
 
-    // MARX#37122 tijdelijke 2016.1 patch
-    if (p_bedrijfadres.XSLbedr && p_bedrijfadres.XSLbedr.match(/F_GetOnderhoudsOpdrachtSIDB.*soap/i))
+    if (p_bedrijfadres.soapaction)
     {
-        params.headers["SOAPAction"] = "http://www.oosterberg.nl/messageservice/PostMessage";
+        params.headers["SOAPAction"] = p_bedrijfadres.soapaction;
     }
 
     var XMLhttp = doHTTP(p_connect.CurrentAddress, params);