RE: Move subfile left and right? -- RPG400-L

Title: RE: Move subfile left and right?

How about ......... (just some ideas, not the entire logic..........)

o A long work field to contain all the data you need on one line
o An 80 (or whatever) byte subfile field to contain a part of the long work field

In program

    StartingValue = 1
    LongWorkField = '    123.47-        Department name       20:25:05       xxxxxxxxooooooooeeeeeeee
                              99995555555blahblahblah
    SflField = %SubSt(LongWorkField : StartingValue : %Size(SflField))
    Write subfile record

    If WindowRightKey
      If StartingValue + %Size(SflSize) <= %Size(LongWorkField)
        StartingValue = StartingValue + %Size(SflField)
      Else
        Message = 'Can''t window right'

Same idea for Window left key.

Could window right/left based on cursor/subfile record position or for all subfile records on screen.

How's this for a starting idea ???????????

On display file
SflRecord = %SubStr(LongWorkField : StartingValue : 80)

-----Original Message-----
From:   eric.delong@pmsi-services.com [SMTP:eric.delong@pmsi-services.com]
Sent:   Thursday, August 24, 2000 7:54 AM
To:     RPG400-L@midrange.com
Subject:        Re: Move subfile left and right?

     Hmmm, what about 132 column display? May cause squinting and
     crossed eyes, but otherwise gives you the extra room you need.

     eric.delong@pmsi-services.com

______________________________ Reply Separator _________________________________
Subject: Move subfile left and right?
Author: <RPG400-L@midrange.com> at INET_WACO
Date: 8/24/00 4:21 PM

Hi all!

Sorry if this is OT, but as the program is written in RPG, I figured the
question would fit here . . .

I have a subfile with a selection field, 6 signed numeric fields(11,2), as well
as a description field (30 char, and *all* 30 characters are being used.

My problem is to fit the whole record on one line of a 80 column screen. (132
width is next to impossible to read on CA, and the users *insist* that all the
fields be on 1 line). I can't create a splf and just display that, as the users
need to make additional selections on the sfl rec.

Is there short way to define the fields beyond 80 char, and let the subfile
behave like query or dspsplf?
I can only think of using 2 subfiles, but that seems a bit cumbersome.

Any "quick and dirty" solutions would be welcome :-)

TIA
Jaco Jonker.


+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---