Forum Discussion

RolandWeiss's avatar
RolandWeiss
New Contributor II
8 days ago
Solved

IC-Matching Confirmation Rule

Hi Everyone, We are trying to incorporate the status of the IC-Matching Report into the Confirmation rule. While reviewing discussions on the community board, I found the following object: brapi.Da...
Confirmation Rules
Intercompany Matching
  • RolandWeiss's avatar
    RolandWeiss
    3 days ago

    We found the solution:

    Dim icTable As DataTable = globals.GetObject(plugAccount & si.WorkflowClusterPk.ProfileKey.ToString & si.WorkflowClusterPk.ScenarioKey.ToString & si.WorkflowClusterPk.timekey.ToString)
    If IsNothing(icTable)
        Dim ds As New DataSet
        'Execute the InterCoDifferences Method Command in code so that we can get the data table
        Dim methodQuery As String = "{|WFProfile|}{|WFScenario|}{|WFTime|}{" & plugAccount & "}{}{}{}{}{}{}{}{}{IsDifference = True}"
        
        Using dbConnApp As DbConnInfo = BRApi.Database.CreateApplicationDbConnInfo(si)
            ds = BRApi.Database.ExecuteMethodCommand(dbConnApp, XFCommandMethodTypeId.ICMatchingForWorkflowUnit, methodQuery, "IC", Nothing)
        End Using
        icTable = ds.Tables("IC")
        globals.SetObject(plugAccount & si.WorkflowClusterPk.ProfileKey.ToString & si.WorkflowClusterPk.ScenarioKey.ToString & si.WorkflowClusterPk.timekey.ToString,icTable)
    End If

RolandWeiss's avatar
RolandWeiss
New Contributor II
3 days ago

We found the solution:

Dim icTable As DataTable = globals.GetObject(plugAccount & si.WorkflowClusterPk.ProfileKey.ToString & si.WorkflowClusterPk.ScenarioKey.ToString & si.WorkflowClusterPk.timekey.ToString)
If IsNothing(icTable)
    Dim ds As New DataSet
    'Execute the InterCoDifferences Method Command in code so that we can get the data table
    Dim methodQuery As String = "{|WFProfile|}{|WFScenario|}{|WFTime|}{" & plugAccount & "}{}{}{}{}{}{}{}{}{IsDifference = True}"
    
    Using dbConnApp As DbConnInfo = BRApi.Database.CreateApplicationDbConnInfo(si)
        ds = BRApi.Database.ExecuteMethodCommand(dbConnApp, XFCommandMethodTypeId.ICMatchingForWorkflowUnit, methodQuery, "IC", Nothing)
    End Using
    icTable = ds.Tables("IC")
    globals.SetObject(plugAccount & si.WorkflowClusterPk.ProfileKey.ToString & si.WorkflowClusterPk.ScenarioKey.ToString & si.WorkflowClusterPk.timekey.ToString,icTable)
End If