Reserved Word Class In Database Field Names
Publicado: Vie Mar 28, 2008 2:55 pm
I ran into an ussue when the field name was the reserved word "CLASS". When
I fully qualified the reserved word, everything works as expected.
WITH OBJECT oSender:oParent:oSQLQuery1
::oEdit1:Value := :Partnbr
::oEdit2:Value := :Revlevel
// Even within with object statement :Class creates an issue
// ::oEdit3:Value := oSender:oParent:oSQLQuery1:CLASS // Fully
Qualified works
::oEdit3:Value := :CLASS // Creates Error
::oEdit4:Value := :Status
::oEdit5:Value := :FileName
::oEdit6:Value := :Comments
::oEdit7:Value := :Sheetsize
::oEdit8:Value := :Cust_Part
::oEdit9:Value := :Cust_Rev
END
Error:
Compiling: Template.prg...
Compiling: TemplateFrm.prg...
Compiling: AboutFrm.prg...
Compiling: TemplateFrm2.prg...
Compiling: TemplateFrm3.prg...
TemplateFrm3.prg(90) Error E0020 Incomplete statement or unbalanced
delimiters
Compiling: ImageForm.prg...
Compiling: MiDocView.prg...
Linking: Template.exe...
Fatal: Unable to open file 'TEMPLATEFRM3.OBJ'
0 Warnings, 2 Errors
Thanks,
James
I fully qualified the reserved word, everything works as expected.
WITH OBJECT oSender:oParent:oSQLQuery1
::oEdit1:Value := :Partnbr
::oEdit2:Value := :Revlevel
// Even within with object statement :Class creates an issue
// ::oEdit3:Value := oSender:oParent:oSQLQuery1:CLASS // Fully
Qualified works
::oEdit3:Value := :CLASS // Creates Error
::oEdit4:Value := :Status
::oEdit5:Value := :FileName
::oEdit6:Value := :Comments
::oEdit7:Value := :Sheetsize
::oEdit8:Value := :Cust_Part
::oEdit9:Value := :Cust_Rev
END
Error:
Compiling: Template.prg...
Compiling: TemplateFrm.prg...
Compiling: AboutFrm.prg...
Compiling: TemplateFrm2.prg...
Compiling: TemplateFrm3.prg...
TemplateFrm3.prg(90) Error E0020 Incomplete statement or unbalanced
delimiters
Compiling: ImageForm.prg...
Compiling: MiDocView.prg...
Linking: Template.exe...
Fatal: Unable to open file 'TEMPLATEFRM3.OBJ'
0 Warnings, 2 Errors
Thanks,
James