JavaScript not Active

This page uses JavaScript. You must activate JavaScript in your browser to be sure youare able to view all of the information.

SUBJECT:         APAR  NUMBER: PJ28092
 
REFERENCE:  AREA:     RECOUP
            SEGMENT:  BCC240     - RELEASE:  TPF4  (Assembler)
            SEGMENT:  BRFM40     - RELEASE:  TPF4  (Assembler)
            SEGMENT:  BWRT40     - RELEASE:  TPF4  (Assembler)
 
 
Pre-requisite APARs are:
FOR SEGMENT BCC240     (Assembler) - REL TPF4
 PJ23893  PJ24672  PJ25098  PJ25182  
 PJ25207  PJ27469  PJ27874  
FOR SEGMENT BRFM40     (Assembler) - REL TPF4
 PJ24409  PJ27469  PJ27606  PJ27804  
FOR SEGMENT BWRT40     (Assembler) - REL TPF4
 PJ21224  PJ25514  PJ25629  PJ27469  PJ27804  
To be applied in the order listed for each segment.

ABSTRACT OF PROBLEM
___________________
An  OPR-I041122  dump occurs on BCC2 with descriptor BKDA.  BWRT
has a logic problem to count the TPFCS records.
 

COMMENTS ON PROBLEM
___________________
In BRFM, CE1CC0 sets up as x'0FFF' for maximum block  size,  and
BCC2  loads  CE1CC0 into R7 to compare the block size. BKDA is a
descriptor using core global records and its size can be  bigger
than  X'0FFF',  with  an OPR-I041122 dump from BCC2 as a result.
When  RCP-ALL  is  used  as  the  recoup  profile  option,  BWRT
increases  the  input  pointer  twice for TPFCS records, and the
count for the TPFCS records is displayed incorrectly.
 

SOLUTION
________
In BRFM, if it is global record, CE1CC0 resets to X'0000'.    In
BCC2,  if  CE1CC0  is  zero,  checking  for  the  block  size is
bypassed.  In BWRT, the increment of the input pointer in R6  is
skipped  if  reloading  count  register  R5. The count for TPFCS
records will be displayed correctly.
 
DEPENDENCIES
____________
 
Related Segments Affected By This APAR.
_______________________________________
 
Segments to be assembled or compiled:
- None.
 
Segments to be link-edited:
- None.
 
Load Modules to be loaded:
- None.
 
Migration Considerations
========================
- None.
 
-- END APAR PJ28092
 
 
 



Download file(s):

Login once to access server, leave window open, then
click on link(s) below.
Source