CA 1 v14.0のUSER EXIT(TMSXITn or TMSXnnn)をSMP/Eで導⼊した際にGIM24001Eが発行されました。
この問題を解決する⽅法を教えてください。
GIM24001E ** ASSEMBLER PROCESSING FOR SYSMOD TMSXITA FAILED FOR MODULE TMSXITn IN THE CTAPSRC LIBRARY.
THE RETURN CODE (08) EXCEEDED THE ALLOWABLE VALUE. DATE yy.ddd - TIME hh:mm:ss.
Release:14.0
OS: z/OS
ソースコードの先頭⾏に以下のアセンブラのオプションステートメントを追加してください。
その後、再RECEIVE/再APPLYを実施してください。
*PROCESS OVERRIDE(USING(NOWARN))
なお『*PROCESS OVERRIDE(USING(NOWARN))』の含まれているサンプルコードは、prefix.CTAPSAMPライブラリー内の各メンバーにあります。
USER EXIT:TMSXITAを再RECEIVE/再APPLYのサンプルJCL
//SMPCNTL DD *
SET BDY(GLOBAL). /* DEFINE CA GLOBAL ZONE */
RECEIVE S([email protected])
SYSMODS.
SET BDY(CAIT0). /* DEFINE CA TARGET ZONE */
APPLY S([email protected]) REDO . <== REDOを指定
/*
//SMPPTFIN DD DATA,DLM='$$'
++USERMOD([email protected]) REWORK(nn) /*CA 1 CONTROL */ . <== REWORK(nn)を指定
++VER (Z038) FMID(CAL0E00) .
++ JCLIN.
//*---------------------------------------------------------------*
//* LINKEDIT FOR USEREXIT *
//*---------------------------------------------------------------*
//LNKMAIN EXEC PGM=IEWL,PARM='MAP,LIST,NCAL,XREF,RENT'
//SYSPRINT DD SYSOUT=A
//AAL0MOD0 DD DSN=CA1.V141.AAL0MOD0,DISP=SHR
//SYSLMOD DD DSN=CA1.V141.CTAPLINK,DISP=SHR
//SYSLIN DD *
ORDER TMSXITA
INCLUDE AAL0MOD0(TMSXITA)
ENTRY TMSXITA
NAME TMSXITA(R)
++SRC (TMSXITA) SYSLIB(CTAPSRC) DISTLIB(AAL0SRC) DISTMOD(AAL0MOD0).
*PROCESS OVERRIDE(USING(NOWARN)) <== 追加指定
TMSXITA TITLE 'CA-1 TAPE MANAGEMENT SYSTEM - MODULE (TMSXITA)'