Index: APPS/Halux/PPS/DocumentGenerator/PickingOnderdelen.cls.xml =================================================================== diff -u -r70551 -r70592 --- APPS/Halux/PPS/DocumentGenerator/PickingOnderdelen.cls.xml (.../PickingOnderdelen.cls.xml) (revision 70551) +++ APPS/Halux/PPS/DocumentGenerator/PickingOnderdelen.cls.xml (.../PickingOnderdelen.cls.xml) (revision 70592) @@ -131,8 +131,9 @@ Do ..FileWriter.Open(BestandNaam) For { Set LaatsteProductId = $order(^PCDataOnderdelenPickingDocument(ToeleveringID, LaatsteProductId)) Quit:LaatsteProductId="" + #dim HalffabIsBewerkt As %Boolean = $Piece(^PCDataOnderdelenPickingDocument(ToeleveringID, LaatsteProductId),"/", 2) Set IdentNr = ..ProductAPI.GeefIdentNummerVoorProductId(LaatsteProductId) - Set Aantal = ^PCDataOnderdelenPickingDocument(ToeleveringID, LaatsteProductId) + Set Aantal = $Piece(^PCDataOnderdelenPickingDocument(ToeleveringID, LaatsteProductId),"/", 1) Set BoxBarcode = ToeleveringID Set HLXLocatie = $$$ProductGet(LaatsteProductId, $$$ControleStatus) ; herbruik van veld voor HLX Locatie Set OBJTIdentNr = LookupService.GeefOBJTIdentNr(IdentNr) @@ -149,7 +150,7 @@ Set UserField5 = "" Set UserField6 = "" - If $$$Not(PCDataLocatie = "") { + If $$$Not(PCDataLocatie = "") && $$$Not(HalffabIsBewerkt) { Do ..FileWriter.WriteLine("P" _"|"_ ToeleveringID _"|"_ BoxBarcode _"|"_ OrderDesc _"|"_ PCDataLocatie _"|"_ Aantal _"|"_ PickedAmount _"|"_ PackAmount _"|"_ SourceEmpty _"|"_ OBJTIdentNr _"|"_ KortTekst _"|"_ HLXLocatie _"|"_ UserField2 _"|"_ UserField3 _"|"_ UserField4 _"|"_UserField5 _"|"_ UserField6) } Else { Set AantalVerschillendeProductenZonderLocatie = AantalVerschillendeProductenZonderLocatie + 1 Index: APPS/Halux/PPS/Document/impl/common/OnderdelenPicking.cls.xml =================================================================== diff -u -r70541 -r70592 --- APPS/Halux/PPS/Document/impl/common/OnderdelenPicking.cls.xml (.../OnderdelenPicking.cls.xml) (revision 70541) +++ APPS/Halux/PPS/Document/impl/common/OnderdelenPicking.cls.xml (.../OnderdelenPicking.cls.xml) (revision 70592) @@ -218,7 +218,10 @@ DataVoorLijn:APPS.Halux.PPS.Document.impl.common.OnderdelenPicking.OnderdeelPickingBinaireKnoop,ToeleveringIDVoorPCDataOnderdelenPickingDocument:%Integer -