Index: DOM/TRANSP/enu/VerpakkingEenheidType/Verwerker.cls.xml =================================================================== diff -u -r59645 -r66247 --- DOM/TRANSP/enu/VerpakkingEenheidType/Verwerker.cls.xml (.../Verwerker.cls.xml) (revision 59645) +++ DOM/TRANSP/enu/VerpakkingEenheidType/Verwerker.cls.xml (.../Verwerker.cls.xml) (revision 66247) @@ -22,6 +22,8 @@ Do ..VerwerkHalveEuroPallet() } ElseIf VerpakkingEenheidType = "L" { Do ..VerwerkLanggoed() + } ElseIf VerpakkingEenheidType = "W" { + Do ..VerwerkWegwerpPallet() } Else { Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(VerpakkingEenheidType,"DOM.TRANSP.enu.VerpakkingEenheidType",$classname()) Do ##class(TECH.ExceptionHandler).Throw(Exceptie) @@ -58,6 +60,12 @@ 1 + + +1 +1 + + Index: DOM/TRANSP/enu/VerpakkingEenheidType/AutoComplete.cls.xml =================================================================== diff -u -r59645 -r66247 --- DOM/TRANSP/enu/VerpakkingEenheidType/AutoComplete.cls.xml (.../AutoComplete.cls.xml) (revision 59645) +++ DOM/TRANSP/enu/VerpakkingEenheidType/AutoComplete.cls.xml (.../AutoComplete.cls.xml) (revision 66247) @@ -43,6 +43,13 @@ 1 1 + + +%String +"W" +1 +1 + Index: DOM/TRANSP/enu/VerpakkingEenheidType.cls.xml =================================================================== diff -u -r59645 -r66247 --- DOM/TRANSP/enu/VerpakkingEenheidType.cls.xml (.../VerpakkingEenheidType.cls.xml) (revision 59645) +++ DOM/TRANSP/enu/VerpakkingEenheidType.cls.xml (.../VerpakkingEenheidType.cls.xml) (revision 66247) @@ -6,11 +6,11 @@ TECH.Enumeration -,P,C,L,E,B +,P,C,L,E,B,W -;Pallet;Colli;Langgoed;EuroPallet,BuitenmaatsPallet +;Pallet;Colli;Langgoed;EuroPallet,BuitenmaatsPallet;WegwerpPallet @@ -47,6 +47,13 @@ + + +1 +DOM.TRANSP.enu.VerpakkingEenheidType + +