Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
How to read the Last Record Read in Enterprise PL/I

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler
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    Post subject: How to read the Last Record Read in Enterprise PL/I
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    Post subject:
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    Post subject: Reply to: How to read the Last Record Read in Enterprise PL/
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    Post subject:
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

Site Director


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

PostPosted: Tue Mar 24, 2009 8:34 pm    Post subject:
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    Post subject:
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

Site Director


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

PostPosted: Wed Mar 25, 2009 7:52 am    Post subject:
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    Post subject:
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    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts how to see when the last read access ... Mike 1304 DB2 1 Tue Sep 12, 2017 7:52 pm
No new posts Updating the Trailer count in variabl... satheshbabur DFSORT/ICETOOL 6 Wed Aug 30, 2017 9:49 pm
No new posts Repeat part of record multiple times Learncoholic DFSORT/ICETOOL 4 Tue Aug 29, 2017 11:33 am
No new posts Read two inputs and write into output... murali.andaluri DFSORT/ICETOOL 6 Wed Jul 26, 2017 7:35 pm
No new posts Need to write record of PS File in ex... Chandan1993 JCL & VSAM 1 Wed Jun 07, 2017 1:35 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us