Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
IN-STREAM DATA NOT ALLOWED IN PROC

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL
Author Message
apsar.kogatam

New User


Joined: 27 Jun 2008
Posts: 35
Location: CHENNAI

PostPosted: Tue Feb 02, 2010 5:59 pm    Post subject: IN-STREAM DATA NOT ALLOWED IN PROC
Reply with quote

Hi Team,

I have coded a Jcl to execute the proc.When i try to execute the Jcl the below errors listed.Please let me know how to execute the below proc with in a Jcl.

IN-STREAM DATA NOT ALLOWED IN PROC
INCORRECT JCL STATEMENT IN PROCEDURE

Jcl:
//jobcard
// JCLLIB ORDER=(TEST.PROD.PROCLIB)
//DELSTP EXEC JS010

proc:
//JS010 PROC
//STEP1 EXEC PGM=IKJEFT01,
// DYNAMNBR=20
//SYSTSIN DD *
DSN SYSTEM(DB2T)
RUN PROGRAM(DSNTIAUL) -
PLAN(DSNTIAUL) -
PARMS('SQL')
/*
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSPUNCH DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//*
//SYSIN DD DSN=TEST.JETSTBL.DQUERY,DISP=SHR
Back to top
View user's profile Send private message
References
Ajay Baghel

Active User


Joined: 25 Apr 2007
Posts: 181
Location: Bangalore

PostPosted: Tue Feb 02, 2010 6:03 pm    Post subject:
Reply with quote

put the below in a pds member and use that instead in the PROC.
DSN SYSTEM(DB2T)
RUN PROGRAM(DSNTIAUL) -
PLAN(DSNTIAUL) -
PARMS('SQL')
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 4259
Location: Atlanta, GA

PostPosted: Tue Feb 02, 2010 6:10 pm    Post subject:
Reply with quote

Code:
Jcl:
//jobcard
// JCLLIB ORDER=(TEST.PROD.PROCLIB)
//DELSTP EXEC JS010
//SYSTSIN DD *
DSN SYSTEM(DB2T)
RUN PROGRAM(DSNTIAUL) -
PLAN(DSNTIAUL) -
PARMS('SQL')
/*

proc:
//JS010 PROC
//STEP1 EXEC PGM=IKJEFT01,
// DYNAMNBR=20
//SYSTSIN DD DUMMY
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSPUNCH DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//*
//SYSIN DD DSN=TEST.JETSTBL.DQUERY,DISP=SHR
Back to top
View user's profile Send private message
apsar.kogatam

New User


Joined: 27 Jun 2008
Posts: 35
Location: CHENNAI

PostPosted: Wed Feb 03, 2010 3:14 pm    Post subject:
Reply with quote

thankyou Robert and Ajay
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL All times are GMT + 6 Hours
Page 1 of 1