Jm

  Before each print statement put 

PAUSE 3 USING 'Calculating ... Please Stand By ...'  +

CAPTION '                    Pause 3 with Gauge '  +

ICON WINDOWS  OPTION GAUGE_VISIBLE ON  +

|GAUGE_COLOR RED  +

|GAUGE_INTERVAL 10  +

|MESSAGE_FONT_NAME VERDANA  +

|MESSAGE_FONT_SIZE 10  +

|MESSAGE_FONT_COLOR WHITE  +

|THEMENAME Steel Blue

 

Open each report  and add before generate eep add

 

CLS

PAUSE 3 USING 'Calculating ... Please Stand By ...'  +

CAPTION '                    Pause 3 with Gauge '  +

ICON WINDOWS  OPTION GAUGE_VISIBLE ON  +

|GAUGE_COLOR RED  +

|GAUGE_INTERVAL 10  +

|MESSAGE_FONT_NAME VERDANA  +

|MESSAGE_FONT_SIZE 10  +

|MESSAGE_FONT_COLOR WHITE  +

|THEMENAME Steel Blue

 

RETURN

 

Then in the after generate eep add 

 

CLS

 

RETURN

 

That should give you a Pause before each print and during the generation
of the report.

 

Buddy

 

 

 

 

 

From: [email protected] [mailto:[email protected]] On Behalf Of Jim
Belisle
Sent: Wednesday, April 29, 2009 9:45 AM
To: RBASE-L Mailing List
Subject: [RBASE-L] - Print many reports

 

I am using a Group function to print multiple reports with one click.
It is working but I want advice if there is a better way to do this than
what I have below. I use the pause 3 with a Guage option but that option
does not seem to work. Just two of the reports are shown below.

 

Jim

 

 

-- All Open Orders by Transdate, Control# --

-- Open Orders (In House) by Transdate, Control# --

PRINT KayParkOpenOrder WHERE SORTONE IN (BL,BR,LR,FP,OT,PB,PC,PT,RP) AND
SHIPDATE +

IS NULL AND MODEL# NOT CONTAINS 'SPBL' ORDER BY TRANSDATE CONTROL# +

OPTION PRINTER +

PAUSE 3 USING 'Calculating ... Please Stand By ...'  +

CAPTION '                    Pause 3 with Gauge '  +

ICON WINDOWS  OPTION GAUGE_VISIBLE ON  +

|GAUGE_COLOR RED  +

|GAUGE_INTERVAL 10  +

|MESSAGE_FONT_NAME VERDANA  +

|MESSAGE_FONT_SIZE 10  +

|MESSAGE_FONT_COLOR WHITE  +

|THEMENAME Steel Blue

CLEAR ALL VAR

-- Open Orders (Speedy Bleachers) by Transdate, Control# --

PRINT KayParkOpenOrder WHERE SHIPDATE IS NULL AND SORTONE = 'BL' AND +

MODEL# CONTAINS 'SPBL' ORDER BY TRANSDATE CONTROL# +

OPTION PRINTER +

PAUSE 3 USING 'Calculating ... Please Stand By ...'  +

CAPTION '                    Pause 3 with Gauge '  +

ICON WINDOWS  OPTION GAUGE_VISIBLE ON  +

|GAUGE_COLOR RED  +

|GAUGE_INTERVAL 10  +

|MESSAGE_FONT_NAME VERDANA  +

|MESSAGE_FONT_SIZE 10  +

|MESSAGE_FONT_COLOR WHITE  +

|THEMENAME Steel Blue

CLEAR ALL VAR

Reply via email to