Re: In over my head again...
"Ilmars Sermulis" <[email protected]>
| Newsgroups | gmane.comp.emulators.turnkey-mvs |
|---|---|
| Message-ID | <001201cae4c3$b0ef2a20$0100a8c0@susan> |
Hi Ron: This may be a shot in the dark, as I am new to this step as well. I assume that you still have the password enabled for the Master Catalog. When you submitted the JCL to define the user catalog, did you notice 2 obscure prompts from the job on the operator console? If they appear, then the master catalog is expecting the password to be entered at these prompts, since the password does not appear in your JCL.. When I ignore these prompts, and the job terminates, I get an error code of 56 (not the 52 that you get) but it might be related. In order to embed the password in your JCL you can insert statements as I have illustrated below. Just change SYSPROG to whatever password you have set for the master catalog. And also enter the continuation hyphen character on the preceding line. === 00010 //DEFUCATS JOB USER=HERCAD,CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1) 00020 //IDCAMS EXEC PGM=IDCAMS,REGION=4096K 00030 //SYSPRINT DD SYSOUT=A 00040 //USER01 DD UNIT=3350,VOL=SER=USER01,DISP=OLD 00050 //SYSIN DD * 00052 00060 DEFINE USERCATALOG ( - 00070 NAME (UCUSER01) - 00080 VOLUME (USER01) - 00090 TRACKS (8324 0) - 00100 FOR (9999) ) - 00110 DATA (TRACKS (15 5) ) - 00120 INDEX (TRACKS (15) ) - 00125 CATALOG(SYS1.AMASTCAT/SYSPROG) 00130 DEFINE ALIAS (NAME (USER01) - 00135 RELATE (UCUSER01) ) - 00137 CATALOG(SYS1.AMASTCAT/SYSPROG) 00140 /* 00150 // END OF DATA Again, you may have already taken this into account and I may be on the wrong track. Hope this helps... Ilmars ----- Original Message ----- From: Ron Hudson To: [email protected] Sent: Sunday, April 25, 2010 5:23 PM Subject: Re: [turnkey-mvs] In over my head again... On Sun, Apr 25, 2010 at 11:22 AM, Rick Fochtman <[email protected]> wrote: Ron, you've specified the size of the catalog twice. Remove the "tracks(8324)" specification from your define. Did this now the error is "IDC3225I REQUIRED (SUB)PARAMETER IS OF 'RECORDS' IS MISSING" Also, are you trying to define a VSAM UCAT, or a catalog for non-vsam files that belong to users other than the operating system? If you don't need the catalog for VSAM clusters and dataspaces, a SYSCTLG dataset would be far more useful to you. This is meant to be where the users keep their own datasets - I am real new to this so I am not sure what VSAM means.. Google looks like it's just a filesystem or the order and access of files on a disk drive.. I will personally be writing programs in FORTRAN and perhaps COBOL. When I get good perhaps even assembler. Rick ---------------------------------------------------------------------------------- Ron Hudson wrote: Hi All, Well It's sink or swim! I am trying to create a user catalog Because: 1) I am tired of always having to type the password (sys1.vmastcat has an update password) 2) Users in the master catalog is frowned on in the "real world" I have used dasdinit to create a new 3350 DASD (300 mb goes a long way right?) Attached it to address 141 Initialized it with a JCL from here: http://www.jaymoseley.com/hercules/installmvs/adddasd.htm mounted it as STORAGE Added it to the VATLIST (as storage) using RPF to edit sys1.parmlib.VATLST01 Now I can run the JCL from http://www.jaymoseley.com/hercules/installmvs/instmvs5.htm to create the user catalog... but I get an error: code 52 reason IGG0CLBU-0 Google finds nothing about the reason code. I have checked the typed in JCL (which I had to modify from the website example) It looks OK to me.. === 00010 //DEFUCATS JOB USER=HERCAD,CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1) 00020 //IDCAMS EXEC PGM=IDCAMS,REGION=4096K 00030 //SYSPRINT DD SYSOUT=A 00040 //USER01 DD UNIT=3350,VOL=SER=USER01,DISP=OLD 00050 //SYSIN DD * 00052 00060 DEFINE USERCATALOG ( - 00070 NAME (UCUSER01) - 00080 VOLUME (USER01) - 00090 TRACKS (8324 0) - 00100 FOR (9999) ) - 00110 DATA (TRACKS (15 5) ) - 00120 INDEX (TRACKS (15) ) 00125 00130 DEFINE ALIAS (NAME (USER01) - 00135 RELATE (UCUSER01) ) 00137 00140 /* 00150 // END OF DATA === d u,dasd,online,141 shows: unit 141, Type 3350, Status O, Volser USER01, Volstat STRG/RSDNT Thanks ! Ron