Procedure Find control on PH607F AS/400

Pickering, John (NORBORD) PICKERIJ@norbord.com
Fri, 3 Aug 2001 12:07:32 -0400


Don't know much about PH on as/400 but I'll assume the path and find stuff
works the same as other platforms.

Something like the following might work:

temp t-ratlet-no int*5 reset at startup

file rat-races primary occurs 12
access via year-month-rat-no &
  using year-month + rat-no &
  request year-month, rat-no, t-ratlet-no
select if t-ratlet-no = ratlet-no of rat-races

You'd need a place on the screen for the temp t-ratlet-no -- and outside the
cluster. More details available if you need them.

Regards,
JWP

> -----Original Message-----
> From:	Daniel Mielke [SMTP:DMielke@aicfunds.com]
> Sent:	Friday, August 03, 2001 11:33 AM
> To:	Powerhouse List (E-mail)
> Subject:	Procedure Find control on PH607F AS/400
> 
> Hello all,
> 
> I'm looking to control what is displayed from an indexed file with a
> component of that file that is not indexed.
> 
> (Once again, many thanks Chuck)  The file contains a year/month field, a
> Rat
> number, a Ratlet number, a race number and the applicable winnings.  The
> indexes are on y/m and Rat or on y/m and Ratlet.  I want to display all
> the
> races for a specific y/m, Rat AND Ratlet combination.  If I perform a GET
> RAT-RACES via YEAR-MONTH, RAT-NO, RATLET-NO in the FIND procedure, I
> naturally get "*E* The VIA option doesn't define an index of file
> RAT-RACES."  
> 
> If I use the y/m and Rat index how do I control the display of only one
> specific Ratlet?
> 
> Any ideas?
> 
> > BUY. HOLD. AND PROSPER.
> > 
> > Daniel Mielke
> > Senior User Analyst
> > AIC Limited
> > 1-888-710-4242 (4614)
> > dmielke@aicfunds.com
> > www.aicfunds.com
> > 
>