Re: MCDS Dataset Help
So you changed the warning threshold from 80% to 90% even though you believe you have a problem that requires repeated and frequent fixing? It seems like you have just reduced the window during which you can fix the problem. From what I can see, one issue you need to address is: Why are 30% of your MCDS entries being deleted on a daily (or weekly) basis? Do you have an HSM or SMS parameter that is forcing a very rapid turnover? Are you migrating datasets too quickly forcing users to recall them almost immediately? -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of George Rodriguez Sent: Friday, January 27, 2012 5:32 AM To: IBM-MAIN@bama.ua.edu Subject: Re: MCDS Dataset Help After the REORG these are the stats: F DFSMSHSM,Q CDS ARC0101I QUERY CONTROLDATASETS COMMAND STARTING ON ARC0101I (CONT.) HOST=1 ARC0947I CDS SERIALIZATION TECHNIQUE IS RESERVE ARC0148I MCDS TOTAL SPACE=646560 K-BYTES, CURRENTLY ARC0148I (CONT.) ABOUT 50% FULL, WARNING THRESHOLD=90%, TOTAL ARC0148I (CONT.) FREESPACE=49%, EA=NO, CANDIDATE VOLUMES=0 ARC0948I MCDS INDEX TOTAL SPACE=0001848 K-BYTES, ARC0948I (CONT.) CURRENTLY ABOUT 049% FULL, WARNING THRESHOLD=090%, ARC0948I (CONT.) CANDIDATE VOLUMES=0 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: MCDS Dataset Help
-Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of George Rodriguez Sent: Thursday, January 26, 2012 8:18 AM To: IBM-MAIN@bama.ua.edu Subject: MCDS Dataset Help Hi MVSListerv, I'm confused about the following information, that's display from command F DFSMShsm,F CDS: ARC0101I QUERY CONTROLDATASETS COMMAND STARTING ON ARC0101I (CONT.) HOST=1 ARC0947I CDS SERIALIZATION TECHNIQUE IS RESERVE ARC0148I MCDS TOTAL SPACE=648000 K-BYTES, CURRENTLY ARC0148I (CONT.) ABOUT 81% FULL, WARNING THRESHOLD=80%, TOTAL ARC0148I (CONT.) FREESPACE=49%, EA=NO, CANDIDATE VOLUMES=0 ARC0948I MCDS INDEX TOTAL SPACE=0010237 K-BYTES, ARC0948I (CONT.) CURRENTLY ABOUT 025% FULL, WARNING THRESHOLD=080%, ARC0948I (CONT.) CANDIDATE VOLUMES=0 snip I guess what has me confused is the 81% full with the 49% freespace... Makes no sense to me! Read the description of the message. The % full is based on the last used RBA while the % free includes all the space after that point PLUS any unused space before that point. It is similar to the situation in a PDS where new data will always be added at the end but there can be gas in the interior. Can someone tell me how to fix this problem? What problem do you think exists? Chapter 3 of the HSM Implementation and Customization Guide has a section on monitoring the CDSs. It tells you how to reorganize them if you want to recover the unusable free space. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: MCDS Dataset Help
What does the Q CDS display show right after a reorg? -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of George Rodriguez Sent: Thursday, January 26, 2012 11:31 AM To: IBM-MAIN@bama.ua.edu Subject: Re: MCDS Dataset Help I'm running the export/import process almost daily. It used to run once a week. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: DF/DSS data set restore from logical dump
What I do in this case is restore with a rename that replaces the HLQ with one that is somewhat unique. Then, using 3.4 to list this unique HLQ, I execute a REXX against each DSN of interest. The REXX builds a new DSN by scanning the DSN, deleting the portion I don't want (usually the HLQ), and inserting any new portion (also usually an HLQ or two), and issuing a RENAME command (or ALTER for VSAM). -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Richard Pinion Sent: Wednesday, January 25, 2012 7:53 AM To: IBM-MAIN@bama.ua.edu Subject: DF/DSS data set restore from logical dump I want to restore data sets from a logical dump. I would like to replace the original first level qualifier with something like this NEWHLQ1.NEWHLQ2.OLDHLQ2.. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: PDSE
IEBCOPY compress generates an error message for a PDSE. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Alan Playford Sent: Thursday, January 19, 2012 10:08 AM To: IBM-MAIN@bama.ua.edu Subject: Re: PDSE Try running an IEBCopy compress against the data set (option z against. TSO-ISPF display of the PDSE). It might be a little complicated as it's in the Linklist, and so disp=old wouldn't work (still allocated to LLA), so you'll have to use disp=shri in a batch job. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Assembler list
Send a message to any listserv, not to the discussion list, with the text SUBSCRIBE ASSEMBLER-LIST If you pick the wrong listserv, it will forwarded to the correct one. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Micheal Butz Sent: Thursday, January 19, 2012 12:54 PM To: IBM-MAIN@bama.ua.edu Subject: Assembler list Would anyone know how to subscribe to the assembler list -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: IDC3309I ** RECORD X'2BC5E7D7F2' NOT WRITTEN. LENGTH INVALID during DFHSM BCDS REPRO
Does the DCB data specified for your output dataset match your input dataset?
Barry Schwarz
OS/390 System Programmer
M/S 80-JE
Phone: 253-657-5262
Fax: 253-657-8574
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of af dc
Sent: Monday, January 09, 2012 7:45 AM
To: IBM-MAIN@bama.ua.edu
Subject: IDC3309I ** RECORD X'2BC5E7D7F2' NOT WRITTEN. LENGTH INVALID
during DFHSM BCDS REPRO
Hello,
during a repro from BCDS to seq file I got the following errors:
IDC3309I ** RECORD X'2BC5E7D7F2' NOT WRITTEN. LENGTH INVALID
IDC3309I ** RECORD X'C5E7D7F2F1' NOT WRITTEN. LENGTH INVALID
jcl repro:
//BCDS#RI EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//BCDSIN DD DSN=HSM.BCDS,DISP=OLD,
// AMP=('BUFND=60','BUFNI=5')
//BCDSOUT DD DSN=HSM.BCDS.BKP.SWV1(+1),
// DISP=(NEW,CATLG,CATLG),
// DCB=(BLKSIZE=26176,BUFNO=60,LRECL=6544,RECFM=VB),
// SPACE=(CYL,(200,200),RLSE)
//SYSINDD *
REPRO INFILE(BCDSIN) OUTFILE(BCDSOUT)
bcds itself has:
ATTRIBUTES
KEYLEN44 AVGLRECL6544
RKP0 MAXLRECL6544
SHROPTNS(3,3) RECOVERY UNIQUE NOERASE
How can I correct these 2 records ??
Any hint is welcome, many thx. A.Cecilio
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: IDC3309I ** RECORD X'2BC5E7D7F2' NOT WRITTEN. LENGTH INVALID during DFHSM BCDS REPRO
VB will support any BLKSIZ = LRECL+4.
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Jonathan Goossen
Sent: Monday, January 09, 2012 1:40 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: IDC3309I ** RECORD X'2BC5E7D7F2' NOT WRITTEN. LENGTH INVALID
during DFHSM BCDS REPRO
Shouldn't the block size be 26176. The current block size is 4*LRECL
instead of 4*(LRECL+4) as VB requires.
Thank you and have a Terrific day!
Jonathan Goossen, ACG, CL
Tape Specialist
ACT Mainframe Storage Group
Personal: 651-361-4541
Department Support Line: 651-361-
For help with communication and leadership skills checkout Woodwinds
Toastmasters
IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote on 01/09/2012
09:44:57 AM:
From: af dc acbi...@gmail.com
To: IBM-MAIN@bama.ua.edu
Date: 01/09/2012 09:53 AM
Subject: IDC3309I ** RECORD X'2BC5E7D7F2' NOT WRITTEN. LENGTH
INVALID during DFHSM BCDS REPRO
Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
Hello,
during a repro from BCDS to seq file I got the following errors:
IDC3309I ** RECORD X'2BC5E7D7F2' NOT WRITTEN. LENGTH INVALID
IDC3309I ** RECORD X'C5E7D7F2F1' NOT WRITTEN. LENGTH INVALID
jcl repro:
//BCDS#RI EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//BCDSIN DD DSN=HSM.BCDS,DISP=OLD,
// AMP=('BUFND=60','BUFNI=5')
//BCDSOUT DD DSN=HSM.BCDS.BKP.SWV1(+1),
// DISP=(NEW,CATLG,CATLG),
// DCB=(BLKSIZE=26176,BUFNO=60,LRECL=6544,RECFM=VB),
// SPACE=(CYL,(200,200),RLSE)
//SYSINDD *
REPRO INFILE(BCDSIN) OUTFILE(BCDSOUT)
bcds itself has:
ATTRIBUTES
KEYLEN44 AVGLRECL6544
RKP0 MAXLRECL6544
SHROPTNS(3,3) RECOVERY UNIQUE NOERASE
How can I correct these 2 records ??
Any hint is welcome, many thx. A.Cecilio
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
This e-mail message and all attachments transmitted with it may
contain legally privileged and/or confidential information intended
solely for the use of the addressee(s). If the reader of this
message is not the intended recipient, you are hereby notified that
any reading, dissemination, distribution, copying, forwarding or
other use of this message or its attachments is strictly
prohibited. If you have received this message in error, please
notify the sender immediately and delete this message and all
copies and backups thereof. Thank you.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: APPLY RSU Question
Every maintenance tape I receive from IBM has always had a small document which includes sample JCL and a description of the files on the tape. Did you not get one? If not, you should be able to request one based on the order number printed on the external tape label. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Sérgio Lima Costa Sent: Thursday, January 05, 2012 8:44 AM To: IBM-MAIN@bama.ua.edu Subject: APPLY RSU Question I received the RSU cartridge here from IBM , and for the first time, need execute this. Here, is ZOS 1.12. Can someone, give the way for do this ? What is the manual that have information about this ? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: How to find a PDS member
If you really have no idea what the HLQ is, you can just use 3.4 with the 29 simplest, A*, B*, ..., Z*, @*, #*, $*. Not sophisticated and only works if the dataset is catalogued. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Graham Hobbs Sent: Wednesday, January 04, 2012 6:16 PM To: IBM-MAIN@bama.ua.edu Subject: Re: How to find a PDS member OK, thanks, 'member' is the ticket! Downside is that Dsname Level is mandatory implying some knowledge of the high level qualifier. I happened to know that IGYCOP* is what I wanted so found my members. In the real world am not sure this is a downside? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Re-Linkling a load module with AC(1)
I hardly ever look at the dates. I wonder how my company's email system managed to hold it for two months and then deliver it. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Binyamin Dissen Sent: Wednesday, January 04, 2012 2:08 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Re-Linkling a load module with AC(1) A blast from the past. On Tue, 3 Jan 2012 14:42:27 -0800 Schwarz, Barry A barry.a.schw...@boeing.com wrote: :Try eliminating the second include. Also verify that PCOPY actually has text. : : -Original Message- : From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On : Behalf Of Fred Kaptein : Sent: Thursday, November 03, 2011 1:11 PM : To: IBM-MAIN@bama.ua.edu : Subject: Re-Linkling a load module with AC(1) : : Hello, : : I am looking to relink a vendor supplied program module which is set up : similar to the following: : - Module name is PCOPY : - Module PCOPY is linked as AC(0) : - Module PCOPY has an alias which is PCOPY2 : - Module PCOPY and PCOPY2 are in 'PCOPY.LOADLIB' : : I would like to relink PCOPY with the following: :- Linked as AC(1) :- Retain the alias PCOPY2 :- Linked into a test load library called 'PCOPY.TESTLIB' : : I tried the following JCL: : //LKED EXEC PGM=IEWL,PARM='LET,LIST=SUMMARY,MAP,NCAL,XREF,AC=1' : //SYSLIB DD DSN=PCOPY.LOADLIB,DISP=SHR : //SYSLMOD DD DSN=PCOPY.TESTLIB,DISP=SHR : //SYSUT1 DD DSN=SYSUT1,UNIT=SYSDA,SPACE=(CYL,(10,10)) : //SYSPRINT DD SYSOUT=* : //SYSLIN DD * : INCLUDE SYSLIB(PCOPY) : INCLUDE SYSLIB(PCOPY2) : NAME PCOPY : AC(1) : ALIAS PCOPY2 : : but it fails with the following errors : : IEW2230S 0414 MODULE HAS NO TEXT. : IEW2677S 5130 A VALID ENTRY POINT COULD NOT BE DETERMINED. : IEW2621E 4314 EXISTING ALIAS NAME PCOPY2 WITHIN MODULE TEMPNAM0 MATCHES : ALIAS BEING ADDED. : IEW2012I 0F09 ALL TEMPNAMES HAVE BEEN USED. THE MODULE CANNOT BE SAVED. : IEW2008I 0F03 PROCESSING COMPLETED. RETURN CODE = 12. : :-- :For IBM-MAIN subscribe / signoff / archive access instructions, :send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- Binyamin Dissen bdis...@dissensoftware.com http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Re-Linkling a load module with AC(1)
Try eliminating the second include. Also verify that PCOPY actually has text. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Fred Kaptein Sent: Thursday, November 03, 2011 1:11 PM To: IBM-MAIN@bama.ua.edu Subject: Re-Linkling a load module with AC(1) Hello, I am looking to relink a vendor supplied program module which is set up similar to the following: - Module name is PCOPY - Module PCOPY is linked as AC(0) - Module PCOPY has an alias which is PCOPY2 - Module PCOPY and PCOPY2 are in 'PCOPY.LOADLIB' I would like to relink PCOPY with the following: - Linked as AC(1) - Retain the alias PCOPY2 - Linked into a test load library called 'PCOPY.TESTLIB' I tried the following JCL: //LKED EXEC PGM=IEWL,PARM='LET,LIST=SUMMARY,MAP,NCAL,XREF,AC=1' //SYSLIB DD DSN=PCOPY.LOADLIB,DISP=SHR //SYSLMOD DD DSN=PCOPY.TESTLIB,DISP=SHR //SYSUT1 DD DSN=SYSUT1,UNIT=SYSDA,SPACE=(CYL,(10,10)) //SYSPRINT DD SYSOUT=* //SYSLIN DD * INCLUDE SYSLIB(PCOPY) INCLUDE SYSLIB(PCOPY2) NAME PCOPY AC(1) ALIAS PCOPY2 but it fails with the following errors IEW2230S 0414 MODULE HAS NO TEXT. IEW2677S 5130 A VALID ENTRY POINT COULD NOT BE DETERMINED. IEW2621E 4314 EXISTING ALIAS NAME PCOPY2 WITHIN MODULE TEMPNAM0 MATCHES ALIAS BEING ADDED. IEW2012I 0F09 ALL TEMPNAMES HAVE BEEN USED. THE MODULE CANNOT BE SAVED. IEW2008I 0F03 PROCESSING COMPLETED. RETURN CODE = 12. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Dataset Backup In HSM
In addition to the backup command Darth mentioned, manual and automatic dumps also create backups that are managed in the BCDS. Barry Schwarz OS/390 System Programmer M/S 80-JE Phone: 253-657-5262 Fax: 253-657-8574 -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Phil Kingston Sent: Thursday, December 15, 2011 4:34 AM To: IBM-MAIN@bama.ua.edu Subject: Dataset Backup In HSM Hi All, Quick question on HSM. If you have no Automatic Backup cycle defined, how come some datasets end up backed up and with BCDS information that you can list? Does an ML0--ML1 dataset movement, end up with a backup being taken of the dataset anyway? Otherwise, when no Automatic Backup runs, how does HSM manage to take backups? Because it certainly seems to at some point? Phil. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: JCL sheesh! for today
-Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Paul Gilmartin Sent: Saturday, December 10, 2011 8:05 PM To: IBM-MAIN@bama.ua.edu Subject: Re: JCL sheesh! for today snip C, for example, allows as many or as few (even only one) tokens on each line. C has no problem with zero tokens on a line. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Help on Rexx Code.
REXX has a date() function which will let you compute the DD, MM, and YY for the date the job is executed (or the day before). Look it up in your TSO/E REXX Reference under Built-in functions in chapter 4. You must decide whether your code will always execute the day of or the day after the datasets are built so you can code the calculation appropriately. If necessary, you can change it so that REXX also allocates SYSUT2 instead of hard-coding it in the JCL. Alternately, your scheduler could provide a parameter to the executing job with the third qualifier which REXX could substitute into the DSN of the allocate statement. Obviously the third qualifier will not be completely numeric but as long as you know the initial one or two characters it should pose no difficulty. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of sunil mirchandani Sent: Friday, November 18, 2011 11:08 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Help on Rexx Code. Hello John/Bill, I checked and tried to understand the code, but one thing which i didn't understand how it will take and differentiate the datasets everyday, since everyday the dataset's fourth and fifth level qualifier will get changed. Ex: Like today all 24 datasets looks like A.B.C.18(DDMMYY).NXX yesterday's A.B.C.17.NXX And tomorow's A.B.C.19.NXX. And if today EOD i will run the job, my input should be only A.B.C.18.NXX and the same job will run tomorrow then input should be only A.B.C.19.NXX so that i can have single dataset of a daily o/p. This is a daily job and it will run through scheduler. Please let me know if i am not clear on the subject. Thanks Sunil On Sat, Nov 19, 2011 at 12:10 AM, sunil mirchandani sunilmirchandani1...@gmail.com wrote: Thanks All for your quick responses. I am trying to implement and will get back if find any issues. Thanks again Sunil On Fri, Nov 18, 2011 at 10:35 PM, sunil mirchandani sunilmirchandani1...@gmail.com wrote: Hello All, I am new to rexx however i have few things to be fixed with the help of rexx.In my shop every hour one dataset is being created by one application, by end of the day or very next day early morning i want to copy all the data from all hourely datasets which are being created yesterday into one sinle datasets. For example: Dataset naming convention A.B.C.Date.**(fifth level qualifier is being changed like a version(hourely basis)) are creating and lets suppose i have total 24 datasets by the end of the day( A.B.C.D18.N000123 A.B.C.D18.N000138 - - A.B.C.D18.24) So by the end of the day i need to copy the data from(A.B.C.Date.**) to one dataset. I checked on the internet and i find that first half can be possible by using the rexx. since i am new to rexx so any one can look and suggest me with any sample or written rexx code. Really appreciate for any help. Please let me know if i am on right forum or not or does any one knows forum related to only REXX ? -- Thanks Much in Advance Regards: Sunil (Yesterday I dared to struggle. Today I dare to win -- Thanks Regards: Sunil Mirchandani 9243116830 Yesterday I dared to struggle. Today I dare to win -- Thanks Regards: Sunil Mirchandani 9243116830 Yesterday I dared to struggle. Today I dare to win -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: LC_COLLATE for sort?
The last I heard, the country was United Kingdom of Great Britain and Northern Ireland which implies only the first three are part of Great Britain. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Ken Brick Sent: Friday, November 18, 2011 12:35 AM To: IBM-MAIN@bama.ua.edu Subject: Re: LC_COLLATE for sort? On 18/11/2011 14:47 PM, Paul Gilmartin wrote: (Is England, Great Britain (whatever the official name) _not_ a member of the Commonwealth of Nations? Wikipedia would seem to indicate that.) -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html I think technically, England, Scotland, Wales and Northern Ireland, the component parts of Great Britian, are members in their own right to the Commonwealth of Nations -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: QUESTION ABOUT COPY COMMAND - DFDSS
My 1.11 copy of the DSS Storage Admin manual states that FULL is the default. Does your manual say something different? Are you copying each 3390-3 to a different 3390-9 or all four to a single 3390-9? If the latter, you might be better off with a dataset copy specifying all datasets and the four volumes rather than four separate volume copies. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of John Dawes Sent: Thursday, November 03, 2011 8:35 AM To: IBM-MAIN@bama.ua.edu Subject: QUESTION ABOUT COPY COMMAND - DFDSS G'Day, We are in the process of freeing a controller and I need to move 4 volumes off it. I plan to used DFDSS to copy the volume to a new adress. The source is a 3390-3 and the target is 3390-9. My question is do I need to add the parm FULL along with the COPY and ADMIN ALLDATA(*) ALLEXCP COPYVOLID PURGE statements? In the past years I did not use the FULL command and it worked okay. Is there a danger not using it? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DATA SET RESERVATION UNSUCCESSFUL
Does the dataset exist but the enqueue fails or do you fail due to dataset not found? If the latter, use DISP=(MOD,DELETE,DELETE). If the former, there is a JES2 parameter that will change the behavior from fail to wait but you really need a process to insure no one else is using the datasets in question. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Donnelly, John P Sent: Thursday, November 03, 2011 12:38 PM To: IBM-MAIN@bama.ua.edu Subject: DATA SET RESERVATION UNSUCCESSFUL We have a job that executes PGM=IEFBR14 with 40 DD cards specifying DISP=(OLD,DELETE,DELETE). From time to time we will get a JCL error because dataset reservation failed. Any other way we might accomplish the same event? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Re-Linkling a load module with AC(1)
Delete the include of PCOPY2. Move the NAME statement to the end of your input. Change the operand to PCOPY(R). -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Fred Kaptein Sent: Thursday, November 03, 2011 1:11 PM To: IBM-MAIN@bama.ua.edu Subject: Re-Linkling a load module with AC(1) Hello, I am looking to relink a vendor supplied program module which is set up similar to the following: - Module name is PCOPY - Module PCOPY is linked as AC(0) - Module PCOPY has an alias which is PCOPY2 - Module PCOPY and PCOPY2 are in 'PCOPY.LOADLIB' I would like to relink PCOPY with the following: - Linked as AC(1) - Retain the alias PCOPY2 - Linked into a test load library called 'PCOPY.TESTLIB' I tried the following JCL: //LKED EXEC PGM=IEWL,PARM='LET,LIST=SUMMARY,MAP,NCAL,XREF,AC=1' //SYSLIB DD DSN=PCOPY.LOADLIB,DISP=SHR //SYSLMOD DD DSN=PCOPY.TESTLIB,DISP=SHR //SYSUT1 DD DSN=SYSUT1,UNIT=SYSDA,SPACE=(CYL,(10,10)) //SYSPRINT DD SYSOUT=* //SYSLIN DD * INCLUDE SYSLIB(PCOPY) INCLUDE SYSLIB(PCOPY2) NAME PCOPY AC(1) ALIAS PCOPY2 but it fails with the following errors IEW2230S 0414 MODULE HAS NO TEXT. IEW2677S 5130 A VALID ENTRY POINT COULD NOT BE DETERMINED. IEW2621E 4314 EXISTING ALIAS NAME PCOPY2 WITHIN MODULE TEMPNAM0 MATCHES ALIAS BEING ADDED. IEW2012I 0F09 ALL TEMPNAMES HAVE BEEN USED. THE MODULE CANNOT BE SAVED. IEW2008I 0F03 PROCESSING COMPLETED. RETURN CODE = 12. We do not have the source for PCOPY Does anyone know the correct JCL? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Check out Apple says Steve Jobs has died - The Washington Post
They interviewed him on the radio this morning so I guess so. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Shmuel Metz (Seymour J.) Sent: Thursday, October 06, 2011 8:05 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Check out Apple says Steve Jobs has died - The Washington Post In 875b.356c909d.3bbe4...@aol.com, on 10/05/2011 at 08:13 PM, Ed Finnell efinnel...@aol.com said: _Apple says Steve Jobs has died Given how ill he was, it's no surprise. I Woz still around? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: ACS dataclas- clarification
There is nothing in my manual that indicates you can grow a filtlist by
coding two statements and expect the second to be appended to the first.
Combine the two statements for VALID_DC into one.
It might help if instead of showing us the old code that used to work you show
us the new code that doesn't.
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of jagadishan perumal
Sent: Thursday, October 06, 2011 2:54 AM
To: IBM-MAIN@bama.ua.edu
Subject: ACS dataclas- clarification
Hi,
Earlier I defined a dataclas for DB2 dataset starting with DSN101C.** as
dataclas - DB2EXT. Below is my DATACLAS routine :
CT3DCLS
PROC DATACLAS
/*/
/* DEFINE VALID DATA CLASS */
/*/
FILTLIST VALID_DCINCLUDE('DB2EXT','')
FILTLIST VALID_DCINCLUDE('VSAMXT','')
/*/
/* DEFINE DB2-EXTENDED FORMAT DATASETS */
/*/
FILTLIST DB2EXT INCLUDE(DSN101C.**)
FILTLIST VSAMXT INCLUDE(VSAMXT.**)
/*/
/* IF ALLOCATION SPECIFIES A DATACLASS THEN ALLOW IT TO BE USED */
/* OTHERWISE THIS ROUTINE WILL SET A DATA CLASS. */
/*/
IF DATACLAS = '' THEN DO
SELECT(DSN)
WHEN(DB2EXT)SET DATACLAS = 'DB2EXT'
WHEN(VSAMXT)SET DATACLAS = 'VSAMXT'
OTHERWISESET DATACLAS = ''
END
END
/*/
/** CHECK THE DATA CLASS SPECIFIED IS VALID **/
/*/
IF DATACLAS ¬= VALID_DC THEN DO
WRITE 'THE DATA CLASS (' DATACLAS ') IS NOT VALID.'
SET DATACLAS = ''
END
END
But when I try to define another DATACLAS as VSAMXT, by adding the line
FILTLIST VSAMEXT INCLUDE(VSAMEXT.**) . I get an error as Referrenced
FILTLIST is not valid, But when I try to remove the DB2EXT and Just VSAMXT
it goes fine and all the dataset stating VSAMEXT is getting allocated
using
dataclas VSAMXT. Now I see the DATACLAS DB2EXT is not in affect after
activating the above DATACLAS.
Could anyone please suggest me idea to activate both DATACLAS in the same
script.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: JCL CROSS-REFERENCE Utilities
CA Technologies has a product called JCLCheck. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Roberts, John J Sent: Wednesday, October 05, 2011 10:24 AM To: IBM-MAIN@bama.ua.edu Subject: JCL CROSS-REFERENCE Utilities My current client has long avoided any of the modern JCL enhancements. For example, PROCs are very rare. As are temporary datasets. I am trying to upgrade some of the batch apps with PROC/JCLLIB/SET/INCLUDE/IF etc. One of the impediments to the upgrade is the existence of custom JCL XREF tools. For example, whereas before they may have coded DSN=X470.C100(+1), in the new scheme they are likely to see DSN=C100XDSN(+1) where C100XDSN is a SET variable within an INCLUDE member. So I am betting that the homebrew XREF tools won't work. snip So my questions for listers: which of these tools is a good value (compromise between cost and functionality)? And which is the most popular? Are there other's I have omitted? Are there any free tools (I will check the CBT list in a moment)? We are a z/OS 1.11 JES3 shop. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: QUESTION ABOUT WILD CARDS
You still need to tell us where this will be used. Is it a literal in an ACS routine or is it the name of a RACF profile in the dataset class? (It's also valid in ISPF 3.4 but that is apparently not a factor here.) For the datasets you intend this to cover, does one have only two qualifiers in the DSN? Do any have four or more qualifiers? Even if the answers are NO today, do you need to plan for a YES in the future. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of John Dawes Sent: Wednesday, October 05, 2011 6:24 AM To: IBM-MAIN@bama.ua.edu Subject: Re: QUESTION ABOUT WILD CARDS Walt, The reason for my post is because I need to create a new MANAGEMENT class for the ISP.PROFILE.*. At the present, they are using a MC which does not expire the dsns. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DFDSS QUESTION - SYNTAX ERROR
The suggested command contains a STORGRP operand which will limit processing to just those volumes in that storage group. It is separate from the BY operand. Check out the STORGRP operand under the DUMP command in your DSS reference (page 407) in my 1.11 copy. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of esmie moo Sent: Tuesday, September 27, 2011 1:10 PM To: IBM-MAIN@bama.ua.edu Subject: Re: DFDSS QUESTION - SYNTAX ERROR Matthew, This works, thanks, however since there are lots of dsns I want to limit it to a particular STORGRP. From: Matthew Stitt mathwst...@bellsouth.net To: IBM-MAIN@bama.ua.edu Sent: Tuesday, September 27, 2011 2:37:39 PM Subject: Re: DFDSS QUESTION - SYNTAX ERROR I believe what will work is this: DUMP DATASET(INCLUDE(**) - BY((REFDT,LE,*,-100)(MGMTCLAS EQ TMMDAY3))) - OPT(4) ALLX ALLD(*) SPHERE OUTDD(TAPE) - STORGRP(TMMVOL) -- - Esmie Moo: Good Morning Gentle Readers, I am trying to backup dsns via a specific MGMTCLAS, STORGRP and those dsns that have not been referred to over 100 days. I keep getting a syntax error but I am unable to find it. Could someone please point out my error? DUMP DATASET(INCLUDE(**) - BY((REFDT,LE,*,-100)(MGMTCLAS EQ TMMDAY3)(STORGRP EQ TMMVOL))) - OPT(4) ALLX ALLD(*) SPHERE OUTDD(TAPE) ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP ' ADR109I (R/I)-RI01 (01), 2011.270 13:15:30 INITIAL SCAN OF USER CONTROL STATEMEN ADR140E (001)-RI03 (02), INVALID 'BY' CRITERIA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: How to dumps all the SMF datasets automagically evertime
DASD, as indicated by the reference to the SYS1.MAXx datasets. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Ed Gould Sent: Thursday, September 22, 2011 4:57 PM To: IBM-MAIN@bama.ua.edu Subject: Re: How to dumps all the SMF datasets automagically evertime Barry, Do you use log stream ? Or DASD ? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: RACF server disabled During IPL
Does your IEASYSxx member include the CLPA operand? If not, you might try
adding it.
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of jagadishan perumal
Sent: Friday, September 23, 2011 12:15 AM
To: IBM-MAIN@bama.ua.edu
Subject: RACF server disabled During IPL
Hi,
After ESS battery change , unfortunately due to power drip cluster was
restarted which led to abnormal shutdown of ZOS 1.12. After the hardware
fix
, we did a POR and tried reloading the OS ,we found the below messages in
the console while IPLing which stopped further system proceeding.
ERROR MESSAGES:
IRR418I RACF product disabled : IRRSSI00 ended
BPX006E OMVs is pending for security product
AXR0501E System REXX is waiting for Security product.
I have even checked IFAPRDXX parmlib and the security server option is
Enabled :
PRODUCT OWNER('IBM CORP')
NAME('z/OS')
ID(5694-A01)
VERSION(*) RELEASE(*) MOD(*)
FEATURENAME('SECURITY SERVER')
STATE(ENABLED)
Details on Version :
Z/OS V1R12.
RSU1011
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: How to dumps all the SMF datasets automagically evertime
The dumps on the systems I use seem to go at tape speed. What takes the time is re-initializing the MANx datasets. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Ed Gould Sent: Thursday, September 22, 2011 8:44 AM To: IBM-MAIN@bama.ua.edu Subject: Re: How to dumps all the SMF datasets automagically evertime Sam, Good suggestion. I haven#39;t seen any data as to performance though. In the past dumping SMF was while not slow it wasn#39;t fast either. Has IBM ever been able to speed it up? The log stream might just be the answer to my issue, has onyone come up with any numbers? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: slow sort tracks within dslist
The ISMF volume display can tell you if the VTOC is in indexed mode. If it is, another issue could be if the VTOCIX dataset is fragmented. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Tim Brown Sent: Tuesday, September 20, 2011 12:57 PM To: IBM-MAIN@bama.ua.edu Subject: slow sort tracks within dslist Have 5 volumes within SMS storage group, 2 of them take extra long if I do a SORT TRACKS from list of datasets. The number of datasets isn't a factor since some volumes with similar counts sort fast. Could it be an issue the index vtoc, Can I redo the index on SMS volumes if that is the reason. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Best way to determine current RSU or PUT level of Z/OS system
If you perform an SMPE REPORT SOURCEID, the listing will contain the SOURCEIDs associated with any SYSMOD that is in any zone. The list will be alphabetical by SOURCEID so the last RSU and PUT should be the answers you seek. Se the SMPE Commands manual for the details. As noted else-thread, this is normally not the right question to ask, unless it just to respond to a PHB. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Givens, Dennis W. Sent: Thursday, September 08, 2011 7:52 AM To: IBM-MAIN@bama.ua.edu Subject: Best way to determine current RSU or PUT level of Z/OS system I have a need to determine the current RSU or PUT level of a system that I did not install. The system is Z/OS V1.10. Is there a specific way through SMPE to determine what is the current maintenance level? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CA-1 TMSXITJ
For the archives in case someone else runs into a similar problem. Our IEFUJI exit GETMAINs memory for a TCB extension, stores selected data from the SMF parameters and the ACEE in this memory, and places the address of the extension in TCBUSER. We then use the data in the extension for our TSO submit exit and the CA-1 accounting exit. In all the exits, we find the TCB address using PSAOLD-ASCBASXB-ASXBFTCB and the ACEE address using ASXBSENV. This has worked for us from MVS 4.5 back in the early 90s all the way through OS/390 1.3, 2.5, and 2.10. Something obviously changed in the interval to z/OS 1.11. I don't know if it was in z/OS or in the newer version of CA-1 (probably CA-1). The net result is that the CA-1 accounting exit is called before our IEFUJI has populated the TCBUSER field. Our solution to use code similar to IEFUJI in our accounting exit and extract the desired data directly from the SMF parameters and the ACEE. The problem does not affect our TSO submit exit. By the time a TSO user can submit a job, the TCBUSER field contains the address of our TCB extension. Thanks to all who responded with suggestions. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Schwarz, Barry A Sent: Monday, August 29, 2011 5:53 AM To: IBM-MAIN@bama.ua.edu Subject: CA-1 TMSXITJ We are migrating our CA-1 TMSXITJ accounting exit from OS/390 (where it was called TMSUX2J) to z/OS 1.11. The exit needs to find the TCB for the batch job mounting the tape. What has worked in the past is USING PSA,R0 L R3,PSAAOLD USING ASCB,R3 L R3,ASCBASXB USING ASXB,R3 L R3,ASXBFTCB USING TCB,R3 Unfortunately, under z/OS it produces the address of a random TCB. We tried changing the code to obtain the TCB address directly from PSATOLD but that doesn't seem to be working either. As part of our debugging we added some WTOs. Since the messages showed up in the job log, we assume the exit is running in the batch job's address space. Surely there is way for a job to find it's own TCB? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
CA-1 TMSXITJ
We are migrating our CA-1 TMSXITJ accounting exit from OS/390 (where it was called TMSUX2J) to z/OS 1.11. The exit needs to find the TCB for the batch job mounting the tape. What has worked in the past is USING PSA,R0 L R3,PSAAOLD USING ASCB,R3 L R3,ASCBASXB USING ASXB,R3 L R3,ASXBFTCB USING TCB,R3 Unfortunately, under z/OS it produces the address of a random TCB. We tried changing the code to obtain the TCB address directly from PSATOLD but that doesn't seem to be working either. As part of our debugging we added some WTOs. Since the messages showed up in the job log, we assume the exit is running in the batch job's address space. Surely there is way for a job to find it's own TCB? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DFHSM QUESTION - PRIMARY,SECONDARY INTERVAL SPACE MGMT.
If HSM processed the datasets based solely on the management class attributes, one would have to wonder what purpose the thresholds served. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of willie bunter Sent: Friday, August 26, 2011 11:06 AM To: IBM-MAIN@bama.ua.edu Subject: DFHSM QUESTION - PRIMARY,SECONDARY INTERVAL SPACE MGMT. Good Day To All, I have noticed that a storage pool has dsns which go back to 2 months even thought the management class is set to 3 days. On this partition we have HSM running however there is no ML2 migration, however migration is turned on : Auto Migrate . . Y (Y, N, I or P) Auto Backup . . Y (Y or N) Auto Dump . . . N (Y or N) Overflow . . . . N (Y or N) PRIMARY, SECONDARY INTERVAL SPACE management kicks off at the designated times. Could it be that space management is ignoring some of the volumes in the pool because of the migration threshold? This is what it is set to: Allocation/migration Threshold : High . . 75 (1-99) Low . . 3 (0-99) Alloc/Migr Threshold Track-Managed: High . . 85 (1-99) Low . . 1 (0- 99) Below are the Expiration Attributes of this management class: Expire after Days Non-usage . : 3 Expire after Date/Days . . . . : 3 Retention Limit . . . . . . . : 0 If this is the case (migration threshold) how could I have HSM perform a clean up of these datasets which are over 3 days old? If this is not the case could someone tell me where else I should look? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: JCL Changes and SMS and Not Cataloged Datasets
I wonder how you handle multiple JES2 HASPACE datasets. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Rick Fochtman Sent: Friday, August 26, 2011 4:05 PM To: IBM-MAIN@bama.ua.edu Subject: Re: JCL Changes and SMS and Not Cataloged Datasets --snip There has been no reason, aside from SYSRES, JES SPOOL and the like, for uncatalogued datasets for aeons! unsnip- You're free to disagree, Ted, but I maintain that there's no excuse for ANY uncataloged datasets. Rick -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: AES proved vulnerable by Microsoft researchers
You need to read the text of the article, not just the headline. Their attack can recover an AES secret key from three to five times faster than previously thought possible, reported the Katholieke Universiteit Leuven, a research university based in Belgium. The researchers caution that the attack is complex is nature, and so can not be easily carried out using existing technologies. In practice, the methodology used by the researchers would take billions of years of computer time to break the AES algorithm, they noted. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Ed Gould Sent: Wednesday, August 24, 2011 10:05 PM To: IBM-MAIN@bama.ua.edu Subject: AES proved vulnerable by Microsoft researchers http://www.computerworld.com/s/article/9219297/AES_proved_vulnerable_by_M icrosoft_researchersAES proved vulnerable by Microsoft researchers Show that algorithm underlying most all of today's online transactions can be compromised -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
HSM 3490 Percent Full
After converting from OS/390 1.3 to z/OS 1.11, the HSM LIST BVOL and LIST MVOL commands are showing asterisks for the Percent Full fields. The Storage Administration manual states this means the value is unknown. We transferred the four existing CDS files to the new system and used the same ARCCMD00 initialization file, just updating a few name fields such as disk pack volumes. The problem exists for old tapes created before the conversion and for new ones created after. It plays havoc with our attempts to RECYCLE tapes. A search of the Implementation and Customization Guide shows 3490 appearing only in the context of emulation by other devices. Can anyone suggest what I might be missing or a different document to look at? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Anyone know how to HSM report of recalled datasets
It doesn't look like any of the commands will do what you want. You may have to examine the HSM log datasets or the job log. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Shameem .K .Shoukath Sent: Thursday, August 11, 2011 3:36 AM To: IBM-MAIN@bama.ua.edu Subject: Anyone know how to HSM report of recalled datasets hi, I want to report all datasets with DSNAME recalled in fromdate - todate dates I used the command HSEND REPORT DAILY FUNCTION(RECALL) OUTDATASET(STR016.HSM.RECALL) to get the number of datasets recalled. but it just shows the count not the actual name of dsns -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: batch job as non-swappable
At the point in your authorized program where it decides it needs to be non-swappable. It would probably be prudent to cancel the attribute when the program decides it is no longer needed. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Tim Brown Sent: Wednesday, August 10, 2011 11:00 AM To: IBM-MAIN@bama.ua.edu Subject: Re: batch job as non-swappable Where is this coded ? -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Tom Harper Sent: Wednesday, August 10, 2011 1:58 PM To: IBM-MAIN@bama.ua.edu Subject: Re: batch job as non-swappable SYSEVENT DONTSWAP - Original Message - From: Tim Brown [mailto:tbr...@cenhud.com] Sent: Wednesday, August 10, 2011 01:50 PM To: IBM-MAIN@bama.ua.edu IBM-MAIN@bama.ua.edu Subject: batch job as non-swappable What is required to make a particular batch job run as non-swappable -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Creating a multi-volume compatibility mode aggregate, zFS
Does the DCZFS data class specify a volume count? -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Lim Ming Liang Sent: Monday, August 08, 2011 6:40 AM To: IBM-MAIN@bama.ua.edu Subject: Creating a multi-volume compatibility mode aggregate, zFS I have successfully created the multi-volume LDS; DEFINE CLUSTER (NAME(ZFS.Z112S.CPAC) - VOLUMES(ZFS001 ZFS002- ZFS003 ZFS004 )- DATACLAS(DCZFS) - LINEAR CYL(10014 5) SHAREOPTIONS(3)) IGD17070I DATA SET ZFS.Z112S.CPAC ALLOCATED SUCCESSFULLY WITH 1 STRIPE(S). IGD17172I DATA SET ZFS.Z112S.CPAC IS ELIGIBLE FOR EXTENDED ADDRESSABILITY IDC0508I DATA ALLOCATION STATUS FOR VOLUME ZFS004 IS 0 IDC0508I DATA ALLOCATION STATUS FOR VOLUME * IS 0 IDC0508I DATA ALLOCATION STATUS FOR VOLUME * IS 0 IDC0508I DATA ALLOCATION STATUS FOR VOLUME * IS 0 IDC0512I NAME GENERATED-(D) ZFS.Z112S.CPAC.DATA IDC0181I STORAGECLASS USED IS ZFSCLASS IDC0181I DATACLASS USED IS DCZFS IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 Then I used IOEAGFMT to format it with PARM; '-aggregate ZFS.Z112S.CPAC -compat -size 3605040 -grow 901260' it gave me this output; IOEZ4I Formatting to 8K block number 846090 for primary extent of ZFS.Z112S.CPAC. IOEZ5I Primary extent loaded successfully for ZFS.Z112S.CPAC. IOEZ00323I Attempting to extend ZFS.Z112S.CPAC to 1747350 8K blocks. IEC331I 050-012(041A041D,ZFS001),ZFSFORMA,CREATEAG,VALO,IGG0CLE5 IEC070I 037-224,ZFSFORMA,CREATEAG,SYS1,0A97,ZFS001, IEC070I ZFS.Z112S.CPAC,ZFS.Z112S.CPAC.DATA,CATALOG.Z111S.MASTER I interpret the message as it trying to allocate a primary extent with 1747350 8K blocks onto a single volume of ZFS001, which is way beyond the capacity of a single volume of ZFS001. There are 2 more volumes can be extended to, why it not allocating extents of the rest of the volumes ? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Migrating a in house MF tool
You just love asking questions without providing any details. Unless the tool has some version dependent code, you should perform a complete installation of the tool on the 1.12 system, duplicating all the steps that were used to install it originally on the 1.6 system. Hopefully, the previously installation is well documented and you saved all the necessary datasets and files. If there are any version dependencies, now would be good time to document them. And maybe build a migration manual for the next time. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of jagadishan perumal Sent: Friday, August 05, 2011 6:13 PM To: IBM-MAIN@bama.ua.edu Subject: Migrating a in house MF tool Hi, We recently decommissioned a Z/OS 1.6 server. There was a requirement that a tool which was developed under 1.6 needs to be migrated to the new LPAR Z/OS 1.12. Could you please guide me the required steps that needs to taken to migrate the entire tool and invoke those panels in 1.12 version. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: assembler help!
You indicated subsequently that you clear R1 previously and that PARMJOBC points to (instead of contains) X'0008'. With a mask of 7, the ICM instruction leaves byte 0 of R1 unchanged and loads bytes 1-3 with bytes 0-2 of the effective address. The net result in R1 is byte 0: X'00' unchanged byte 1: X'00' from PARMJOBC byte 2: X'00' from PARMJOBC+1 byte 3: X'00' from PARMJOBC+2 The last byte of PARMJOBC does not participate in the instruction. Barry Schwarz OS/390 System Programmer M/S 80-JE Phone: 253-657-5262 Fax: 253-657-8574 -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Crabtree, Anne D Sent: Thursday, August 04, 2011 6:02 AM To: IBM-MAIN@bama.ua.edu Subject: assembler help! In our IEFACTRT (accounting exit), an assembler program, it has the following commands: L R2,PARMJOBC ICM R1,7,0(R2) If PARMJOBC contains a binary integer length of 4 with 00 00 00 08, what ends up in all bits of R1? I am trying to add additional values to what is in R1 by doing: MVC WK1(4),SMF30CPS A R1,WK1 This is not doing what I want it to do! If SMF30CPS, also a binary integer length of 4, has 00 00 00 01, what ends up in R1? Anne D. Crabtree System Programmer WV Office of Technology Data Center 1900 Kanawha Blvd East Charleston, WV 25305 (304)558-5914 ext 58292 (304)558-1441 fax -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CORRUPT PDS - I/O ERROR
If you use IDCAMS to print a VB dataset in dump format with no DD overrides, you will get a dump of the data portion of the records and never see the BDW or RDW. If you run the same commands but specify RECFM=U and BLKSIZE=32760, your dump will be organized by blocks, not records, and you will see both the BDWs and RDWs. While the data in the DSCB will not be changed, it seems fairly obvious that the DCB data from the DSCB was (temporarily) overridden by the DCB data in the DD statement. And if you used a program that had DCB data hardcoded in the DCB macro, that data would override both the DSCB data and the DD statement data. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of CM Poncelet Sent: Sunday, July 31, 2011 9:35 AM To: IBM-MAIN@bama.ua.edu Subject: Re: CORRUPT PDS - I/O ERROR Before the DCB on DASD can be accessed, the program's own 'completed' DCB (including any missing DCB parms filled-in from a RDJFCB of the JCL's DD and/or from an exit, if present) must be opened. This might suggest that the program's DCB, within the above context, overrides the one on DASD. But the DASD DCB attributes override the program's DCB attributes when the data is actually read - in the sense that the data on DASD will be INPUT without I/O error only if the opened program DCB's attributes are the same as those on DASD. It is not the program's DCB attributes (including any 'supplied' by exits etc.) but those on DASD which take priority and 'decide' what the DCB attributes should be on INPUT. If the program's DCB attributes could override those on DASD for INPUT, the program's 1st read after opening the DCB for INPUT would not fail with an I/O error if its DCB attributes were different from those on DASD - just as there is no I/O error when the program opens a DCB for OUTPUT and then writes to DASD (regardless of what the DCB attributes are on DASD). The program's DCB attributes take priority over (i.e. 'override') the DCB attributes on DASD for OUTPUT, and the DCB attributes on DASD take priority over (i.e. 'override') the program's DCB for INPUT. If a program 'disagrees' with that and tries to override the DCB attributes on DASD anyway, with its own DCB attributes and for an INPUT, it crashes with an I/O error. Crashing with an I/O error indicates that the program's DCB was unable - not able - to override the DCB attributes on DASD. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Search a MEMBER in the Libraries
-Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Lizette Koehler Sent: Wednesday, July 27, 2011 10:41 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Search a MEMBER in the Libraries Hello List, Someone know, IF have a program like the ISRDDN, but, that do a search if a member exist in all libraries of ZOS System. What I understand, that ISRDDN search only in the libraries that is assign in the TSO session. Thanks very much. Sergio Lima Costa If you have PDSMAN with EasyEdit you can create a list like Option 3.4 and search it. In Option 3.4 you can create a list and enter SRCHFOR on the command line. To find a member in a DS List, use the Member command, not SRCHFOR (at least on z/OS 1.11). -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Search a MEMBER in the Libraries
-Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Chambers, David W. Sent: Wednesday, July 27, 2011 9:05 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Search a MEMBER in the Libraries Look up the LPA subcommand for ISRDDN. That will add only LPA and LNKLST datasets. Other datasets like MACLIB or SAMPLIB would not be included in the search unless they were specifically allocated. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Search a MEMBER in the Libraries
z/OS 1.11 supports wild cards in the Volume parameter of 3.4. You can use 3.4 to build a list of all the datasets you want to search and then use the Member command (which also supports wild cards) to find which datasets, if any, contain any members matching the mask. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Sérgio Lima Costa Sent: Wednesday, July 27, 2011 8:59 AM To: IBM-MAIN@bama.ua.edu Subject: Search a MEMBER in the Libraries Hello List, Someone know, IF have a program like the ISRDDN, but, that do a search if a member exist in all libraries of ZOS System. What I understand, that ISRDDN search only in the libraries that is assign in the TSO session. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CORRUPT PDS - I/O ERROR
If the storage group is not backed up, how did HSM ever back up a copy for you to recover from? Was there a copy of the dataset on disk when you recovered it from HSM? What was the command you used to perform the recovery? When you browse the PDS, does the member list display correctly? What are the DCB attributes of the PDS? Do they match what you think they should be? What is the exact error message? -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of esmie moo Sent: Tuesday, July 26, 2011 10:03 AM To: IBM-MAIN@bama.ua.edu Subject: CORRUPT PDS - I/O ERROR Good Morning Gentle Readers, When I try to browse a member of my pds I get a I/O error. I tried browsing several members but I get the same error message. Is there a way of fixing it? For some reason the storage group is NOT backed up so I cannot restore it from an old backup. I recovered the PDS from a DFHSM backup but when I try to browse any members I still get the I/O error. Is there a work around to this problem or should I consider it lost? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DFHSM QUESTION - RECOVER HLQ DSN WITH RENAME
The error message tells you explicitly that there is already a catalog entry
for the DSN ZQATPWG. Given that you have already found this entry and know it
to be an alias, I am fairly certain that you do not have a migrated dataset
named ZQATPWG. Therefore, your command was wrong from the outset. You are not
trying to recover a dataset named ZQATPWG. You are trying to recover multiple
datasets whose HLQ is ZQATPWG.
I did not suggest you run without the LEVEL operand. I noted that THERE IS NO
SUCH OPERAND. From that, you should understand that any attempt to use it
would inevitably result in a syntax error.
If you use 3.4 to list all the ZQATPWG datasets, set the options to apply block
commands to excluded DSNs, exclude all but the first and last DSNs in the list,
and issue a block HRECOVER command, you can recover all 2,369 datasets by
typing less than 50 characters. It cannot get much easier.
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of willie bunter
Sent: Monday, July 25, 2011 10:54 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: DFHSM QUESTION - RECOVER HLQ DSN WITH RENAME
I tried the command without the LEVEL but it gave me the following error
HRECOVER ('ZQATPWG')
I issued the command via batch :
HRECOVER (ZQATPWG)
I received the following error message :
ARC1001I AM2.UCAT RECOVER FAILED, RC=0033, REAS=
ARC1133I OLD COPY OF DATA SET EXISTS, BUT REPLACE NOT SPECIFIED
I checked via ISPF 3.4 only the ALIAS definition is visible and no other
dsns:
ZQATPWG
Maybe I misunderstood your suggestion to execute the HRECOVER without the
LEVEL parm. Maybe my command is wrong? Please let me know where my error
is.
The task to code 2,369 dsns is quite daunting this is why I was looking
for a quick way. I could skip the re-name of the dsns because I got
Security to put back the RACF rules. At this time all I want to is to
perform a HRECOVER of the dsns without the rename.
Could it be done?
--- On Thu, 7/21/11, Schwarz, Barry A barry.a.schw...@boeing.com wrote:
From: Schwarz, Barry A barry.a.schw...@boeing.com
Subject: Re: DFHSM QUESTION - RECOVER HLQ DSN WITH RENAME
To: IBM-MAIN@bama.ua.edu
Received: Thursday, July 21, 2011, 11:32 AM
My HSM manual does not show a LEVEL operand for the RECOVER command. Does
yours?
My manual does show a command similar to RECOVER that supports wildcard
characters (in the fashion of DFSMSdss) but I don't know if it will do
what you want.
Wouldn't it be just as easy to use 3.4 to build a list of the datasets,
HRECOVER them, and then use a REXX or CLIST to rename them.
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of willie bunter
Sent: Thursday, July 21, 2011 7:28 AM
To: IBM-MAIN@bama.ua.edu
Subject: DFHSM QUESTION - RECOVER HLQ DSN WITH RENAME
Good Day To All,
Is it possible to recover all dsns at the HLQ level and rename them with
a
different name?
I issued the following command :
HRECOVER LEVEL(ZQATPWG) -
NEWNAME('ZWATPWG.ZQATPWG')
I get the error mesage :MEMBER NAME NOT ALLOWED IN DSNAME
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DFHSM QUESTION - RECOVER HLQ DSN WITH RENAME
My HSM manual does not show a LEVEL operand for the RECOVER command. Does
yours?
My manual does show a command similar to RECOVER that supports wildcard
characters (in the fashion of DFSMSdss) but I don't know if it will do what you
want.
Wouldn't it be just as easy to use 3.4 to build a list of the datasets,
HRECOVER them, and then use a REXX or CLIST to rename them.
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of willie bunter
Sent: Thursday, July 21, 2011 7:28 AM
To: IBM-MAIN@bama.ua.edu
Subject: DFHSM QUESTION - RECOVER HLQ DSN WITH RENAME
Good Day To All,
Is it possible to recover all dsns at the HLQ level and rename them with a
different name?
I issued the following command :
HRECOVER LEVEL(ZQATPWG) -
NEWNAME('ZWATPWG.ZQATPWG')
I get the error mesage :MEMBER NAME NOT ALLOWED IN DSNAME
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DFSMSdss mistery - DELETE PURGE
Since the DSN in the message does not match the mask in your JCL, I assume you are trying to make the mask somewhat anonymous. That is counter-productive when asking for help with these kinds of problems. You said you catalogued the dataset. Any chance you also allocated it as part of the catalog process? If so, the enqueue might be held by your TSO session. You could submit the job with TYPRUN=HOLD, log off, and then release the job. You could also use the D GRS console command to find any enqueues for the dataset in question. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Alvaro Guirao Lopez Sent: Wednesday, July 20, 2011 4:24 AM To: IBM-MAIN@bama.ua.edu Subject: DFSMSdss mistery - DELETE PURGE Hi listers, This morning I encountered with a DFSMSdss mistery, and is next: I delete files in a batch process through ADDRSU utility, the syntax follows: //CLEANUP0 EXEC PGM=ADRDSSU //SYSPRINT DD SYSOUT=* //OUTDDDD DUMMY //SYSINDD * DUMP DATASET(INCLUDE(HLQ.Q1.Q2.Q3.**)) - CANCELERROR - DELETE PURGE - OUTDDNAME(OUTDD) - WAIT(0,0) /* I have catalogued one file that matches with this mask: HLQ.Q1.Q2.Q3.Q4 And step fails with the next message: ADR416E (001)-DTDSC(01), DATA SET MV6X.QTTOOL.BAT1WORK.BACKUP.UNLOAD IN CATALOG SYS1MAA.CATALOG.MV6X WAS NOT DELETED, 3 Reason code 3 of message ADR416E says: The data set was not enqueued by DFSMSdss. The enqueue could be held by the initiator. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Cluster is Open during backup
It would help a whole bunch if you would provide an accurate description of your problem. A dataset actively in use is completely different than one that was not closed properly. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of jagadishan perumal Sent: Thursday, July 14, 2011 9:57 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Cluster is Open during backup There was a batch/ process running at the time of backup and Some of the users task was running in CICS region. On Fri, Jul 15, 2011 at 12:38 AM, Elardus Engelbrecht elardus.engelbrecht wrote: jagadishan perumal wrote: Most of the cases are due to the Users Improper close. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Allocations greater than 65535 tracks
I'm confused. Isn't 4,000 cylinders only 60,000 tracks which is less than 65,535 tracks. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Adams, Tracy Sent: Friday, July 15, 2011 9:11 AM To: IBM-MAIN@bama.ua.edu Subject: Allocations greater than 65535 tracks I have a dd statement that bombs when I try to allocate a 4000 cyl temp dataset saying it can't statisfy the allocation because I have exceeded the 65535 track limit. The perticular utility appears to be an internal sort and wont allocate any second extents. Any ideas? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: need help trying to apply PSP bucket ptf's for z/OS 1.9
SYSLIB is not used if NCAL is specified.
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Jim Thomas
Sent: Friday, July 15, 2011 9:07 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: need help trying to apply PSP bucket ptf's for z/OS 1.9
Missing a SYSLIB ??.
Kind Regards
Jim Thomas
617-233-4130 (mobile)
636-294-1014(res)
j...@thethomasresidence.us (Email)
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf
Of John Norgauer
Sent: Friday, July 15, 2011 10:18 AM
To: IBM-MAIN@bama.ua.edu
Subject: need help trying to apply PSP bucket ptf's for z/OS 1.9
I am up the creek without a paddle. We are still on z/OS 1.9 and are going
to z 10 processor. There is a PSP bucket for the z10
that includes UA48080 and UA49199. When SMPE tries to apply these two I
get the following:
BATCH EMULATOR JOB(SYSJCNSM) STEP(S1 ) PGM= HEWLH096
IEW2322I 1220 65ENTRY IXCINRIM
IEW2322I 1220 66INCLUDE SMPWRK3(IXCI2PRM) UA48080 SEQ #
IEW2322I 1220 67 IDENTIFY IXCI2PRM('UA48080')
IEW2322I 1220 68 SETSSI 01118080
IEW2322I 1220 69INCLUDE SMPWRK3(IXCI2RIM) UA49199
IEW2322I 1220 70 IDENTIFY IXCI2RIM('UA49199')
IEW2322I 1220 71 SETSSI 01119199
IEW2322I 1220 72INCLUDE NUCLEUS(IEAVNPF9)
IEW2322I 1220 73NAME IEAVNPF9(R) MAX ACCEPTABLE
RC=0
IEW2454W 9203 SYMBOL IXCMIFNP UNRESOLVED. NO AUTOCALL (NCAL) SPECIFIED.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
SMPE used to flag this as an error
I ran the following apply check APPLY CHECK GROUP FUNCTIONS PTFS APARS USERMODS SOURCEID ( ESO1107 ) EXCLUDE ( UA56444 ) BYPASS ( HOLDSYSTEM ( RESTART IPL DOC ENH AO MULTSYS ACTION DYNACT EC MSGSKEL DEP EXIT DOWNLD DELETE ) ) NOJCLINREPORT. SMPE generated the following diagnostics GIM38201WTHERE IS A MODID ERROR FOR MACUPD ENTRY $BUFFER IN SYSMOD UA56739. GIM31902ISYSMOD UA56739 DOES NOT SPECIFY AAJESTA ON THE PRE OR SUP OPERAND. AAJESTA IS A UMID FOR MACUPD $BUFFER THAT IS CURRENTLY INSTALLED. GIM38201WTHERE IS A MODID ERROR FOR MACUPD ENTRY $HASPEQU IN SYSMOD UA56739. GIM31902ISYSMOD UA56739 DOES NOT SPECIFY AAJESTA ON THE PRE OR SUP OPERAND. AAJESTA IS A UMID FOR MACUPD $HASPEQU THAT IS CURRENTLY INSTALLED. It also marked the PTF as applied UA56739 APPLIED PTF HJE7760 PRE UA47335 UA48021 UA48275 UA48380 UA49239 UA49270 UA49848 UA50641 UA50744 UA52851 UA53795 UA54558 HOLDEEA34563 HOLDS *DOC(UA56739) *IPL(UA56739) *MULTSYS(UA56739) And generated the following Regression Report REGRESSINGREGRESSEDCOMMON ELEMENTS CURRENTOTHER POTENTIALLY SYSMODSYSMOD TYPE NAME RMID REGRESSED SYSMODS UA56739 AAJESTA MACRO$BUFFER MACRO$HASPEQU Since I did not specify BYPASS(ID), shouldn't the MODID mismatches be errors instead of warnings? Shouldn't the PTF be marked NOGO? The SMPE Commands manual on the z/OS 1.11 DVD (V3R5) states that regression can occur only when BYPASS(ID) is used to ignore such errors. Shouldn't the Regression Report be suppressed and the PTF show up in the Causer Report? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DFHSM QUESTION - PRIMARY SPACE MANAGEMENT
Is the dataset VSAM or not? If there is no record type 14, 15, or 62 for the dataset, then your STC is not opening it. In that case, it could very well be deleted after 540 days of non-use. In the 20+ hours between the last successful execution of the STC and the first time it was missing, there is plenty of time for the dataset to be deleted, renamed, or uncataloged. Also, the catalog search order could have been altered (e.g., someone added an alias or disconnected a user catalog). Or maybe the VTOCIX is damaged. Have you looked at the volume the dataset is supposed to be on to determine if it is really gone? What tool are you using to search the SMF records? Why did you skip record type 66? For that matter, unless you are using OS/390 V1, there are no record types 63, 67, or 68 anymore. What are record types 136 and 139? -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of willie bunter Sent: Wednesday, July 13, 2011 10:20 AM To: IBM-MAIN@bama.ua.edu Subject: Re: DFHSM QUESTION - PRIMARY SPACE MANAGEMENT I went back as far as July 01 SMF records and nothing showed despite searching for records 14 15 17 18 61 62 63 64 65 67 68 136 139 --- On Wed, 7/13/11, Staller, Allan allan.stal...@kbmg.com wrote: From: Staller, Allan allan.stal...@kbmg.com Subject: Re: DFHSM QUESTION - PRIMARY SPACE MANAGEMENT To: IBM-MAIN@bama.ua.edu Received: Wednesday, July 13, 2011, 10:08 AM snip Again, if the dsn was deleted by a TSO user wouldn't it show up in the SMF records? /snip Absolutely. Since you indicated in another post the data set was in use as of July 10th by an STC, I would go back at least to the start date/time of that STC for you SMF hunt. Again, DAF is your friend. Just feed it the raw SMF data... HTH, -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Binder error in SMPE Apply of IBM PTF
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Shmuel Metz (Seymour J.)
Sent: Wednesday, July 13, 2011 10:36 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Binder error in SMPE Apply of IBM PTF
In
b282be35b5a4494894d4ecfba2bf7847180f2f6...@xch-nw-17v.nw.nos.boeing.com,
on 07/12/2011
at 10:15 AM, Schwarz, Barry A barry.a.schw...@boeing.com said:
Can someone suggest a method for correcting the problem the Binder is
reporting. I confirmed that the PTF UA56011 has a ++MOD for
HWICHAPI. As near as I can tell, the Binder control statements are
generated by SMPE.
Probably from LMOD(HWICMAPI) or ++JCLIN within the MCS.
IEW2322I 1220 4INCLUDE SMPWRK3(HWICHAPI) UA56011
IEW2322I 1220 5 IDENTIFY HWICHAPI('UA56011')
I asume that there is a SRC(HWICHAPI) and that SMP did an assembly of
it. What do you see in the asssembly listing?
As I stated above, there was a ++MOD, not a ++SRC
IEW2454W 9203 SYMBOL CEESG003 UNRESOLVED. NO AUTOCALL (NCAL)
SPECIFIED.
Is a library missing from SYSLIB?
How would that affect a Binder run with NCAL specified?
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Binder error in SMPE Apply of IBM PTF
Thank you. That solved the problem by SUPing UA56011.
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Staller, Allan
Sent: Tuesday, July 12, 2011 10:25 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Binder error in SMPE Apply of IBM PTF
https://www-304.ibm.com/support/docview.wss?uid=isg1OA34001
UA56309
snipCan someone suggest a method for correcting the problem the Binder
is reporting. I confirmed that the PTF UA56011 has a ++MOD for
HWICHAPI. As near as I can tell, the Binder control statements are
generated by SMPE.
z/OS V1 R11 BINDER 09:25:26 TUESDAY JULY 12, 2011
BATCH EMULATOR JOB(LASEC08J) STEP(S1 ) PGM= HEWLH096
IEW2278I B352 INVOCATION PARAMETERS -
LIST,LET,NCAL,XREF,RENT,AMODE=31,CASE(MIXED),NCAL
IEW2322I 1220 1INCLUDE SMPWRK3(HWICMCTR) UA53984
SEQ # 000284
IEW2322I 1220 2 IDENTIFY HWICMCTR('UA53984')
IEW2322I 1220 3 SETSSI 01113984
IEW2322I 1220 4INCLUDE SMPWRK3(HWICHAPI) UA56011
IEW2322I 1220 5 IDENTIFY HWICHAPI('UA56011')
IEW2315E 1369 IDENTIFY DATA COULD NOT BE ADDED TO HWICHAPI BECAUSE THE
SECTION DOES NOT EXIST.
IEW2322I 1220 6 SETSSI 01116011
IEW2322I 1220 7INCLUDE SMPWRK3(HWICMAPI) UA56011
IEW2322I 1220 8INCLUDE AIEALNKE(HWICHTTI) LMODBLD
IEW2322I 1220 9INCLUDE AOSC5(HWIPHCPI)LMODBLD
IEW2322I 1220 10INCLUDE AOSC5(HWIPHCPR)LMODBLD
IEW2322I 1220 11INCLUDE AOSC5(HWIPHRES)LMODBLD
IEW2322I 1220 12INCLUDE AOSC5(HWIVMCCT)LMODBLD
IEW2322I 1220 13NAME HWICMAPI(R) MAX
ACCEPTABLE RC=00
IEW2454W 9203 SYMBOL CEESG003 UNRESOLVED. NO AUTOCALL (NCAL)
SPECIFIED.
(55 additional NCAL messages which I don't think are part of the
problem)
IEW2454W 9203 SYMBOL HWIPHCPI UNRESOLVED. NO AUTOCALL (NCAL)
SPECIFIED. NAME SPACE = 3
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Binder error in SMPE Apply of IBM PTF
Can someone suggest a method for correcting the problem the Binder is
reporting. I confirmed that the PTF UA56011 has a ++MOD for HWICHAPI. As near
as I can tell, the Binder control statements are generated by SMPE.
z/OS V1 R11 BINDER 09:25:26 TUESDAY JULY 12, 2011
BATCH EMULATOR JOB(LASEC08J) STEP(S1 ) PGM= HEWLH096
IEW2278I B352 INVOCATION PARAMETERS -
LIST,LET,NCAL,XREF,RENT,AMODE=31,CASE(MIXED),NCAL
IEW2322I 1220 1INCLUDE SMPWRK3(HWICMCTR) UA53984 SEQ #
000284
IEW2322I 1220 2 IDENTIFY HWICMCTR('UA53984')
IEW2322I 1220 3 SETSSI 01113984
IEW2322I 1220 4INCLUDE SMPWRK3(HWICHAPI) UA56011
IEW2322I 1220 5 IDENTIFY HWICHAPI('UA56011')
IEW2315E 1369 IDENTIFY DATA COULD NOT BE ADDED TO HWICHAPI BECAUSE THE SECTION
DOES NOT EXIST.
IEW2322I 1220 6 SETSSI 01116011
IEW2322I 1220 7INCLUDE SMPWRK3(HWICMAPI) UA56011
IEW2322I 1220 8INCLUDE AIEALNKE(HWICHTTI) LMODBLD
IEW2322I 1220 9INCLUDE AOSC5(HWIPHCPI)LMODBLD
IEW2322I 1220 10INCLUDE AOSC5(HWIPHCPR)LMODBLD
IEW2322I 1220 11INCLUDE AOSC5(HWIPHRES)LMODBLD
IEW2322I 1220 12INCLUDE AOSC5(HWIVMCCT)LMODBLD
IEW2322I 1220 13NAME HWICMAPI(R) MAX ACCEPTABLE
RC=00
IEW2454W 9203 SYMBOL CEESG003 UNRESOLVED. NO AUTOCALL (NCAL) SPECIFIED.
(55 additional NCAL messages which I don't think are part of the problem)
IEW2454W 9203 SYMBOL HWIPHCPI UNRESOLVED. NO AUTOCALL (NCAL) SPECIFIED. NAME
SPACE = 3
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DS8100 HDD failures
At least one of the standard RAID configurations involves simple mirroring. Each disk can have a complete set of data that is quite readable. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Mike Schwab Sent: Tuesday, July 12, 2011 1:54 PM To: IBM-MAIN@bama.ua.edu Subject: Re: DS8100 HDD failures If it is configured as part of a RAID group of disks, one disk by itself should basically look like a bunch of random characters and not be able to decode any of it, because it only had 1/6 (or other fraction) of the data to begin with. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: How to obtain a file bigger than 80 chars from two inputs file
You need to be a lot more specific. What are the DCB parameters for the three datasets? How many members of the PDS do you want to process? You input consists of at least 290 bytes. Your output contains only 210. Which bytes do you want to discard? It might also be helpful if you showed the job that didn't work. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Hilario G. Sent: Thursday, July 07, 2011 12:22 AM To: IBM-MAIN@bama.ua.edu Subject: How to obtain a file bigger than 80 chars from two inputs file Hello folks, I need to obtain a file of 210 bytes that contain the content of two files: . First file is a PDS 80 bytes . Second file is a flat file 210 bytes I tryed to obtain via IEBGENER and ICETOOL but after some examples I never get the end file with the contents of both files. May anybody send me an example for it ? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Real return address for link and attach
If an attached task has terminated, there should be nothing in your dump related to it. The BR 14 in the task should branch to an operating system routine to post the ECB and perform the appropriate housekeeping. The only thing in your dump should be the ECB. The mother and daughter tasks both compete for execution time independently. The code following the ATTACH(X) macro can execute before or after any portion of the attached task. If you need the mother task to wait on the daughter, it is your responsibility to WAIT on the ECB. If a linked routine follows normal save area conventions, then in the save area you passed it in R13 you should be able to find the contents of R14. This is where the BR 14 instruction should return if you remembered to restore the registers before branching. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Donald Likens Sent: Friday, July 01, 2011 12:18 PM To: IBM-MAIN@bama.ua.edu Subject: Real return address for link and attach I have a situation where my subtask terminates and it seems it returns to somewhere in my program and starts executing my primary task (hard to believe isn't it). I want to check out my theory by determining in a dump where the attachx is going to return to after I execute the BR 14 (and return to attachx). I would also like to know where LINK(LINKX) is returning to when I execute the BR 14 (and return to link). Please help. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: error - catalog
The phrase didn't go well tells us nothing. You have been asked repeatedly to show the job and the all the output. If you are not interested in solving the problem there doesn't seem to be much point in posting. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of jagadishan perumal Sent: Friday, June 24, 2011 9:18 PM To: IBM-MAIN@bama.ua.edu Subject: Re: error - catalog i agree before taking offline we moved on all the Dataset to other volume. . the effected volume was initialized recently and that didn't go well. . apart from this volume all other volumes are in function. . On 6/25/11, Schwarz, Barry A barry.a.schw...@boeing.com wrote: What about all the datasets that already exist on the volume? You have done nothing to solve the problem. You have only hidden it so it can come back and cause you more problems later. You need to look up the error message and perform the recommended action. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of jagadishan perumal Sent: Friday, June 24, 2011 9:15 AM To: IBM-MAIN@bama.ua.edu Subject: Re: error - catalog i found that one tso Dataset volume was not accepting any allocation. . we made that device address offline. . and the catalog error stopped. . On 6/24/11, Ted MacNEIL eamacn...@yahoo.ca wrote: Please suggest me your idea. Did you even attempt to look up the messages? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- Regards, Jagadishan -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: error - catalog
What about all the datasets that already exist on the volume? You have done nothing to solve the problem. You have only hidden it so it can come back and cause you more problems later. You need to look up the error message and perform the recommended action. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of jagadishan perumal Sent: Friday, June 24, 2011 9:15 AM To: IBM-MAIN@bama.ua.edu Subject: Re: error - catalog i found that one tso Dataset volume was not accepting any allocation. . we made that device address offline. . and the catalog error stopped. . On 6/24/11, Ted MacNEIL eamacn...@yahoo.ca wrote: Please suggest me your idea. Did you even attempt to look up the messages? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Unexpected password change during logon
On z/OS 1.11, we are noticing that passwords are being changed during logon when the user accidentally enters data in the new password field but then declines to confirm it. Specifically: 1 - The user enters logon userid. 2 - The usual password panel appears. 3 - The user enters the correct password and some extraneous data in the new password field. 4 - The password panel reappears with a message to re-enter the new password. 5 - The users presses ENTER. 6 - The password panel appears again with a message that the two inputs do not match. 7 - The user presses ENTER again. 8 - The user is logged on but the password is changed to the extraneous data entered on the first panel in step 3. If, in step 5, the user enters a second set of characters that does not match the those entered in step 3, the password is still changed, but this time to the data entered in step 5, not step 3. Surely this cannot be WAD, otherwise there would be no point in asking for confirmation. Is there a PTF to fix this? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: how to backup data onto mainframe tape and restored read on windows ?
What type of data? What windows application will read the data? -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Tsai Laurence Sent: Tuesday, June 21, 2011 4:15 PM To: IBM-MAIN@bama.ua.edu Subject: how to backup data onto mainframe tape and restored read on windows ? Dears listers, question as the subject , any idea ? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: UTC offset for dates in the past?
It would seem you need more than just the date. The rules vary considerably by location. In Japan, local is always UTC+9. Europe and the US do not switch to or from summer time on the same date. In the US, some states don't switch at all. A few years ago the US changed the dates on which the switches occur. Some countries span multiple time zones. In the US, the same is true for a few states. In spite of its size, all of China is in the same time zone. You may want to limit the scope of your effort. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Jan MOEYERSONS Sent: Tuesday, June 14, 2011 8:17 AM To: IBM-MAIN@bama.ua.edu Subject: UTC offset for dates in the past? Dear Listers, Any suggestion of how to calculate what the offset between local time and UTC is for a given day in the past? My data contains UTC timestamp and I have to print the corresponding local time on a report. That is the local time as it was at the date the data was logged. My attemps so far with mktime(), localtime() and gmtime() all apply the offset of the current date, not of the date I supply as input... Any and all suggestions welcome. Be it using the C language or COBOL or Assembler... Thanks and a virtual bottle of beer, Jantje. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Catalog Mapping.
To map each user into a user catalog, perform the following when the user is logged off. Use the Access Method Services manual as reference. 1 - REPRO MERGECAT all datasets with the user's high level qualifier from the master catalog to the desired user catalog. 2 - DEFINE ALIAS to relate the high level qualifier to the same user catalog. A User should have only read access to the master catalog and only update access only to the user catalog where his/her datasets are catalogued. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of jagadishan perumal Sent: Saturday, June 11, 2011 7:49 PM To: IBM-MAIN@bama.ua.edu Subject: Catalog Mapping. Hi, Here in this case Source LPAR A is running OS 1.6 and the New target LPAR B is initialized with OS 1.12. We ran the MVS CBPDO over 1.6 as a driving system but due to version incompatibility some of the other features didnt ran well. Only the Racf details were mapped to our New OS 1.12, Here my concern is that the Old users logging to OS 1.12 Versions are mapped to Master Catalog not to a User Catalog. Also we have defined a New user catalog , but when try relating the Users to User catalog in 1.12 we get a duplication error(Obvious that they are mapped to Master Catalog). Is there a way where we can Map all the uses to a User catalog so that whenever a User tries to Logging to 1.12 they are mapped to User Catalog.And Yes the Dasd are shared across the Machine.Each Lpar has their own Racf Database.Also I saw the Codes given for DBSYNC but does it has the capacity of Mapping it to New user catalog ?. Apology if this is purely related to Racf But this being a catalog managment so thought of getting your expert suggestions. Ofcourse I would just need your suggestion interms of catalog mapping and the other racf related questions will be moved on to Racf-L. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Turning off mixed mode editing
The ISPF User's Guide states that if you enter View or Edit from 3.1 or 3.4, the system assumes you want mixed mode. This precludes highlighting (at least in the Japanese version of IBM's PCOMM). Does anyone know of a way to change or disable the assumption? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: JCL: IF and ABEND
Have you considered splitting it into two jobs. The first job would have everything up to the particular step followed by a step with COND=EVEN to submit the second job. The second job would not need any special JCL since any of its steps that abend would cause the remaining steps to flush. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Gainsford, Allen Sent: Monday, June 06, 2011 3:39 PM To: IBM-MAIN@bama.ua.edu Subject: Re: JCL: IF and ABEND Scott Ford said: What about this: //COND2 EXEC PGM=TCOND,PARM=11 //A Allen: What about this: //COND2 EXEC PGM=SETCOND,PARM=U111 //AA SET ABENDCC=U0111 // IF (COND2.RUN=TRUE OR COND2.ABENDCC=U0111) THEN Scott J Ford I think you've misunderstood. My problem is not with creating a return code; that's very easy. (As I said, we have a trivial utility that does it just fine.) My problem is how to use either IF statements, or CONDs (IF statements preferred), to allow a job to continue if a particular step abends, but to flush remaining steps if any further step abends. Regards, Allen -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: JCL: IF and ABEND
The explanation in the OP below didn't ask for a particular abend code. It said to allow a job to continue if a particular step abends. I was attempting to address the issue of multiple and possibly nested ugly IF statements for the following steps. If particular abend codes are relevant, then use a single IF instead of the COND in the first job I described. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Mike Schwab Sent: Tuesday, June 07, 2011 5:04 AM To: IBM-MAIN@bama.ua.edu Subject: Re: JCL: IF and ABEND And how do you specify the particular abend code on a COND statement? On Tue, Jun 7, 2011 at 6:51 AM, Schwarz, Barry A barry.a.schw...@boeing.com wrote: Have you considered splitting it into two jobs. The first job would have everything up to the particular step followed by a step with COND=EVEN to submit the second job. The second job would not need any special JCL since any of its steps that abend would cause the remaining steps to flush. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Gainsford, Allen Sent: Monday, June 06, 2011 3:39 PM To: IBM-MAIN@bama.ua.edu Subject: Re: JCL: IF and ABEND Scott Ford said: What about this: //COND2 EXEC PGM=TCOND,PARM=11 //A Allen: What about this: //COND2 EXEC PGM=SETCOND,PARM=U111 //AA SET ABENDCC=U0111 // IF (COND2.RUN=TRUE OR COND2.ABENDCC=U0111) THEN Scott J Ford I think you've misunderstood. My problem is not with creating a return code; that's very easy. (As I said, we have a trivial utility that does it just fine.) My problem is how to use either IF statements, or CONDs (IF statements preferred), to allow a job to continue if a particular step abends, but to flush remaining steps if any further step abends. Regards, Allen -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Excessive CPU usage in SDSF
I noticed this once and when I looked at the operator he was banging the enter key to refresh the display several times a second. Easy enough to check and if so a little OJT might be all you need. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of ??? ?? ??? Sent: Sunday, May 29, 2011 4:05 AM To: IBM-MAIN@bama.ua.edu Subject: Excessive CPU usage in SDSF Hi, One of our operators is using excessive CPU. Most of his time is spent running the printer, and he is usually looking at the output queue in SDSF. There are a few filters specified in SDSF and the information is sorted in a special way. He keeps rising to the top of the CPU consumption list. Moving him to a lower service class doesn't always work. We are using z/OS 1.11 and JES2. Has anyone seen something like this? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: get the DSCB with REXX.
What information are you looking for? There are some built in functions that may provide what you want. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of MONTERO ROMERO, ENRIQUE ELOI Sent: Friday, May 20, 2011 4:37 AM To: IBM-MAIN@bama.ua.edu Subject: get the DSCB with REXX. Hi, Now i have a REXX question. Is there some way to get DSCB information using REXX.? I know in assembler the UCBSCAN can be used, but i need to get the same information using REXX instead of Assembler. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: z/OS 1.11 question on DFDSS/ADRDSSU
If datasets with your HLQ need the protection you indicate, you should not be allowed to place them on the same volumes as datasets that don't. The fact that you can means you should take the extra care to see that you don't. It should not be that big a deal. You have already added one of the RENAME operands to your RESTORE statement. On the same line, simply add an OUTDYNAM operand pointing to a pack where your datasets can reside without interfering with normal operations. Alternately, since the restored dataset was not yours originally, it really doesn't need the protection afforded by your HLQ. Rename it to something other than your HLQ that can reside safely on the original volume. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Chris Hoelscher Sent: Wednesday, May 18, 2011 10:02 AM To: IBM-MAIN@bama.ua.edu Subject: z/OS 1.11 question on DFDSS/ADRDSSU I occasionally restore using ADRDSSU and rename the restored dataset to my HLQ - so that I can have an older version of a dataset to compare to the current dataset. By default (it appears) - the restore process will put the restored/renamed dataset on the same DASD volume as from which it was originally backed up (which is fine with me ) However - at times I need this dataset to remain for days or even weeks - the job that does the weekly backup of this DASD VOLUME does not have authority to read/backup any datasets with my HLQ (nor should it) - thus the backup abends and I get yelled at Yes - I could remember to force the restored dataset to another DASD volume -but - my real question (and preferred solution ) is - is there an option to tell ADSDRRU if I do not have authority to backup any dataset - don't try ??( I did attempt to read z/OS V1R11.0 DFSMSdss Storage Administration) but did not find any help there - so either I cannot read IBM-ese or my hoped-for solution does not exist - thanks for any suggestions -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Removing entries of non-existing data sets from SMS volumes
Others have discussed deleting the datasets. If you would like to examine any datasets before deciding what to do, you can use the IDCAMS DEFINE command with the RECATALOG option to create the necessary catalog entries. Regardless of which approach you take, you should also spend some time figuring out how you ended up with uncatalogued SMS datasets, a situation the system goes to some lengths to prevent. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Mohamed Juma Sent: Monday, May 09, 2011 11:22 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Removing entries of non-existing data sets from SMS volumes What I mean that the data sets are not in catalog, but they are in VTOC of the volume. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Removing entries of non-existing data sets from SMS volumes
Start by explaining what you mean by a non-existent dataset. Do you mean a catalog entry for which there is no corresponding dataset on the indicated volume? If that is the case, then there is no need to remove it from the volume (since it is not there anyway). But you do want to remove it from the catalog. The DELETE NOSCRATCH command as described in the Access Method Services is the usual tool of choice. For datasets erroneously catalogued on SMS volumes, the LISTCAT ALL command will generate errors when it cannot extract information from the VVDS. You can list an entire catalog, hold the output, and use SDSF to search for the errors. If you know the volumes in question, the DCOLLECT, DIAGNOSE CATALOG, and DIAGNOSE VVDS commands ((all from Access Method Services) may provide useful information. If you don't know the volumes, the DSMON program from the RACF Auditor's Guide may provide useful information. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Mohamed Juma Sent: Saturday, May 07, 2011 10:44 PM To: IBM-MAIN@bama.ua.edu Subject: Removing entries of non-existing data sets from SMS volumes We are facing a problem to remove entries of non-existing data sets from SMS volume, first how to check all volumes in that SMS group for the data sets which not existing, second how to delete their entries. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF REXX stops working in z/os 1.10
Is SDSF still using ISFPRM to determine group membership or is it using RACF? -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Mike Myers Sent: Monday, May 09, 2011 12:46 PM To: IBM-MAIN@bama.ua.edu Subject: SDSF REXX stops working in z/os 1.10 We had successfully run some REXX procedures that used REXX in the batch to process job output through SDSF on z/OS 1.9. To get it to work in 1.9, we created a new user group, which we put first in our ISFPRM member and associated the designated users by adding an IUID statement that addressed an NTBL table that named the TSO users we wanted to be able to run the REXX procedures. Since going to 1.10, with the same ISFPRM member and the same REXX procedures, we now find that the REXX procedures fail to retrieve any data from SDSF and all fail when trying to address any of the .0 elements of the stem variables that should contain data returned by our SDSF commands. Did something change in the REXX interface for SDSF in z/OS 1.10? I have not been able to find any items in the manuals or on the net. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: TSO Profile NUM and PACK
Some CA Technologies's products still try to. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Don Leahy Sent: Tuesday, May 03, 2011 7:17 AM To: IBM-MAIN@bama.ua.edu Subject: Re: TSO Profile NUM and PACK Perhaps he is referring to IEBUPDTE? I don't know of anyone who maintains code that way, but there might be someone out there who does. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: HSM Hourly Check
Have you specified both SETSYS NOINTERVALMIGRATION and SETSYS MAXINTERVALTASKS(0)? -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Supra Uche Sent: Thursday, April 28, 2011 3:43 AM To: IBM-MAIN@bama.ua.edu Subject: HSM Hourly Check Hello List, Is there a way to disable HSM's hourly space check? I don't want it to check all of my storage groups every hour because i don't use intervalmigration option. I want to use only primary space management for my storage groups. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMPPTS run out of Space
The 32720 blocksize is not very efficient for a PTS library. Large PTFs will only fit 409 records per track. If you had let the system determine blocksize, it would have chosen 27920 for a 3390 and you would get 698 records per track. If a 1000 record member is followed by a 300 record member, at 32760 they will consume 4 tracks. At 27920, they will consume only 2 tracks. If you have a members that vary greatly in size (not unlikely considering the dynamic nature of the PTS), you will do even better with a smaller block size (try 1/3 or 1/4 track blocking). Back when we had multiple geometries (not everything was a 3390), we got in the habit of using 6160 because it was reasonably efficient for all our various units. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of saurabh khandelwal Sent: Thursday, April 28, 2011 7:44 AM To: IBM-MAIN@bama.ua.edu Subject: Re: SMPPTS run out of Space Below is the detail about my current SMPPTS dataset. Data Set Name . . . : SMPE.BIN4.SMPPTS General Data Current Allocation Management class . . : **None** Allocated blocks . : 140,427 Storage class . . . : **None** Allocated extents . : 123 Volume serial . . . : SMP400 Maximum dir. blocks : NOLIMIT Device type . . . . : 3390 Data class . . . . . : **None** Organization . . . : POCurrent Utilization Record format . . . : FB Used pages . . . . : 1,115,580 Record length . . . : 80 % Utilized . . . . : 99 Block size . . . . : 32720 Number of members . : 2,359 1st extent blocks . : 123933 Secondary blocks . : 718 Data set name type : LIBRARY Creation date . . . : 2007/11/05 Referenced date . . : 2011/04/27 Expiration date . . : ***None*** -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Deleting post
Does that imply that no inaction can ever be immoral? -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of john gilmore Sent: Friday, April 22, 2011 5:50 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Deleting post snip Neither the past nor even our record of it has really been altered. Darren's gesture placated the OP; he was wise to make it; no action that is a fortiori ineffectual can be immoral. John Gilmore Ashland, MA 01721-1817 USA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Deleting post
You are too late. It may be possible to delete your messages from the official archive at U of Ala. But the messages have already been echoed to Usenet and are now ensconced of several Usenet archives, including google. Most Usenet servers Ignore delete requests. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Ron Thomas Sent: Monday, April 18, 2011 12:23 PM To: IBM-MAIN@bama.ua.edu Subject: Deleting post Hello. I want to delete my posts from here, if so how to do the same? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DSSCOPY and AIX?
The DSS manual clearly states you cannot change the number of qualifiers in a DSN with wild cards; you must use a fully qualified (complete) DSN. If you do a LISTC ALL for the cluster you will get the DSNs of the AIX and any paths. Just add additional pairs of parameters to the RENAMEU operand. I've never done it but it might be easier to use DUMP and RESTORE. DUMP has the NEWNAMEU operand which *appears* to be more inclusive. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Lester, Bob Sent: Thursday, April 14, 2011 3:46 PM To: IBM-MAIN@bama.ua.edu Subject: Re: DSSCOPY and AIX? Hi Barry, Mea Culpa! It would probably help if I copy/paste the correct parm cards! Duh. My 1st example should have read RENAMEU(VTOVT). That simply changes the HLQ of the files copied and works fine.. SPHERE is specified in both examples, so the AIX/PATH is copied correctly - at least in my 1st example. Its component names are correct and in the correct catalog - which is different than the source dsn. I'm stumbling on RENAMEU(VOFD.CSLGROUP.MFDM0C0G,VTOVT.CSLGROUP.NEW.MFDM0C0G). I Have the need to add a qualifier to the target dsn, and this form works fine *except* for this dsn with the AIX PATH. I'm using this form of RENAMEU for multiple dsns in the same run - this is the only one with an AIX PATH, and is the only one that fails. I've checked the source file and its component and all looks fine - same catalog for all components, which seems to be what it's complaining about. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DSSCOPY and AIX?
Are you sure you are showing us the actual input? The RENAMEU operand of your first example does not say change the HLQ. Since it has no wildcards, it says rename the dataset whose name is exactly VOFD to exactly VTOVT. (It also seems to be missing a set of parentheses but they may be optional in this case.) Since you probably don't have any single qualifier datasets, no renaming should occur. And since you are not deleting the source dataset, the copy should fail because the target dataset cannot be catalogued. Your second example also has no wildcards to only the cluster gets renamed. The end result is the cluster HLQ is changed to VTOVT while the components' HLQ remain VOFD (which is what the last error message is telling you). Apparently a cluster and its components must be in the same catalog. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Lester, Bob Sent: Thursday, April 14, 2011 12:28 PM To: IBM-MAIN@bama.ua.edu Subject: DSSCOPY and AIX? Hi Folks, This may be an easy one, but I can't find the answer. Copying a dataset with an AIX and path like this works fine: COPY DATASET( - INCLUDE(VOFD.CSLGROUP.MFDM0C0G, -(This is the base cluster name and has an AIX and PATH) ...LOTS MORE DSNS) - FR(REQUIRED) - ALLDATA(*) - ALLEXCP - SPHERE - STORCLAS(STANDARD) - TOL(ENQF) - RENAMEU(VOFD,VTOVT) (These HLQs are in DIFFERENT catalogs) However, it fails when I try this: COPY DATASET( - INCLUDE(VOFD.CSLGROUP.MFDM0C0G, -(This is the base cluster name) ...LOTS MORE DSNS) - FR(REQUIRED) - ALLDATA(*) - ALLEXCP - SPHERE - STORCLAS(STANDARD) - TOL(ENQF) - RENAMEU(VOFD.CSLGROUP.MFDM0C0G,VTOVT.CSLGROUP.NEW.MFDM0C0G) I get the following error: ADR411W (001)-DDFLT(02), DATA SET VOFD.CSLGROUP.MFDM0C0G IN CATALOG USERCAT.PRODVSAM ON VOLUME PRD83B WAS NOT SERIALIZED ON REQUEST ADR711I (001)-NEWDS(01), DATA SET VOFD.CSLGROUP.MFDM0C0G HAS BEEN ALLOCATED WITH NEWNAME VTOVT.CSLGROUP.NEW.MFDM0C0G USING STORCLAS STANDARD, DATACLAS DCSTAND, AND MGMTCLAS NOACTION ADR764E (001)-DDFLT(01), DATA SETS IN SPHERE OF BASE CLUSTER VOFD.CSLGROUP.MFDM0C0G WITH NEWNAME VTOVT.CSLGROUP.NEW.MFDM0C0G WERE DIRECTED TO MORE THAN ONE CATALOG ADR763E (001)-DDFLT(01), DATA SETS IN SPHERE OF BASE CLUSTER VOFD.CSLGROUP.MFDM0C0G WITH NEWNAME VTOVT.CSLGROUP.NEW.MFDM0C0G WERE NOT ALL RENAMED. I'm missing something, since in both examples, the files ARE in different catalogs. But the 1st example works. Any ideas? z/OS 1.11, SMS. Target DSNs do not exist before the runs. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: LISTCAT command
My approach is brute force. 1 - Run a LISTCAT VOL against the catalog(s) of interest. 2 - Edit the resulting listing (usually using SDSF SE command) 3 - Issue multiple X ALL VOLSERvv commands where vv is each indirect (including **) or actual volume I'm not interested in. 4 - Issue F NV VOLSER- command to find any directly catalogued dataset. (At this point I frequently go back to step 3 to issue another exclude.) -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of SAURABH KHANDELWAL Sent: Wednesday, April 13, 2011 5:44 AM To: IBM-MAIN@bama.ua.edu Subject: LISTCAT command Hello, How do I check that all the dataset in the Target volumes are indirectly cataloged. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Jobname colums was lost in the sdsf joblog on ZOS1.11.
Copy the IEFACTRT source you were using on the old system and reassemble it. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of ibmnew Sent: Tuesday, April 12, 2011 11:34 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Jobname colums was lost in the sdsf joblog on ZOS1.11. Dear all I checked the PMR and found the following result: I have checked several of our systems and the default, at z/OS 1.11 1.10 and 1.8 does not show JOBNAME. We have other systems at 1.10 and 1.11 which have local modifications which do show the JOBNAME. You will need to look at modifying this to include JOBNAME. - My question: How to modifying IEEACTRT to include JOBNAME? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: LISTCAT command
That should be NX, not NV. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Schwarz, Barry A Sent: Wednesday, April 13, 2011 11:44 AM To: IBM-MAIN@bama.ua.edu Subject: Re: LISTCAT command My approach is brute force. 1 - Run a LISTCAT VOL against the catalog(s) of interest. 2 - Edit the resulting listing (usually using SDSF SE command) 3 - Issue multiple X ALL VOLSERvv commands where vv is each indirect (including **) or actual volume I'm not interested in. 4 - Issue F NV VOLSER- command to find any directly catalogued dataset. (At this point I frequently go back to step 3 to issue another exclude.) -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of SAURABH KHANDELWAL Sent: Wednesday, April 13, 2011 5:44 AM To: IBM-MAIN@bama.ua.edu Subject: LISTCAT command Hello, How do I check that all the dataset in the Target volumes are indirectly cataloged. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: TSO Profile NUM and PACK
For global settings, check the ISPF Configuration Table section of the ISPF Planning and Customization manual (my copy is GC34-4814-08, chapter 2, figure 8). -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Donnelly, John P Sent: Tuesday, April 12, 2011 1:35 PM To: IBM-MAIN@bama.ua.edu Subject: TSO Profile NUM and PACK We had some difficulties with a critical FTP transmission over this past weekend caused by the in card columns 73-80. Our Application Business Manager has posed two questions: Can you share with me any compelling reasons for the NUM ON and PACK ON? If no compelling reasons, what can be done to make NUM OFF and PACK OFF as the default in any programmer's profile? Do we have a global setting that we might invoke? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DATACLASS
Q1 - The third value in the subparameter (the third 10) is the amount of space reserved for the directory. Since only partitioned datasets have directories, the system knows the DSORG is PO. When the third parameter is omitted, the system DOES KNOW the dataset is not partitioned. But, as explained previously, there are many DSORGs that are not partitioned. The system does not know if the DSORG should be PS, VS, IS, DA, or any others I may have overlooked. Q2 - I don't know why your SELECT statement does not produce the expected result. If DSORG is PS or DSORG is null, each logical expression in the WHEN keyword should be true so the SET should execute. My only rationale for changing it to a series of IF statements was to provide a location for the diagnostic WRITE statements. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of ibmnew Sent: Sunday, April 10, 2011 8:54 PM To: IBM-MAIN@bama.ua.edu Subject: Re: DATACLASS Dear Schwarz snip Q1.Why can SPACE=(4096,(10,10,10)) statement tell system that the allocated dataset is a PDS but SPACE=(4096,(10,10)) cann't do it Q2 What's wrong of the ACS routing below: SELECT WHEN ((DSN = ABSPPS) AND (DSORG NE 'PO') AND (DSORG NE 'VS') AND (DSORG NE 'IS') AND (DSORG NE 'DA')) SET DATACLAS = 'DCPS' -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DATACLASS
Show us the definition of ABSPPS.
You might also want to consider inserting some debugging WRITE statements.
Something like
FILTLIST ABSPPS INCLUDE(...)
FILTLIST DSORGS INCLUDE('PO', 'VS', 'IS', 'DA')
WRITE DSN= DSN, DSORG = DSORG
IF DSN = ABSPPS THEN
DO
WRITE DSN MATCHES
IF DSORG NE DSORGS THEN
DO
WRITE DSORG MATCHES
SET DATACLAS = 'DCPS'
END
WRITE DATACLASS = DATACLAS
END
IF DATACLAS EQ '' THEN
SET DATACLAS = 'DCSTD'
WRITE DATACLASS = DATACLAS
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of
ibmnew
Sent: Thursday, April 07, 2011 11:11 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: DATACLASS
Hi
I changed the check in the ACS routine from DSORG EQ PS to DSORG NE (PO, VS,
IS, DA, etc)
Below is the ACS routing
SELECT
WHEN ((DSN = ABSPPS) AND
(DSORG NE 'PO') AND
(DSORG NE 'VS') AND
(DSORG NE 'IS') AND
(DSORG NE 'DA')) SET DATACLAS = 'DCPS'
WHEN (DATACLAS NE '') SET DATACLAS = DATACLAS
OTHERWISE SET DATACLAS = 'DCSTD'
END
END
I submit the following JCL
//ALOCHSKP EXEC PGM=IEFBR14
//MESSAGE DD DSN=ABSP.CEB.TEST22,DISP=(NEW,CATLG,DELETE),
//UNIT=3390,SPACE=(4096,(10,10)),
// DCB=(LRECL=300,BLKSIZE=27900,RECFM=FB)
But the dataclass of ABSP.CEB.TEST22 is DCSTD
Is the ACS routing correct?
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DATACLASS
No, the space parameter cannot tell the system the DSORG is PS. At best, it tells the system the DSORG is not PO. That still leaves PS, VS, IS, DA, etc. You have to use DSORG=PS because you wrote the ACS routine to check for that particular attribute. If you want to eliminate the need for the extra JCL, there are some options that you might be able to implement: Can you assign the data class to every dataset that matches the naming convention, regardless of DSORG? If so, simply remove the unnecessary check in the ACS routine. If not, change the check in the ACS routine from DSORG EQ PS to DSORG NE (PO, VS, IS, DA, etc) Barry Schwarz OS/390 System Programmer M/S 80-JE Phone: 253-657-5262 Fax: 253-657-8574 -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of ibmnew Sent: Wednesday, April 06, 2011 8:11 PM To: IBM-MAIN@bama.ua.edu Subject: Re: DATACLASS Hi Thanks your answers. I am sorry that I just came back by holiday Today I submit the following JCL: //ALOCHSKP EXEC PGM=IEFBR14 //MESSAGE DD DSN=ABSP.CEB.TEST9,DISP=(NEW,CATLG,DELETE), //UNIT=3390,SPACE=(4096,(10,10)), // DCB=(LRECL=300,BLKSIZE=27900,RECFM=FB) Below is the output: Data class . . . . . : DCSTD snip Then I submit the other JCL below: //ALOCHSKP EXEC PGM=IEFBR14 //MESSAGE DD DSN=ABSP.CEB.TEST8,DISP=(NEW,CATLG,DELETE), //UNIT=3390,SPACE=(4096,(10,10)),DSORG=PS, // DCB=(LRECL=300,BLKSIZE=27900,RECFM=FB) The output is below:Data class . . . . . : DCPS snip My question: When I allocate a dataset using PGM=IEFBR14 with SPACE=(4096,(10,10)), Could the parm of space ask system to allocate a PS dataset? Why do we must use DSORG=PS in the JCL? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: ADRDSSU issue
I had non-managed VSAM datasets (zFS to be exact) on z/OS 1.8. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Lizette Koehler Sent: Wednesday, April 06, 2011 5:34 AM To: IBM-MAIN@bama.ua.edu Subject: Re: ADRDSSU issue I see you are at z/OS V1.9. VSAM datasets If I remember are always SMS Managed and it is not until z/OS V1.12 that you can use indirect VSAM cataloging. I am not sure you can copy the same name VSAM dataset. You may need to copy to a new VSAM dataset name -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: FTP question
Possibly because the ftp rename command invokes the Unix mv command which then assumes you really meant move. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Paul Gilmartin Sent: Thursday, March 31, 2011 10:22 PM To: IBM-MAIN@bama.ua.edu Subject: Re: FTP question snip (A startling result of an experiment in another thread.) When the target is a UNIX file: ftp cd /u/user 250 HFS directory /u/user is the current working directory ftp rename temp.dup2 temp.dup1 350 RNFR accepted. Please supply new name for RNTO. 250 /u/user/temp.dup2 renamed to /u/user/temp.dup1 the file is calmly renamed, replacing the original target. I presume, without any definitive proof, that the operation is atomic in accordance with UNIX custom. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Indirect Cataloging
No datasets are required to be indirectly catalogued. It depends on how you intend to use the datasets and how you intend to share the catalog. In my shop: I have one master catalog shard by two systems, production and test. The SYSRES for each system occupies two volumes and unless I am installing updates and testing, the corresponding volumes are identical. zOS automatically recognizes two aliases for the IPL volume, ** and SYSR1 (an automatically created symbol). In the past, ** was more useful so I am in the habit of using it exclusively. In the IEASYM00 member of SYS1.PARMLIB I create another symbol with SYMDEF(R2VOL='SYSR1(1:5).2') No matter which system I IPL, ** and SYSR1 will always refer to the first (IPL) SYSRES volume and R2VOL will always refer to the second. I then catalog every dataset on the first volume with ** (as has already been mentioned) and every dataset on the second volume with DEVTYPE(3390) and VOLUME(R2VOL). Datasets on other volumes (such as spool, page, SMF, etc) are cataloged directly since they are shared by the two systems. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of SAURABH KHANDELWAL Sent: Friday, April 01, 2011 8:01 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Indirect Cataloging Hello, Thanks Mark. Can you please help me to setup this indirect cataloging into my system. What are all steps has to be followed and what are all dataset are required to be indirect cataloged. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Check TAPE Contents
Show your JCL and control cards and the job log. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Sergio Lima Sent: Tuesday, March 29, 2011 12:04 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Check TAPE Contents Hello, We also tried use IDCAMS here from see tape contents and don't work. Can you please say what can I get a sample JOB ? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Check TAPE Contents
When attempting to examine an unknown tape, I use the IDCAMS PRINT command with the DUMP operand and specify RECFM=u and BLKSIZE=32760. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Sergio Lima Sent: Wednesday, March 23, 2011 11:49 AM To: IBM-MAIN@bama.ua.edu Subject: Check TAPE Contents Hello List, We have some tapes here, that came from another system, and then, We need look the contents of that. We know that DITTO with TP functions, can help us, but, unfortunatelly , our DITTO is not customized for use, and We can't found the DITTO INSTALLATION AND CUSTOMIZATION MANUAL. When try run the JOB : snip DIT0330I Not authorized for function Explanation: Your user ID is not authorized to use the function that you specified. User Response: If you need to use this function, contact your system support to enable your user ID for | this function or function group. Refer to the DITTO/ESA | Installation and Customization Guide. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Check TAPE Contents
I wonder how RMM would know the contents of a tape received from another facility, as stated by the OP. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of R.S. Sent: Wednesday, March 23, 2011 12:24 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Check TAPE Contents W dniu 2011-03-23 20:14, Schwarz, Barry A pisze: When attempting to examine an unknown tape, I use the IDCAMS PRINT command with the DUMP operand and specify RECFM=u and BLKSIZE=32760. At the beginning I would suggest to use IEBGENER and read only the labels. It can be read directly with Using tapes in a hand, but colleague of mine made some rexx to reformat it to more user-friendly form. Of course the best idea is to have RMM (other TMS) working... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: How Do I Eliminate ML2 Migration?
Primary space management causes data to be migrated to ML1 or ML2 depending on: Management Class attributes for SMS datasets SETSYS options (such as MIGRATIONLEVEL1DAYS) for non-SMS datasets Secondary space management only manages datasets already moved to ML1. What is your real goal? Are you trying to free up tapes or are you trying to keep datasets on primary disks? -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of George Rodriguez Sent: Wednesday, March 16, 2011 5:28 AM To: IBM-MAIN@bama.ua.edu Subject: Re: How Do I Eliminate ML2 Migration? Mike, I just found the parm. Here's what I have: DEFINE SECONDARYSPMGMTCYCLE (NNY CYCLESTARTDATE (1999/08/02)) But I also have: DEFINE PRIMARYSPMGMTCYCLE (YYY CYCLESTARTDATE(1999/08/02)) Does the primary space management cycle also cause a dataset to go back to ML2 after I've recalled the dataset? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: How Do I Eliminate ML2 Migration?
If all you want is to keep migrated datasets on disk instead of tape, define ML2 as disk -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of George Rodriguez Sent: Wednesday, March 16, 2011 10:33 AM To: IBM-MAIN@bama.ua.edu Subject: Re: How Do I Eliminate ML2 Migration? Hi Darth, The main reason for eliminating the ML2 is because we don't want to go through the expense of mirroring the VTL at our DR site. We bought some disk and opted to eliminate the ML2. Quick and easy to do. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Trouble Reading a Spanned File with an Assembler Program - Working Program
Save areas should be chained in both directions. A comment that simply repeats the code serves only to clutter the listing. Other than BADOPEN, you never call any of the error routines. Why two symbols (BATA and OUTREC) for the exact same area of memory. You include the RDW and segment data in the output record. You don't process the segment data at all. If a logical record actually spans segments you will never detect it. You will also produce multiple records in the output instead of combining the segments into a single record. Why do you use routing code 2 which is designed to alert the operator to a change in system status for what amounts to an internal problem in your job? -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Hunt, Bruce Sent: Tuesday, March 15, 2011 2:38 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Trouble Reading a Spanned File with an Assembler Program - Working Program Thanks again for everyone's help. If anyone cares, here is the assembler program that reads the spanned file and creates a fixed length 136 byte file padded with blanks where necessary. I don't claim to be the best assembler programmer. I hope that worked in my favor in keeping it simple. But I am definitely up for constructive criticism. I am including the JCL and 2 more programs (a cobol and a rexx). This is the reason I took so long to get back with this. Sorry if this is too much information. === TITLE 'XP1000' * * 02/25/11 B HUNT CHANGED A SPANNED FILE TO A FIXED FILE * XP1000 AMODE 24 XP1000 RMODE 24 XP1000 START COPY EQUATES SAVE (14,12) SAVE REGISTERS 14 THRU 12 BASR BASE1,0 ESTABLISH ADDRESSABILITY USING *,BASE1 PROVIDE BASE ID STRD,SAVEAREA+4 STORE PREV REG 13 IN SAVEAREA +4 LARD,SAVEAREA LOAD SAVEREA IN REG 13 B BEGIN SPACE 1 DS0D DCCL8'XP1000' DCCL8'SYSDATE' DCCL8'SYSTIME' SPACE 1 BEGINDS0H USING DATA,R8 ASSOCIATE DATA WITH REG 8 OPEN (INFILE,(INPUT),OUTFILE,(OUTPUT)) OPEN FILES LTR RF,RF CHECK FOR GOOD OPEN BNZ BADOPEN IF BAD OPEN BRANCH TO BADOPEN LOOP DS0H PROCESS LOOP GET INFILE READ INPUT FILE LRR8,R1 LOAD INPUT ADDRESS IN REG 8 XCFWLEN,FWLEN SET FULL WORD LENGTH TO ZERO MVC HWLEN,DATA GET THE RECORD LENGTH FROM DATA MVI FWLEN,C' ' USE A BLANK TO PAD OUTREC-MVCL L R9,FWLENLOAD THE INPUT LENGTH IN REG 9 LAR6,BATA LOAD THE OUTPUT ADDRESS IN REG 6 LAR7,136 LOAD THE OUT LENGTH IN REG 7 MVCL R6,R8 MOVE DATA TO BATA W/ BLANK PAD WRITEDS0H PUT OUTFILE,OUTREC WRITE OUTREC B LOOP FINALDS0H CLOSE (INFILE,,OUTFILE) B C100 BADOPEN WTO ' UABLE TO OPEN FILE',ROUTCDE=(2),DESC=(7) B C100 BADREAD WTO ' READ UNSUCCESSFUL ',ROUTCDE=(2),DESC=(7) B C100 BADSEG WTO ' SEGMENTS NOT SEQUENTIAL ',ROUTCDE=(2),DESC=(7) B C100 BADWRITE WTO ' WRITE UNSUCCESSFUL ',ROUTCDE=(2),DESC=(7) B C100 C100 DS0H L RD,SAVEAREA+4 RETURN (14,12)RESTORE REGISTERS AND RETURN INFILE DCB DSORG=PS,RECFM=VBS,MACRF=GL,+ DDNAME=INDD,EODAD=FINAL OUTFILE DCB DSORG=PS,RECFM=FB,LRECL=136,MACRF=PM, + DDNAME=OUTDD OUTREC DS0CL136 BATA DSCL136 SAVEAREA DS18F FWLENDS0F DSH HWLENDSH LTORG INRECDSECT DATA DSCL136 DSCL32000 DSCL32000 DSCL32000 END XP1000 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: How Do I Eliminate ML2 Migration?
Quick and easy is often a synonym for doomed to fail. You need to plan. Your current setup uses tape for ML2. How much data is currently in ML2? How long do you keep it? How rapidly does it grow? You bought disk to replace the tape. How much disk? Is it enough to handle all the current ML2 data plus the anticipated growth? Do you want the data that is currently on ML2 tapes to remain in HSM or do you want them to end up on Primary volumes? If the datasets are to remain in HSM, you may not need to recall them at all. Once the SETSYS ML2 units are changed, either the RECYCLE or FREEVOL commands should move the data to DASD. If you want the datasets on primary volumes, you will need to recall them but you will also need to change other SETSYS options to prevent Secondary Space Management from putting data on new ML2 volumes. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of George Rodriguez Sent: Wednesday, March 16, 2011 11:55 AM To: IBM-MAIN@bama.ua.edu Subject: Re: How Do I Eliminate ML2 Migration? Barry, Are the parameter that I change these: SETSYS TAPEMIGRATION(ML2TAPE (TAPE(3490))) SETSYS MIGUNITNAME(3490) Does that mean that the migration still occurs, except it goes to disk? Does it also mean that I might need to increase the migration volumes to support migration? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Opening a Spanned File for Input Using Assembler
After you solve the open problem, you still need to load R13 with the address of your 18 word save area (required by GET and PUT). You define the area but you never load R13. Don't forget to restore R13 before issuing the RETURN macro. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Bruce Hunt Sent: Tuesday, March 08, 2011 8:43 AM To: IBM-MAIN@bama.ua.edu Subject: Opening a Spanned File for Input Using Assembler I an trying to read a spanned file that has a record organzation of PS, a record format of VBS, a record length of 1, a blocksize of 27998 as per the file attributes, and a possible real record length of 65535. But in trying to open tne file I get a SOC4. I am not the greatest Assembler coder but my program is pretty simple. I know it is abending on the open. Anyone have any ideas. My actual input records in the spanned file are header records that are 76 bytes, data records that are 136 bytes, and trailer records that are 28 bytes. Any help will be greatly appreciated. TITLE 'XP1000' * * 02/25/11 B HUNT CHANGED A SPANNED FILE TO A FIXED FILE * XP1000 AMODE 31 XP1000 RMODE ANY XP1000 START COPY EQUATES SAVE (14,12) SAVE REGISTERS 14 THRU 12 BASR BASE1,0 ESTABLISH ADDRESSABILITY USING *,BASE1 PROVIDE BASE ID WTO ' START XP1000',X ROUTCDE=(2),X DESC=(7) B BEGIN SPACE 1 DS0D DCCL8'XP1000' DCCL8'SYSDATE' DCCL8'SYSTIME' SPACE 1 BEGINDS0H WTO ' BEFORE OPEN',ROUTCDE=(2),DESC=(7) OPEN (INFILE,INPUT,OUTFILE,OUTPUT) LTR 15,15 BNZ BADOPEN WTO ' GOOD OPEN FILE',ROUTCDE=(2),DESC=(7) LOOP DS 0H GET INFILE,INREC WTO ' GOOD FILE READ',ROUTCDE=(2),DESC=(7) MVC BATA,DATA WTO ' GOOD MOVE',ROUTCDE=(2),DESC=(7) PUT OUTFILE,OUTREC WTO ' GOOD FILE WRITE',ROUTCDE=(2),DESC=(7) B LOOP FINAL DS 0H WTO ' BEFORE FILE CLOSE',ROUTCDE=(2),DESC=(7) CLOSE (INFILE,,OUTFILE) WTO ' GOOD FILE CLOSE',ROUTCDE=(2),DESC=(7) B C100 BADOPEN WTO ' UABLE TO OPEN FILE',ROUTCDE=(2),DESC=(7) B C100 BADREAD WTO ' READ UNSUCCESSFUL ',ROUTCDE=(2),DESC=(7) B C100 BADWRITE WTO ' WRITE UNSUCCESSFUL ',ROUTCDE=(2),DESC=(7) B C100 C100 DS0H RETURN (14,12)RESTORE REGISTERS AND RETURN INFILE DCB DSORG=PS,RECFM=VBS,MACRF=GM,+ DDNAME=INDD,EODAD=FINAL OUTFILE DCB DSORG=PS,RECFM=FB,LRECL=28,BLKSIZE=2800,MACRF=PM, + DDNAME=OUTDD OUTREC DS0CL28 BATA DSCL28 SAVEAREA DS18F LTORG INRECDS0F DATA DSCL28 DSCL32000 DSCL32000 DSCL32000 END XP1000 09.38.22 JOB33865 -JOBNAME STEPNAME PROCSTEPRC EXCP CONN TCBSRB 09.38.22 JOB33865 -ASMJCL RMS RMS@2X 00 31 8 551177.00 09.38.22 JOB33865 + START XP1000 09.38.22 JOB33865 + BEFORE OPEN 09.38.25 JOB33865 IEA995I SYMPTOM DUMP OUTPUT 742 742 SYSTEM COMPLETION CODE=0C4 REASON CODE=0010 742 TIME=09.38.22 SEQ=02516 CPU= ASID=0060 742 PSW AT TIME OF ERROR 078C1000 80D26522 ILC 4 INTC 10 742NO ACTIVE MODULE FOUND 742NAME=UNKNOWN 742DATA AT PSW 00D2651C - 56403DD6 0B049180 20324710 742GR 0: 00011000 1: 00D00060 742 2: 001E9184 3: 00D264D2 742 4: 80D26522 5: 008FDBC0 742 6: 00D264D0 7: 00FBD480 742 8: 0E14409E 9: 8AAE2D88 742 A: 008CBC8D B: 008FF048 742 C: 010D93C0 D: 6008 742 E: 90D26518 F: 008FF048 742 END OF SYMPTOM DUMP //ASMJCL JOB (DP,6010),'XX - HUNT ',CLASS=A,MSGCLASS=X, // MSGLEVEL=(1,1),NOTIFY=SYSUID //* //RMS EXEC CA11RMS,TYPRUN='F' //* //ASMEXEC EXEC PGM=XP1000,REGION=0M //STEPLIB DD DISP=SHR,DSN=TEST.LE.LOADLIB //INDD DD DISP=SHR,DSN=TEST.FONT.BACKUP, // DSORG=PS,LRECL=X,BLKSIZE=27998,RECFM=VBS //OUTDDDD DSN=TEST.FONT.BACKUP.FIXED, // DISP=(,CATLG,CATLG), // SPACE=(TRK,(1950,100),RLSE), // DCB=(LRECL=28,BLKSIZE=0,RECFM=FB) //SYSOUT DD SYSOUT=* //SYSDBOUT DD SYSOUT=* //SYSUDUMP DD SYSOUT=* // -- For IBM-MAIN
Re: Question about PFKTAB in CONSOLE member of parmlib
The PFK operand on the INIT statement and the PFKTAB operand on the CONSOLE statement have to play together. Since you only have PFKTAB00 in PARMILIB, I assume your INIT statement contains PFK(00). Since member PFKTAB00 contains only one table, that is the table you should specify in the PFKTAB operand. (It would be nice if they didn't have the same name to avoid confusing the member with the table.) Do you not get an error message during IPL? There is no IBM delivered PFKTAB3. If you want one with that name you have to build it yourself. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of John Norgauer Sent: Tuesday, March 08, 2011 3:06 PM To: IBM-MAIN@bama.ua.edu Subject: Question about PFKTAB in CONSOLE member of parmlib In my current CONSOLE member in parmlib I have PFKTAB(PFKTAB3) However, in parmlib I only have a member PFKTAB00 which contains PFKTAB TABLE(PFKTAB00) So where would I find PFKTAB3? This is z/OS 1.9. John Norgauer Senior Systems Programmer Mainframe Technical Support Services University of California Davis Medical Center 2315 Stockton Blvd ASB 1300 Sacramento, Ca 95817 916-734-0536 SYSTEMS PROGRAMMING.. Guilty, until proven innocent !! JN 2004 Hardware eventually breaks - Software eventually works anon -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
