IBM Support

OA57412: ABEND S0C4 AT +464 IN ROUTINE CKRPTR.CKRPRTL WITH A DEFTYPE LOOKUP IN A SUMMARY STATEMENT

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • Abend PSW 078D2001 8E19D3B4 00060004 00000480 (AMODE 64 primary
    problem state key 8)
    system abend 0C4-04 (protection exception) Abend at 8E19D3B4 (at
    offset 000464 in routine CKRPRTR.CKRPRTL)
    
    Abend S0C4-04 in routine CKRPTR.CKRPRTL when using a
    DEFTYPE lookup in a summary statement
    
    n type=compliance name=check header=no name=LSTTESTS required,
      prefixlen=0 prefixsep=' ',
      tt='C O M P L I A N C E   T E S T   R E S U L T S   complex '
    
     exclude ifdefined(COMPLIANCE_EXCLUDE)
    
     define flg_compliant min(test_compliant)
     define flg_noncomply boolean where test_noncompliant=yes,
                                         not(rule_exempt=yes)
     define flg_undecided boolean where,
            not(test_compliant or test_noncompliant or,
                test_assert_as='compliant'c or,
                test_assert_as='noncompliant'c or,
            rule_exempt or rule_set_not_applicable)
     define flg_base boolean where test_base_field<>' '
     define flg_object('object',6,hb) boolean where exists(class)
     define highprio('Pri',2,dec$blank,bw) max(auditpriority)
     define flg_result_no("Didn't find",hb) boolean where
    test_result=no
     define once(0 hb ' ' noretain) TRUE
    
     define once_no_assert(0 hb ' ' noretain) TRUE where
    not(test_assert)
     define flg_asserted('Asserted as',hb,11,cond) true where,
            test_assert and exists(test_assert_as)
     define flg_same_ovr('Also set',8,hb,cond) true where,
            exists(test_assert_recorder) and,
            not(test_assert) and not(test_override)
    sortlist flg_noncomply(nd,bw) | flg_undecided(nd,bw) |,
       '  ',
       flg_noncomply(hb,'Non-Compliant ',0) |,
       flg_undecided(hb,'Undecided ',0) |,
       rule_set_not_applicable(hb,'rule set N/A ',0) |,
       test_compliant(hb,'Compliant ',0) |,
       once('test ') | test(0) | once | test_desc(0,ww),
     / '  ' test_result(hb,'Found',0) | flg_result_no(0),
       | once | test_type(0) | once(' value: '),
       | test_newlist_type(0) | once('.') |,
       test_field(0) | test_reloper(0) |,
       test_compliant_value(0,ww),
     / '  '(ne) once_no_assert('Actual value: '),
       | test_field_value(0,ww,hor),
     / flg_base(ne,hb,'   for',0),
       test_base_field(0) test_field_base_value(0,wrap),
     / '  '(ne) test_override(12,hb,'Overridden as',cond),
         flg_same_ovr flg_asserted test_assert_as(cond,0),
         test_assert_recorder('by',p,cond),
         test_assert_by('for',p,cond,0),
         test_assert_comment('because',p,cond,ww,0),
     / suppress(ne,hb,'       suppressed') suppress_reason(ww,0),
     /
     summary complex(page,tt) ver(page,tt),
             'standard'(page,tt) standard(page,tt,16),
             rule_set_sortkey(nd,page),
             (_newlist_narrow=0 ? 'unload'(page,tt) ),
             :system.unload_datetime(page,tt,18),
             'Rule set'(page,t) rule_set(page,t,13),
             rule_set_caption(page,t,25),
             'system'(page,t) system(page,t),
             system:system.system.sysname(page,t),
             system:system.system.sysclone(page,t),
             (_newlist_narrow=0 ? '   CKFREEZE collected at'(page,t)
    ),
             system:system.system.collect_datetime(page,t,18) |,
             rule_set_desc(0,ww) *,
      /      highprio(0,noprop) |,
             flg_noncomply(nd,noprop) |,
             flg_noncomply(hb,' Non-Compliant ',0,noprop) |,
             flg_undecided(hb,' Undecided ',0,noprop) |,
             flg_compliant(hb,' Compliant ',0,noprop) |,
             rule_set_not_applicable(hb,' N/A ',0) |,
             rule_exempt(hb,' Exempt ',0) |,
             flg_object(noprop) :class(nd) :profile(nd),
             system(0) proftype(0) volser_key(0) class(0)
    :profile(0),
             resource(0,wrap) /
    

Local fix

  • N/A
    

Problem summary

  • ****************************************************************
    * USERS AFFECTED: Users of zSecure Admin/Audit exploiting the  *
    *                 TOPTILE (TT) output field modifier applied   *
    *                 to lookups in the SUMMARY CARLa statements.  *
    ****************************************************************
    * PROBLEM DESCRIPTION: zSecure Admin/Audit might ABEND0C4      *
    *                      while processing CARLa SUMMARY          *
    *                      statement containing lookups with a     *
    *                      TOPTILE output field modifier.          *
    ****************************************************************
    * RECOMMENDATION: Apply the PTF provided and review the        *
    *                 documentation update.                        *
    ****************************************************************
    When a lookup specification with a TITLLE/TOPTITLE output field
    modifier is present in the SUMMARY field list, the zSecure
    Admin/Audit might ABEND0C4.
    

Problem conclusion

  • zSecure Admin/Audit has been modified so that it correctly
    processes the lookups with TITLE/TOPTITLE output field format
    modifiers in the SUMMARY statement. Please note the
    documentation updates as provided by the APAR tracking comment
    data.
    

Temporary fix

Comments

APAR Information

  • APAR number

    OA57412

  • Reported component name

    AUDIT-R,A,T ACF

  • Reported component ID

    5655T0200

  • Reported release

    230

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2019-05-01

  • Closed date

    2019-11-22

  • Last modified date

    2019-11-30

  • APAR is sysrouted FROM one or more of the following:

  • APAR is sysrouted TO one or more of the following:

    UJ01416 UJ01417 UJ01418

Modules/Macros

  • CKRINSU  CKROUNIT CKRPRTR  GKRINSU  GKROUNIT GKRPRTR
    

Fix information

  • Fixed component name

    ZSEC BASE,ADMIN

  • Fixed component ID

    5655T0100

Applicable component levels

  • R230 PSY UJ01416

       UP19/11/28 P F911

  • R231 PSY UJ01417

       UP19/11/28 P F911

  • R240 PSY UJ01418

       UP19/11/28 P F911

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":"BU048","label":"IBM Software"}, "Product":{"code":"SSCE68R","label":"zSecure Admin"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"230","Edition":""}]

Document Information

Modified date:
30 November 2019