SUBJECT:         APAR  NUMBER: PK43079
 
REFERENCE:  AREA:     TPFDF CRUISE UTILITY
            SEGMENT:  UFI513     - RELEASE:  TPFDF (Assembler)
            SEGMENT:  UF1F13     - RELEASE:  TPFDF (Assembler)
 
 
Pre-requisite APARs are (TPF only) :
FOR SEGMENT UFI513     (Assembler) - REL TPFDF
 PQ23489  PQ23871  PQ33410  PQ36341  PQ53168  PQ65645  PQ51955  
 PQ74483  PQ75887  PQ78273  PQ82818  PQ81044  PQ90430  PQ86693  
 PQ94935  PQ96246  PK00917  PK14527  PK26312  PK33771  
FOR SEGMENT UF1F13     (Assembler) - REL TPFDF
 PQ23489  PQ23871  PQ36341  PQ50700  PQ54398  PQ57270  PQ86474  
 PK20320  
To be applied in the order listed for each segment.
 

ABSTRACT OF PROBLEM
___________________
As  a  result of APAR PQ94935, on a CRUISE RESTORE function, the
file address reference format 6 (FARF6) forward chains  are  not
restored.      As  a  result,  a  file  address  exchange  error
(FCRU0138E) occurs and will be written to the table log.

COMMENTS ON PROBLEM
___________________
 
1.  On CRUISE RESTORE, when the file address exchange is done in
    UFHD00, there is a check to see if the old file  address  is
    FARF6 format (8 byte).  This is indicated by a value of 8 in
    IRCIASZ  (in the old/new cross reference file), which is set
    up at capture time.   For regular file  address  references,
    this  is  done  correctly.   However, in the case of forward
    chains, the value of IRCIASZ is set  up  in  UFHE01.    This
    value comes from IDCAASZ8, which is never set up.
 
2.  In  DBDEF  segment  UF1F,  an unnecessary NOC=0 parameter is
    specified for the IRCKDF DBDEF.
 

SOLUTION
________
 
1.  In segment UFI5, a check has been added at capture  time  to
    see  whether  the forward chain processed is a FARF6 address
    (8 byte file address).  If so, the IDCAASZ8 value is set  to
    8.
 
2.  Segment  UFIF has been updated to remove the NOC=0 parameter
    from the IRCKDF DBDEF.
 

DEPENDENCIES
____________
 
Related Segments Affected By This APAR.
_______________________________________
 
Segments to be assembled or compiled:
 
Segments to be link edited:
 
Load Modules to be loaded:
 
Migration Considerations
========================
    None
 
-- END APAR PK43079
 
 
 

Click on Link(s) to Download File(s)



Download file(s):

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

ALCS Package
Package
Source