John, Yep a dummy entry or placeholder until IMS is installed...
Scott ford www.identityforge.com from my IPAD > On Jan 4, 2014, at 11:51 AM, John McKown <[email protected]> wrote: > > I tend to cheat at this point. How? These modules are basically > "initialization" subroutines called by NIP. They are expected to "do > something" and return. What I do, until I get the product installed, is to > use IEBCOPY to copy the IEFBR14 module into my LPALIB and give it the name > of the module that is missing. Basically, this results in a "do nothing" > operation which is quite acceptable to NIP. > > //DOCOPY EXEC PGM=IEBCOPY > //SYSPRINT DD SYSOUT=* > //LPALIB DD DISP=SHR,DSN=SYS1.LPALIB OR OTHER LPA LIBRARY > //LINKLIB DD DISP=SHR,DSN=SYS1.LINKLIB > //SYSIN DD * > COPY I=LINKLIB,O=LPALIB > S M=((IEFBR14,DFSMRCL0)) > /* > //* > > I do it this way so that when I do get the LPA module installed, I don't > need to remember to reapply the ZAP to IGC0001C IEAVTRML to put the module > name back in. OK, I'm old and forgetful. > > > > On Sat, Jan 4, 2014 at 10:23 AM, venkat kulkarni <[email protected] >> wrote: > >> Hello, >> I applied USERMOD in my new z/OS 2.1 system and then ipled system >> but getting below issue. >> >> CSV003I REQUESTED MODULE DFSMRCL0 NOT FOUND >> >> IEA303W abend 806 REASON 0000004 during initialization under RIM IEAVNPA1 >> DFSMRCL0 Module NOT FOUND. >> >> >> and the usermod I applied was >> >> //SMPPTFIN DD DATA,DLM='%%' >> ++USERMOD(USRMOD01) REWORK(2013035) . >> ++VER(Z038) FMID(HBB7790) . >> ++SRC(IEAVTRML) DISTLIB(AOSC5) . >> IEAVTRML CSECT >> DC CL8'ERBMFRES' RMF >> DC F'0' >> DC CL8'MVPTTRML' TCP/IP >> DC F'0' >> DC CL8'DFSMRCL0' IMS >> DC F'0' >> DC F'0' >> DC F'0' >> DC F'0' >> END >> %% >> // >> >> As this is newly build system, so it doesn't have IMS yet. >> I can follow below link to remove DFSMRCL0 from IGC0001C but not sure, >> if its correct way of recovering from this issue. >> >> >> http://publib.boulder.ibm.com/infocenter/dzichelp/v2r2/index.jsp?topic=%2Fcom.ibm.ims11.doc.sag%2Fsystem_admin%2Fims_uninstall_dfsmrclo.htm >> >> Then I run AMASPZAP utility from the working system and pointed the >> downsystem LPALIB volume to dump the current contents of IEAVTRML as below >> //DMPVTRML JOB 'VENKAT',CLASS=A,MSGCLASS=A,NOTIFY=&SYSUID >> //STEP001 EXEC PGM=AMASPZAP >> //SYSLIB DD DSN=SYS1.LPALIB,DISP=SHR,VOL=SER=ZS11T1,UNIT=3390 >> //SYSPRINT DD SYSOUT=A >> //SYSIN DD * >> DUMP IGC0001C IEAVTRML >> /* >> >> and output is below . >> >> >> **CCHHR- 1DA9000D01 RECORD LENGTH- 000E68 MEMBER NAME IGC0001C >> CSECT NAME IEAVTRML >> 000000 C5D9C2D4 C6D9C5E2 00000000 D4E5D7E3 E3D9D4D3 00000000 >> C4C6E2D4 D9C3D3F0 >> 000020 00000000 00000000 00000000 00000000 >> AMA113I COMPLETED DUMP REQUIREMENTS >> >> AMA100I AMASPZAP PROCESSING COMPLETED >> >> I also tried setting up AMASPZAP utility to replace the entry containing >> DFSMRCL0 with zeros as below >> >> >> //DMPVTRML JOB 'VENKAT',CLASS=A,MSGCLASS=A,NOTIFY=&SYSUID >> //STEP001 EXEC PGM=AMASPZAP >> //SYSLIB DD DSN=SYS1.LPALIB,DISP=SHR,VOL=SER=ZS11T1,UNIT=3390 >> //SYSPRINT DD SYSOUT=A >> //SYSIN DD * >> NAME IGC0001C IEAVTRML >> VER 0000 C5D9C2D4C6D9C5E2 >> VER 000C D4E5D7E3E3D9D4D3 >> VER 0018 C4C6E2D4D9C3D3F0 >> REP 0000 D4E5D7E3E3D9D4D3 >> REP 000C C3C1D9F2D9E2C3F0 >> REP 0018 0000000000000000 >> /* >> >> But I feel this JCL is not fully correct, as I just used sample available >> in IBM manual, can body help me to resolve this issue. >> >> Also not able to find reason of IEA303W abend 806 REASON 0000004 during >> initialization under RIM IEAVNPA1 ---- This module available in >> SYS.NUCLEUS >> >> ---------------------------------------------------------------------- >> For IBM-MAIN subscribe / signoff / archive access instructions, >> send email to [email protected] with the message: INFO IBM-MAIN > > > > -- > This is clearly another case of too many mad scientists, and not enough > hunchbacks. > > Maranatha! <>< > John McKown > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
