ADHOC Projection for UNSGroupB

I finally figured out how to do it. In the end it was straight forward.

First its needed to create the Single object operations.

Then just simply create a custom process based on the UNSGroupB(x) table.

Prescript for UNSGroupB looks like this:

If Not CBool(Connection.Variables("FULLSYNC")) AndAlso _
	$FK(UID_UNSRootB).NamespaceManagedBy:String$.Equals("VISYNC",StringComparison.OrdinalIgnoreCase) Then

	Try
		values("SystemType") = $FK(UID_UNSRootB).FK(UID_DPRNameSpace).Ident_DPRNameSpace$
		values("AdHocDataFound") = False		
		values("NeedExecute") = False
		
		Imports System.Collections.Generic
		Dim data As IDictionary(Of String,String) = DPR_GetAdHocData( _
			$FK(UID_UNSRootB).XObjectKey$, _ 
			values("SystemType").ToString(),"","Insert")
			
		If Not data Is Nothing
			values("AdHocDataFound") = True
			values("NeedExecute") = DPR_NeedExecuteWorkflow(data("ProjectionConfigUID").ToString(),entity)
			values("ObjectKey") = New DbObjectKey(base.Tablename,$UID_UNSGroupB$).ToXmlString() 
			values("UID_DPRSystemVariableSet") = data("VariableSetUID")
			values("UID_DPRProjectionConfiguration") = data("ProjectionConfigUID")
			values("UID_QBMServer") = data("ExecutionServerUID")
		End If

	Catch ex As Exception
		values("AdHocDataFound") = False
	End Try
	
End If

And the generating condition for an app named AWS is this:

Value = (Not CBool(Connection.Variables("FULLSYNC")) AndAlso _
		Not EventName.Equals("HandleOutStanding", StringComparison.OrdinalIgnoreCase) AndAlso _
		$FK(UID_UNSRootB).NamespaceManagedBy:String$.Equals("VISYNC",StringComparison.OrdinalIgnoreCase) AndAlso _
		$FK(UID_UNSRootB).Ident_UNSRoot$.Contains("AWS"))

Then just copy the "Create Account" process step from an UNSAccountB process and connect it. 

Works like a charme

Great job Denny!

Great job Denny!