Index: AXimpl/AifMessage/Converter/CustomerUpdatePart2Converter.cls.xml
===================================================================
diff -u -r40936 -r40983
--- AXimpl/AifMessage/Converter/CustomerUpdatePart2Converter.cls.xml	(.../CustomerUpdatePart2Converter.cls.xml)	(revision 40936)
+++ AXimpl/AifMessage/Converter/CustomerUpdatePart2Converter.cls.xml	(.../CustomerUpdatePart2Converter.cls.xml)	(revision 40983)
@@ -75,10 +75,48 @@
 <Implementation><![CDATA[
 	#dim MessagePartsUpdate As AXaif.Message.MessageParts = MessageParts.%ConstructClone($$$true)
 	set MessagePartsUpdate.Customer.CustTable.GetAt(1).Blocked = "All"
+	
+	do ..RegistreerUpdateAction(MessagePartsUpdate)
+	
 	quit MessagePartsUpdate
 ]]></Implementation>
 </Method>
 
+<Method name="RegistreerUpdateAction">
+<FormalSpec>MessageParts:AXaif.Message.MessageParts</FormalSpec>
+<Implementation><![CDATA[
+	set CustTableUpdateIterator = ##class(TECH.ListIterator).%New(MessageParts.Customer.CustTable)
+	while CustTableUpdateIterator.HasNext() {
+		#dim CustTableUpdate As AXaif.Customer.AxdEntityCustTable = CustTableUpdateIterator.Next()
+		set CustTableUpdate.action = "update"
+		set DirPartyIterator = ##class(TECH.ListIterator).%New(CustTableUpdate.DirParty)
+		while DirPartyIterator.HasNext() {
+			#dim DirPartyUpdate As AXaif.Customer.AxdEntityDirPartyDirPartyTable = DirPartyIterator.Next()
+			set DirPartyUpdate.action = "update"
+			
+			set Iterator = ##class(TECH.ListIterator).%New(DirPartyUpdate.OrganizationName)
+			while Iterator.HasNext() {
+				#dim OrganizationName As AXaif.Customer.AxdEntityOrganizationName = Iterator.Next()
+				set OrganizationName.action = "update"
+				set OrganizationName.updateMode = "Correction"
+			}
+			
+			set Iterator = ##class(TECH.ListIterator).%New(DirPartyUpdate.DirPartyContactInfoView)
+			while Iterator.HasNext() {
+				set Iterator.Next().action = "update"
+			}
+			
+			set Iterator = ##class(TECH.ListIterator).%New(DirPartyUpdate.DirPartyPostalAddressView)
+			while Iterator.HasNext() {
+				#dim PostalAddres As AXaif.Customer.AxdEntityDirPartyPostalAddressView = Iterator.Next()
+				set PostalAddres.action = "update"
+				set PostalAddres.updateMode = "CreateNewTimePeriod"
+			}
+		}
+	}
+]]></Implementation>
+</Method>
+
 <Method name="GetEntityKeyList">
 <FormalSpec>Id:%String</FormalSpec>
 <Private>1</Private>
@@ -179,6 +217,7 @@
 	
 	do ..MergeOrganizationNames(DirPartyTableCreate,.DirPartyTableUpdate)
 	do ..MergePostalAddressViews(DirPartyTableCreate,.DirPartyTableUpdate)
+	
 	do ..MergeContactInfoViews(DirPartyTableCreate,.DirPartyTableUpdate)
 ]]></Implementation>
 </Method>