Index: APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/WerklijstItemsMaker/PerVerpakking/FlatpackV1.cls.xml =================================================================== diff -u -r57797 -r59702 --- APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/WerklijstItemsMaker/PerVerpakking/FlatpackV1.cls.xml (.../FlatpackV1.cls.xml) (revision 57797) +++ APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/WerklijstItemsMaker/PerVerpakking/FlatpackV1.cls.xml (.../FlatpackV1.cls.xml) (revision 59702) @@ -39,6 +39,7 @@ Set KlantEtiketInputFront.VoorkeurPrinter = "HALUX" Set KlantEtiketInputFront.AantalInDoos = 1 Set KlantEtiketInputFront.Component = ##class(DOM.PM.Maatwerk.Lade.enu.LosseComponent).Front() + Set KlantEtiketInputFront.DnaCodeOnderdrukken = $$$True Do WerklijstItemsMakers.Insert(##class(APPS.Halux.PPS.Activiteit.impl.TAOR.Verpakking.KlantEtiketWerklijstItemMaker).%New(KlantEtiketInputFront)) } Index: APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/KlantEtiketDataProductAanvuller.cls.xml =================================================================== diff -u -r58964 -r59702 --- APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/KlantEtiketDataProductAanvuller.cls.xml (.../KlantEtiketDataProductAanvuller.cls.xml) (revision 58964) +++ APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/KlantEtiketDataProductAanvuller.cls.xml (.../KlantEtiketDataProductAanvuller.cls.xml) (revision 59702) @@ -116,7 +116,11 @@ Set UitvoeringInfo.KlantEtiketData.DossierTitel = ..Vertaler.GeefVertaling("Dossier") Set UitvoeringInfo.KlantEtiketData.Dossier = UitvoeringInfo.ToeleveringID - Set UitvoeringInfo.KlantEtiketData.DnaCode = ..DnaCodeService.GeefVolgendeAfTeDrukkenDnaCode(UitvoeringInfo.ToeleveringID, UitvoeringInfo.ProductID, UitvoeringInfo.SequentieNummer) + If ..KlantEtiketInput.DnaCodeOnderdrukken = $$$True { + Set UitvoeringInfo.KlantEtiketData.DnaCode = "" + } Else { + Set UitvoeringInfo.KlantEtiketData.DnaCode = ..DnaCodeService.GeefVolgendeAfTeDrukkenDnaCode(UitvoeringInfo.ToeleveringID, UitvoeringInfo.ProductID, UitvoeringInfo.SequentieNummer) + } ]]> Index: APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/KlantEtiketInput.cls.xml =================================================================== diff -u -r31008 -r59702 --- APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/KlantEtiketInput.cls.xml (.../KlantEtiketInput.cls.xml) (revision 31008) +++ APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/KlantEtiketInput.cls.xml (.../KlantEtiketInput.cls.xml) (revision 59702) @@ -19,6 +19,11 @@ DOM.PM.Maatwerk.Lade.enu.LosseComponent + + +%Boolean +0 +