asp ERROR MESSAGE

How I can solve this error message

Microsoft VBScript runtime error '800a01a8' Object required: 'lUATRef'

/cmgtest/transaction/viewPCReqForm.asp, line 284

this is some source code that I wrote below

function checkU开发者_JAVA百科ATReq(aUATRef) 
    Dim correctness,lUATRef,uatRef 
    correctness = False 
    lUATRef = aUATRef 
    uatRef = lUATRef.Substring(1,2) 
    rwriteln uatRef 
    'sqlCheckUATReq = "select * from PC_DETAIL where ID ='"&uatReqRef&"'" 
    'rwriteln uatReqRef 
End function 

Seems like your function isn't getting a parameter passed to it. Check whether aUATRef is getting initialized.

In VBScript, Strings aren't objects. You should use the Mid function to get a portion of a string:

uatRef = Mid(IUATRef, 1, 2)