i am geting rc (-3) while running ISPF Services thru jcl

pradeepkit · New User Joined: 25 Jun 2008 Posts: 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

superk · Posted: Thu Oct 16, 2008 4:27 pm

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.

pradeepkit · New User Joined: 25 Jun 2008 Posts: 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

superk · Posted: Thu Oct 16, 2008 4:32 pm

Here are a few related topics:

www.ibmmainframes.com/viewtopic.php?t=32122
www.ibmmainframes.com/viewtopic.php?t=30366
www.ibmmainframes.com/viewtopic.php?t=29466
www.ibmmainframes.com/viewtopic.php?t=21925

pradeepkit · New User Joined: 25 Jun 2008 Posts: 60 Location: chennai

hi ,

could ypu please provide me the ispf lib to include

enrico-sorichetti · Posted: Thu Oct 16, 2008 6:19 pm

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/

expat · Posted: Thu Oct 16, 2008 9:05 pm

Or you could even type TSO ISRDDN on any screen and see for yourself the library concatenations required.

Pedro · Posted: Thu Oct 16, 2008 9:51 pm

pradeepkit · New User Joined: 25 Jun 2008 Posts: 60 Location: chennai

hi could ypu please provide me the jcl as my jcl is abending with 998

Pedro · Posted: Sun Oct 19, 2008 10:06 pm

Please show us the JCL that you are using.

pradeepkit · New User Joined: 25 Jun 2008 Posts: 60 Location: chennai

Hi ,

i am using this jcl

dick scherrer · Posted: Mon Oct 20, 2008 9:06 pm

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.

Pedro · Posted: Mon Oct 20, 2008 9:32 pm

Where does the %BCKP program reside?

Pedro · Posted: Tue Oct 21, 2008 12:45 am

what does the ISPF Messages and Codes say about 998?

pradeepkit · New User Joined: 25 Jun 2008 Posts: 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.

pradeepkit · New User Joined: 25 Jun 2008 Posts: 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 ........

enrico-sorichetti · Posted: Tue Oct 21, 2008 1:03 pm

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

pradeepkit · New User Joined: 25 Jun 2008 Posts: 60 Location: chennai

thanks a lot now it is working fine ....
thanks again