MVSFORUMS.com

Sridhar Reddy · Beginner Joined: 17 Feb 2003 Posts: 6 Topics: 3

I am using Spool Commands for submitting JCl from CICS program, But I am getting return code +80 (which means 'NoSpool'), While opening Spool Output. Can some one help me to resolve this problem.

SPOOL-OPEN-PARA.

EXEC CICS SPOOLOPEN OUTPUT
NODE(JCL-NODE)
CLASS(JCL-CLASS)
USERID(JCL-USERID)
TOKEN(JCL-TOKEN)
NOCC
PRINT
RESP(JCL-RESP)
RESP(JCL-RESP2)
END-EXEC.

Values I am using for this.

01 JCL-NODE PIC X(04) VALUE 'JES2'.
01 JCL-CLASS PIC X(03) VALUE 'C'.
01 JCL-USERID PIC X(06) VALUE 'INTRDR'.
01 JCL-TOKEN PIC X(08).
01 JCL-RESP PIC S9(8) COMP.
01 JCL-RESP2 PIC S9(8) COMP.
01 JCL-AREA PIC X(80) VALUE SPACES.
01 JCL-LENGTH PIC S9(08) COMP.

Dibakar · Posted: Fri Mar 07, 2003 8:27 am Post subject:

Does DFHSIT has anything to do with it?

Regards,
Diba

Sridhar Reddy · Beginner Joined: 17 Feb 2003 Posts: 6 Topics: 3

EIBRESP2 saying that 'No subsystem present' .

kolusu · Posted: Fri Mar 07, 2003 10:21 am Post subject:

Sridhar Reddy,

Confirm with your CICS system's personnel if the spool to CICS was defined.From your Error messages it is evident that it is not defined or must be named different.

Another possiblity is that do a search in the existing CICS programs with keyword "SPOOL" and try to clone that code.

Hope this helps...

cheers

kolusu