RE: program crash

By adding the Program SDS and file INFDS structures to the program,
you'll have a lot more information available in the dump - especially
file details from the INFDS including the last operation performed.

Here's what I use for the Program SDS (yes, I like to define all fields)
D ProgSDS        SDS                  
D  MainProc               1     10A   
D  Stat                  11     15  0 
D  PrevStat              16     20  0 
D  LineNum               21     28A   
D  RpgCyclRtn            29     36A   
D  Parms                 37     39  0 
D  ExceptType            40     42A   
D  ExceptNum             43     46A   
D  ExceptAll             40     46A   
D  Reserved1             47     50A   
D  Reserved2             51     80A   
D  Library               81     90A   
D  ExceptData            91    170A   
D  ExceptData2          171    174A   
D  ErrFileLong          175    184A   
D  Filler1              185    190A
D  JobDate              191    198A  
D  Century              199    200  0
D  ErrFileShort         201    208A  
D  LastFileStat         209    243A  
D  LFileStatCode        209    213A  
D  LFileStatOp          214    220A  
D  LFileStatFil1        221    227A  
D  LFileStatLine        228    235A  
D  LFileStatRec         236    243A  
D  JobName              244    253A  
D  UserName             254    263A  
D  JobNumber            264    269  0
D  JobUDate             270    275  0
D  SysUDate             276    281  0
D  SysTime              282    287  0
D  CompUDate            288    293A  
D  CompTime             294    299A
D  CompLevel            300    303A   
D  SrcFile              304    313A   
D  SrcLib               314    323A   
D  SrcMem               324    333A   
D  ProgName             334    343A   
D  ProgMod              344    353A   
D  SrcID                354    355B 0 
D  SrcID2               356    357B 0 
D  UserProf             358    367A   
D  Filler3              368    429A  

And a sample INFDS

D MyINFDS        DS                  
D   File                  1      8A   
D   Open                  9      9A   
D   Eof                  10     10A   
D   Status               11     15  0 
D   Opcode               16     21A   
D   Routine              22     29A   
D   Line                 30     37A   
D   SpecErr              38     42  0 
D   Record               38     45A   
D   MsgNum               46     52A   
D   Filler               53     66    
D   SourceId             77     78B 0 

These definitions are from RPG-IV V5R2

Best Wishes

Jim Wiant

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of murali dhar
Sent: Tuesday, 8 November 2005 5:32
To: RPG programming on the AS400 / iSeries
Subject: program crash


. If a program is crashed then how to know what was the last file
operation performed?
Not sure whether it is from File Information DS??
 
Thanks for your answers,
 

                
---------------------------------
 Yahoo! FareChase - Search multiple travel sites in one click.