Index: BL/PPS/OL/Inpak.cls.xml =================================================================== diff -u -r31459 -r31460 --- BL/PPS/OL/Inpak.cls.xml (.../Inpak.cls.xml) (revision 31459) +++ BL/PPS/OL/Inpak.cls.xml (.../Inpak.cls.xml) (revision 31460) @@ -273,8 +273,6 @@ Quit:((pDir>0)&&(..CurID >= ..SequenceList.Count())) $$$pxStatusErrorEx("Kan pointer niet verder voorwaarts verplaatsen", "..CurID="_..CurID_" ..SequenceList.Count()="_..SequenceList.Count()_" Dir="_pDir) Quit:((pDir<1)&&(..CurID <= 1)) $$$pxStatusErrorEx("Kan pointer niet verder achterwaarts verplaatsen", "..CurID="_..CurID_" Dir="_pDir) - Do ..BepaalOutput(pxInpakInfo.PRNr) - // pointer incrementeren (of decrementeren) Set ..CurID=$S(pDir>0:..CurID+1,1:..CurID-1) @@ -284,6 +282,8 @@ #dim pxStatus As %Status = ..GetInfo(SnijItem, .pxInpakInfo,..CurID) Quit:($$$pxStatusIsERR(pxStatus)) pxStatus + Do ..BepaalOutput(pxInpakInfo.PRNr) + // Snijopdrachten : // - Een overdoos moet gesneden worden, er mag dan onmiddellijk verdergegaan worden tot het eerste item // van die doos, die mag ook gesneden worden