Index: CHUI/PPS/TBX/LeanBatch.cls.xml
===================================================================
diff -u -r2742 -r2807
--- CHUI/PPS/TBX/LeanBatch.cls.xml (.../LeanBatch.cls.xml) (revision 2742)
+++ CHUI/PPS/TBX/LeanBatch.cls.xml (.../LeanBatch.cls.xml) (revision 2807)
@@ -439,7 +439,9 @@
{
Set ASM=$LG(##class(Prod.Kenmerk.DataDefinitie).Get("TBX",PRNr,"ASM")) ; Antislipmat
Set VPK=$LG(##class(Prod.Kenmerk.DataDefinitie).Get("TBX",PRNr,"VERPAK")) ; Verpakking
- Set BevatCommissie = (((VPK="A")!(VPK="B"))&(ASM'=0)) || ((VPK="O")!(VPK="B"))
+
+ ; indien voorwaarden wijzigen ook aanpassen in BL.PPS.TBX.DocsV1 : EtikettenCommissie
+ Set BevatCommissie = (((VPK="A")!(VPK="B")!(VPK="X")!(VPK="Y"))&(ASM'=0)) || ((VPK="O")!(VPK="B")!(VPK="X"))
}
}
}
@@ -606,7 +608,7 @@
}
Else {
Set Opties="Z;E;F;O;R;D;M;L;K;X;I"_
- $select(..ExtraComEtiket():";C",1:"")_
+ $select(..ChkCommissie():";C",1:"")_
$select(..ChkBodems():";B",1:"")_";G"
}
}
@@ -617,7 +619,7 @@
else {
set Opties="Z;E;L;F;O;M;R;I;G"_
$select(..BevatSFS():";P",1:"")_
- $select(..ExtraComEtiket():";C",1:"")_
+ $select(..ChkCommissie():";C",1:"")_
$select(..ChkBodems():";B",1:"")
if BatchType=##class(APPS.Halux.common.enu.ProductieGroep).Probox() {
set Opties = Opties_$select(..ProboxOverdoosEtiketStatus(PrintLijst)=##class(BL.PPS.TBX.enu.PrintStatus).Printen():";Y",1:"")
@@ -632,13 +634,6 @@
]]>
-
-1
-1
-
-
-
TOENr
%String