Hi Sarah Holbrook

Do you know if the script is executing?  What script are you using to retrieve  the  value?  Depending on where you are trying to retrieve the value, you may want to use oSession.SetStorageVar() because the oScript context would be only local to that object.

Thanks

Elliott

Hi Sarah Holbrook

Do you know if the script is executing?  What script are you using to retrieve  the  value?  Depending on where you are trying to retrieve the value, you may want to use oSession.SetStorageVar() because the oScript context would be only local to that object.

Thanks

Elliott

retVal = 0
oAudit = 0

Set oAudit = oSession.AsObject(oSession.GetObject("CM_UDTMaint_bus", "AR_UDT_CUSTOMERCONTACTAUDIT"))

ContactCode = ""

retVal = oScript.GetStorageVar("ContactCode", ContactCode)

Customer = ""
retVal = oBusObj.GetValue("CustomerNo$", Customer)

Email = ""
retVal = oBusObj.GetValue("EmailAddress$", Email)

CustomerName = ""
retVal = oBusObj.GetValue("CustomerName$", CustomerName)

user = ""
user = oSession.UserName

dateStamp = ""
userKey = ""
retVal = oSession.GetStampInfo(userKey, timeStamp, dateStamp)

retVal = oAudit.SetKey(Customer+" "+dateStamp)
If retVal > 0 Then
retVal = oAudit.SetValue("UDF_CHANGE_DATE$", dateStamp)
retVal = oAudit.SetValue("UDF_CHANGE_USER$", userKey)
retVal = oAudit.SetValue("UDF_CUSTOMER$", Customer)
retVal = oAudit.SetValue("UDF_CONTACT_EMAIL$", Email)
retVal = oAudit.SetValue("UDF_CONTACT_NAME$", CustomerName)
retVal = oAudit.SetValue("UDF_OLD_VALUE$", ContactCode)
retVal = oAudit.SetValue("UDF_NEW_VALUE$", ContactCode)
retVal = oAudit.Write()
If retVal=0 Then
	' error on the write to audit table
End If
End If

This script is a Table-Pre-Write. Now I'm wondering if I need to change this to Post-Delete as well?

Oh wow, that was exactly my problem. SORRY!