The REXX procedure CAZRXOEM in hlq.SCAZEXEC must be customized to provide access to third party repository products for source program mapping support. This requires detailed knowledge of the utility used to extract listings from the repository into a fixed block file with a 132 or 133 character record length. CAZRXOEM is invoked whenever a user specifies a repository of T for "Third party" on the Source Program Mapping panel, A01.
Edit the member CAZRXOEM in the hlq.SCAZEXEC and make the following changes:
QUEUE "CAZRXOEM"
QUEUE "CALL 'SYS1.LINKLIB(OEMUTIL)'"
with
the data set name of the library that contains the utility, and the
name of the utility to be run.QUEUE "INPUT SPACE(1) TRACKS"
QUEUE "ALLOC SYSUT1 DSN(@repository@) SHR REUSE"
QUEUE "ALLOC SYSUT2 DSN(@extract@)" ,
"NEW REUSE SPACE(10 10) TRACKS" ,
"RECFM(F B A) LRECL(133) BLKSIZE(13300) DSORG(PS)"
QUEUE "ALLOC SYSIN DSN(@parms@) OLD"
QUEUE "ALLOC SYSPRINT DSN(@sysprint@)" ,
"NEW REUSE SPACE(1 1) TRACKS" ,
"RECFM(F B A) LRECL(121) BLKSIZE(12100)"
Change only the
SPACE, RECFM, LRECL, and BLKSIZE parameters. The DSN will be filled
in from the input supplied by the user when requesting a listing.
[ Top of Page | Previous Page | Next Page | Contents | Index ]