QDESIGN file types and cluster control (PH607F on AS/400)
Daniel Mielke
DMielke@aic.com
Thu, 2 May 2002 12:28:18 -0400
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
------_=_NextPart_001_01C1F1F6.5DD14850
Content-Type: text/plain;
charset="iso-8859-1"
Hi Joe,
The HOLD FIND statement applies to the PRIMARY file if no DETAIL file exists
and causes QUICK to "read into" the PRIMARY/DETAIL files. In this case a
DETAIL file exists and the access is "sequential" using the specific index.
If the PRIMARY file does not supply the indexed field in the DETAIL file in
the sequence of the DETAIL file, QUICK does not reset its search to start
from the beginning of the DETAIL file. In the example, the screen would
display RATLETS 321 and 333 and stop. Scrolling back would retrieve 305.
I'm looking for all three. Thoughts?
RATS
rat-no rat-name ratlets
1 Big MOMMA RAT 10
RATLETS (index for ratlet-no and index for ratlet-status)
ratlet-no rat-no ratlet-name ratlet-status Termination-reason
lots of ratlets... mostly Dead thus the status index
321 1 Bobby Ray Alive
333 1 Billy Bob Alive
305 1 Benjamin Alive
RATLET-RACES (index for ratlet-no)
ratlet-no race-no win-lose income
305 1234 W $100.00
305 1355 W $50.00
305 1425 L $0.00
321 1244 W $75.00
321 1255 W $45.00
333 1523 L $0.00
333 1627 L $0.00
333 1655 L $0.00
-----Original Message-----
From: Boyle, Joe [mailto:Joe.Boyle@cognos.com]
Sent: Thursday, May 02, 2002 4:57 AM
To: 'Daniel Mielke'; Powerhouse List (E-mail)
Subject: RE: QDESIGN file types and cluster control (PH607F on AS/400)
Hi Daniel,
how about something like that below, on receiving a rat the user can scroll
through ratlets ( by pressing return ), listing the ratrace details for each
ratlet,
can cle
SCREEN Screen4 RECEIVING RATS
FILE RATS IN mydbst MASTER
FILE RATLETS IN mydbst PRIMARY
ACCESS USING order_no of RATS VIA order_no
FILE RAT_RACES IN mydbst detail OCCURS 10
Item ORDER_NO_C final ascii( ORDER_NO OF RATS ,10)
Item ORDER_LINE_NO_C final ascii( ORDER_LINE_NO OF RAT_RACES ,4)
ACCESS USING order_no of RATLETS VIA order_no
FIELD ORDER_NO OF RATS DISPLAY PREDISPLAY
FIELD ORDER_LINE_NO OF RATLETS DISPLAY PREDISPLAY
align ( 1,,4 ) ( ,,20 ) ( ,,50 )
CLUSTER OCCURS WITH RAT_RACES
FIELD ORDER_LINE_NO OF RAT_RACES REQUIRED NOCHANGE &
LOOKUP NOTON RAT_RACESVIA ORDER_NO, ORDER_LINE_NO USING &
ORDER_NO OF RATS, ORDER_LINE_NO OF RAT_RACES
FIELD ORDER_LN_NAME OF RAT_RACES
FIELD ORDER_LN_BRANCH OF RAT_RACES
CLUSTER
BUILD LIST
regards,
Joe Boyle.
-----Original Message-----
From: Daniel Mielke [ mailto:DMielke@aic.com <mailto:DMielke@aic.com> ]
Sent: 01 May 2002 18:58
To: Powerhouse List (E-mail)
Subject: QDESIGN file types and cluster control (PH607F on AS/400)
Hi Listers,
I'm getting some weird results when building a FIND only screen.
Bear with me on this example(Once again, thanks Chuck!):
I want to list the detail of RATLET-RACES for active RATLETS. The user is
coming into the screen with a RAT record as MASTER. RATLETS is being
retrieved via ratlet-status and selected if rat-no of RAT = rat-no of
RATLETS. RATLET-RACES is a DETAIL file indexed by ratlet-no (matching up to
RATLET). The cluster is based on the occurrence of RATLET-RACES.
There are three active RATLETS. Each RATLETS record has matching
RATLET-RACES records. However the screen displays only two RATLETS and
stops. The scrolling back doesn't work. When the HOLD FIND is removed, the
scrolling back works and gets the third RATLETS record and associated
RATLET-RACES records.
The impression that I get is that QUICK is passing once though RATLET-RACES.
QUICK finds RATLET-RACES for the first RATLETS record, continuing on from
that point to get records for the second RATLETS record, and stopping when
it can't find RATLET-RACES records for third. (RATLETS is not being
retrieved in ratlet-no order)
Is there a way to ?Reset? the access of the detail file for each occurrence
of RATLETS?
Should I change the file structure?
Help!
> BUY. HOLD. AND PROSPER.
>
> Daniel Mielke
> Business Systems Analyst
> AIC Limited
> 1-888-710-4242 (4614)
> dmielke@aic.com
> www.aic.com
>
>
= = = = = = = = = = = = = = = = = = = = = = = = = = = =
Mailing list: powerh-l@lists.swau.edu
Subscribe: "subscribe" in message body to powerh-l-request@lists.swau.edu
Unsubscribe: "unsubscribe" in message body to
powerh-l-request@lists.swau.edu
http://lists.swau.edu/mailman/listinfo/powerh-l
<http://lists.swau.edu/mailman/listinfo/powerh-l>
This list is closed, thus to post to the list you must be a subscriber.
This message may contain privileged and/or confidential information. If you
have received this e-mail in error or are not the intended recipient, you
may not use, copy, disseminate or distribute it; do not open any
attachments, delete it immediately from your system and notify the sender
promptly by e-mail that you have done so. Thank you.
------_=_NextPart_001_01C1F1F6.5DD14850
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META HTTP-EQUIV=3D"Content-Type" CONTENT=3D"text/html; =
charset=3Diso-8859-1">
<TITLE>RE: QDESIGN file types and cluster control (PH607F on =
AS/400)</TITLE>
<META content=3D"MSHTML 5.00.2919.6307" name=3DGENERATOR></HEAD>
<BODY>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN =
class=3D281384315-02052002>Hi=20
Joe,</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002></SPAN></FONT> </DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN =
class=3D281384315-02052002>The=20
HOLD FIND statement applies to the PRIMARY file if no DETAIL file =
exists and=20
causes QUICK to "read into" the PRIMARY/DETAIL files. In this =
case a=20
DETAIL file exists and the access is "sequential" using the specific=20
index. If the PRIMARY file does not supply the indexed field in =
the DETAIL=20
file in the sequence of the DETAIL file, QUICK does not reset =
its=20
search to start from the beginning of the DETAIL file. In the =
example, the=20
screen would display RATLETS 321 and 333 and stop. Scrolling back =
would=20
retrieve 305. I'm looking for all three. =20
Thoughts?</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002></SPAN></FONT> </DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002>RATS</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002>rat-no =
rat-name =20
ratlets</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002>1 &n=
bsp;Big=20
MOMMA RAT 10</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002></SPAN></FONT> </DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002>RATLETS (index for =
ratlet-no and=20
index for ratlet-status)</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002>ratlet-no rat-no =
ratlet-name=20
ratlet-status Termination-reason</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002></SPAN></FONT> </DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN =
class=3D281384315-02052002>lots=20
of ratlets... mostly Dead thus the status index</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002></SPAN></FONT> </DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002>321 =
1 Bobby Ray&nb=
sp; =20
Alive</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002>333 =
1 Billy=20
Bob Ali=
ve</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002>305 =
=20
1 =20
Benjamin =
Alive</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002></SPAN></FONT> </DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002>RATLET-RACES (index for=20
ratlet-no)</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002>ratlet-no race-no =
; win-lose income</SPAN></FONT><=
/DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002>305 =
1234 W &=
nbsp; $100.00</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002>305 =
1355 W &=
nbsp; $50.00</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002>305 =
1425 L &=
nbsp; $0.00</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002>321 =
1244 W &=
nbsp; $75.00</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002>321 =
1255 W &=
nbsp; $45.00</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002>333 =
1523 L &=
nbsp; $0.00</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002>333 =
1627 L &=
nbsp; $0.00</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002>333 =
1655 L &=
nbsp; $0.00</SPAN></FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DArial size=3D2><SPAN=20
class=3D281384315-02052002> &nb=
sp; =20
</SPAN></FONT></DIV>
<BLOCKQUOTE style=3D"MARGIN-RIGHT: 0px">
<DIV align=3Dleft class=3DOutlookMessageHeader dir=3Dltr><FONT =
face=3DTahoma=20
size=3D2>-----Original Message-----<BR><B>From:</B> Boyle, Joe=20
[mailto:Joe.Boyle@cognos.com]<BR><B>Sent:</B> Thursday, May 02, 2002 =
4:57=20
AM<BR><B>To:</B> 'Daniel Mielke'; Powerhouse List =
(E-mail)<BR><B>Subject:</B>=20
RE: QDESIGN file types and cluster control (PH607F on=20
AS/400)<BR><BR></DIV></FONT>
<P><FONT size=3D2>Hi Daniel,</FONT> </P>
<P><FONT size=3D2>how about something like that below, on receiving a =
rat the=20
user can scroll through ratlets ( by pressing return ), listing the =
ratrace=20
details for each ratlet,</FONT></P><BR>
<P><FONT size=3D2>can cle</FONT> </P>
<P><FONT size=3D2>SCREEN Screen4 RECEIVING RATS =
</FONT></P>
<P><FONT size=3D2>FILE RATS IN mydbst MASTER </FONT></P>
<P><FONT size=3D2>FILE RATLETS IN mydbst PRIMARY </FONT></P>
<P><FONT size=3D2>ACCESS USING order_no of RATS VIA =
order_no =20
</FONT></P>
<P><FONT size=3D2>FILE RAT_RACES IN mydbst detail OCCURS 10 =
</FONT></P>
<P><FONT size=3D2>Item=20
=
ORDER_NO_C &n=
bsp; =20
final ascii( ORDER_NO OF RATS ,10)</FONT> <BR><FONT =
size=3D2>Item =
ORDER_LINE_NO_C final=20
ascii( ORDER_LINE_NO OF RAT_RACES ,4)</FONT> </P>
<P><FONT size=3D2>ACCESS USING order_no of RATLETS VIA=20
order_no </FONT></P>
<P><FONT size=3D2>FIELD ORDER_NO OF RATS =
DISPLAY =20
PREDISPLAY </FONT></P>
<P><FONT size=3D2>FIELD ORDER_LINE_NO OF RATLETS =20
DISPLAY PREDISPLAY </FONT></P>
<P><FONT size=3D2>align ( 1,,4 ) ( ,,20 ) ( ,,50 )</FONT> </P>
<P><FONT size=3D2>CLUSTER OCCURS WITH RAT_RACES</FONT> </P>
<P><FONT size=3D2>FIELD ORDER_LINE_NO OF RAT_RACES REQUIRED=20
=
NOCHANGE &nbs=
p; =20
&</FONT> <BR><FONT size=3D2> LOOKUP NOTON =
RAT_RACESVIA=20
ORDER_NO, ORDER_LINE_NO USING & </FONT><BR><FONT=20
size=3D2> ORDER_NO OF RATS, ORDER_LINE_NO OF =
RAT_RACES</FONT>=20
</P>
<P><FONT size=3D2>FIELD ORDER_LN_NAME OF =
RAT_RACES =20
</FONT></P>
<P><FONT size=3D2>FIELD ORDER_LN_BRANCH OF =
RAT_RACES =20
</FONT></P>
<P><FONT size=3D2>CLUSTER</FONT> </P>
<P><FONT size=3D2>BUILD LIST</FONT> </P><BR>
<P><FONT size=3D2>regards,</FONT> <BR><FONT size=3D2>Joe =
Boyle.</FONT>=20
</P><BR><BR>
<P><FONT size=3D2>-----Original Message-----</FONT> <BR><FONT =
size=3D2>From:=20
Daniel Mielke [<A=20
href=3D"mailto:DMielke@aic.com">mailto:DMielke@aic.com</A>]</FONT> =
<BR><FONT=20
size=3D2>Sent: 01 May 2002 18:58</FONT> <BR><FONT size=3D2>To: =
Powerhouse List=20
(E-mail)</FONT> <BR><FONT size=3D2>Subject: QDESIGN file types and =
cluster=20
control (PH607F on AS/400)</FONT> </P><BR>
<P><FONT size=3D2>Hi Listers,</FONT> </P>
<P><FONT size=3D2>I'm getting some weird results when building a FIND =
only=20
screen.</FONT> </P>
<P><FONT size=3D2>Bear with me on this example(Once again, thanks=20
Chuck!):</FONT> </P>
<P><FONT size=3D2>I want to list the detail of RATLET-RACES for =
active=20
RATLETS. The user is</FONT> <BR><FONT size=3D2>coming into the =
screen with=20
a RAT record as MASTER. RATLETS is being</FONT> <BR><FONT=20
size=3D2>retrieved via ratlet-status and selected if rat-no of RAT =
=3D rat-no=20
of</FONT> <BR><FONT size=3D2>RATLETS. RATLET-RACES is a DETAIL =
file=20
indexed by ratlet-no (matching up to</FONT> <BR><FONT =
size=3D2>RATLET). =20
The cluster is based on the occurrence of RATLET-RACES.</FONT> </P>
<P><FONT size=3D2>There are three active RATLETS. Each RATLETS =
record has=20
matching</FONT> <BR><FONT size=3D2>RATLET-RACES records. =
However the=20
screen displays only two RATLETS and</FONT> <BR><FONT =
size=3D2>stops. The=20
scrolling back doesn't work. When the HOLD FIND is removed, =
the</FONT>=20
<BR><FONT size=3D2>scrolling back works and gets the third RATLETS =
record and=20
associated</FONT> <BR><FONT size=3D2>RATLET-RACES records. =
</FONT></P>
<P><FONT size=3D2>The impression that I get is that QUICK is passing =
once though=20
RATLET-RACES.</FONT> <BR><FONT size=3D2>QUICK finds RATLET-RACES for =
the first=20
RATLETS record, continuing on from</FONT> <BR><FONT size=3D2>that =
point to get=20
records for the second RATLETS record, and stopping when</FONT> =
<BR><FONT=20
size=3D2>it can't find RATLET-RACES records for third. (RATLETS is =
not=20
being</FONT> <BR><FONT size=3D2>retrieved in ratlet-no order)</FONT> =
</P>
<P><FONT size=3D2>Is there a way to ?Reset? the access of the detail =
file for=20
each occurrence</FONT> <BR><FONT size=3D2>of RATLETS?</FONT> </P>
<P><FONT size=3D2>Should I change the file structure?</FONT> </P>
<P><FONT size=3D2>Help! </FONT></P>
<P><FONT size=3D2>> BUY. HOLD. AND PROSPER.</FONT> <BR><FONT =
size=3D2>>=20
</FONT><BR><FONT size=3D2>> Daniel Mielke</FONT> <BR><FONT =
size=3D2>>=20
Business Systems Analyst</FONT> <BR><FONT size=3D2>> AIC =
Limited</FONT>=20
<BR><FONT size=3D2>> 1-888-710-4242 (4614)</FONT> <BR><FONT =
size=3D2>>=20
dmielke@aic.com</FONT> <BR><FONT size=3D2>> www.aic.com</FONT> =
<BR><FONT=20
size=3D2>> </FONT><BR><FONT size=3D2>> </FONT></P>
<P><FONT size=3D2>=3D =3D =3D =3D =3D =3D =3D =3D =3D =3D =3D =3D =3D =
=3D =3D =3D =3D =3D =3D =3D =3D =3D =3D =3D =3D =3D =3D =3D</FONT>=20
<BR><FONT size=3D2>Mailing list: powerh-l@lists.swau.edu</FONT> =
<BR><FONT=20
size=3D2>Subscribe: "subscribe" in message body to=20
powerh-l-request@lists.swau.edu</FONT> <BR><FONT =
size=3D2>Unsubscribe:=20
"unsubscribe" in message body to =
powerh-l-request@lists.swau.edu</FONT>=20
<BR><FONT size=3D2><A =
href=3D"http://lists.swau.edu/mailman/listinfo/powerh-l"=20
=
target=3D_blank>http://lists.swau.edu/mailman/listinfo/powerh-l</A></FON=
T>=20
<BR><FONT size=3D2>This list is closed, thus to post to the list you =
must be a=20
subscriber.</FONT> </P>
<P><FONT size=3D2>This message may contain privileged and/or =
confidential=20
information. If you have received this e-mail in error or are =
not the=20
intended recipient, you may not use, copy, disseminate or distribute =
it; do=20
not open any attachments, delete it immediately from your system and =
notify=20
the sender promptly by e-mail that you have done so. Thank=20
you.</FONT></P></BLOCKQUOTE></BODY></HTML>
------_=_NextPart_001_01C1F1F6.5DD14850--