Index: vhDeploy/Deploy20150722xReceptieGroepVoorTB.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20150722xReceptieGroepVoorTB.cls.xml	(revision 0)
+++ vhDeploy/Deploy20150722xReceptieGroepVoorTB.cls.xml	(revision 29776)
@@ -0,0 +1,26 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Deploy20150722xReceptieGroepVoorTB">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Aanpassen ReceptieGroep voor TB (default PalletVast)</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	#dim TandemboxRGID = "TB"
+	Set ReceptieGroep = ##class(Res.PI.ReceptieGroep).%OpenId(TandemboxRGID)
+	Set ReceptieGroep.DefaultPallet = "V"
+	#dim sc As %Status = ReceptieGroep.%Save()
+	If $$$ISERR(sc) {
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.StatusException).%New(##class(TECH.enu.ExceptionCode).SaveFailed(),"",sc))
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>