BUCHI'S HOME PAGE
・
サンプル
サンプルは前回と同じものです。
//JCL001 JOB J001,'J/BUCHI',CLASS=J,MSGCLASS=J,MSGLEVEL(1,0) //*********************************************************** //* PGM STEP01 * //*********************************************************** //STEP01 EXEC PGM=STEP01 //STEPLIB DD DSN=PGM.LINKLIB,DISP=SHR //SYSOUT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SYSDBOUT DD SYSOUT=* //GAT002O DD DSN=GA.GAT002P,DISP=(,CATLG), // UNIT=SYSDA,SPACE=(TRK,(1500,450),RLSE), // DCB=(RECFM=FB,LRECL=120,BLKSIZE=0) //GBT001I DD DSN=GA.GAT001P,DISP=SHR /* //
・
装置の指定
プログラムでDASDまたテープ上のデータセットを使用する場合、 使用するすべてのデータセットに対して必要な装置が割り振られていなければ ならない。
//GAT002O DD DSN=GA.GAT002P,DISP=(,CATLG), // UNIT=SYSDA,SPACE=(TRK,(1500,450),RLSE), // DCB=(RECFM=FB,LRECL=120,BLKSIZE=0)@UNIT=装置アドレス(UNIT=00Fなど)
・
スペースの割り振り
データセットを作成する場合、OSは指定されたボリューム上に十分なスペースを 見つけなければならない。そのため、どの程度のスペースが必要かあらかじめ指定しておく必要がある。
//GAT002O DD DSN=GA.GAT002P,DISP=(,CATLG), // UNIT=SYSDA,SPACE=(TRK,(1500,450),RLSE), // DCB=(RECFM=FB,LRECL=120,BLKSIZE=0)
SPACE=(割り振り単位,(1次数量,2次数量),RLSE)
@割り振り単位・
データセットの属性定義
DCBにはPGM中のコーディング、JCLのステートメントのコーディング、 データセットがすでに存在している場合はデータラベルの3つの情報源から収集した 情報が入り、データセットがOPENされるときにOSによって情報が埋められる。
//GAT002O DD DSN=GA.GAT002P,DISP=(,CATLG), // UNIT=SYSDA,SPACE=(TRK,(1500,450),RLSE), // DCB=(RECFM=FB,LRECL=120,BLKSIZE=0)
DCB=(RECFM=レコード形式,LRECL=レコードサイズ,BLKSIZE=ブロックサイズ)
レコード形式SEO | [PR] 爆速!無料ブログ 無料ホームページ開設 無料ライブ放送 | ||