Index: APPS/Verpakking/enu/MachineID/Verwerker.cls.xml
===================================================================
diff -u -r68229 -r69589
--- APPS/Verpakking/enu/MachineID/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 68229)
+++ APPS/Verpakking/enu/MachineID/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 69589)
@@ -14,6 +14,8 @@
 <Implementation><![CDATA[
 	If MachineID = "HALUX" {
 		Do ..VerwerkHALUX()
+	} ElseIf MachineID = "KraftKlein" {
+		Do ..VerwerkKraftKlein()
 	} ElseIf MachineID = "TAOR" {
 		Do ..VerwerkTAOR()
 	} ElseIf MachineID = "VH" {
@@ -31,6 +33,12 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="VerwerkKraftKlein">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
 <Method name="VerwerkTAOR">
 <Abstract>1</Abstract>
 <Private>1</Private>
Index: APPS/Verpakking/enu/MachineID/AutoComplete.cls.xml
===================================================================
diff -u -r68229 -r69589
--- APPS/Verpakking/enu/MachineID/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 68229)
+++ APPS/Verpakking/enu/MachineID/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 69589)
@@ -16,6 +16,13 @@
 <ReadOnly>1</ReadOnly>
 </Property>
 
+<Property name="KraftKlein">
+<Type>%String</Type>
+<InitialExpression>"KraftKlein"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
 <Property name="TAOR">
 <Type>%String</Type>
 <InitialExpression>"TAOR"</InitialExpression>
Index: vhDeploy/Deploy20221018DefinitieNieuwKartonSnijMachine.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20221018DefinitieNieuwKartonSnijMachine.cls.xml	(revision 0)
+++ vhDeploy/Deploy20221018DefinitieNieuwKartonSnijMachine.cls.xml	(revision 69589)
@@ -0,0 +1,19 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Deploy20221018DefinitieNieuwKartonSnijMachine">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Definitie Nieuw KartonSnijMachine</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[	Set ^RES("SNIJDOOS","PI","SNIJMACHINE","D",4)	=	"4`KraftKlein`KraftKlein"
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Verpakking/enu/MachineID.cls.xml
===================================================================
diff -u -r68229 -r69589
--- APPS/Verpakking/enu/MachineID.cls.xml	(.../MachineID.cls.xml)	(revision 68229)
+++ APPS/Verpakking/enu/MachineID.cls.xml	(.../MachineID.cls.xml)	(revision 69589)
@@ -6,11 +6,11 @@
 <Super>TECH.Enumeration</Super>
 
 <Parameter name="VALUELIST">
-<Default>;VH;HALUX;TAOR</Default>
+<Default>;VH;HALUX;TAOR;KraftKlein</Default>
 </Parameter>
 
 <Parameter name="DISPLAYLIST">
-<Default>;VH;HALUX;TAOR</Default>
+<Default>;VH;HALUX;TAOR;KraftKlein</Default>
 </Parameter>
 
 <Method name="VH">
@@ -33,6 +33,13 @@
 <Implementation><![CDATA[	Quit "TAOR"
 ]]></Implementation>
 </Method>
+
+<Method name="KraftKlein">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.Verpakking.enu.MachineID</ReturnType>
+<Implementation><![CDATA[	Quit "KraftKlein"
+]]></Implementation>
+</Method>
 </Class>