VB Script error - NewProfileCmd_PostOnOK - Document profile is invalid

mlf

This is the relevant part of my even handler

Sub NewProfileCmd_PostOnOK(obj)

Dim document
Dim matterNumber

matterNumber = obj.GetAttributeTextByID(nrCustom1)

If matterNumber = "0123456" Then

'The script is throwing an error on the line below
Set document = Context.Item("ImportedDocument")

......

End If

End Sub


And I get this error

There was an error in executing the VB Script
The Details are as follows
Type: iManage.NRTDMS.2
Description: [NRTDocument ][CheckinEx ]Document profile is invalid
Line: 119
Error Code: 0
SCode: 80070057

It is throwing the error on this line of the script

Set document = Context.Item("ImportedDocument")

Any ideas what the problem is?