At 12:52 PM -0400 4/18/00, [log in to unmask] wrote:
>The first unofficial rule of thumb for complex process is to do everything
>you can in Quiz,
>then save QTP for the updates and adds.
Actually, I go even further: The first unofficial rule of thumb is to do
everything you can in SUPRTOOL. Then pass the results to PowerHouse.
Use either Quiz or QTP to create an empty template subfile. Then use
SUPRTOOL to do your serial read selection, and dump the records into the
subfile. Then do your normal processing with the subfile, rather than with
the database or the KSAM file.
At 1:00 PM -0400 4/18/00, [log in to unmask] wrote:
...
>REQUEST EXTRACT-EXPIRING
> ACC EXPIRE-CREDITS
> SEL IF EXPIRE-YYYYMM >= START-DATE &
> AND EXPIRE-YYYYMM <= STOP-DATE
>
[...snip...]
> SUBFILE FO0600S1 INCLUDE EXPIRE-CREDITS
> SUBFILE FO0600S2 AT FINAL INCLUDE &
> PERIOD01, &
> PERIOD02, &
> PERIOD03, &
> PERIOD04, &
> PERIOD05, &
> PERIOD06, &
> PERIOD07, &
> PERIOD08, &
> PERIOD09, &
> PERIOD10, &
> PERIOD11, &
> PERIOD12
Instead do something like this:
:qtp
request make-template
access expire-credits
set input limit 0
subfile tempdata include expire-credits
go
exit
:
:comment Rather than use the PARM prompts in QTP, put the values ito
:comment CI variables...
:
:setvar start_date 200001
:setvar stop_date 200002
:echo if expire-yyyymm >= !start_date & > stuse
:echo and expire-yyyymm <= !stop_date >> stuse
:run suprtool.pub.robelle
input expire-credits
use stuse
sort expire-yyyymm
output tempdata,erase
exit
:qtp
access *tempdata
sorted on expire-yyyymm
...
Et Voila, you've used SUPRTOOL for selection and sorting, typically the
most CPU intensive parts of a PowerHouse pass, rather than using either QTP
or Quiz. I've used this method for years.
Barry Lake [log in to unmask]
Allegro Consultants, Inc. www.allegro.com
(408)252-2330
|