IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

How to read the Last Record Read in Enterprise PL/I


IBM Mainframe Forums -> PL/I & Assembler
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
vivekpant

New User


Joined: 17 Feb 2009
Posts: 5
Location: Mumbai

PostPosted: Wed Feb 18, 2009 2:04 pm
Reply with quote

Hi,

Can anyone explain the procedure to read the Last Record Read in the PLIDUMP of the enterprise PL/I.
Back to top
View user's profile Send private message
vivekpant

New User


Joined: 17 Feb 2009
Posts: 5
Location: Mumbai

PostPosted: Mon Mar 23, 2009 4:08 pm
Reply with quote

guys any updates??
Back to top
View user's profile Send private message
Nirav721

New User


Joined: 11 Feb 2008
Posts: 53
Location: NJ

PostPosted: Mon Mar 23, 2009 6:43 pm
Reply with quote

you can always turn off le settings using TRAP(OFF) and let abend-aid give you the current record ... assuming abend-aid is available
Back to top
View user's profile Send private message
vivekpant

New User


Joined: 17 Feb 2009
Posts: 5
Location: Mumbai

PostPosted: Tue Mar 24, 2009 2:48 pm
Reply with quote

Unfortunately, abend-aid is not available. In this case, we have to look in the PLIDUMP and read the last record read, by using the address in the 20th word. in LE, i am not able to locate that 20th word. i needed some help there....
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Tue Mar 24, 2009 8:34 pm
Reply with quote

Hello,

While not very elegant, you could define 2 "eyecatcher" literals and place a working data area between that is the size of a record. Every time a record is read, move the current record to the data area between the 2 eyecatchers.

When you look in the dump, the current record will be between the eyecatchers . . .
Back to top
View user's profile Send private message
vivekpant

New User


Joined: 17 Feb 2009
Posts: 5
Location: Mumbai

PostPosted: Wed Mar 25, 2009 7:33 am
Reply with quote

Yeah, that is one of the methods which i am trying to use. but in the long run it would require that i change all my existing programs (more than 1000) to implement this.. icon_smile.gif
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Wed Mar 25, 2009 7:52 am
Reply with quote

Hello,

Yup, 1000 or so would be a pain. I was thinking of working on one problem situation - not something generic icon_smile.gif

If this is something you need to do with any regularity, look for info on how to find the dcb for that file in the dump and from there to the specific record. There should be info in the compile to get you started.
Back to top
View user's profile Send private message
vivekpant

New User


Joined: 17 Feb 2009
Posts: 5
Location: Mumbai

PostPosted: Wed Mar 25, 2009 10:05 am
Reply with quote

It was much easier in the 2.3 compiler. If i get something i will post it here, by chance if you get it earlier than i do... please post it too.. icon_smile.gif
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> PL/I & Assembler

 


Similar Topics
Topic Forum Replies
No new posts How to split large record length file... DFSORT/ICETOOL 10
No new posts Error to read log with rexx CLIST & REXX 11
No new posts SFTP Issue - destination file record ... All Other Mainframe Topics 2
No new posts FINDREP - Only first record from give... DFSORT/ICETOOL 3
No new posts To find whether record count are true... DFSORT/ICETOOL 6
Search our Forums:

Back to Top