大型機S390系統(tǒng)管理第三章4節(jié)應用程序

1、 36實用程序361實用程序的分類在MVS系統(tǒng)中，IBM提供了種類繁多且十分有用的實用程序，來輔助用戶對數(shù)據(jù)進行組織與維護。實用程序分為三類：系統(tǒng)實用程序、數(shù)據(jù)集實用程序和獨立實用程序。系統(tǒng)實用程序通常以IEH打頭，它的主要功能是維護和管理系統(tǒng)、用戶數(shù)據(jù)集合整個盤卷。系統(tǒng)實用程序及其功能如下：IEHNITT：為磁帶卷寫標號。IEHLIST：系統(tǒng)控制數(shù)據(jù)信息列表。IEHMOVE：移動或拷貝若干組數(shù)據(jù)、移動或拷貝整個卷、移動或拷貝編目目錄等。IEHPROGM：建立及維護系統(tǒng)控制數(shù)據(jù)、建立時代數(shù)據(jù)組索引、重命名磁帶卷、刪除數(shù)據(jù)集等。IEHDASDR：初始化一個直接存取卷。數(shù)據(jù)集實用程序通常以IEB打

2、頭。它的主要功能是對數(shù)據(jù)集或數(shù)據(jù)集紀錄進行組織、修改或比較。它可以作為單個作業(yè)來執(zhí)行，也可以作為某個程序的子程序被調用。需要注意的是這些數(shù)據(jù)維護實用程序不能用于VSAM數(shù)據(jù)集。以下是數(shù)據(jù)集實用程序及其功能：IEBCOMPR：比較順序數(shù)據(jù)集、分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集。IEBCOPY：拷貝、壓縮或合并分區(qū)數(shù)據(jù)集及擴展分區(qū)數(shù)據(jù)集。IEBDG：創(chuàng)建含有模型數(shù)據(jù)的測試數(shù)據(jù)集。IEBEDIT：有選擇的拷貝作業(yè)步及其相關的作業(yè)語句。IEBGENER：拷貝順序數(shù)據(jù)集記錄或將順序數(shù)據(jù)集轉換為分區(qū)數(shù)據(jù)集。IEBIMAGE：修改、打印或連接模塊。IEBISAM：卸載、裝載、拷貝或打印ISAM數(shù)據(jù)集。IEBPTPC

3、H：打印或穿卡輸出一個數(shù)據(jù)集。IEBUPDATE：對順序、分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)機進行合并修改。獨立實用程序通常以IBC開頭。它是一種特殊的實用程序，可獨立于操作系統(tǒng)運行，通常被存放在磁帶上。當系統(tǒng)出現(xiàn)重大故障而又無法恢復時，利用系統(tǒng)轉儲磁帶，恢復系統(tǒng)盤卷。如：IBCDASDI：用于初始化和分配一個直接存取卷上的可用道的實用程序。IBCDUMPRS：是轉儲或再存儲直接存取卷數(shù)據(jù)的實用程序。362實用程序的調用實用程序的調用方法有兩種，一種實在ISPF下用TSO的CALL命令調用，另一種是通過JCL語句調用，在本章中我們只討論后一種調用方式。其格式為：（1）/UTLFM JOB /STEP E

4、XEC PGM=utility 調用公用程序 /SYSPRINT DD 系統(tǒng)輸出數(shù)據(jù)集（SYSOUT） /SYSUT1 DD 輸入數(shù)據(jù)集 /SYSUT2 DD 輸出數(shù)據(jù)集 /SYSIN DD 定義實用程序使用的控制數(shù)據(jù)（2）/UTLFM JOB /STEP EXEC PGM=utility 調用實用程序 /SYSPRINT DD 系統(tǒng)輸出數(shù)據(jù)集（SYSOUT） /ddname DD UNIT=,VOL=,DISP=OLD 存取所需數(shù)據(jù)集的有關信息 /ddname DD UNIT=,VOL=,DISP=OLD 所存儲數(shù)據(jù)集的有關信息 /SYSIN DD 定義實用程序實用的控制數(shù)據(jù)363 控制語句

5、的標準格式標號 操作符 操作數(shù) 注釋 標號用于表示控制語句,除實用程序IEHNITT外，其它實用程序都可以省略標號。標號必須放在控制語句開始的位置，后面留有一個以上的空格。標號石油18個字母或數(shù)字字符組成。操作符用于標示控制語句的類型，其后至少跟有一個空格。操作數(shù)是由一個或多個關鍵字參數(shù)組成，參數(shù)之間以逗號相隔。操作數(shù)后至少跟一個空格。控制語句內可加注釋，但它與操作數(shù)之間至少要有一個空格。當控制語句有續(xù)行時，可在本行有逗號的地方斷開，或在本行第72列處設置一個字符，或在下一行的16列開始。364 常用實用程序簡介IEBCOMPRIEBCOMPR程序用于在兩個數(shù)據(jù)集的邏輯記錄間進行比較，這兩個數(shù)

6、據(jù)集可以是順序數(shù)據(jù)集、分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集。它能對數(shù)據(jù)集或數(shù)據(jù)集成員的定長、變長、組塊、非組塊或未定義記錄進行比較。但它不能對加載模塊進行比較。兩個順序數(shù)據(jù)集比較相同，是指它們含有相同數(shù)量的記錄且相關記錄和關鍵字完全相同。而兩個分區(qū)數(shù)據(jù)集或兩個擴展分區(qū)數(shù)據(jù)集比較相同，則是指：相關成員含有相同的記錄；注釋列表在相關成員的位置相同；相關記錄和關鍵字完全相同；相關目錄和用戶數(shù)據(jù)區(qū)完全相同。 對于相同的數(shù)據(jù)集必須同時滿足這些條件，否則不能視其為相同數(shù)據(jù)集。 下面是關于IEBCOMPR程序語句的列表： 語 句 功 能JOB作業(yè)開始EXEC定義程序名PGM=IEBCOMPRSYSPRINT DD指定

7、系統(tǒng)輸出數(shù)據(jù)集SYSUT1 DD定義需要比較的數(shù)據(jù)集SYSUT2 DD定義需要比較的數(shù)據(jù)集SYSIN DD定義控制數(shù)據(jù)集或DUMMY，控制語句可以是COMPARE、EXITS、LABELS 控制語句說明： COMPARE：定義數(shù)據(jù)集的組織結構，在SYSIN DD中設置控制語句時，投資必須是第一個控制語句，當輸入數(shù)據(jù)集是分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集時，必須設置這個語句。語句格式如下： label COMPARE TYPROG=PS/PO其中TYPROG=PS/PO用于指定輸入數(shù)據(jù)集的組織結構，PS表示輸入數(shù)據(jù)集為順序數(shù)據(jù)集，為缺省值；PO表示輸入數(shù)據(jù)集是分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集。EXITS：定義

8、用戶所用的出口例程。當用戶調用出口例程時，需要用該語句。當設置多個EXITS時，IEBCOMPR將只用最后一個。EXITS的語句格式為：label EXITS INHDR=例程名 ,INTLR=例程名 ,ERROR=例程名 ,PRECOMP=例程名其中“INHDR=例程名”指定處理用戶輸入頭標的例程名；“INTLR=例程名”指定處理用戶輸入尾標的例程名；“ERROR=例程名”指定出錯處理接收控制的例程名；“PRECOMP=例程名”指定一個例程名，該例程在IEBCOMPR比較輸入數(shù)據(jù)集之前對邏輯記錄進行處理。LABELS：指定是否將用戶標號作為數(shù)據(jù)來處理，當設置多個LABELS語句時，IEBCO

9、MPR程序只用最后一個，LABELS語句的格式為：label LABELS DATA=YES | NO | ALL| ONLY其中DATA= YES | NO | ALL| ONLY指明是否將用戶標號作為數(shù)據(jù)處理。DATA的取值如下：YES：所有用戶標號都作為數(shù)據(jù)處理，并依照返回碼，將標號作為數(shù)據(jù)終止來處理，該值為缺省值。NO：僅將用戶標號作為數(shù)據(jù)處理。ALL：所有用戶標號作為數(shù)據(jù)處理，16中返回碼將使IEBCOMPR程序完成剩余用戶標號組的處理并終止作業(yè)步。ONLY：只用用戶頭標作為數(shù)據(jù)處理，處理時不管是否有返回碼。應用實例：比較兩個分區(qū)數(shù)據(jù)集/DISKDISK JOB /STEP1 EXE

10、C PGM=IEBCOMPR/SYSPRINT DD SYSOUT=A/SYSUT1 DD DSN=PDSSET1,UNIT=disk,DISP=SHR,/ DCB=(RECFM=FB,LRECL=80,BLKSIZE=2000),/ VOLUME=SER=111112/SYSUT2 DD DSN=PDSSET2,UNIT=disk,DISP=SHR / DCB=(RECFM=FB,LRECL=80,BLKSIZE=2000) /SYSIN DD * COMPARE TYPROG=PO/*在上例中，SYSUT1 DD語句定義輸入數(shù)據(jù)集（PDSSET1），這是個組塊數(shù)據(jù)集，它駐留在磁盤卷上。SY

11、SUT2 DD語句定義另一個輸入數(shù)據(jù)集（PDSSET2），它也是個駐留在磁盤卷上的塊組數(shù)據(jù)集。SYSIN DD語句定義流內控制數(shù)據(jù)集，其中的控制語句表示兩個輸入數(shù)據(jù)集是分區(qū)數(shù)據(jù)集。IEBCOPYIEBCOPY程序用于拷貝或合并多個分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集，其作用有：拷貝完整的數(shù)據(jù)集或部分數(shù)據(jù)集；建立分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集的備份，備份是存放在磁帶或磁盤上的順序數(shù)據(jù)集；變更分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集的成員、為選擇的成員更換新名；對加載模塊進行拷貝和重新組塊。下面是IEBCOPYDE的作業(yè)控制語句列表： 語 句說 明JOB作業(yè)初始EXEC定義程序名PGM=IEBCOPYSYSPRINT DD定

12、義由IEBCOPY產(chǎn)生的系統(tǒng)輸出信息SYSUT1 DD定義輸入的分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集SYSUT2 DD定義輸出的分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集SYSUT3 DD定義一個一處數(shù)據(jù)集，該語句在沒有足夠的虛擬空間存放輸入的分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集目錄入口時使用SYSUT4 DD定義一個一處數(shù)據(jù)集，該語句在沒有足夠的虛擬空間存放輸出的分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集目錄入口時使用SYSIN DD定義控制語句，可在這里定義的語句有：COPY、ALTERMOD、COPYMOD、SELECT、EXECLUDE下面對控制語句進行說明：COPY：啟動一個或多個拷貝、寫在或加載操作。其格式為；label COPY

13、OUTDD=ddname ,INDD=(ddname | (ddname,R),) ,LIST=YES|NO操作數(shù)說明：“OUTDD=ddname”：指定輸出的分區(qū)數(shù)據(jù)集名，這里的ddname必須是本作業(yè)步中的一個DD語句名?！癐NDD=(ddname | (ddname,R),)”：指定輸入分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集，對于卸載操作只能指定一個ddname，這里的R表示從輸入的數(shù)據(jù)集中選擇所有的成員進行相應的操作，此時不需設置SELECT語句。“LIST=YES|NO”：指出是否將拷貝的成員名列在SYSPRINT數(shù)據(jù)集中，取值為YES時將成員名列表。需要注意的是：如果為拷貝操作，輸入數(shù)據(jù)集和輸

14、出數(shù)據(jù)集必須是分區(qū)數(shù)據(jù)集、擴展分區(qū)數(shù)據(jù)集或卸載模塊結果的順序數(shù)據(jù)集；如果是加載操作，輸入數(shù)據(jù)集必須是分區(qū)數(shù)據(jù)集或順序數(shù)據(jù)集，而輸出數(shù)據(jù)集則必須是分區(qū)數(shù)據(jù)集；如果是卸載操作，輸入數(shù)據(jù)集必須是分區(qū)數(shù)據(jù)集、擴展分區(qū)數(shù)據(jù)集或順序分區(qū)數(shù)據(jù)集，輸出數(shù)據(jù)集可以駐留在直接存取卷上，也可以駐留在磁帶卷上。當駐留在磁帶卷上時，它的組織結構必須是順序數(shù)據(jù)集，且要指定省略目錄或縮影值得SPACE參數(shù)。ALTERMOD：指明加載模塊變更的開始，其格式為：label ALTERMOD OUTDD=ddname，LIST=YES|NO操作數(shù)說明：“OUTDD=ddname”：指定要變更的數(shù)據(jù)集；“LIST=YES|NO”：

15、指明是否將變更成員名列在SYSPRINT數(shù)據(jù)集中，取值為YES時，被變更的所有成員名列在SYSPRINT數(shù)據(jù)集中。COPYMOD：指明對拷貝和加載模塊從新組塊的操作，其格式為：label COPYMOD OUTDD=ddname ,INDD=(ddname | (ddname,R),) ,MAXBLK=nnnn|nnK ,MINBLK=nnnn|nnk ,LIST=YES|NO操作數(shù)說明：“OUTDD=ddname”：指定加載模塊要拷貝到的分區(qū)數(shù)據(jù)集；“INDD=(ddname | (ddname,R),)”：指定輸入數(shù)據(jù)集名，該數(shù)據(jù)集是一個加載模塊庫，并在本作業(yè)的一個名為ddname的DD語

16、句中定義，這里的R表示從輸入的數(shù)據(jù)集中選擇所有的成員進行拷貝，并變更輸出加載模塊庫中任何指定的成員名，此時不需設置SELECT語句；“MAXBLK=nnnn|nnK”：指定輸出分區(qū)數(shù)據(jù)集記錄的最大塊值，通常設置的值要小于缺省值，以便數(shù)據(jù)記錄能和其它系統(tǒng)或程序兼容，nnnn是一個十進制數(shù)，nnK則表示nn千字節(jié)，其缺省值是輸出數(shù)據(jù)集的塊大?。弧癕INBLK=nnnn|nnk”： 指定輸出分區(qū)數(shù)據(jù)集記錄的最小塊值，缺省值為1K；“LIST=YES|NO”：指明是否將變更成員名列在SYSPRINT數(shù)據(jù)集中，取值為YES時，被變更的所有成員名列在SYSPRINT數(shù)據(jù)集中。SELECT：確定輸入數(shù)據(jù)集中

17、要拷貝的成員名，其格式為：label SELECT MEMBER=（name1|（name1，newname1,R）|（name1, ,R）| ，（name2，newname2，R）|（name2，R），。）操作數(shù)說明：“MEMBER=”：name確定拷貝的成員名；newname確定拷貝輸出的成員名，如果這個名字在輸出分區(qū)數(shù)據(jù)集中已存在，則這個成員不被拷貝，除非同時設置R參數(shù)，newname和ALTERMOD不能同時使用。EXCLUDE：確定輸入數(shù)據(jù)集中不被拷貝和不加載的成員，其格式為：label EXCLUDE MEMBER=（name1，name2，）下面是幾個實例：例1/COPY JOB

18、 /JOBSTEP EXEC PGM=IEBCOPY /SYSPRINT SYSOUT=A /SYSUT1 DD DSN=DATASET5,UNIT=disk,VOL=SER=111113, / DISP=SHR /SYSUT2 DD DSN=DATASET4,UNIT=disk,VOL=SER=111112, / DISP=(NEW,KEEP),SPACE=(TRK,(5,1,2)上面是一個拷貝整個數(shù)據(jù)集的例子。在該例中，SYSOUT1 DD定義一個含有兩個成員的分區(qū)數(shù)據(jù)集DATASET5，SYSUT2 DD定義一個新的分區(qū)數(shù)據(jù)集DATASET4，并為它分配5個磁道，其中兩個磁道分配給目錄區(qū)

19、。在這個例子中不需要SYSIN DD語句，它把數(shù)據(jù)集DATASET5的所有成員都拷貝到數(shù)據(jù)集DATASET4中。例2/COPY JOB /JOBSTEP EXEC PGM=IEBCOPY /SYSPRINT DD SYSOUT=* /OUT1 DD DSN=DATESET1,UNIT=disk,VOL=SER=111112, / DISP=(OLD,KEEP) /IN6 DD DSN=DATASET6,UNIT=disk,VOL=SER=111115, / DISP=OLD /IN5 DD DSN=DATASET5,UNIT=disk,VOL=SER=111116, / DISP=(OLD,K

20、EEP) /SYSUT3 DD UNIT=SYSDA,SPACE=(TRK,(1) /SYSUT4 DD UNIT=SYSDA,SPACE=(TRK,(1) /SYSIN DD * COPYOPER COPY OUTDD=OUT1 INDD=IN5,IN6 SELECT MEMBER=(B,R),A) /*上面是一個拷貝、置換被選擇的數(shù)據(jù)集成員的例子。在該例中：OUT1 DD語句定義含有三個成員（A、B和F）的分區(qū)數(shù)據(jù)集DATASET1；IN6 DD語句定義含有三個成員（B、C和F）的分區(qū)數(shù)據(jù)集DATASET6；IN5 DD語句定義含有兩個成員（A、C）的分區(qū)數(shù)據(jù)集DATASET5；SYSUT

21、3和SYSUT4 DD語句定義臨時溢出數(shù)據(jù)集，并為它們分配一個磁道；SYSIN DD語句定義流內控制數(shù)據(jù)集，它包含一個COPY語句、一個INDD語句和一個SELECT語句。OUTDD參數(shù)指定DATASET1作為輸出數(shù)據(jù)集，INDD指定DATASET5作為第一個處理的輸入數(shù)據(jù)集，而DATASET6作為第二個處理的輸入數(shù)據(jù)集，它的處理順序為：在DATASET5中查詢所選擇成員。首先查到成員A，但不拷貝到DATASET1中，因為DATASET1中已經(jīng)含有成員A且沒有設置R參數(shù)、。在DATASET5中未查到所需要的成員，繼續(xù)在DATASET6中查找。找到成員B并拷貝到DATASET1中，雖然DATAS

22、ET1中已經(jīng)含有成員B，但在這里設置了R參數(shù)。SELECT指定從輸入數(shù)據(jù)集拷貝選擇的成員到輸入數(shù)據(jù)集。例3/CONVERT JOB /STEP1 EXEC PGM=IEBCOPY /SYSPRINT DD SYSOUT=* /SYSUT1 DD DSN=PDSSET,DISP=SHR,DSNTYPE=PDS /SYSUT2 DD DSN=PDSSET,LINK=PDSSET,DSNTYPE=LIBRARY, / DISP=(NEW,CATLG) 上面是一個分區(qū)數(shù)據(jù)集轉換為擴展分區(qū)數(shù)據(jù)集的例子。在該例中，SYSUT1 DD語句定義一個輸入的分區(qū)數(shù)據(jù)集PDSSET，SYSUT2 DD語句定義輸出的

23、擴展分區(qū)數(shù)據(jù)集PDSE，所有的擴展分區(qū)數(shù)據(jù)集都是由存儲管理子系統(tǒng)（SMS）進行管理，其中LINK子參數(shù)為擴展分區(qū)數(shù)據(jù)集設置DCB和SPACE特性，DSNTYPE子參數(shù)指出新建數(shù)據(jù)集是擴展分區(qū)數(shù)據(jù)集而不是分區(qū)數(shù)據(jù)集。這里不需要SYSIN DD語句。IEBGENERIEBGENER程序主要用于：建立順序數(shù)據(jù)集、分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集成員的備份。這個拷貝可以是磁帶到磁帶、磁盤到磁盤或磁盤到磁帶。注意：如果需要將備份數(shù)據(jù)集放在原數(shù)據(jù)集所在的卷，它們兩者不能同名。從順序數(shù)據(jù)集產(chǎn)生分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集。通過實用程序控制語句，將順序數(shù)據(jù)集邏輯化分為若干個記錄組并為其分配成員名，之后IEBGENER

24、程序把這些新建的成員放到指定的分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集中。注意：對于含有跨區(qū)記錄的數(shù)據(jù)集不能產(chǎn)生分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集。為分區(qū)數(shù)據(jù)集添加新成員。IEBGENER程序將輸入的順序數(shù)據(jù)作為一個成員加到指定的分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集中。產(chǎn)生一個編輯的順序數(shù)據(jù)集、分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集。通過使用實用程序控制語句，指定一個或一組記錄或整個數(shù)據(jù)集的編輯信息。處理含有雙字節(jié)字符數(shù)據(jù)集。用IEBGENER可以拷貝、編輯、重新組塊或打印含有雙字節(jié)字符（DBCS）的數(shù)據(jù)，也可以將含有DBCS數(shù)據(jù)的順序數(shù)據(jù)集轉換成為分區(qū)數(shù)據(jù)集。打印順序數(shù)據(jù)集、分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集的成員。對數(shù)據(jù)集的邏輯記錄進行重新

25、組塊或改變其長度。為順序輸出數(shù)據(jù)集拷貝用戶標號。為用戶例程提供編輯設施及出口，該例程用于處理標號、受控輸入數(shù)據(jù)及永久性輸入輸出錯誤。下面是IEBGENER的作業(yè)控制語句列表： 語 句說 明JOB作業(yè)初始EXEC指定程序名PGM=IEBGENERSYSPRINT DD指定系統(tǒng)輸出數(shù)據(jù)集SYSUT1 DD定義輸入數(shù)據(jù)集SYSUT2 DD定義輸出數(shù)據(jù)集SYSIN DD定義控制數(shù)據(jù)集，控制語句可以是GENERATE、EXITS、LABELS、MEMBER、RECORD控制語句說明：GENERATE：指明成員名和別名數(shù)、記錄標識符、文字及控制數(shù)據(jù)集中的編輯信息。EXITS：指明用戶出口歷程。LABELS

26、：特指用戶標號處理。MEMBER：指定新建分區(qū)數(shù)據(jù)集或擴展分區(qū)數(shù)據(jù)集的成員名或成員別名。RECORD：定義將處理的記錄組并提供編輯信息。應用實例：例1/PRINT JOB /STEP1 EXEC PGM=IEBGENER /SYSPRINT DD SYSOUT=A /SYSIN DD DUMMY /SYSUT1 DD DSN=INPUT,UNIT=3380,DISP=SHR, / DCB=(RECFM=F,LRECL=80,BLKSIZE=80),VOL=SER=111112 /SYSUT2 DD SYSOUT=A,DCB= DCB=(RECFM=F,LRECL=80,BLKSIZE=80) 上面是一個打印順序數(shù)據(jù)集的例子。由于該作業(yè)不需要公用程序的控制語句，因此SYSIN DD語句定義了空數(shù)據(jù)集DUMMY，SYSUT1定義了輸入順序數(shù)據(jù)集INPUT，SYSUT2定義了輸出數(shù)據(jù)集的輸出設備，其中DCB參數(shù)用于改變數(shù)據(jù)輸出格式。4IEHLISTIE