General information
Category:
Reports & Report designer
Scott,
Thanks for the help. I don't understand how I should use this code. Is this a one-time fix or does it need to be run everytime I want to programmatically launch the reports control toolbar?
Thanks
>Here is some code I got here a few months back, don't know the origianl author. Hope this helps.
>
>coalias=ALIAS()
>ccurrentrfile = SYS(2005)
>SET RESOURCE OFF
>lok = .T.
>lcoldonerror = ON("error")
>ON ERROR lok = .F.
>USE &ccurrentrfile EXCLUSIVE IN 0
>
>IF lok
> SELECT foxuser
> GO TOP
> LOCATE FOR TYPE = "PREFW" AND ID = "REPORTTOOLS"
> IF FOUND()
> REPLACE ckval WITH 60721,UPDATED WITH DATE()
> ELSE
> INSERT INTO foxuser (TYPE,ID,NAME,READONLY,ckval,DATA,UPDATED) ;
> VALUES ("PREFW","REPORTTOOLS","",.F.,60721,"",DATE())
> ENDIF
> USE IN foxuser
>ENDIF
>
>SET RESOURCE ON
>SET RESOURCE TO &ccurrentrfile
>IF NOT EMPTY(coalias)
> SELECT (coalias)
>ENDIF
>ON ERROR &lcoldonerror
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only