Index: APPS/Halux/PPS/Document/impl/common/MaatwerkProductEtiketten.cls.xml =================================================================== diff -u -r29059 -r30042 --- APPS/Halux/PPS/Document/impl/common/MaatwerkProductEtiketten.cls.xml (.../MaatwerkProductEtiketten.cls.xml) (revision 29059) +++ APPS/Halux/PPS/Document/impl/common/MaatwerkProductEtiketten.cls.xml (.../MaatwerkProductEtiketten.cls.xml) (revision 30042) @@ -15,7 +15,7 @@ -BL.Etiket.MaatwerkProduct +BL.Etiket.LadeKlantEtiket 1 @@ -92,7 +92,7 @@ 1 -BL.Etiket.MaatwerkProduct +BL.Etiket.LadeKlantEtiket ToeleveringID:%String 1 -BL.Etiket.MaatwerkProduct +BL.Etiket.LadeKlantEtiket Index: BL/Etiket/MaatwerkProductInVHoss2D.cls.xml =================================================================== diff -u -r29059 -r30042 --- BL/Etiket/MaatwerkProductInVHoss2D.cls.xml (.../MaatwerkProductInVHoss2D.cls.xml) (revision 29059) +++ BL/Etiket/MaatwerkProductInVHoss2D.cls.xml (.../LadeKlantEtiketVHoss.cls.xml) (revision 30042) @@ -1,9 +1,9 @@ - + 0 -BL.Etiket.MaatwerkProduct +BL.Etiket.LadeKlantEtiket APPS.VisiDot.impl.VHossProductionHelper Index: vhUnitTest/APPS/Halux/Docs/TestEtiketBuilder.cls.xml =================================================================== diff -u -r29059 -r30042 --- vhUnitTest/APPS/Halux/Docs/TestEtiketBuilder.cls.xml (.../TestEtiketBuilder.cls.xml) (revision 29059) +++ vhUnitTest/APPS/Halux/Docs/TestEtiketBuilder.cls.xml (.../TestEtiketBuilder.cls.xml) (revision 30042) @@ -68,7 +68,7 @@ If $$$AssertTrue($IsObject(Etiket),"Etiket is aangemaakt."){ Do $$$AssertEquals(Etiket.%ClassName(1),"BL.Etiket.MaatwerkProductInVHoss2D") Do ..ControleEtiket(Etiket) - #dim MaatwerkProductEtiket As BL.Etiket.MaatwerkProductInVHoss2D = Etiket + #dim MaatwerkProductEtiket As BL.Etiket.LadeKlantEtiketVHoss = Etiket Do $$$AssertEquals(MaatwerkProductEtiket.LadeID,"99999903200000700") Do $$$AssertEquals(MaatwerkProductEtiket.VHossInfo,"3.B.1") Do $$$AssertEquals(MaatwerkProductEtiket.VHossSeqNr,"3") @@ -81,7 +81,7 @@ -MaatwerkProductEtiket:BL.Etiket.MaatwerkProduct +MaatwerkProductEtiket:BL.Etiket.LadeKlantEtiket 1 DOM.PM.BezoekbaarProductVisitor -BL.Etiket.MaatwerkProduct +BL.Etiket.LadeKlantEtiket -Etiket:BL.Etiket.MaatwerkProduct +Etiket:BL.Etiket.LadeKlantEtiket 1 1 %Status Index: BL/Legacy/EWBON/OverzichtLadenPerPallet/PickingDocInhoudBuilder.cls.xml =================================================================== diff -u -r29059 -r30042 --- BL/Legacy/EWBON/OverzichtLadenPerPallet/PickingDocInhoudBuilder.cls.xml (.../PickingDocInhoudBuilder.cls.xml) (revision 29059) +++ BL/Legacy/EWBON/OverzichtLadenPerPallet/PickingDocInhoudBuilder.cls.xml (.../PickingDocInhoudBuilder.cls.xml) (revision 30042) @@ -111,7 +111,7 @@ While (OrderWMSLijnIterator.HasNext()) { #dim Lijn As Flow.OrderWMS.Lijn = OrderWMSLijnIterator.Next() - Set Etiket = ##class(BL.Etiket.MaatwerkProduct).%New("DummyPartyID") + Set Etiket = ##class(BL.Etiket.LadeKlantEtiket).%New("DummyPartyID") Set LadeCodeVisitor = ##class(APPS.Halux.Docs.impl.LadeEigenschapProductVisitor).%New(Etiket) Set BezoekbaarProduct = ##class(DOM.PM.BezoekbaarProduct).%New(Lijn.Product.ProductNr) Do BezoekbaarProduct.Accept(LadeCodeVisitor) FishEye: Tag 30042 refers to a dead (removed) revision in file `BL/Etiket/MaatwerkProductInVHoss2D.cls.xml'. FishEye: No comparison available. Pass `N' to diff? Index: BL/Etiket/MaatwerkProduct.cls.xml =================================================================== diff -u -r29059 -r30042 --- BL/Etiket/MaatwerkProduct.cls.xml (.../MaatwerkProduct.cls.xml) (revision 29059) +++ BL/Etiket/MaatwerkProduct.cls.xml (.../LadeKlantEtiket.cls.xml) (revision 30042) @@ -1,6 +1,6 @@ - + 0 BL.Sys.pxProductLabel FishEye: Tag 30042 refers to a dead (removed) revision in file `BL/Etiket/MaatwerkProduct.cls.xml'. FishEye: No comparison available. Pass `N' to diff? Index: APPS/Halux/Docs/impl/MaatwerkProductEtiketBuilder.cls.xml =================================================================== diff -u -r29917 -r30042 --- APPS/Halux/Docs/impl/MaatwerkProductEtiketBuilder.cls.xml (.../MaatwerkProductEtiketBuilder.cls.xml) (revision 29917) +++ APPS/Halux/Docs/impl/MaatwerkProductEtiketBuilder.cls.xml (.../MaatwerkProductEtiketBuilder.cls.xml) (revision 30042) @@ -19,26 +19,26 @@ ProductID:%String,Partij:DOM.PARTIJ.Partij,Aantal:%Integer -BL.Etiket.MaatwerkProduct +BL.Etiket.LadeKlantEtiket ProductID:%String,Partij:DOM.PARTIJ.Partij,Aantal:%Integer -BL.Etiket.MaatwerkProductInVHoss2D +BL.Etiket.LadeKlantEtiketVHoss -Etiket:BL.Etiket.MaatwerkProduct,ProductID:%String,Partij:DOM.PARTIJ.Partij,Aantal:%Integer +Etiket:BL.Etiket.LadeKlantEtiket,ProductID:%String,Partij:DOM.PARTIJ.Partij,Aantal:%Integer 1 -Etiket:BL.Etiket.MaatwerkProduct,Toelevering:DOM.AKP.Toelevering,ToeleveringLijn:DOM.AKP.ProductToeleveringLijn,Partij:DOM.PARTIJ.Partij -BL.Etiket.MaatwerkProduct +Etiket:BL.Etiket.LadeKlantEtiket,Toelevering:DOM.AKP.Toelevering,ToeleveringLijn:DOM.AKP.ProductToeleveringLijn,Partij:DOM.PARTIJ.Partij +BL.Etiket.LadeKlantEtiket -Etiket:BL.Etiket.MaatwerkProduct,Order:DOM.VKP.Order,Partij:DOM.PARTIJ.Partij,ProductOrderLijn:DOM.VKP.ProductOrderlijn -BL.Etiket.MaatwerkProduct +Etiket:BL.Etiket.LadeKlantEtiket,Order:DOM.VKP.Order,Partij:DOM.PARTIJ.Partij,ProductOrderLijn:DOM.VKP.ProductOrderlijn +BL.Etiket.LadeKlantEtiket -Etiket:BL.Etiket.MaatwerkProduct,ProductID:%String,Partij:DOM.PARTIJ.Partij +Etiket:BL.Etiket.LadeKlantEtiket,ProductID:%String,Partij:DOM.PARTIJ.Partij 1 -Etiket:BL.Etiket.MaatwerkProduct,Partij:DOM.PARTIJ.Partij,InfoItems:%ListOfObjects +Etiket:BL.Etiket.LadeKlantEtiket,Partij:DOM.PARTIJ.Partij,InfoItems:%ListOfObjects -InfoItems:%ListOfObjects,InfoItemID:%Integer,Etiket:BL.Etiket.MaatwerkProduct +InfoItems:%ListOfObjects,InfoItemID:%Integer,Etiket:BL.Etiket.LadeKlantEtiket 1 0 EndNr If ..KlantEtiketChk(oQ) { - #dim pxLabel As BL.Etiket.MaatwerkProductInVHoss2D =..KlantEtiketOne2D(oQ) + #dim pxLabel As BL.Etiket.LadeKlantEtiketVHoss = ..KlantEtiketOne2D(oQ) If $isObject(pxLabel) { Do ..blLabelPrinter.Add(pxLabel) Set Count=Count+1 @@ -1168,11 +1168,11 @@ oQ:DS.PPS.TBX.Queue Index: APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket/Template.cls.xml =================================================================== diff -u -r29059 -r30042 --- APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket/Template.cls.xml (.../Template.cls.xml) (revision 29059) +++ APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket/Template.cls.xml (.../Template.cls.xml) (revision 30042) @@ -22,19 +22,22 @@ QueueID:%String,BatchID:%String,ToeleveringID:%String,ToeleveringLijnID:%String,AantalEtiketten:%Integer,VoorkeurPrinter:%String 1 APPS.common.Print.AbstractLabel + 1 ToeleveringLijn:DOM.AKP.ProductToeleveringLijn 1 %Boolean + 1 1 %Boolean + @@ -55,13 +58,13 @@ #dim BatchID = Batch.GeefID() - #dim Groepering As APPS.Halux.common.impl.ProductieSequentieGroepering = ..GeefGroepering(BatchID) + #dim Groepering As APPS.Halux.common.impl.ProductieSequentieGroepering = ..GeefGroepering(BatchID) #dim GroepIt As TECH.Iterator = Groepering.GeefGroepIterator() #dim IsSpecifiekEtiketGeprint As %Boolean = 0 while GroepIt.HasNext() && ('PrintSpecifiekEtiket || 'IsSpecifiekEtiketGeprint) { #dim GroepID As %String = GroepIt.Next() #dim DataIt As TECH.Iterator = Groepering.GeefDataIterator(GroepID) - #dim Etiket As BL.Etiket.MaatwerkProduct = "" + #dim Etiket As BL.Etiket.LadeKlantEtiket = "" while DataIt.HasNext() && ('PrintSpecifiekEtiket || 'IsSpecifiekEtiketGeprint){ #dim SequenceInfo As APPS.Halux.common.dto.ProductieSequentie = DataIt.Next() #dim ToeleveringID As %String = SequenceInfo.ToeleveringID @@ -101,6 +104,7 @@ BatchID:%String 1 APPS.Halux.common.impl.ProductieSequentieGroepering + @@ -124,7 +128,7 @@ EtiketDataMetNotieVanToelevering:APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.EtiketDataMetNotieVanToelevering 1 OrderID:%String,OrderLijnVolgummer:%String,Aantal:%Integer,VoorkeurPrinter:%String="" -BL.Etiket.MaatwerkProduct +BL.Etiket.LadeKlantEtiket ToeleveringID:%String,ToeleveringLijnID:%String,Aantal:%Integer,VoorkeurPrinter:%String="" -BL.Etiket.MaatwerkProduct +BL.Etiket.LadeKlantEtiket ToeleveringID:%String,ToeleveringLijnVolgNr:%String,Aantal:%Integer,VoorkeurPrinter:%String="" -BL.Etiket.MaatwerkProduct +BL.Etiket.LadeKlantEtiket ToeleveringID:%String,ToeleveringLijnID:%String,Aantal:%Integer,BatchID:%String,WPVerpak:DS.PPS.TBX.sub.emWPVerpak,VoorkeurPrinter:%String="" -BL.Etiket.MaatwerkProduct +BL.Etiket.LadeKlantEtiket -Etiket:BL.Etiket.MaatwerkProduct,VoorkeurPrinter:%String="" +Etiket:BL.Etiket.LadeKlantEtiket,VoorkeurPrinter:%String="" 1