I am having a problem in the registration of a CICS Cobol Program using option 3 "Registration - Register source listings". My listing Manager is PROTSYM.

Document ID : KB000018754
Last Modified Date : 14/02/2018
Show Technical Document Details

Description:

CA Mainframe Application Tuner is able to use listings of several formats in the Analysis of Monitors. One such format is a PROTSYM listing which can be COBOL, Assembler, or PL/1. Upon successful registration CA MAT is able to utilize the registered listing in functionality such as CODEVIEW.

Solution:

The client is having a problem in the registration of a CICS Cobol Program using option 3.

Registration - Register source listings.

After selecting option 3 they pressed Enter.

On the next screen the client typed in "C" for Cobol and PROTSYM for the Listing Manager and pressed Enter.

After entering "ADD", on next screen they typed "1" for Listing data set choice, the member name they wanted to register in the "Member name" field, and the PROTSYM listing dataset name in the "Listing Data Set" field and pressed Enter.

They received the following Error Message:

"Registration error - Check format of listing DSN and compile options".

The CICS Cobol program was compiled with SOURCE, LIST, NOOFFSET, and NONUMBER options using Cobol for z/OS. Also, there was no BATCHREG library manger option for PROTSYM.

The first thing CA asked the client to check for is to make sure that they were compiling with the post-processor value of LISTER=ALL.

The client discovered they were using LISTING=REF. After recompiling they were able to successfully register their COBOL CICS listing.

If you are not trying to register a PROTSYM listing, or you are and your post-processor value is ALL, then please open a new issue with CA Support.

If you are having an issue with a PROTSYM listing please use the following JCL to offload the member:


//UNLDPROT EXEC PGM=IN25UTIL,REGION=2048K
//STEPLIB  DD DISP=SHR,DSN=Intertest CAILIB
//MESSAGE  DD SYSOUT=*
//UNLOAD   DD DISP=(NEW,CATLG,DELETE),
//            DSN=user.unload.protsym,
//            UNIT=SYSDA,VOL=SER=volume,
//            SPACE=(TRK,(9,9),RLSE),
//            DCB=(RECFM=FB,LRECL=2042,BLKSIZE=20420)
//PROTSYM  DD DISP=SHR,DSN=CAI.PROTSYM
//CARDS    DD *
UNLOAD=program name
/*
//

After opening the issue, CA Support will contact you with FTP instructions. We will attempt to Register the listing and verify that we are getting the same listing error.