SUBJECT:         APAR  NUMBER: PK09343
 
REFERENCE:  AREA:     TPFDF CENTRAL DATABASE ROUTINES
            SEGMENT:  DBDEF13    - RELEASE:  TPFDF (Macro)
            SEGMENT:  UWBP13     - RELEASE:  TPFDF (Assembler)
 
 
Pre-requisite APARs are (TPF only) :
FOR SEGMENT DBDEF13    (Macro)     - REL TPFDF
      PN05393 PN35104 PN38092 PN45919 PN53446 PN57526 PN61834
      PN62563 PN64313 PN71161 PN73989 PN78104 PN78908 PN87893
      PN88662 PQ10797 PQ10084 PQ18690 PQ23091 PQ32209 PQ37827
 PQ42097  PQ32210  PQ56724  PQ66921  PQ51955  PQ81077  PQ82656  
 PQ94935  PQ95818  PQ80726  
FOR SEGMENT UWBP13     (Assembler) - REL TPFDF
 PQ46459  PK03608  
To be applied in the order listed for each segment.
 

ABSTRACT OF PROBLEM
___________________
Using   CRUISE  to  fallback  index  LRECs  during  TPFDF  FARF6
migration may result in  corrupted  index  LRECs.    Also,  when
setting  F6FBK=YES  in  the DBDEF with no other FARF6 parameters
set to yes, SW00OP5 is not set.
 

COMMENTS ON PROBLEM
___________________
 
1.  As part of migrating a TPFDF database to  use  FARF6,  index
    LRECs  can  be  converted  to use 8-byte file addresses.  If
    some of the index LRECs do not have the same size as defined
    in the DBDEF (SW02IRL)  before  the  conversion,  and  if  a
    CRUISE  operation is performed to fallback the layout of the
    index LRECs, then these LRECs  will  be  corrupt  after  the
    fallback.    The fallback conversion only takes into account
    the size defined in DBDEF (SW02IRL) and rebuilds  the  index
    LRECs  according to that size. As a result, the file address
    is corrupt and the item size is  not  the  same  as  it  was
    before the conversion.
 
2.  The  DBDEF  macro  checks if any of the FARF6 parameters are
    set to YES.  But the check for F6FBK is incorrectly omitted.
    So if F6FBK is the only FARF6 parameter that is set to  YES,
    the  routine  that will set the FARF6 fallback bit is incor-
    rectly skipped.
 

SOLUTION
________
 
1.  The conversion code in segment UWBP  has  been  adjusted  to
    work  with  the  item  size  in the LREC instead of the size
    defined in DBDEF (SW02IRL).   This allows index  LRECs  with
    different sizes in the same subfile to be fallen back during
    FARF6 migration.
 
2.  The  check for F6FBK is added to the list of FARF6 parameter
    checks in the DBDEF macro.  Now when F6FBK=YES is specified,
    the FARF6 fallback bit is correctly set.
 

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
========================
Any DBDEF segments that have FARF6 migration parameter F6FBK=YES
explicitly specified should be reassembled and reloaded and ZUDFM
DEF INIT must be entered.
 
-- END APAR PK09343