Demopkg(ADCD) z/OS 1.9 Customize Note 1
IEF244I ADCDMST ISPFPROC ISPFPROC - UNABLE TO ALLOCATE 1 UNIT(S) 026 AT LEAST 1 OFFLINE UNIT(S) NEEDED. IEF877E ADCDMST NEEDS 1 UNIT(S) 027 FOR ISPFPROC ISPFPROC ISPLST2 FOR VOLUME SCRTCH- 1 OFFLINE, NOT ACCESSIBLE 0120-015F 0301-0318 0A98-0AEF : IEF878I END OF IEF877E FOR ADCDMST ISPFPROC ISPFPROC ISPLST2 05 IEF238D ADCDMST - REPLY DEVICE NAME OR 'CANCEL'.
如果我们在console上显示一下DASD的状况的话，发现只有一个Z9SYS1的卷是STRG的属性，简单地说，在你LOGON的时候，你的LOGON PROC里面的一个叫做ISPLST2的DD里面制定了UNIT=SYSDA，这个临时的DS就会在属性为Storage的DASD上分配，而很不幸别人给我的这个Z9SYS1卷上各种之前的DUMP都没有被删除，把整个卷都用满了，所以无法allocate这个临时的DS，就会出现上面的错误了
D U,DASD,ONLINE,,99 IEE457I 22.32.31 UNIT STATUS 116 UNIT TYPE STATUS VOLSER VOLSTATE 0A80 3390 S Z9RES1 PRIV/RSDNT0A81 3390 A Z9RES2 PRIV/RSDNT0A82 3390 A Z9SYS1 STRG/RSDNT0A83 3390 A Z9RES3 PRIV/RSDNT0A84 3390 A Z9USS1 PRIV/RSDNT0A85 3390 O Z9PRD1 PRIV/RSDNT0A86 3390 O Z9DIS1 PRIV/RSDNT0A87 3390 O Z9DIS2 PRIV/RSDNT0A88 3390 O Z9DIS3 PRIV/RSDNT0A89 3390 O Z9DIS4 PRIV/RSDNT0A8A 3390 O Z9DIS5 PRIV/RSDNT0A8B 3390 O Z9DIS6 PRIV/RSDNT0A8C 3390 O SARES1 PRIV/RSDNT0A8D 3390 O Z9CIC1 PRIV/RSDNT0A8E 3390 O Z9DB81 PRIV/RSDNT0A8F 3390 O Z9DB82 PRIV/RSDNT0A90 3390 A Z9DB91 PRIV/RSDNT0A91 3390 A Z9DB92 PRIV/RSDNT0A92 3390 O Z9IMS1 PRIV/RSDNT0A93 3390 O Z9WAS1 PRIV/RSDNT0A94 3390 O Z9WAS2 PRIV/RSDNT0A95 3390 O Z9WAS3 PRIV/RSDNT0A97 3390 O Z19SPL PRIV/RSDNT
那么在无法TSO LOGON的情况下该怎么解决呢？我们可是有master console的哦，非常强大无比的console，用MVS的MOUNT命令改一块盘的属性就好了，一块磁盘的属性有PRIVATE/STORAGE/PUBLIC三种，具体用法略过，当我们改过属性之后，回复WTOR再重新TSO LOGON就没有问题了
M /0A97,VOL=(SL,Z19SPL),USE=STORAGE $HASP100 MOUNT ON STCINRDR $HASP373 MOUNT STARTED IEF403I MOUNT - STARTED - TIME=21.39.36 IEF404I MOUNT - ENDED - TIME=21.39.36 $HASP395 MOUNT ENDED IEA989I SLIP TRAP ID=X33E MATCHED. JOBNAME=*UNAVAIL, ASID=0048.$HASP250 MOUNT PURGED -- (JOB KEY WAS C68B36E1) D U,,,0A97,1 IEE457I 21.39.46 UNIT STATUS 073 UNIT TYPE STATUS VOLSER VOLSTATE 0A97 3390 O Z19SPL STRG/RSDNT R 05,0A97 IEE600I REPLY TO 05 IS;0A97
当然我们不建议把存放系统配置文件的卷当作STRG来用，所以今后之后我们会修改IPL时候各个卷的属性，同样我们也会为JES SPOOL重新分配2个独立的卷，请继续关注。
Hercules z/OS 1.9 Setup on Windows7(64bit)
怎样在自己的PC上架设大型机的z/OS（MVS）系统呢？可以借助Hercules这个仿真软件，也就是前一阵在欧洲起诉IBM大型机垄断的那个案子，也跟这个软件有关，MVS是一个非常封闭的系统，一方面IBM需要这样的仿真软件来让爱好者和专家们更方便学习或展示他们的z/OS，另一方面又担心影响到自己的正常业务，所以也就挣一只眼闭一只眼，但即使在自己的PC上架起了全套的z/OS，顶多用于培训的目的，用于其他商业目的还不太现实，下面就开始一步一步的介绍怎样在Windows7 64位上架设属于自己的z/OS系统。
环境说明
Hardware
ACER 4820TG
Intel i7-620M 2.66GHz
4GB DDR3 RAM
640GB HDD
Software
Windows7 Home Premium 64bit
z/OS 1.9
1. 去Hercules的主页下载64或32位的程序包，解压或安装到某目录C:\Hercules 并创建下面的文件夹备用
How to SAVE/PRINT SYSLOG to dataset?
1. Specify SYSLOG write outclass
2. Start write PROC
You should have a PROC like below, to write SYSLOG to dataset, usually in your site PROCLIB.
//IEFPROC EXEC PGM=IASXWR00,PARM='PL'
//IEFRDER DD DSN=MIB.SYSLOG(+1),
// DISP=(NEW,CATLG),UNIT=SYSDA,SPACE=(CYL,(90,80),RLSE),
// DCB=(MIB.SYSLOG.DSCB,BUFNO=5,BUFL=4088)
3. Wait until this message pop up
4. Stop PROC
After all, if you want to make this happen automatically, eg. run every week, you probably need to schedule 3 jobs for step 1&2&4 in sequence, with some workload automation tool such as CA ESP or IBM TWS or BMC Control-M.
Guess what is this?
LINKLST/LPA Considerations
LINKLST/LPA Considerations
Only reentrant load modules can be executed from the LPA. Before copying a library’s contents to an LPA defined library or defining a library as an LPA library, inspect the members and move those that are non-reentrant to a LINKLST-defined library.
记住，放在LPA lib里面的module是要有RN标识的，因为他们是被所有Address Space共享使用的。
Reentrant load module means that it can be executed concurrently by several tasks but it cannot be temporarily modified. Then, each copy can be used by any number of tasks running in any number of CPUs in any number of address spaces at the same time.
To determine which members are non-reentrant, use the ISPF Browse facility and follow these steps:
1. Display an ISPF browse member selection list for the load library.
2. Issue the SORT ATTR command.
3. Scroll to the right to see the Attributes column.
Note: Most members show attributes of RN RU, for reentrant and reuseable.
4. Members showing spaces instead of RN are non-reentrant and cannot be moved into the LPA.
Command ===> Scroll ===> CSR
Name Prompt Alias-of ---- Attributes ---- SSI
_________ IXLINSIN IXLI1MAN RN RU 01113205
_________ IXLINSIP IXLI1MAN RN RU 01113205
_________ IXLI1MAN RN RU 01113205
_________ IEAVNPRR RU 01117560
_________ IEAVNP16 RU 01110024
_________ IEAVTSAS RU
_________ ISGNWMSI RU 80570538
_________ AMDSADPL 70675312
How to Determine LPA Load Module Storage Requirements
5. Issue the SORT RMODE command.
To determine the amount of storage required, follow one of these methods:
For 24-bit storage, add the hexadecimal value found in the Size field for all programs containing the value 24 in the RM (RMODE) field.
For 31-bit storage, add the hexadecimal value found in the Size field for all programs containing the value ANY in the RM (RMODE) field.
联络订阅
