LIBRSCAN utility support for PDSE load libraries

Products

• Librarian

Issue/Introduction

Description:

As distributed, neither the LIBRSCAN load module nor the LIBRSCAN source module on the sample (formerly: User Contributed Routines; UCR) library CALJSAMP is capable to detect the last line of LISTPDS output from IEHLIST when executed against a PDSE load library, although all load library members were obviously processed correctly.

 

Environment

Release:
Component: C21E

Resolution

Solution:

Following changes are suggested to be made to LIBRSCAN, please modify
from:

READ06   CLI INPUTREC+0,X'F1'          HEADING LINE?                      
         BE  READ                      YES, GET NEXT                      
         CLI INPUTREC+11,X'40'         MEMBER NAME ON THIS LINE?          
         BE  READ                      NO, GET NEXT                       
         CLC INPUTREC+1(6),=C'OF THE'  LAST REPORT LINE?                  
         BE  FINISH                    FINISH UP                          
... 

to:

READ06   CLI INPUTREC+0,X'F1'          HEADING LINE?                      
         BE  READ                      YES, GET NEXT                      
         CLC INPUTREC+1(6),=C'OF THE'  LAST REPORT LINE?                  
         BE  FINISH                    FINISH UP                          
         CLC INPUTREC+36(6),=C'OF THE' LAST REPORT LINE?                  
         BE  FINISH                    FINISH UP                          
         CLI INPUTREC+11,X'40'         MEMBER NAME ON THIS LINE?          
         BE  READ                      NO, GET NEXT                       
...

Before making these changes to LIBRSCAN, you have to assemble and link the following modules also distributed on the CALJSAMP data set: LIBALLOC,
LIBRFREE and READTIOT.

A JCL sample to assemble and link modules distributed on the CALJSAMP data set is also available from that data set, member name is INSTUCR.
INSTUCR must just be reworked conforming to your environment.
INSTUCR then can also be used to assemble and link the modified LIBRSCAN version.