Reserved Word Class In Database Field Names

[JADAMS]

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

[ignacio]

Jadams,
Surely CLASS is a xHarbour reservd word.
Regards,
--
Ignacio Ortiz de Zúñiga
[Soporte Xailer]
[Xailer support]
"JADAMS" <jadams@electro-nc.com> escribió en el mensaje
news:47ecf8da$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>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
>

[JADAMS]

Thanks Ignacio.
I thought the "With Object Block" would automatically fully qualify the
name but it appears that it doesn't.
James
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> wrote in message
news:47f0dd38$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Jadams,
>
> Surely CLASS is a xHarbour reservd word.
>
> Regards,
>
> --
> Ignacio Ortiz de Zúñiga
> [Soporte Xailer]
> [Xailer support]
>
>
> "JADAMS" <jadams@electro-nc.com> escribió en el mensaje
> news:47ecf8da$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>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
>>
>
>