Re: Subfile not forwarding correctly

For a page-at-a-time SFL the SFL has to be cleared before building the next or 
previous page again. You have to control both the ROLLDOWN (PAGEUP) and ROLLUP 
(PAGEDOWN) function keys.

Regards,
Carel Teijgeler

*********** REPLY SEPARATOR  ***********

On 11-1-06 at 8:42 steema@xxxxxxxxxxxxx wrote:

>HI I have a subfile that I can code as a page at a time. Previous subfiles I 
>did do work, but they are the 'load-all' type, and there is
>that pause for each BLD.
>
>What is happening is that I load a page, and the READ is fine, there is no 
>re-reading there, but the DISPLAY in the first case, it is >not displaying the 
>12 records just read. Later on, it seems to be displaying some of the previous 
>page records. SFLPAG is set to 12 >in the D spec. I call this subroutine once 
>initially, and then every time on a ROLL key. Perhaps someone can help me on 
>this. I must >be doing something stupid.
>
>The code for the BLD is very straight forward:
>
>C                   eval      rrn1 = lstrrn
>C                   eval      *in90 = *off
> * Load the subfile with one page of data or until end-of-file
>C                   do        sflpag
>C                   read      reopclass
>C                   if        *in90
>C                   leave
>C                   endif
>C                   eval      rrn1 = rrn1 + 1
>C                   eval      option = *blank
>C                   write     sfl1
>C                   enddo
> * If no records are loaded to subfile, don't display it
>
>The ROLL KEY:
>
>C                   when      (cfkey = rollup) and (not *in32)
>C                   exsr      sflbld
>