A fix is available
APAR status
Closed as program error.
Error description
When //SYSPRINT DD DCB=BLKSIZE=121 is specified and LRECL=121 is not specified the assembler assumes LRECL=133 and an ABEND 013-20 results on OPEN of SYSPRINT. ABEND013-34 possible when SYSTERM DD allocated to DASD but no DCB parameters specified. Incorrect SYSLIB DSN information can occur in the Macro and Copy Cross Reference listing when a SYSLIB FILEDEF is allocated to several OS PDSs but the first is a non-existant dataset. It is also possible to get truncated displacements in the Active Usings heading.
Local fix
Either: 1) do not specify BLKSIZE= on the SYSPRINT dataset, or, 2) specify LRECL= with the same value as BLKSIZE= on the DD. 3) for SYSTERM DD to DASD, specify DCB=(RECFM=FB,LRECL=121) 4) for SYSLIB from CMS to multiple OS MACLIBs, make sure that all DSNs exist on the linked DASD.
Problem summary
**************************************************************** * USERS AFFECTED: Those who specify a blocksize, but no record * * length on the SYSPRINT dataset (MVS & CMS * * only). Those who direct SYSTERM to disk but * * do not specify DCB parameters for the file * * (MVS and CMS only). Users interested in * * details of the LISTING. * **************************************************************** * PROBLEM DESCRIPTION: If LRECL is not specified and BLKSIZE * * is set to anything other than 133 on * * SYSPRINT dataset, an ABENDS013-20 will * * occur when the assembler attempts to * * OPEN SYSPRINT. Similar problems can * * occur on SYSTERM, and are likely to * * occur if SYSTERM is directed to DASD * * rather than to SYSOUT. * * * * Also, the service level of the * * assembler is only printed on the last * * page. This is not helpful for * * assemblies that terminate. Also, the * * message "NO STATEMENTS FLAGGED ..." can * * be issued with a non-zero return code. * * This may confuse the reader unless it * * is realized that assembly options may * * have caused warnings. * * * * The file information for macro and copy * * code sources can be incorrect when a * * mix of CMS and MVS datasets are used on * * SYSLIB under CMS. * **************************************************************** * RECOMMENDATION: APPLY RECOMMENDED PTF * **************************************************************** The DCB OPEN exit for SYSPRINT sets a default value of 133 for LRECL if no LRECL is specified in the DCB information for the SYSPRINT dataset. This is fine if BLKSIZE is not specified. However, if the JCL has a BLKSIZE specification on the SYSPRINT dataset and it is not 133 (or a multiple of 133 if the file is blocked) then the OPEN is terminated with ABEND S013 reason code 20 (or an equivalent under CMS). This is because the LRECL and BLKSIZE are incompatible. Under MVS MSGIEC141I is also issued. Similar errors can occur on SYSTERM. There is a known problem in VM/CMS's handling of BPAM emulation on concatenated SYSLIB datasets where OS PDSs are involved. The service level (PTF) information is printed too late in some circumstances to be helpful. Option warnings are not noted in the "NO STATEMENTS FLAGGED IN THIS ASSEMBLY" message on SYSPRINT.
Problem conclusion
The DCB OPEN exit for SYSPRINT will be improved to ensure that BLKSIZE, LRECL and RECFM have reasonable values in the DCB open exits for SYSPRINT and SYSTERM (MVS and CMS only). VM APAR VM59591 can be applied if problems are found with the names of OS PDS datasets in the MACRO AND COPY CROSS REFERENCE portion of the listing. The service level (PTF) of the assembler will now be shown in the heading of the Options Summary as well as in its current location on the last page of the listing. The string "OPTION WARNING(S) WERE ISSUED" will appear after "... STATEMENTS FLAGGED IN THIS ASSEMBLY" in the listing if option warnings were issued in the option summary. CG8Y 100Y 300Y ASMA00 ASMA03 ASMA24 ASMA25 ASMA9Z
Temporary fix
Comments
APAR Information
APAR number
PN72039
Reported component name
HLASM MVS, VM &
Reported component ID
569623400
Reported release
100
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
1995-06-02
Closed date
1995-08-08
Last modified date
1995-12-16
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
PN73139 UN80581 UN80580 UN80582
Modules/Macros
ASMA00 ASMA03 ASMA24 ASMA25 ASMA9Z
Fix information
Fixed component name
HLASM MVS, VM &
Fixed component ID
569623400
Applicable component levels
RCG8 PSY UN80582
UP95/08/16 I 1000
R100 PSY UN80581
UP95/08/17 P F508
R300 PSY UN80580
UP95/08/16 I 1000
Fix is available
Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.
[{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG19M","label":"APARs - z\/OS environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"100","Edition":"","Line of Business":{"code":"","label":""}},{"Business Unit":{"code":"BU059","label":"IBM Software w\/o TPS"},"Product":{"code":"SSENW6","label":"High Level Assembler and Toolkit Feature"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"100","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
16 December 1995