Been trying several different ways but only getting this far in the trace window on a column post validate and a post write event.

So I am not getting to the message box, I should have all rights and under Roles all the UDT's are checked off.  Would the way a UDT is setup not allow for access through scripting?

oUDT = oSession.GetObject("CM_UDTMaint_bus","PO_UDT_ROG_IMPORT_ITEM_MAPPING")
    r=oScript.DebugPrint("After GetObject oUDT ")
    
        If oUDT <> 0 then
        
        Set oUDT = oSession.AsObject(oUDT)
        else
        
        retVal = oSession.AsObject(oSession.UI).MessageBox("", "Access to PO_UDT_ROG_IMPORT_ITEM_MAPPING is required for the ??? script to work.")
        r=oScript.DebugPrint("After AsObject oUDT ")        

        exit sub

        retVal =oUDT.SetKeyValue("UDF_SANMAR_ITEMCODE$", sUK)
        r=oScript.DebugPrint(retVal)

            If retVal = 2 then
    
            'retVal = oUDT.SetValue("UDF_SANMAR_ITEMCODE$",sUK)
            retVal = oUDT.SetValue("UDF_SAGE_ITEMCODE$",sIC)
            retVal = oUDT.SetKey()

Would I be better off just trying to update the fields in SQL instead of through BOI?

The code should look like this:

retVal = oUDT.SetKeyValue("UDF_SANMAR_ITEMCODE$", sUK) 
retVal = oUDT.SetKey()

If retVal = 2 then
       retVal = oUDT.SetValue("UDF_SAGE_ITEMCODE$",sIC) 

       retVal = oUDT.Write()

End if

The code should look like this:

retVal = oUDT.SetKeyValue("UDF_SANMAR_ITEMCODE$", sUK) 
retVal = oUDT.SetKey()

If retVal = 2 then
       retVal = oUDT.SetValue("UDF_SAGE_ITEMCODE$",sIC) 

       retVal = oUDT.Write()

End if