Copy TSQ in flat file in TSO batch.

milind suman · New User Joined: 19 Aug 2009 Posts: 55 Location: Pune

Hello ,

I want to copy the TSQ data in a flat file , How can i do this in batch in TSO region .

Thanks.

Robert Sample · Posted: Fri Dec 09, 2011 7:33 pm

When you say "TSQ", are you talking about a Temporary Storage Queue in a CICS region?

dbzTHEdinosauer · Posted: Fri Dec 09, 2011 7:37 pm

strickly speaking,
i would say that batch and tso region are mutually exclusive.

in other words, you can not do something in a tso region via batch.

milind suman · New User Joined: 19 Aug 2009 Posts: 55 Location: Pune

yes I mean Temporary storage Que in CICS , is there any way to copy the TSQ data in tso without doing anything in cics ?

Garry Carroll · Posted: Fri Dec 09, 2011 8:18 pm

Since Temporary Storage is, by definition, temporary - why on earth would you want to do this? DFHTEMP is intended for internal use in the CICS environment and should not be interfered with in the manner suggested.

Garry.

Bill O'Boyle · Posted: Fri Dec 09, 2011 8:25 pm

Without a 3rd-Party product (and even that may not do the trick), there isn't an easy way to do this and at the very least (without a 3rd-Party product), would require an EXCI/ECI DPL interface to the target CICS region.

I'm thinking a REXX exec could be launched from ISPF screen 6 or native TSO and CALL an EXCI/DPL Client program, which would then link to the target region's Server program.

Or, this could also be accomplished directly from Batch, using a Client/DPL program linking to a Server program in the target region (same concept as outlined from ISPF/TSO).

But, these are just general ideas and would require significant tweaking and consideration.

HTH....

Mr. Bill

Garry Carroll · Posted: Fri Dec 09, 2011 8:43 pm

Robert Sample · Posted: Fri Dec 09, 2011 8:54 pm

milind suman · New User Joined: 19 Aug 2009 Posts: 55 Location: Pune

Thanks everybody for the reply . saved a lot of time in wasting time to search for something like this.
ok , so going conventionally I need to define a a file in FCT and new program in relevant table to read a tsq in CICS program or there could be a better time saver option .

Bill O'Boyle · Posted: Fri Dec 09, 2011 9:23 pm

If you use the EXCI/DPL method, you could "stack" the TSQ records in the commarea, passed from the EXCI program and subsequently addressed by the Server program.

When the Server program returns control to the Client (EXCI) program, then you can "pop" all these records from the commarea and write them to a QSAM file, no FCT entry required.

Note: IBM's recommended maximum commarea-length for EXCI/DPL is 32500.

Mr. Bill

dbzTHEdinosauer · Posted: Fri Dec 09, 2011 9:38 pm

have not used it myself,
but there are "rexx panels" and rexx scripts available in cics.

would not be supprised if there is a easy way to script a "que drainer".

dbzTHEdinosauer · Posted: Fri Dec 09, 2011 9:50 pm

here are some links:

www.mainframezone.com/cics-websphere/rexx-for-cics/P1

nersp.nerdc.ufl.edu/~sfware/share107/s8335sfw.pdf

www-01.ibm.com/software/htp/cics/products/rexx/

publib.boulder.ibm.com/infocenter/cicsts/v2r3/index.jsp?topic=/com.ibm.cics.ts23.doc/dfha1/dfha1mi.htm

can't get a price on it though, and you know that it will cost.
but, before you start buying 3rd party software,
maybe interesting to create your own cics 'utilities' with rexx.

Earl Haigh · Active User Joined: 25 Jul 2006 Posts: 475

3rd part product BatchCICS-Connect (www.batchcics.com) provides ability to read and/or write TSQ's from batch.