View previous topic :: View next topic
Author
Message
pradeepkit Warnings : 1 New User Joined: 25 Jun 2008Posts: 60 Location: chennai
Hi ,
I am making a backup tool .
when i am running the tool online it is working fine .
i want to run it by jcl in batch mode.
the job is completed but the inside the rexx is giving the rc -3 .
225 *-* "LMINIT DATAID(PDS) DATASET('"LIB"')"
>L> "LMINIT DATAID(PDS) DATASET('"
>V> "S00P.CHGMAND.WGMP.#002818.SRC"
>O> "LMINIT DATAID(PDS) DATASET('S00P.CHGMAND.WGMP.#002818.SRC
>L> "')"
>O> "LMINIT DATAID(PDS) DATASET('S00P.CHGMAND.WGMP.#002818.SRC
+++ RC(-3) +++
this pds is substituted by some id but here by jcl it is not .
can you help me to solve it .
thanks
pradeep
Back to top
superk Global Moderator Joined: 26 Apr 2004Posts: 4652 Location: Raleigh, NC, USA
Please post the JCL. My guess is that you've failed to provide the proper ISPF library allocations and haven't issued the ISPSTART command to start an ISPF address space within TSO.
Back to top
pradeepkit Warnings : 1 New User Joined: 25 Jun 2008Posts: 60 Location: chennai
//TSOBATCH EXEC PGM=IKJEFT1A,DYNAMNBR=200
//SYSEXEC DD DSN=USER.TEST.COMPARE.TOOL1,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//PKGLST DD DSN=USER.TEST.COMPARE.GNCPKG1,DISP=SHR
//PKGTYPE DD DSN=USER.TEST.COMPARE.PKGTYPE1,DISP=SHR
//RPTFILE DD DSN=USER.TEST.PRADEEP.RPT142,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(CYL,(100,100)),
// UNIT=TESTDA,
// DCB=(RECFM=FB,LRECL=150,BLKSIZE=1500)
//SYSTSIN DD *
PROFILE PREFIX(AB60399) /* PLEASE USE THIS,*/
/* SPECIFYING YOUR USERID*/
%BCKP
Back to top
superk Global Moderator Joined: 26 Apr 2004Posts: 4652 Location: Raleigh, NC, USA
Back to top
pradeepkit Warnings : 1 New User Joined: 25 Jun 2008Posts: 60 Location: chennai
hi ,
could ypu please provide me the ispf lib to include
Back to top
enrico-sorichetti Superior Member Joined: 14 Mar 2007Posts: 10886 Location: italy
google for ...
"doug nadel batch pdf" , download and install the "batch pdf" tool
its just an edit macro, so You should not have any problem in uploading iy to the MF
and move it to a library (SYSPROC/SYSEXEC) in Your ISPF logon proc
it will build a batch jcl to execute ISPF with the current interactive layout
here is the direct link
www.sillysot.com/mvs/
Back to top
expat Global Moderator Joined: 14 Mar 2007Posts: 8796 Location: Welsh Wales
Or you could even type TSO ISRDDN on any screen and see for yourself the library concatenations required.
Back to top
Pedro Global Moderator Joined: 01 Sep 2006Posts: 2593 Location: Silicon Valley
Quote:
I am making a backup tool
Why are you not using HSM to do the backup?
Back to top
pradeepkit Warnings : 1 New User Joined: 25 Jun 2008Posts: 60 Location: chennai
hi could ypu please provide me the jcl as my jcl is abending with 998
Back to top
Pedro Global Moderator Joined: 01 Sep 2006Posts: 2593 Location: Silicon Valley
Please show us the JCL that you are using.
Back to top
pradeepkit Warnings : 1 New User Joined: 25 Jun 2008Posts: 60 Location: chennai
Hi ,
i am using this jcl
Code:
//ISPFBACK EXEC PGM=IKJEFT01,DYNAMNBR=25,REGION=1024K
//*- - ALLOCATE PROFILE, PANELS, MSGS, PROCS, AND TABLES -*/
//ISPPROF DD DSN=AB60399.ISPF.PROFILE,DISP=(NEW,CATLG,DELETE),
// SPACE=(CYL,(10,10)),UNIT=TESTDA,
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
//ISPPLIB DD DSN=ISP.SISPPENU,DISP=SHR
//ISPMLIB DD DSN=ISP.SISPMENU,DISP=SHR
//ISPSLIB DD DSN=ISP.SISPSENU,DISP=SHR
// DD DSN=ISP.SISPSLIB,DISP=SHR
//ISPTLIB DD DSN=AB60399.ISPF.TABLES,DISP=(NEW,CATLG,DELETE),
// SPACE=(CYL,(10,10)),UNIT=TESTDA,
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
//*
//*- - ALLOCATE ISPF LOG DATA SET - - - - - - - - - - - -*/
//ISPLOG DD DSN=AB60399.ISPF.LOG,DISP=(NEW,CATLG,DELETE),
// SPACE=(CYL,(10,10)),UNIT=TESTDA,
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
//*
//*- - ALLOCATE DIALOG PROGRAM AND TSO COMMAND LIBRARIES -*/
//ISPLLIB DD DISP=SHR,DSN=USER.TEST.COMPARE.TOOL1
//SYSEXEC DD DSN=ISP.SISPEXEC,DISP=SHR
//SYSPROC DD DSN=ISP.SISPCLIB,DISP=SHR
//*
//*- - ALLOCATE TSO BACKGROUND OUTPUT AND INPUT DS - - - -*/
//PKGLST DD DSN=USER.TEST.COMPARE.GNCPKG1,DISP=SHR
//PKGTYPE DD DSN=USER.TEST.COMPARE.PKGTYPE1,DISP=SHR
//RPTFILE DD DSN=USER.TEST.PRADEEP.RPT155,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(CYL,(100,100)),
// UNIT=TESTDA,
// DCB=(RECFM=FB,LRECL=150,BLKSIZE=1500)
//SYSPRINT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
PROFILE PREFIX(AB60399) /* ESTABLISH PREFIX */
ISPSTART CMD(%BCKP) /* INVOKE CLIST DIALOG */
/*
i am getting the cc:998
Back to top
dick scherrer Moderator Emeritus Joined: 23 Nov 2006Posts: 19243 Location: Inside the Matrix
Hello,
Please post all of the diagnostic info from the problem execution.
It sounds like your job is being rejected before it is even started, but you need to post the info so we can determine. It is possible you have an unacceptable JOB statement (violates local standards).
When you post jcl, control statements, data, etc, you need to use the "Code" tag for readability - your jcl has been "Code"ed.
Back to top
Pedro Global Moderator Joined: 01 Sep 2006Posts: 2593 Location: Silicon Valley
Where does the %BCKP program reside?
Back to top
Pedro Global Moderator Joined: 01 Sep 2006Posts: 2593 Location: Silicon Valley
what does the ISPF Messages and Codes say about 998?
Back to top
pradeepkit Warnings : 1 New User Joined: 25 Jun 2008Posts: 60 Location: chennai
the program is in user.test.compare.tool1
ISPT015 BLDL/FIND error -/-ISPDTFRS received return code 8 from BLDL/FRS received return code 8 from BLDL/FIND.
Back to top
pradeepkit Warnings : 1 New User Joined: 25 Jun 2008Posts: 60 Location: chennai
Hi All,
i am using this jcl and getting maxcc= 00
//ISPFBACK EXEC PGM=IKJEFT01,DYNAMNBR=25,REGION=1024K
//*- - ALLOCATE PROFILE, PANELS, MSGS, PROCS, AND TABLES -*/
//ISPPROF DD DSN=AB60399.ISPF.ISPPROF,DISP=SHR
//ISPPLIB DD DSN=ISP.SISPPENU,DISP=SHR
//ISPMLIB DD DSN=ISP.SISPMENU,DISP=SHR
//ISPSLIB DD DSN=ISP.SISPSENU,DISP=SHR
// DD DSN=ISP.SISPSLIB,DISP=SHR
//ISPTLIB DD DSN=USER.ISP.TABLELIB,DISP=SHR
// DD DSN=WLP0.SYSC.ISRTLIB,DISP=SHR
// DD DSN=WLP1.ISP.SISPTENU,DISP=SHR
// DD DSN=SPPP.FILEAID.IMS.ISPTLIB,DISP=SHR
// DD DSN=ISP.SISPTENU,DISP=SHR
// DD DSN=WLP1.CAI.CAIISPT,DISP=SHR
// DD DSN=WLP1.ISRTLIB,DISP=SHR
// DD DSN=WLP1.OPSMVS.WLP1.OPSTLIB,DISP=SHR
// DD DSN=WLP1.OPSMVS.WLP1.COMMON.ISPTLIB,DISP=SHR
// DD DSN=EOY.SEOYTENU,DISP=SHR
// DD DSN=SYS1.SBPXTENU,DISP=SHR
//*
//*- - ALLOCATE ISPF LOG DATA SET - - - - - - - - - - - -*/
//ISPLOG DD DSN=AB60399.ISPF.LOG,DISP=SHR
//*
//*- - ALLOCATE DIALOG PROGRAM AND TSO COMMAND LIBRARIES -*/
//ISPLLIB DD DISP=SHR,DSN=USER.TEST.COMPARE.TOOL1
// DD DISP=SHR,DSN=WLP1.ISRLLIB
// DD DISP=SHR,DSN=USER.ISP.ISPLOAD
// DD DISP=SHR,DSN=SYS3.NDM.LINKLIB
//SYSEXEC DD DSN=ISP.SISPEXEC,DISP=SHR
//SYSPROC DD DSN=ISP.SISPCLIB,DISP=SHR
//*
//*- - ALLOCATE TSO BACKGROUND OUTPUT AND INPUT DS - - - -*/
//PKGLST DD DSN=USER.TEST.COMPARE.GNCPKG1,DISP=SHR
//PKGTYPE DD DSN=USER.TEST.COMPARE.PKGTYPE1,DISP=SHR
//RPTFILE DD DSN=USER.TEST.PRADEEP.RPT155,
// DISP=(OLD,CATLG,DELETE),
// SPACE=(CYL,(100,100)),
// UNIT=TESTDA,
// DCB=(RECFM=FB,LRECL=150,BLKSIZE=1500)
//SYSPRINT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
PROFILE PREFIX(AB60399) /* ESTABLISH PREFIX */
ISPSTART CMD(%BCKP) /* INVOKE CLIST DIALOG */
/*
but now i am getting these messages
ACF0C038 ACF2 LOGONID ATTRIBUTES HAVE REPLACED DEFAULT USER ATTRIBUTES
READY
PROFILE PREFIX(AB60399) /* ESTABLISH PREFIX */
READY
ISPSTART CMD(%BCKP) /* INVOKE CLIST DIALOG */
COMMAND BCKP NOT FOUND
AB60399.ISPF.LOG was preallocated (no free was done).
READY
END
can you please help me ........
Back to top
enrico-sorichetti Superior Member Joined: 14 Mar 2007Posts: 10886 Location: italy
if You are dealing with a clist/rexx the thing should reside in a
SYSPROc/SYSEXEC concatenation
ISPLLIB is a library containing load modules, not clist/rexx scripts
Back to top
pradeepkit Warnings : 1 New User Joined: 25 Jun 2008Posts: 60 Location: chennai
thanks a lot now it is working fine ....
thanks again
Back to top
Please enable JavaScript!