How to write to a PS File in CLIST.

sivakumar cv · New User Joined: 18 Sep 2007 Posts: 4 Location: US

Hi all,

I am trying to write to a PS from CLIST.

I am using
GLOBAL

CONTROL END(ENDO) MSG CON SYM LIST PROMPT NOFLUSH

I am getting the following error:

IKJ56247I DATA SET <dataset name> NOT FREED, IS NOT ALLOCATED
How to go about it.

Regards.

superk · Posted: Thu Sep 27, 2007 7:09 pm

Chapter 9. Performing File I/O from the z/OS V1R7.0 TSO/E CLISTs manual.

sivakumar cv · New User Joined: 18 Sep 2007 Posts: 4 Location: US

I had been refering to it.

I am using this

"GLOBAL

CONTROL END(ENDO) NOMSG NOCON NOSYM NOLIST PROMPT FLUSH"

want to know if there is any mistake in the above code?

expat · Posted: Thu Sep 27, 2007 10:09 pm

Have you looked in the messages and codes book for IKJ56247I

sivakumar cv · New User Joined: 18 Sep 2007 Posts: 4 Location: US

Hi All,

Thanks. I was able to resolve the issue.

For your reference we can use this code to write into a file picking the jcl from skeleton.

ALLOC FI(ISPFILE) DA('<dataset name>') SHR
ISPEXEC FTOPEN
ISPEXEC FTINCL TABAUTH
ISPEXEC FTCLOSE LIBRARY(ISPFILE)
FREE FI(ISPFILE)

I found this to be the easiest way. One can avoid programming too.

Thanks.