Author |
Message
|
KathyB |
Posted: Thu Nov 29, 2007 10:35 am Post subject: copying a dataset created by the csqutil utility program |
|
|
Apprentice
Joined: 02 Feb 2004 Posts: 30
|
Do you know if there iis a way to copy a dataset that was created by the copy function of the csqutil utility program into another dataset?
I have been unsuccessful with the iebgener utility as the records are larger that what is allow and I get an iec141I 013-5c returned. |
|
Back to top |
|
 |
bruce2359 |
Posted: Thu Nov 29, 2007 12:47 pm Post subject: |
|
|
Guest
|
Quote: |
a dataset that was created by the copy function of the csqutil utility |
What dataset? What lrecl, blksize? Did you research the iec141I 013-5c message? |
|
Back to top |
|
 |
Vitor |
Posted: Thu Nov 29, 2007 1:08 pm Post subject: Re: copying a dataset created by the csqutil utility program |
|
|
 Grand High Poobah
Joined: 11 Nov 2005 Posts: 26093 Location: Texas, USA
|
KathyB wrote: |
Do you know if there iis a way to copy a dataset that was created by the copy function of the csqutil utility program into another dataset? |
Any of the standard m/f toolset will do it. This is a question about mainframe files, not MQ per se. _________________ Honesty is the best policy.
Insanity is the best defence. |
|
Back to top |
|
 |
KathyB |
Posted: Mon Dec 03, 2007 4:48 am Post subject: |
|
|
Apprentice
Joined: 02 Feb 2004 Posts: 30
|
First of all let me respond to Bruce2359. It's obvious to me that you don't know either mainframes or MQSeries utilities. Sometimes I question why I waste my time asking questions on this site when I get smug responses like yours. Stick with something you know which is not this subject matter.
Vitor,
Thank you. I was suspicious that the dataset created by the CSQUTIL would not be usable. I was correct in my suspicions. In case Bruce2359 wishes to educate himself on this subject here is the reason: (thanks to IBM)
The CSQUTIL is forcing the LRECL of its output to 32768. MQ is happy
with this, but the output is unusable by z/OS Utilities and subsystems,
as the MAX allowed and supported LRECL in the z/OS environment is
limited to 32760.
DCR (Design Change Request) MR0121052455 was opened for another customer
and acknoledged by IBM. But there is no promise it gets changed.
So, to answer your questions, you cannot copy or process the CSQUTIL
output with a COBOL program. You can only use it with the CSQUTIL LOAD
function. |
|
Back to top |
|
 |
Vitor |
Posted: Mon Dec 03, 2007 5:58 am Post subject: |
|
|
 Grand High Poobah
Joined: 11 Nov 2005 Posts: 26093 Location: Texas, USA
|
KathyB wrote: |
The CSQUTIL is forcing the LRECL of its output to 32768. MQ is happy
with this, but the output is unusable by z/OS Utilities and subsystems,
as the MAX allowed and supported LRECL in the z/OS environment is
limited to 32760. |
Hence the need to reformat with your favourite utility. Last time I had occassion to do it I used SyncSort but there are a variety of choices and none especially better than the other. _________________ Honesty is the best policy.
Insanity is the best defence. |
|
Back to top |
|
 |
bruce2359 |
Posted: Mon Dec 03, 2007 7:11 am Post subject: |
|
|
Guest
|
Quote: |
when I get smug responses like yours |
Sorry. I hadn't intended to come off as smug. Many of the posts here seem to come from folks that havea problem, skip the research, and then post. That's whay I asked. Call me cynical. |
|
Back to top |
|
 |
jefflowrey |
Posted: Mon Dec 03, 2007 7:44 am Post subject: |
|
|
Grand Poobah
Joined: 16 Oct 2002 Posts: 19981
|
Also, please remember that smug can be in the eye of the reader, and not in the mind of the writer... _________________ I am *not* the model of the modern major general. |
|
Back to top |
|
 |
bruce2359 |
Posted: Mon Dec 03, 2007 12:28 pm Post subject: |
|
|
Guest
|
If your intent is to have a second copy of a CSQUTIL-generated dataset, then you could use DSS to copy the dataset. |
|
Back to top |
|
 |
cicsprog |
Posted: Mon Dec 03, 2007 2:27 pm Post subject: |
|
|
Partisan
Joined: 27 Jan 2002 Posts: 347
|
//ADRDSSU EXEC PGM=ADRDSSU
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
COPY -
DATASET(INCLUDE(MQSERIES.MQC2.QDATA)) -
RENAMEU((MQSERIES.MQC2.QDATA, -
MQSERIES.MQC2.QDATA2)) CATALOG
/* |
|
Back to top |
|
 |
|