■  [TSO] 達人メインフレーマーへの道

あくまでも筆者の主観的な話ですよ (^Д^)

▲その１★ISPF設定画面（＝０.設定）は、コマンドで出せ！

どこの画面にあっても、SETTINGSコマンドで設定画面に遷移できます。

Sample

EX)

EDIT MYLIB(MYMEM) - 99.00 行 00000000 桁 001 080 コマンド ===> SETTINGS スクロール ===> CSR ************************** データの始め ************************** 000100 //JOB CLASS=A,MSGCLASS=A 000200 //*

     

ISPF 設定 コマンド ===> MORE: + オプション選択： 印刷図形 選択には、"/"を入力します ファミリー印刷 _ コマンド行を下部に表示 装置タイプ．．．;２． / CUA モードでパネル表示 装置名．．．．． _ ポップアップに長メッセージ表示 縦横比．．．．．;0 _ アクション・バー選択項目にタブ移動 _ POINT-AND-SHOOT フィールドにタブ移動 / TEST/TRACE オプションの復元 一般 _ セッション・マネージャー・モード 入力フィールド / 先行ドットからのジャンプ 埋込み文字．．．B _ PRINTDS コマンドの編集 コマンド区切り / 分割行の常時表示 文字．．．．．．; _ EURO 記号の使用可能 メンバー・リストオプション 選択には、"/"を入力します / メンバー・リストのスクロール _ 空メンバー・リストの許可

     
F8を押して次ページ

ISPF 設定 コマンド ===> MORE: - オプション選択： 選択には、"/"を入力します / メンバー・リストのスクロール _ 空メンバー・リストの許可 _ 空メンバー・リストの許可 (NOMATCH) / 編集でのみ空メンバー・リスト 端末属性 画面形式．．． 2 1.DATA 2.STD 3.MAX 4.PART 端末タイプ．． 5 1. 3277 2. 3278 3. 3278T 4. 3277KN 5. 3278KN 6. 3277A 7. 3278A 8. 3290A 9. 3278KN 10. 3278AR 11. 3278A 12. 3278HN 13. 3278HO 14. 3278IS 15. 3278CY 16. BE163 17. BE190 18. 3278TH 19. 3278L2 20. DEU78 21. DEU78A 22. DEU78T 23. DEU90A 24. SW116 25. SW131A 26. SW400 37. 3278GR 28. 3278L1 29. OTHER

※「コマンド行を下部に表示」はOFFにしておいたほうが見やすいと思います（慣れの問題ですけど）。

---

▲その２★よく使うコマンドは、ファンクションキーを変更せよ！

SUBとかSDSFとか、よく使うコマンドは使っていないファンクションキー（←ファンクション１３以降）に割り当てちゃいましょう。
ファンクションキーの変更は、こちらを参考にしてください。

どこの画面にあっても、KEYSコマンドで設定画面に遷移できます。

Sample

EX)

EDIT MYLIB(MYMEM) - 99.00 行 00000000 桁 001 080 コマンド ===> KEYS スクロール ===> CSR ************************** データの始め ************************** 000100 //JOB CLASS=A,MSGCLASS=A 000200 //*

     
出てきた画面で、F8を押して次ページ

キーリスト・ユーティリティ ファイル PRIVATE ISR キーリスト ISRSPEC の 変更 行 13 - 24 / 24 コマンド ===> 変更して、ファイル・アクション・バーを選択してください。 キーリストのヘルプ・パネル名．．．ISRSPECH キー 定義 形式 ラベル F13 ・ ・ SUB;SWAP______________________________________ SHORT ______ F14 ・ ・ END;SDSF;ST__________________________________ LONG ______ F15 ・ ・ ______________________________________________ ____ ______ F16 ・ ・ ______________________________________________ ____ ______ F17 ・ ・ ______________________________________________ ____ ______ F18 ・ ・ ______________________________________________ ____ ______ F19 ・ ・ ______________________________________________ ____ ______ F20 ・ ・ ______________________________________________ ____ ______ F21 ・ ・ ______________________________________________ ____ ______ F22 ・ ・ ______________________________________________ ____ ______ F23 ・ ・ ______________________________________________ ____ ______ F24 ・ ・ ______________________________________________ ____ ______

この例では、F13キーとF14キーを設定してみました。
F13でSUBMITコマンドとSWAPコマンドを連続で発行し、
F14でENDコマンドとSDSFのST画面に遷移するコマンドを発行します。

※キーボードからファンクション１３以降を押すには、Shift＋PFxx(←xxは１〜１２)で押せます。

---

▲その３★＝３．４（ＤＳリスト）は使うな！

＝３．４（ＤＳリスト）は何でもできちゃうコワイ画面ですよ！

区分データセットのメンバーを見たり編集する時、おまじないのように、
＝３．４（ＤＳリスト）で全メンバーのリストを出して、
例えば、"L MEMBER1"で探しだして、
メンバーの横に"B"って入れて、、、
編集が必要になったら、前の画面に戻って、編集モードで開き直して、
また、"L MEMBER1"で探しだして、 メンバーの横に"E"って入れて、、、

っていう人いませんか？？

全メンバーを相手にして、行ったり戻ったり、ＢＲＯＷＳＥしたりＥＤＩＴしたり、、、と非効率的です。

事故を起こさないためにも、そんな非効率なことをしないで、ＩＳＰＦの「１．ビュー」や「２．編集」を使いましょう。

メンバーの一覧が必要なら、「１．ビュー」や「２．編集」の画面から、なるべく少量に絞って処理しましょう。
例えば、TEST.MYLIB(SORT*)のように。 少量のメンバーなら、SRCHFORコマンドもレスポンスよく使えますよ。

Sample

ISPF 基本オプション・メニュー オプション ==>_______________________________________________________ 0 設定 端末とユーザー・パラメーター USER ID． : USR1 1 ビュー ソース・データまたは TIME．．． : 01:23 リスト表示 TERMINAL． : 3278KN 2 編集 ソース・データの作成と変更 SCREEN．． : 1 3 ユーティリティー ユーティリティー機能の実行 LANGUAGE． : UPPERENG 4 前景 APPL ID． : ISP 5 バッチ TSO LOGON : LOGON 6 コマンド ; ; ; X を入力すると、ログ／リストのデフォルトを用いて終了します。

     
「2 編集」の場合

編集入力パネル コマンド ===> ________________________________________________________________ ISPF ライブラリー プロジェクト．． ________ グループ．．．． ________ ．．． ________ ．．．________ ．．． ________ タイプ．．．．． ________ メンバー．．．． ________ ( メンバー選択リストはブランクかパターン ) その他の区分、順次、 VSAM データセット、 Z/OS UNIX ファイル： 名前．．．．．． 'TEST.MYLIB(SORT*)' ←カタログされて場合はここに入力 ボリューム通し番号．．MYVOL1 ( カタログされていない場合 ) ワークステーション・ファイル： ファイル．．．_____________________________________________________________ オプション 初期マクロ名．．．．_________ _ 取り消し / 移動 / 置換の確認 プロファイル名．．．_________ / 混合モード 形式名．．．．．．．_________ _ ワークステーション上での編集 DATA SET パスワード _ VB レコードの長の保持 レコード長．．．．．_________ ラインコマンド表．．_________ データ ENC 1. ASCII 2. UTF-8

※＝３．４（ＤＳリスト）でメンバーを絞る方法もあります⇒ここを参照。

---

▲その４★ＳＤＳＦでなんでもかんでも？で分解するな！

？はおまじないじゃない！

ＪＯＢログをＳＤＳＦで見る時、おまじないのように？で、バラバラにしてから内容を見る人っていませんか？？

例えば、特定のメッセージを探すために？で、バラバラにして、
JESMSGLG→JESJCL→JESYSMS→.....etc
のように、ＢＲＯＷＳＥしては、ＦＩＮＤ、ＰＦ３、、、を繰り返すって、まったくムダな動作です。

特定の帳票を見る時以外は、？でログをバラバラにする必要性なんてないハズです。

Sample
EX)

SDSF HELD OUTPUT DISPLAY ALL CLASSES LINES xx COMMAND INPUT ===> NP JOBNAME JOBID OWNER PRTY C ? MYJOB01 JOB12345 USER001 2 X

     

SDSF JOB DATA SET DISPLAY - JOB MYJOB01 (JOB12345) COMMAND INPUT ===> NP DDNAME STEPNAME PROCSTEP DSID OWNER C DEST S JESMSGLG xxxx 2 USER001 X LOCAL S JESJCL xxxx 3 USER001 X LOCAL S JESYSMSG xxxx 4 USER001 X LOCAL S SYSOUT STEP1 5 USER001 X LOCAL LIST STEP1 6 USER001 X LOCAL

  ↑ なんでわざわざバラバラにしてから、１つ１つを見るの？？

※バラバラにすると、アベンド時にメッセージを探ずらいんです。

---

▲その５★ＳＯＲＴＷＫｘｘなんていらない！

いい加減な容量のSORTWKxxを指定して、SORTWKxxのS-B37を引き起こすくらいなら、SORTWKxxの指定はやめちゃいましょう！
ＳＯＲＴＷＫのアロケートはＯＳに任せて動的にアロケートさせましょう。指定しないと通常、SORTWK01〜SORTWK04が自動でアロケートされます。

参考⇒コラム２を見てね。

Sample
EX)

//STEP1		EXEC	SORT
//SORTIN		DD	DSN=INFILE,DISP=SHR
//SORTOUT		DD	DSN=OUTFILE,DISP=SHR
//SORTWK01		DD	UNIT=DISK,SPACE=(CYL,(10,10))	←この行いらない
//SORTWK02		DD	UNIT=DISK,SPACE=(CYL,(10,10))	←この行いらない
//SORTWK03		DD	UNIT=DISK,SPACE=(CYL,(10,10))	←この行いらない
//SYSIN		DD	*
SORT FIELDS=(1,80,BI,A)
/*

---

▲その６★よく使うＩＤＣＡＭＳコマンドは、＝６（コマンド）でやっちゃえば？！

IDCAMSで実行するコマンドは＝６（コマンド）の画面でもできちゃうんです。
（実行しちゃうと元に戻らないから気を付けてやってね！）

Sample

EX)

【JCL版】

EDIT MYLIB(MYMEM) - 99.00 行 00000000 桁 001 080 コマンド ===> スクロール ===> CSR ************************** データの始め ************************** 000100 //JOB CLASS=A,MSGCLASS=A 000200 //STEP01 EXEC PGM=IDCAMS 000300 //STSPRINT DD SYSOUT=* 000400 //SYSIN DD * 000500 DELETE TEST.MYFILE PURGE NONVSAM 000600 /* 000700 //

     
このようなJCLの場合は、＝６（コマンド）の画面でできちゃいます。

ISPF コマンド・シェル TSO またはワークステーション・コマンドを下に入力してください。 ===> DEL_'TEST.MYFILE'_PRG_NVSAM_________________________________________________ _________________________________________________________________________________ _________________________________________________________________________________ カーソルを選択肢に置いて ENTER を押すと、 RETRIVE コマンドが実行されます。 => => => => => => => => =>

     実行結果

ENTRY (A) TEST.MYFILE DELETED ***

※リターンコードは見れません。

コマンド画面では、入力できる桁数に限界があるので、キーワードは省略形を使いましょう

例えば、
DELETE → DEL
PURGE → PRG
NONVSAM → NVSAM
とか。

---

▲その７★すばやく本日のジュリアンデートを知るには

こちらのページです。

---

TOP PAGE

Copyright©2002- FUKU All rights reserved.