Index: _vhisie/TBX/WizMaten.csp
===================================================================
diff -u -r757 -r1626
--- _vhisie/TBX/WizMaten.csp	(.../WizMaten.csp)	(revision 757)
+++ _vhisie/TBX/WizMaten.csp	(.../WizMaten.csp)	(revision 1626)
@@ -45,7 +45,7 @@
 	Set arVTL("TH","DIV") =..WebTextValue("DiverseTH",Taal,"L")
 	Set arVTL("TH","Aant")=..WebTextValue("AantalTH",Taal,"L")
 	
-	Set KLNrStdL=sDomKLNr
+	Set KLNrStdL=TBXContext.GeefDomeinKlantNummer()
 	Set wsIDStdL=##class(cspBasis.GAProdTBox).WSOrderIDStdLadeViaKLNr(KLNrStdL)
 	Set blnShowStdLField=$S(wsIDStdL="":0, 1:##class(WS.TBX.Order).%ExistsId(wsIDStdL))
 	Set blnAllowBulk=($LL(blTBoxDfl.lbAllowVPK)>1)   ; $LG(lbBulkConfig,1)'?1(1"",1"S") 
@@ -76,9 +76,9 @@
  			<TD width="170" align="right" rowspan="#($S(blnShowStdLField:"4", 1:"5"))#"><div class="clsInputLadeDiv"><img ID="imgLadeType" src="media/spacer.gif" class="clsInputLadeImg"></div></TD>
 		</TR>
 		<TR>
-			<TD align="right"><A href="javascript:;" onclick="ShowInfoLT('#($S(0 && blnLMC:" LMC", 1:""))#');" class="clsInfo" tabindex="-1" title="#(vtlMeerInfo)#">#(arVTL("LBL","LT"))#:</A><img id="imgInputErr_LT" src="media/exclam_orange.gif" class="clsExclamHideImg" onclick="ShowErrDlg(this);" title="#(vtlMeerInfo)#"></TD>
+			<TD align="right"><A href="javascript:;" onclick="ShowInfoLT('#($S(0:" LMC", 1:""))#');" class="clsInfo" tabindex="-1" title="#(vtlMeerInfo)#">#(arVTL("LBL","LT"))#:</A><img id="imgInputErr_LT" src="media/exclam_orange.gif" class="clsExclamHideImg" onclick="ShowErrDlg(this);" title="#(vtlMeerInfo)#"></TD>
 			<TD align="left" colspan="2">
-				<CSP:QUERY name="qryLCodes" classname="Prod.GAMeta.BT.LadeCode" queryname="ExtentSortExtra" p1="#($S(blnHEIN:"CL", 0 && blnLMC:"I", 1:""))#">
+				<CSP:QUERY name="qryLCodes" classname="Prod.GAMeta.BT.LadeCode" queryname="ExtentSortExtra" p1="#($S(TBXContext.GeefDomeinVerwerker()="HEIN":"CL", 1:""))#">
 				<SELECT id="cboLadeType" class="clsInputField" size="1" style="text-align:left;" onchange="cboLadeTypeChange();" onblur="cboLadeTypeOnExit();"#($$$LabelAttrib("Ladetype"))#>
 					<OPTION value='' SELECTED></OPTION>
 					<CSP:WHILE condition=qryLCodes.Next()>