Razzak,
Thanks for the technique. It works great on the faster machines and
(more importantly) does exactly what I wanted on the old slow computers
on our LAN. Using the action options with reports is something I had
never used before. The technique works really well with static icons.
Animation, like the hourglass, stalls until the report process is
completed, but that's OK, just means more playing around to get that to
work. Static icons will work just fine.
Tom Frederick
A. Razzak Memon wrote:
At 11:47 PM 7/24/2009, Tom Frederick wrote:
Something is not clicking in my understanding of how to set a Pause 3 up
correctly.
Tom,
Try the following technique to display the message while the report is
being
generated and only clear the displayed pause message when the entire
report
is actually finished. No guessing, no while .. endwhile loops, etc.
The pause message will remain uninterrupted even when printing the
report on
screen or to a file, such as PDF.
-- Step 01:
While in report designer, use the following code as "Before Generate..."
action.
Report Designer | Main Menu | Report | Actions | Before Generate...
-- Start
-- Report: Before Generate EEP
-- Retrieve Report Name
GETPROPERTY REPORT 'Report_Name' vReportName
-- Build Pause String
CLS
SET VAR vPauseMessage = +
((CHAR(013))&'Preparing Report:'&.vReportName+(CHAR(009))+(CHAR(013))+ +
(CHAR(013))+' Please wait ...')
PAUSE 3 USING .vPauseMessage +
CAPTION ' ' +
ICON APP +
OPTION MESSAGE_FONT_COLOR RED +
|MESSAGE_FONT_NAME ARIAL +
|MESSAGE_FONT_SIZE 10 +
|THEMENAME R:BASE Rocks!
CLEAR VAR vReportName,vPauseMessage
RETURN
-- End
Step 02:
Use the following code as "After Generate..." action.
-- Start
CLS
RETURN
-- End
Using this technique will provide a universal approach to display PAUSE 3
message for any report in R:BASE 7.6, Turbo V-8, or R:BASE eXtreme 9.0.
Update the actual message and theme, if you wish.
Enjoy and make sure to have fun!
Very Best R:egards,
Razzak.
P.S. If you need more examples, just let me know.
