IBM Support

PN72039: ABEND013-20 CAN OCCUR IN ASMA90 WHEN SYSPRINT BLKSIZE=121 USED. SIMILAR PROBLEMS CAN OCCUR ON SYSTERM. SYSLIB PROBLEM ON CMS.

A fix is available

Subscribe

You can track all active APARs for this component.

 

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