Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

RC -3 in the REXX code in the Batch mode
Goto page 1, 2  Next
 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
pradeepkit
Warnings : 1

New User


Joined: 25 Jun 2008
Posts: 60
Location: chennai

PostPosted: Sun Mar 22, 2009 6:20 pm    Post subject: RC -3 in the REXX code in the Batch mode
Reply with quote

Hi ,

I am getting RC-3 . while i am running the REXX code in the Batch mode .

Code:
  ADDRESS ISPEXEC                                     
    "VIEW DATASET('"RPT"') MACRO(JJC)"                 
      "VIEW DATASET('"                                 
      "AB60399.JCL.RPT.TEMP"                           
      "VIEW DATASET('AB60399.JCL.RPT.TEMP"             
      "') MACRO(JJC)"                                   
      "VIEW DATASET('AB60399.JCL.RPT.TEMP') MACRO(JJC)"
RC(-3) +++           

I have used almost all ISPF library in the JCL as i am using one macro in the program.

find the JCL .

Code:
//JOBNAMER JOB (00017),'REXX',CLASS=C,REGION=4500K,                 
//         MSGCLASS=Z,NOTIFY=&SYSUID,TIME=NOLIMIT                   
//***********************************************************       
//ISPFBACK EXEC PGM=IKJEFT01,DYNAMNBR=25,REGION=1024K               
//***********************************************************       
//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                       
//*                                                           
//ISPLOG   DD DSN=AB60399.ISPF.LOG,DISP=SHR                   
//*                                                           
//ISPLLIB  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                       
//         DD DISP=SHR,DSN=USER.TEST.JCLCHEK.TOOL             
//SYSPROC  DD DSN=ISP.SISPCLIB,DISP=SHR                       
//         DD DSN=USER.ISP.CLIST,DISP=SHR                     
//SYSTSPRT DD SYSOUT=*                                         
//SYSTSIN  DD *                                               
%JJCHECK3                                                     
//*                                                           
//*********************************************************** 
//STEP02   EXEC PGM=IEFBR14                                       
//***********************************************************     
//DD02     DD DSN=USER.TEST.JCLCHECK.REPORT,                     
//            DISP=(MOD,DELETE,DELETE),                           
//            UNIT=TESTDA,                                       
//            SPACE=(TRK,1)                                       
//*                                                               


can anyone help me why this error is coming.....

Edited: Please use BBcode when You post some code/error, that's rather readable, Thanks... Anuj
Back to top
View user's profile Send private message

superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Sun Mar 22, 2009 7:33 pm    Post subject: Reply to: RC -3 in the REXX code in the Batch mode
Reply with quote

I don't see an ISPSTART command in your job.
Back to top
View user's profile Send private message
pradeepkit
Warnings : 1

New User


Joined: 25 Jun 2008
Posts: 60
Location: chennai

PostPosted: Sun Mar 22, 2009 7:43 pm    Post subject:
Reply with quote

Thanks Kevin ,

I really forget to give theis ISPSTART .

But now I am getting this error

Code:
ACF0C038 ACF2 LOGONID ATTRIBUTES HAVE REPLACED DEFAULT USER ATTRIBUTES         
READY                                                                           
    PROFILE PREFIX(AB60399)        /* CHANGE WITH YOUR ID   */                 
READY                                                                           
  ISPSTART CMD(%JJCHECK3)  TEST.AB60399.JCLRPT.FILE.S25868 AB60399.PACKA       
  ISPT036 Table in use            -/-TBOPEN issued for table ISPSPROF that is in
READY                                                                           
END                                                                             

can you help me how to solve it....


Edited: Please use BBcode when You post some code/error, that's rather readable, Thanks... Anuj
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Mon Mar 23, 2009 1:45 am    Post subject:
Reply with quote

I think message ISPT036 is one of the most clearer messages...

O.
Back to top
View user's profile Send private message
pradeepkit
Warnings : 1

New User


Joined: 25 Jun 2008
Posts: 60
Location: chennai

PostPosted: Mon Mar 23, 2009 9:06 am    Post subject: Reply to: RC -3 in the REXX code in the Batch mode
Reply with quote

Thanks for ur reply ...

But how to solve it I dont know .....

It is showing contention but how to remove it ... can you help me out...
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Mon Mar 23, 2009 11:41 am    Post subject:
Reply with quote

Again, the message is pretty clear: For ISPPROF you are using your regular profile. Assuming you are running the job from your session, this profile is already opened.

The solution is to allocate a temporary dataset for the profile, something like this:
Code:
//ISPPROF  DD DISP=(,DELETE),UNIT=SYSDA,SPACE=(TRK,(5,5,10)),
//            DCB=(DSORG=PO,RECFM=FB,LRECL=80,BLKSIZE=3120) 


O.
Back to top
View user's profile Send private message
pradeepkit
Warnings : 1

New User


Joined: 25 Jun 2008
Posts: 60
Location: chennai

PostPosted: Mon Mar 23, 2009 12:30 pm    Post subject:
Reply with quote

Thanks for the solution .

can you please tell me how to pass parameter to the program as i am getting this error .

ACF0C038 ACF2 LOGONID ATTRIBUTES HAVE REPLACED DEFAULT USER ATTRIBUTES
READY
PROFILE PREFIX(AB60399)
READY
ISPSTART CMD(%JJCHECK3) TEST.AB60399.JCLRPT.FILE.S86308 AB60399.PACKAGE.JCFILILE.S86308
ISPD104 Invalid parameter given
'PGM(EZYIIF) PARM(UCMD(%JJCHECK3)) TEST.AB60399.JCLRPT.FILE.S86308' invalid
READY
END
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Mon Mar 23, 2009 12:34 pm    Post subject:
Reply with quote

The syntax for passing parameters to ISPSTART (with the PGM flavour) is well described in the fine manual.

O.
Back to top
View user's profile Send private message
pradeepkit
Warnings : 1

New User


Joined: 25 Jun 2008
Posts: 60
Location: chennai

PostPosted: Mon Mar 23, 2009 1:20 pm    Post subject:
Reply with quote

Thanks a lot ...
Back to top
View user's profile Send private message
pradeepkit
Warnings : 1

New User


Joined: 25 Jun 2008
Posts: 60
Location: chennai

PostPosted: Mon Mar 23, 2009 2:29 pm    Post subject:
Reply with quote

Hi can you help me to find that in which library can be this routine DSSIAPI as i am getting this error .

>O> "VIEW DATASET('AB60399.JCL.RPT.TEMP') MACRO(JJC)"
62 +++ retc = DSSIAPI("INITSESSION", session_id, "JJ")
Error running D0JEJJ, line 62: Routine not found
112 *-* "ISPEXEC VGET (RC1)"
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Mon Mar 23, 2009 2:32 pm    Post subject:
Reply with quote

DSSIAPI sounds like a local module. You should ask your peers/managers/support?

O.
Back to top
View user's profile Send private message
pradeepkit
Warnings : 1

New User


Joined: 25 Jun 2008
Posts: 60
Location: chennai

PostPosted: Mon Mar 23, 2009 2:44 pm    Post subject:
Reply with quote

This is not the local subroutine but it is a function call

DSSIAPI("") is a function call to PRO/JCL
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Mon Mar 23, 2009 2:52 pm    Post subject: Reply to: RC -3 in the REXX code in the Batch mode
Reply with quote

Quote:
This is not the local subroutine but it is a function call


on these forums local means something not provided by a standard z/OS installation

by standard is meant IBM products only
for which the documentation is available starting from
http://www-03.ibm.com/systems/z/os/zos/bkserv/index.html#other_pubs

so it does not make any difference from a documentation point of view that
the function is provided by purchased software or by an in house developed one

people outside Your organization do not have access to Your docs
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Sun Mar 29, 2009 2:13 pm    Post subject:
Reply with quote

Hello,

Have you asked your support people where the pro/jcl components are stored? If not, do so.

Are you permitted to run ISRDDN? If you are not familiar with isrddn, ask your support people.
Back to top
View user's profile Send private message
pradeepkit
Warnings : 1

New User


Joined: 25 Jun 2008
Posts: 60
Location: chennai

PostPosted: Sun Mar 29, 2009 2:57 pm    Post subject:
Reply with quote

Hi ,

Can this DSSIAPI work in the batch mode or not . as i am trying to run it in batch mode while in the online mode it is working fine no error is coming.......
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Sun Mar 29, 2009 3:06 pm    Post subject:
Reply with quote

Does your JCL reflect every single library that is shown in TSO ISRDDN
Back to top
View user's profile Send private message
pradeepkit
Warnings : 1

New User


Joined: 25 Jun 2008
Posts: 60
Location: chennai

PostPosted: Sun Mar 29, 2009 8:22 pm    Post subject:
Reply with quote

Thanks expat ,

I included all the library which were shown in the TSO ISRDDN

and i ran the job successfully .

But now i am getting this error.
SYS09088.T074542.RA000.AB60399R.R0273492 was preallocated (no free was done).

what does it mean and how i can solve it . Please let me know.....
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Sun Mar 29, 2009 10:49 pm    Post subject:
Reply with quote

What was the message code issued, and what did it say in the relevent messages and codes manual ?
Back to top
View user's profile Send private message
pradeepkit
Warnings : 1

New User


Joined: 25 Jun 2008
Posts: 60
Location: chennai

PostPosted: Mon Mar 30, 2009 9:26 am    Post subject: Reply to: RC -3 in the REXX code in the Batch mode
Reply with quote

Hi Expat ,

I am getting this information in the spool

ACF0C038 ACF2 LOGONID ATTRIBUTES HAVE REPLACED DEFAULT USER ATTRIBUTES
READY
PROFILE PREFIX(AB60399)
READY
ISPSTART CMD(%JJCHECK3 TEST.AB60399.JCLRPT.FILE.S31355 AB60399.PACKAGE.JCFILE.
SUCCESS AB60399.PACKAGE.JCFILE.S31355 )
GNSP000506

GNSP000506

SUCCESS OUTPUT TEST.AB60399.JCLRPT.FILE.S31355
SYS09088.T084238.RA000.AB60399R.R0112311 was preallocated (no free was done).
READY
\*
INVALID COMMAND NAME SYNTAX
READY
END

from where this error is generated I am not getting.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Mon Mar 30, 2009 2:19 pm    Post subject:
Reply with quote

Have you read the manual to find out about TRACE
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF All times are GMT + 6 Hours
Goto page 1, 2  Next
Page 1 of 2

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts PL/I code tuning/Performance improvement Virendra Shambharkar PL/I & Assembler 4 Mon Dec 05, 2016 11:57 am
No new posts What is the code in CLIST to enable t... jackzhang75 CLIST & REXX 1 Fri Dec 02, 2016 3:02 am
No new posts How does a called pgm know if its cal... Graeme Westerman COBOL Programming 4 Tue Nov 29, 2016 9:25 pm
No new posts IDEAL - Code Retrieval yugendran CA Products 0 Fri Nov 25, 2016 3:27 pm
No new posts What is the command to check MODE of ... rohanthengal CLIST & REXX 6 Fri Nov 18, 2016 1:48 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us