Index: GepicktePalletStatus.csp
===================================================================
diff -u -r263 -r265
--- GepicktePalletStatus.csp	(.../GepicktePalletStatus.csp)	(revision 263)
+++ GepicktePalletStatus.csp	(.../GepicktePalletStatus.csp)	(revision 265)
@@ -153,7 +153,8 @@
 	
   	<SCRIPT language="Cache" runat="server">
    	#dim LPN =%request.Data("ID",1)
-  	Set OrderIterator = ##class(OBJTimpl.WMSOrder.OphalenGepicktePalletInhoud).%New().GeefOutBoundOrderVoorLPN(LPN) 
+   	Set Ophaler = ##class(OBJTimpl.WMSOrder.OphalenGepicktePalletInhoud).%New()
+  	Set OrderIterator = Ophaler.GeefOutBoundOrderVoorLPN(LPN) 
   	</SCRIPT>
   		<CSP:IF CONDITION="OrderIterator.HasNext()" COUNTER="count">
   			<SCRIPT language="Cache" runat="server">set rs = OrderIterator.Next()</SCRIPT>    
@@ -171,7 +172,8 @@
 				</tr>
   	
   			<SCRIPT language="Cache" runat="server">
-  				Set PalletIterator = ##class(OBJTimpl.WMSOrder.OphalenGepicktePalletInhoud).%New().GeefAllePallettenInOrderViaLPN( LPN) 
+  				Set PalletOphaler = ##class(OBJTimpl.WMSOrder.OphalenGepicktePalletInhoud).%New()
+  				Set PalletIterator = PalletOphaler.GeefAllePallettenInOrderViaLPN( LPN) 
   			</SCRIPT>
 		  		<tr>
 		  			<td colspan="3">Andere palletten in order</td>  			
@@ -192,7 +194,8 @@
 			</table>
   		<CSP:ELSE> <!-- nog geen picking actuals gevonden, mogelijk nog niet op klaarzetzone -->
 	  		<SCRIPT language="Cache" runat="server">	
-		  		Set PalletIterator = ##class(OBJTimpl.WMSOrder.OphalenGepicktePalletInhoud).%New().ZoekLaatsteLocatieVanPallet(LPN)
+	  			Set PalletOphaler = ##class(OBJTimpl.WMSOrder.OphalenGepicktePalletInhoud).%New()
+		  		Set PalletIterator = PalletOphaler.ZoekLaatsteLocatieVanPallet(LPN)
 		   </SCRIPT>    			  		
 		   	<P style="background-color:tomato" >
   			<CSP:IF condition=" PalletIterator.HasNext() ">