bulk publish outstanding in V9

Public Sub CCC_CallBulkPublishOutstanding(ByVal UID_DPR As String, ByVal tableName As String, ByVal whereClause As String)
    
Dim dbDPRNameSpace As IEntity
'Dim whereClause As String = "xobjectkey='<Key><T>ADSAccountInADSGroup</T><P>74b5d7b5-185a-4222-8884-684c13466e83</P><P>703626cb-58ac-4204-98a9-fd6e1badab30</P></Key>'"
    ' Load the DPRNameSpace object
    dbDPRNameSpace = Session.Source.Get("DPRNameSpace", UID_DPR)

    Try
        ' Log start
        CCC_Nlog_WriteLog("DPRNameSpace", "debug", "BulkPublishOutstanding - Start execution for DPR: " & UID_DPR)

        ' Call custom method BulkPublishOutstanding
        dbDPRNameSpace.CallMethod("BulkPublishOutstanding", tableName, whereClause)
		
		 CCC_Nlog_WriteLog("DPRNameSpace", "debug", "BulkPublishOutstanding executed successfully for table: " & tableName)
		
		dbDPRNameSpace.Save(Session)

    Catch ex As Exception
        ' Error handling
        CCC_Nlog_WriteLog("DPRNameSpace", "debug", "BulkPublishOutstanding failed: " & ViException.ErrorString(ex))
    End Try
End Sub

Hi Team,

I have written above code to publish the outstanding adsaccountinadsgroup memberships.

process gets executed and script runs successfully but nothing happens but if I run the method directly from obj broswer it works.

please check and help me here.

version 9.0 LTS

input prams to script

Value = "ADS-DPRNameSpace-ADS"

Value = "ADSAccountInADSGroup"

Dim Xobj As String = $XObjectKey$

value = "xobjectkey='" & Xobj & "'"

0 Ayan Malik 6 hours ago

Hi Markus Weiss-Ehlers ,

I enabled the logging and got below error. Could you please check this further?

ErrorMessages	(2025-11-17 07:38:36.573) [810222] Error running script 'CCC_CallBulkPublishOutstanding'.
[810306] Error running 'OnSaving' in logic module 'VI.DB.Entities.ModuleDependentLogic'.
[810275] You are not allowed to change default objects.
   at StdioProcessor.StdioProcessor._Execute(Job job)
   at VI.JobService.JobComponents.ScriptComponent.Activate(String task)
   at VI.JobService.JobComponents.ScriptComponent._TaskScriptExec()
   at VI.DB.Scripting.ScriptRunner.Eval(String key, Object[] parameters)
   ---- Start of Inner Exception ----
   at DynScripts.Scripts_ddaQOOqdXN6AaNiHckhly20SYPC6frBr.CCC_CallBulkPublishOutstanding(String UID_DPR, String tableName, String whereClause)
   at VI.Base.SyncActions.Do[T1,T2](T1 p1, T2 p2, Func`3 action)