Index: vhDeploy/JCL/Deploy20110929x1041.cls.xml
===================================================================
diff -u
--- vhDeploy/JCL/Deploy20110929x1041.cls.xml	(revision 0)
+++ vhDeploy/JCL/Deploy20110929x1041.cls.xml	(revision 2215)
@@ -0,0 +1,24 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="vhDeploy.JCL.Deploy20110929x1041">
+<ProcedureBlock>1</ProcedureBlock>
+<Super>svn.Deploy</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Parameter name="Omschrijving">
+<Default>Opkuisen dubbele data in storage</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	
+	
+	set idx=""
+	for  { set idx=$order(^CRM.BehOnd.ActieD(idx)) quit:idx=""  
+		kill ^CRM.BehOnd.ActieD(idx,"DOM.CRM.BehandeldOnderwerp.Actie")
+	}
+]]></Implementation>
+</Method>
+</Class>
+</Export>
Index: vhDeploy/JCL/Deploy20110928x1022.cls.xml
===================================================================
diff -u
--- vhDeploy/JCL/Deploy20110928x1022.cls.xml	(revision 0)
+++ vhDeploy/JCL/Deploy20110928x1022.cls.xml	(revision 2215)
@@ -0,0 +1,26 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="vhDeploy.JCL.Deploy20110928x1022">
+<ProcedureBlock>1</ProcedureBlock>
+<Super>svn.Deploy</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Parameter name="Omschrijving">
+<Default>Wijzigen storage AgendaItem Acties</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	
+	if $data(^CRM.Meta.BehOnd.ActieD) {
+		Kill ^CRM.BehOnd.ActieD
+		Merge ^CRM.BehOnd.ActieD=^CRM.Meta.BehOnd.ActieD
+		Kill ^CRM.Meta.BehOnd.ActieD
+		
+		do ##class(DOM.CRM.BehandeldOnderwerp.Actie).%BuildIndices()
+	}
+]]></Implementation>
+</Method>
+</Class>
+</Export>
Index: DOM/CRM/BehandeldOnderwerp/Actie.cls.xml
===================================================================
diff -u -r2040 -r2215
--- DOM/CRM/BehandeldOnderwerp/Actie.cls.xml	(.../Actie.cls.xml)	(revision 2040)
+++ DOM/CRM/BehandeldOnderwerp/Actie.cls.xml	(.../Actie.cls.xml)	(revision 2215)
@@ -19,9 +19,8 @@
 </Property>
 
 <Property name="ParamValue">
-<Description>
-</Description>
 <Type>%String</Type>
+<Parameter name="MAXLEN" value="32000"/>
 </Property>
 
 <Property name="ParamOmschrijving">
@@ -43,12 +42,12 @@
 
 <Storage name="Default">
 <Type>%Library.CacheStorage</Type>
-<DataLocation>^CRM.Meta.BehOnd.ActieD</DataLocation>
+<DataLocation>^CRM.BehOnd.ActieD</DataLocation>
 <DefaultData>ActieDefaultData</DefaultData>
-<IdLocation>^CRM.Meta.BehOnd.ActieD</IdLocation>
-<IndexLocation>^CRM.Meta.BehOnd.ActieI</IndexLocation>
+<IdLocation>^CRM.BehOnd.ActieD</IdLocation>
+<IndexLocation>^CRM.Meta.ActieI</IndexLocation>
 <State>ActieState</State>
-<StreamLocation>^CRM.Meta.BehOnd.ActieS</StreamLocation>
+<StreamLocation>^CRM.Meta.ActieS</StreamLocation>
 <Data name="ActieDefaultData">
 <Value name="1">
 <Value>%%CLASSNAME</Value>
@@ -59,19 +58,7 @@
 <Value name="3">
 <Value>ParamValue</Value>
 </Value>
-<Value name="4">
-<Value>Registratie</Value>
-</Value>
 </Data>
-<Data name="ActieState">
-<Subscript>"DOM.CRM.BehandeldOnderwerp.Actie"</Subscript>
-<Value name="1">
-<Value>Actie</Value>
-</Value>
-<Value name="2">
-<Value>ParamValue</Value>
-</Value>
-</Data>
 </Storage>
 </Class>
 </Export>