Index: BL/PPS/TBX/DocsV1.cls.xml =================================================================== diff -u -r2516 -r2555 --- BL/PPS/TBX/DocsV1.cls.xml (.../DocsV1.cls.xml) (revision 2516) +++ BL/PPS/TBX/DocsV1.cls.xml (.../DocsV1.cls.xml) (revision 2555) @@ -661,8 +661,18 @@ Set:KLAS["SY" pxLabel.Sifon = 1 Set:KLAS="B" Opmerking=Opmerking_", "_"Buro" Set:ODSP'="" Opmerking=Opmerking_", "_"**SPECIAL:"_ODSP_"**" + + If (Batch.GeefProductieGroep() = ##class(APPS.Halux.common.enu.ProductieGroep).Probox()) + { + // Probox wikkel info + Set WikkelInfo = ##class(APPS.PM.Maatwerk.TBX.Probox.Calculator).GeefWikkelInfo(Lade.GeefVariant(),Lade.GeefLadeType()=##class(DOM.PM.enu.TBXLadeType).BinnenLade(),Lade.GeefZijwandHoogte(),Lade.GeefInbouwBreedte()) + Set WikkelLengte = WikkelInfo.GeefWikkelLengte() + Set WikkelDiepte = ##class(APPS.PM.Maatwerk.TBX.Probox.Calculator).GeefWikkelDiepte(Lade.GeefLadeDiepte()) + Set WikkelAfmeting = WikkelLengte_"x"_WikkelDiepte + Set Opmerking = Opmerking_",Wikkel"_$Case(WikkelAfmeting,"1250x520":"A","1250x650":"B","900x520":"C","900x650":"D",1:"")_"("_WikkelInfo.GeefAantal()_")" + } + Set pxLabel.Opm1=$E(Opmerking,$S($E(Opmerking,1)=",":3,1:1),99) - Set:(BM'="T")&&(BM'="I") pxLabel.Opm2="Blumotion : "_BM_" "_pxLabel.Opm2 Set pxLabel.TOENr=$E(oQ.TOENr,4,6) Index: BL/PPS/TBX/sub/pxLabelV1.cls.xml =================================================================== diff -u -r1074 -r2555 --- BL/PPS/TBX/sub/pxLabelV1.cls.xml (.../pxLabelV1.cls.xml) (revision 1074) +++ BL/PPS/TBX/sub/pxLabelV1.cls.xml (.../pxLabelV1.cls.xml) (revision 2555) @@ -107,10 +107,6 @@ %String - -%String - - %String