RE: Subfile Record positioning -- RPG400-L

Separating the screens will not solve the problem of position the
subfile at the correct record.  The users have PO's with several hundred
lines.  They find it very annoying that they have to roll down to the
last record they worked on after every enter or Fkey pressed.  I think
they have a contract out on me.  The only way to stay alive now is to
fix this problem.  Otherwise this is my last email.

Marvin

PS The last was a joke for the humor impaired.



-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Booth Martin
Sent: Tuesday, August 09, 2005 9:35 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: Subfile Record positioning

Why use the folding function at all?  Why not let the unfolded view be a
second screen, with a new format name, and not be a subfile at all?



I suspect the problem is that when you reload the subfile with the
unfolded
record you have deleted or cleared the initial subfile, so there is no
longer a  record 4 in the subfile, 

 

---------------------------------

Booth Martin

http://www.martinvt.com

---------------------------------

-------Original Message-------

 

From: RPG programming on the AS400 / iSeries

Date: 08/09/05 11:26:33

To: RPG programming on the AS400 / iSeries

Subject: Subfile Record positioning

 

Hi All,

 

[Marvin Radding:]

 

I need a little help in position a subfile to display the unfolded

record on the screen.

 

 

 

I have a screen as depicted below:

 

  8/09/05 09:12:42                 My Company

MARVINR

 

  PPPPPPP                          Order Detail

DPINW

 

  Buyer: Buyer #1

 

  PO #:            Order ID:    1900       1

AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA

 

   Item   Brand/Pkr  Description           Size  Tot  O-Qty V-Qty  Cost

RS

 

 

 

 

  9999999 DDDDDDDDDDDDDDDDDDDDDDD         2.2 LB    2     2     2

18.7260

 

  Risk......:       29 Time Sup: Cur/WPO:      7.90      8.41 On Hand..:

3

 

  Shelf Life:       60    Required.........:          2.00    Committed:

 

 

  Add to AL.:             Forecast.........:          3.92    24 hours :

 

 

  Promotions:  CG                                             On Order.:

29

 

  Time Supply (No Order):     48.21   Pack:    2

 

 

 

 

 

    * PAR *      * Sale *

 

 

   --- 2005-08-06 --------------- 13 Week History ------------

2005-05-14 ---

 

   Wk   Sales      Wk   Sales      Wk   Sales     Wk   Sales     Wk

Sales

 

   31      4.50    30      8.50    29      1.50   28      5.00

 

 

   27      5.50    26      3.50    25             24  S    .00

 

 

   23      3.50    22      5.50    21      6.50   20      1.00   19

4.50

 

 

------------------------------------------------------------------------

------

 

 

More...

 

  F1=Update  F10=Slot Inq  F3=Cancel  F4=List/Select  F5=Reallocate

F20=Sales

 

  F7=Inventory  F8=Add Items  F9=Cost Change  F24=More Keys  F21=Unfold

 

 

 

 

 

 

 

This is the unfolded display.  The display shows only one subfile record

in this mode from line 7 to line 22.  When in the folded display, it

shows 11 lines.

 

 

 

The problem is this, when I position the unfolded screen on the 4th

record and press enter, the redisplay is back at the 1st record.  The

CSRRRN shows 4 just after I press enter but even though I set the RRN to

4 before the redisplay, it still shows the first record.  I need to

redisplay the 4th record.  This will also happen when a Fkey is pressed.

 

 

 

HELP

 

 

 

Marvin

 

 

 

--

This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
list

To post a message email: RPG400-L@xxxxxxxxxxxx

To subscribe, unsubscribe, or change list options,

visit: http://lists.midrange.com/mailman/listinfo/rpg400-l

or email: RPG400-L-request@xxxxxxxxxxxx

Before posting, please take a moment to review the archives

at http://archive.midrange.com/rpg400-l.

 

 

.