to anyone who has encounter appforge.. pls help..

im encountering problem with the PDBOpen method..this is my code..

Public Function OpenPatientInfoDatabase() As Boolean
lType = PalmIDtoLong("DATA")
lCreator = PalmIDtoLong("!!)<")
' Open the database
#If APPFORGE Then
'when running on the device
dbPatientInfo = PDBOpen(Byfilename, "PatientInfo", 0, 0, 0, 0, afModeReadWrite)
#Else
'when running on windows
dbPatientInfo = PDBOpen(Byfilename, App.Path & "\PatientInfo", 0, 0, 0, 0, afModeReadWrite)
#End If

If dbPatientInfo <> 0 Then
'We successfully opened the database
OpenPatientInfoDatabase = True
Else
'We failed to open the database
OpenPatientInfoDatabase = False

#If APPFORGE Then
MsgBox "Could not open database - PatientInfo", vbExclamation
#Else
MsgBox "Could not open database - " + App.Path + "\PatientInfo.pdb" + vbCrLf + vbCrLf + "Potential causes are:" + vbCrLf + "1. Database file does not exist" + vbCrLf + "2. The database path in the PDBOpen call is incorrect", vbExclamation
#End If
End If
End Function


..in the line dbPatientInfo = PDBOpen(Byfilename, App.Path & "\PatientInfo", 0, 0, 0, 0, afModeReadWrite)
there is an error: byfilename is a variable undefined..
how could this be?i know byfilename is a keyword to pdopen..
help..