01.REXXとは
【2008/10/25 original author TAKAO】 IBM系のOSはすべからくREXXというインタープリター言語が搭載されている。それゆえ「REXXってIBMが好きなんだよね。」以上に考えない人が日本に …
DASDボリュームの初期化（イニシャライズ）
DASDボリュームを初期化（イニシャライズ）する（MVSおよびMSP）
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 |
// JOB Statement //********************************************************************* //* Sample JCL for ICKDSF //* ====================== //********************************************************************* //*------- DASD ONLINE Initialize //ICKDSF EXEC PGM=ICKDSF,REGION=0M //SYSPRINT DD SYSOUT=* //DASD DD DISP=OLD,UNIT=SYSALLDA,VOL=SER=volnam //SYSIN DD * INIT DDNAME(DASD) NOVERIFY PURGE VTOC(0,1,14) NOINDEX INIT DDNAME(DASD) NOVERIFY PURGE VTOC(0,1,14) INDEX(1,0,15) // // //*------- DASD OFFLINE Initialize //ICKDSF EXEC PGM=ICKDSF,REGION=0M //SYSPRINT DD SYSOUT=* //SYSIN DD * INIT UNIT(XXXX) NOVERIFY PURGE VOLID(XXXXXX) VTOC(0,1,14) NOINDEX INIT UNIT(XXXX) NOVERIFY PURGE VOLID(XXXXXX) VTOC(0,1,14) - INDEX(1,0,15) REFORMAT UNIT(XXXX) NOVERIFY VOLID(newvol) // // //*------- Create IPL Volume //ICKDSF EXEC PGM=ICKDSF,REGION=0M //SYSPRINT DD SYSOUT=* //IPLTEXT DD DISP=SHR,DSN=SYS1.SAMPLIB(IPLRECS) // DD DISP=SHR,DSN=SYS1.SAMPLIB(IEAIPL00) //SYSIN DD * INIT UNIT(XXXX) NOVERIFY VOLID(XXXXXX) VTOC(0,1,29) INDEX(2,0,15) - IPLDD(IPLTEXT) BOOTSTRAP // // |
プログラム名は、MSPではJTGGDSですが、ICKDSFの別名が付いているのでM …
データセット（メンバー）を編集して印刷する
IEBPTPCHユーティリティー 順次データセットあるいは区分データセットのメンバーは、IEBPTPCHユーティリティで印刷することができます。レコードの内容を、べたで出力すればいいのならIEBGENERでSYSOUTに …
区分データセットのメンバー名変更と削除
IEHPROGMユーティリティー
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 |
// JOB Statement //********************************************************************* //* Sample JCL - IEHPROGM //* ===================== //********************************************************************* //OPMEMBER EXEC PGM=IEHPROGM //SYSPRINT DD SYSOUT=* //DASD DD DISP=OLD,UNIT=SYSDA,VOL=SER=volume //SYSIN DD * RENAME DSNAME=TEST.LIB1,VOL=SYSDA=volume, X MEMBER=JCL001,NEWNAME=ZJCL001 SCRATCH DSNAME=TEST.LIB1,VOL=SYSDA=volume,MEMBER=JCL003 (MSPの場合) SCRATCH DSNAME=TEST.LIB1,VOL=SYSDA=volume, X MEMBER=(MEM00001,MEM00002,MEM00003,MEM00004,MEM00005, X MEM010,MEM011,MEM012,MEM013,MEM014,MEM015,MEM016, X REBLOCK,SRCMCGEN) (VOS3の場合) SCRATCH DSNAME=TEST.LIB1,VOL=SYSDA=volume, X MEMBER=MEM00001,MEMBER=MEM00002,MEMBER=MEM00003 // |
プログラム名は、MSPではJSGPROGM、VOS3ではJSFCTLGですが、いずれもIEHPROGMの別名が付いている …
区分データセットのメンバー・リスト出力
IEHLISTユーティリティー
|
1 2 3 4 5 6 7 8 9 10 11 12 |
// JOB Statement //********************************************************************* //* Sample JCL - IEHLIST //* ==================== //********************************************************************* //LISTPDS EXEC PGM=IEHLIST,PARM='LINECNT=99' //SYSPRINT DD SYSOUT=* //SYSUT1 DD DISP=OLD,UNIT=SYSALLDA,VOL=SER=volume //SYSIN DD * LISTPDS FORMAT,DSNAME=(dsname1),VOL=SYSDA=volume LISTPDS DUMP,DSNAME=(dsname2),VOL=SYSDA=volume // |
プログラム名は、MSPではJSGLIST、VOS3ではJSFLISTですが、いずれもIEHLISTの別名が付いているからM …
非VSAM（PS、PDS）データセットの操作いろいろ
AMS（アクセス方式サービスプログラム）ユーティリティーは、VSAMデータセットとカタログ操作用のユーティリティ・プログラムとして提供されていますが、その応用範囲は広くて、VSAMだけでなくPSやPDSなどの非VSAMデ …
ラージDASD（3390-9型）の空きスペース管理
【この記事は投稿者の備忘録】 シリンダー数が4370cyl(x1112)以上になると総トラック数が65535(xFFFF)を超えてしまう。このため、2バイトのトラック・アドレス（RTA：Relative Track Ad …
DASDボリューム内にあるデータセットの一覧（VTOCリスト）を出力する
IEHLISTユーティリティー
|
1 2 3 4 5 6 7 8 9 10 11 12 13 |
// JOB Statement //********************************************************************* //* Sample JCL - IEHLIST //* ==================== //********************************************************************* //LISTVTOC EXEC PGM=IEHLIST,PARM='LINECNT=99' //SYSPRINT DD SYSOUT=* //SYSUT1 DD DISP=OLD,UNIT=SYSALLDA,VOL=SER=volume //SYSIN DD * LISTVTOC VOL=SYSALLDA=volume LISTVTOC FORMAT,VOL=SYSALLDA=volume LISTVTOC DUMP,VOL=SYSALLDA=volume // |
プログラム名は、MSPではJSGLIST、VOS3ではJSFLISTですが、いずれもIEHLISTの別名が付いているのでM …
DASDレイアウト
【2008/10/22 original author TAKAO】 レイアウト IBMのDASDは、トラック上はCKD（カウント、キー、データ）という形式で管理されます。その名前のとおり、Count|key|Data| …
DFP31ビットモード・プロセッシング
MVSでは当初からQSAM、BSAM、BPAM等によるデータセットのアクセスは24ビットモード・プロセッシングが基本でした。LOWレベルなI/OメカニズムはCCWも含めMVS/XAの時点で既に31ビット化されていましたが …