Index: APPS/Halux/PPS/TBXZaag/dto/Opdracht.cls.xml =================================================================== diff -u -r2817 -r3217 --- APPS/Halux/PPS/TBXZaag/dto/Opdracht.cls.xml (.../Opdracht.cls.xml) (revision 2817) +++ APPS/Halux/PPS/TBXZaag/dto/Opdracht.cls.xml (.../Opdracht.cls.xml) (revision 3217) @@ -127,7 +127,7 @@ } Else { - Set dtoOpdracht.Transferlijn=ZaagOpdracht.Output2LijnFeedback + ;Set dtoOpdracht.Transferlijn=ZaagOpdracht.Output2LijnFeedback } Set dtoOpdracht.TOENr=Queue.TOENr Set dtoOpdracht.DOSNr=Queue.DOSNr Index: APPS/Halux/PPS/TBXZaag/impl/LijstHelper.cls.xml =================================================================== diff -u -r3180 -r3217 --- APPS/Halux/PPS/TBXZaag/impl/LijstHelper.cls.xml (.../LijstHelper.cls.xml) (revision 3180) +++ APPS/Halux/PPS/TBXZaag/impl/LijstHelper.cls.xml (.../LijstHelper.cls.xml) (revision 3217) @@ -153,7 +153,7 @@ Quit:'Opdracht.Bodem.ProductNr Set NextOpdracht=..ZaagList.GetAt(ListPos+1) Do ..AddChange(Opdracht.Bodem,NextOpdracht.Bodem) - Do ..AddBodemReturnsAfter(ListPos,Opdracht.Bodem) + ;Do ..AddBodemReturnsAfter(ListPos,Opdracht.Bodem) ]]> @@ -164,7 +164,7 @@ Quit:'Opdracht.Rug.ProductNr Set NextOpdracht=..ZaagList.GetAt(ListPos+1) Do ..AddChange(Opdracht.Rug,NextOpdracht.Rug) - Do ..AddRugReturnsAfter(ListPos,Opdracht.Rug) + ;Do ..AddRugReturnsAfter(ListPos,Opdracht.Rug) ]]> @@ -230,7 +230,7 @@ Set Lengte=Lengte+$LG(..IndexRugChanges(NextListPos),2) Quit:..ChangesNextRug(NextListPos) Set NextListPos=NextListPos+1 - } While NextListPos<..MaxPosList + } While NextListPos'>..MaxPosList Set Opdracht.Rug.ChangeAfter=Cnt Set Opdracht.Rug.LengteUntilChange=..Afronden(Lengte,Opdracht.Rug.PlaatLengte) @@ -249,7 +249,7 @@ Set Lengte=Lengte+$LG(..IndexBodemChanges(NextListPos),2) Quit:..ChangesNextBodem(NextListPos) Set NextListPos=NextListPos+1 - } While NextListPos<..MaxPosList + } While NextListPos'>..MaxPosList Set Opdracht.Bodem.ChangeAfter=Cnt Set Opdracht.Bodem.LengteUntilChange=..Afronden(Lengte,Opdracht.Bodem.PlaatLengte)