× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Here's how I do it:

In the DDS
     A  59                                  SFLDROP(CF04)
     A                                      SFLMODE(&SFLMODE)
(no other reference to CF04 in the DDS)

In the RPG
      //  Display file indicator data structure
     d Wsindds         ds
     d   SflNonDsply          50     50n
     d   SflEnd               51     51n
     d   SflNxtChg            55     55n
     d   SflBadOption         56     56n
     d   SflDrop              59     59n
.....  at initialization
       SflDrop = *on;
.....  after EXFMT
       eval SflDrop = SflMode;
.....  to determine how many records on a page(page at a time
subfile)
         if SflDrop;
           SflPage = SFLPAG;
         else;
           SflPage = SFLPAG / 2;
         endif;

Scott Mildenberger
 




--- G Armour <garmour400r@xxxxxxxxx> wrote:
> I'm doing my first subfile with SFLFOLD/SFLDROP since probably
> ten years ago.  I
> remember the SFLFOLD/SFLDROP a real PITA back then, and it
> hasn't gotten any better
> now.
> 
> The problem that I can't seem to easily get past is that I
> can't get the FOLD or the
> DROP to "stick".  I've got a 2-line subfile record.  The
> default is to show just the
> first line ("dropped").  The user presses F7 to switch between
> DROP and FOLD.  As
> long as I'm scrolling within the subfile, I'm fine.  But as
> soon as I hit a function
> key, or scroll past the top or bottom of the subfile (i.e.,
> control returns to
> program and program EXFMTs the control record), it reverts
> back to DROP.



__________________________________
Do you Yahoo!?
Yahoo! Mail SpamGuard - Read only the mail you want.
http://antispam.yahoo.com/tools

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.