Changes: 1. Methods not allowed in class child-objects 2. If on desktop and not Global/for..is for cDesktop (changed in 8.3, was Desktop)
#IFSAME !3 OF
// #IFSAME !5 FILE_FIELD // is the file_field keyword used?
// #IFCLASS !6 F // test for file element
// #PUSH !h
// #PUSH !g
// #SET H$ %!6 // get the fieldnumber of parameter
// #SET G$ !6 // get the filenumber of parameter
// GET$SET$HELP !1 !2 !3 !4 |CI!g |CI!h !7 !8 !9
// #POP G$
// #POP H$
// #ELSE
// #ERROR DFERR_COMP_UNDEFINED_SYMBOL_IN_ARGUMENT UNKNOWN FILE_FIELD: !6
// #ENDIF
// #ELSE
// #IFSAME !5 FIELD // is the field keyword used?
// #IFCLASS !6 F // test for file element
// #PUSH !h
// #SET H$ %!6 // get the fieldnumber of parameter
// GET$SET$HELP !1 !2 !3 !4 |CI!h !7 !8 !9
// #POP H$
// #ELSE
// #ERROR DFERR_COMP_UNDEFINED_SYMBOL_IN_ARGUMENT UNKNOWN FIELD: !6
// #ENDIF
// #ELSE
GET$SET$HELP !1 !2 !3 !4 !5 !6 !7 !8 !9
// #ENDIF
// #ENDIF
#ELSE // !3 not OF. Provide Object
GET$SET !1 !2 OF CURRENT_OBJECT !3 !4 !5 !6 !7 !8 !9
#ENDIF