Display empty subfile
Most of the time the user made a selection and the subfile is filled with data and everything works fine. From time to time there are no subfile records to be displayed. At that time some programs may bail out with a escape message like RNX1255 (with previous message CPF5022).
Empty subfile can also be handled and “displayed”.
Control Record Example:
A R C1 A SFLCTL(S1) A SFLSIZ(0017) A SFLPAG(0016) A 30 SFLDSP A N31 SFLDSPCTL A 31 SFLCLR A 32 SFLEND(*MORE) * A SFLCSRRRN(&SFLRRN) A RECORD 4S 0H SFLRCDNBR(CURSOR) A SFLRRN 5S 0H
For displaying an empty subfile you need the following indicator state:
*in30 = *off *in31 = *off *in32 = *off