SET RESOURCE ON cFox = SET('RESOURCE',1) SET RESOURCE OFF USE (cFox) COPY TO MyUser USER MyUser EXCLUSIVE ZAP USE SET RESOURCE TO MyUser#2. Open a report (doesn't matter what one)
MODIFY REPORT Junk#3. Customize the toolbar
SET RESOURCE TO (cFox)#5. Print the report
lcResourceOnOff = SET('RESOURCE') lcResourceTo = SET('RESOURCE',1) SET RESOURCE ON SET RESOURCE TO MyUser REPORT FORM My Report IF EMPTY(lcResourceTo) SET RESOURCE TO ELSE SET RESOURCE TO (lcResourceTo) ENDIF SET RESOURCE &lcResourceOnOff