// JOB RA38010 SPRI 3.8.10 APAR RA38010 * SPRI 3.8.10, Issued by GSS on April 03, 2002 * Revised April 05, 2002 * Status=TESTED Type=REQUIRED * ------------------------------------------------------------------- * Problem: Correct processing of records being truncated * Correct processing of records being truncated by printer tasks. Without APAR * in SPRIBLK1+848 if a record is truncated. * ------------------------------------------------------------------- * Conditions for applying APAR: * The phases affected by this APAR normally are loaded resident * in the processing region during activation. This allows the * APAR to be applied at any time, however its effect will not be * experienced until the product is reactivated. // PAUSE *** Enter CANCEL to bypass APAR. Press ENTER to apply. // LIBDEF CL,TO=IJSYSRS,FROM=IJSYSRS (target lib) MVT/VSE systems only. // DEFINE GETVIS=200K MVT/VSE systems only. // EXEC MSHP,SIZE=900K CORRECT 1975-38-SPR:RA38010 /* 1975-SPR-01-038:RA38010 for VSE/SP */ AFFECTS PHASE=SPRISS$A ALTER 36 0A:FF AFFECTS PHASE=SPRIBLKI ALTER 1E4 58807004 : 47F03ACE ALTER 216 47D0342C : 47F03ABE ALTER 244 184218A0 : 47F03A9A ALTER 270 184218A0 : 47F03AA6 ALTER 2A2 48F08000 : 47F03AB2 ALTER A9A 3A9A3A9C : 96107014 ALTER A9E 3A9E3AA0 : 184218A0 ALTER AA2 3AA23AA4 : 47F03248 ALTER AA6 3AA63AA8 : 96107014 ALTER AAA 3AAA3AAC : 184218A0 ALTER AAE 3AAE3AB0 : 47F03274 ALTER AB2 3AB23AB4 : 48F08000 ALTER AB6 3AB63AB8 : 96107014 /* REC TRUNC */ ALTER ABA 3ABA3ABC : 47F032A6 ALTER ABE 3ABE3AC0 : 4720321A ALTER AC2 3AC23AC4 : 91107014 /* TRUNCATED? */ ALTER AC6 3AC63AC8 : 47103408 /* YES REC COMP */ ALTER ACA 3ACA3ACC : 47F0342C ALTER ACE 3ACE3AD0 : 94EF7014 ALTER AD2 3AD23AD4 : 58807004 ALTER AD6 3AD63AD8 : 47F031E8 AFFECTS PHASE=SPRIBLK1 ALTER 6F4 58807004 : 47F03C8E ALTER 846 000210D7 : 47F03CC2 ALTER 84E 4710385A : 47F03CA6 ALTER 8E2 47F0502C : 47F03CBA ALTER C8E 3C8E3C90 : 58807004 ALTER C92 3C923C94 : 91107014 /* TRUNCATED? */ ALTER C96 3C963C98 : 478036F8 ALTER C9A 3C9A3C9C : 9640B08D /* SET QAB */ ALTER C9E 3C9E3CA0 : 94EF7014 /* RESET */ ALTER CA2 3CA23CA4 : 47F036F8 ALTER CA6 3CA63CA8 : 4710385A ALTER CAA 3CAA3CAC : 9140B08D /* TRUNCATED? */ ALTER CAE 3CAE3CB0 : 47803852 ALTER CB2 3CB23CB4 : 9610B083 /* SKIP TO START */ ALTER CB6 3CB63CB8 : 47F0385A /* RECORD COMPL */ ALTER CBA 3CBA3CBC : 94BFB08D /* RESET TRUNC */ ALTER CBE 3CBE3CC0 : 47F0502C ALTER CC2 3CC23CC43CC6 : D503B0FC57F9 ALTER CC8 3CC83CCA : 47703CD0 ALTER CCC 3CCC3CCE : 000210D7 ALTER CD0 3CD03CD2 : 9640B08D ALTER CD4 3CD43CD6 : 47F0384A /* /&