RE: Unusual error that I cannto figure out

["Lim Hock-Chai" <Lim.Hock-Chai@xxxxxxxx>]

which raise an interesting question as why the 5250 has to error that out.  If 
there is no data, just don't display it.  Never understand why we need SFLDSP 
and SFLDSPCTL keywords.

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Lim Hock-Chai
Sent: Monday, November 22, 2004 11:42 AM
To: RPG programming on the AS400 / iSeries
Subject: RE: Unusual error that I cannto figure out


The error is likely to cause by program did not load any record to subfile but 
indicator that control the SFLDSP keyword is on.

Try to load a record to the subfile or turnoff the indicator the control 
SFLDSP.  Looking at you subfile control you might need to use a different 
indicator for SFLDSP and SFLDSPCTL.


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Douglas W. Palme
Sent: Monday, November 22, 2004 11:19 AM
To: RPG programming on the AS400 / iSeries
Subject: Unusual error that I cannto figure out


I am working with subfiles and thought I had this down, but unfortunately I am 
getting an unusual error message when I try to run the program.  Here is the 
dds for the subfile and the program that is calling it. 

All I am trying to do at the moment is display the subfile to the screen.

The error message is the following, which I have never seen before:

Job 182784/DPALME/QPADEV0010 started on 11/22/04 at 11:45:21 in subsystem BA
Session or device error occurred in file SUBFILE (C G D F).                 

Application error.  RNX1255 unmonitored by JDEAL at statement 0000000014,...

Any suggestions or comments would be appreciated.

Douglas


DDS:
 A*%%TS  SD  20041122  114708  DPALME      REL-V5R2M0  5722-WDS            
 A*%%EC                                                                    
 A                                      DSPSIZ(24 80 *DS3)                 
 A          R RECSFL                    SFL                                
 A*%%TS  SD  20041122  114708  DPALME      REL-V5R2M0  5722-WDS            
 A            NOTES         75   B  3  5                                   
 A          R RECCTL                    SFLCTL(RECSFL)                     
 A*%%TS  SD  20041122  114708  DPALME      REL-V5R2M0  5722-WDS            
 A                                      CA03(03)                           
 A  51                                  SFLDSP                             
 A  51                                  SFLDSPCTL                          
 A  52                                  SFLCLR                             
 A                                      SFLSIZ(0016)                       
 A                                      SFLPAG(0015)                       
 A                                  1 24'THIS IS THE CONTROL RECORD HEADER'

PGM:

 *program: subfiler                                      
Fsubfile   CF   E             workstn                    
F                                     sfile(recsfl:rrn)  
Drrn              s              3  0                    
C                   DOU       *IN03                      
C                   EVAL      *IN52 = *ON                
C                   WRITE     RECCTL                     
C                   EVAL      *IN52 = *OFF               
C                   EVAL      *IN51 = *ON                
C                   EXFMT     RECCTL                     
C                   ENDDO                                
C                   EVAL      *INLR = *ON                

--
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.