Re: major minor codes that subfile

A                                          DSPSIZ(24 80 *DS3)
A                                          PRINT
A                                          ERRSFL
A                                          CA03
A                                          CA12
A*
A              R SFL1                      SFL
A*
A                DBLNAM    R        O  7  2REFFLD(PFR/DBLNAM *LIBL/SFL
A                DBFNAM    R        O  7 26REFFLD(PFR/DBFNAM *LIBL/SFL
A                DBMINI    R        O  7 50REFFLD(PFR/DBMINI *LIBL/SFL
A                DBNNAM    R        O  7 55REFFLD(PFR/DBNNAM *LIBL/SFL
A              R SF1CTL                    SFLCTL(SFL1)
A*
A                                          SFLSIZ(0016)
A                                          SFLPAG(0015)
A                                          OVERLAY
A                                          ROLLUP
A N32                                      SFLDSP
A N31                                      SFLDSPCTL
A      31                                  SFLCLR
A      90                                  SFLEND(*MORE)
A                RRN1           4S 0H      SFLRCDNBR
A                                      6  2'LAST NAME'
A                                           DSPATR(HI)
A                                      6 26'FIRST NAME'
A                                           DSPATR(HI)
A                                      6 50'MI'
A                                           DSPATR(HI)
A                                      6 55'NICK NAME'
A                                           DSPATR(HI)
A                                      1  2'SFL002RG'
A                                      1 71DATE

 A                                           EDTCDE(Y)
 A                                      2 71TIME
 A                                      1 24'SFL  PROGRAM WITH POS. TO'

 A                                          DSPATR(HI)
 A                                      4  2'POSITION TO LAST NAME . .

 A                PTNAME        20   B  4 30
 A
 A              R FKEY1
 A
 A                                     23  2'F3=EXIT'
 A                                          COLOR(BLU)
 A                                     23 12'F12=CANCEL'
 A                                          COLOR(BLU)




> Some possibilities:
>
> 1) The SFL is empty and SFLDSP indicator is on.
> 2) You want to position the cursor on a non-existant SFL record
> 3) SFLDSPCTL indicator is off and you do a write to the SFLCTL.
>
> Can you post the DDS for the SFLCTL and the code for SFL handling in the
> programme?
>
> Regards,
> Carel Teijgeler
>
> *********** REPLY SEPARATOR  ***********
>
> On 29-8-05 at 10:26 steema@xxxxxxxxxxxxx wrote:
>
>>It did compile, thanks for all your help. But now it bombs. THere are
>> codes messages:
>>Major Return Code. . . . . . . . . . . :   83
>>Major Return Code. . . . . . . . . . . :   22
>>
>> ILE RPG/400 FORMATTED DUMP
>> INFDS FILE FEEDBACK
>> File . . . . . . . . . . . . . . . . . :   SFL002DF
>> File Open  . . . . . . . . . . . . . . :   YES
>> File at EOF  . . . . . . . . . . . . . :   NO
>> File Status  . . . . . . . . . . . . . :   01255
>>              Session or device error occurred in file  (C G D F).
>> File Operation . . . . . . . . . . . . :   EXFMTR
>> File Routine . . . . . . . . . . . . . :   *DETC
>> Statement Number . . . . . . . . . . . :   00000049
>> Record Name  . . . . . . . . . . . . . :   SF1CTL
>> Message Identifier . . . . . . . . . . :   CPF5013
>>              Cannot process subfile request for file  in library .
>> Screen Size. . . . . . . . . . . . . . :   0000
>
>
>
> --
> 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.
>
>