********************************************************************** 00001000 * DB90S 5.4 PTF CZ104.024 February 2003 * 00002000 * * 00002100 * KEYWORDS : S0C1 DBEZCUP3 * 00002200 * * 00002300 * DESCRIPTION: DBEZCUP3 may abend S0C1 at offset 1118 * 00002400 * CZ104.009 and CZ104.019 are prerequistes for this * 00002600 * PTF * 00002700 * This problem only occurs if the lowest numbered * 00002803 * run unit with in a 'catchup cycle' has a journal * 00002903 * record with a sequence number that is decimal * 00003003 * 1,000,000 greater than a journal record for a higher * 00003103 * numbered run unit. * 00003203 * With this PTF the decimal 1,000,000 is changed * 00003300 * to X'10000000' * 00003400 * * 00003500 * * 00003600 * Tapes : DB90S C10402 CA-IDMS R15 * 00003700 * * 00003800 ********************************************************************** 00003900 * CZ104.019 * 00004000 ********************************************************************** 00004100 NAME COXAPTCH COXAPTCH 00004300 VER 01D4 000F,4240 * DC F'1000000' 00007001 REP 01D4 1000,0000 * DC X'10000000' 00007101 NAME COXAPTCH COXAZAPS 00097100 VER 0118 0000,0000,0000,0000 00097202 REP 0118 C3E9,F1F0,F4F0,F2F4 * CZ104.024 00097302