| ソース入力ユーティリティ（ＳＥＵ） |
ＳＥＵはプログラム・ソースやデータ記述のソースを入力するためのユーティリティです。
ソースのタイプに応じて、強力なプロンプト機能や文法チェック機能を持っているため、
入力は容易で入力ミスも発生しにくくなります。
ＳＥＵの開始
ＳＥＵを開始するにはコマンド入力の行で、
ＳＴＲＳＥＵ ＦＩＬＥ（ライブラリー名／ファイル名） ＭＢＲ（メンバー名）
のように入力します。
ここで、キーワードＦＩＬＥやＭＢＲはこの順番であれば以下のように省略可能です。
ＳＴＲＳＥＵ ライブラリー名／ファイル名 メンバー名
ファイル名はメンバーを入れるソースファイル名で、ソースの種類により、一般に次のように使い分けるのが普通です。
ソースの種類 ソースファイル名 タイプ ＲＰＧ-ＩＩＩプログラムソース ＱＲＰＧＳＲＣ ＲＰＧ ＲＰＧ-IVプログラムソース ＱＲＰＧＬＥＳＲＣ ＲＰＧＬＥ ＣＯＢＯＬプログラムソース ＱＣＢＬＳＲＣ ＣＯＢ ＣＯＢＯＬ－ＣＯＰＹメンバー ＱＬＢＬＳＲＣ ＣＯＢ データファイル記述 ＱＤＤＳＳＲＣ ＰＦ，ＬＦ，ＤＳＰＦ，ＰＲＴＦ ＣＬプログラム ＱＣＬＳＲＣ ＣＬ，ＣＬＰ コマンド定義のソース ＱＣＭＤＳＲＣ ＣＭＤ
データファイル記述は、場合によっては、データベースファイルのためにＱＤＤＳＳＲＣを使用し、
画面ファイルにはＱＤＳＰＳＲＣ、印刷ファイルにはＱＰＲＴＳＲＣのように、分けることもあります。
いずれの場合でも、ファイル名はＱＸＸＸＳＲＣの形にしなければならない訳ではありません。
いまここでは、下記ファイル（Ｍ４２０）をＱＤＤＳＳＲＣに入力する場合で、ＳＥＵの使用法を説明ます。
得意先マスターＭ４２０
A UNIQUE A R M420R A* A TKSTS 1A COLHDG('状態') A TKTKCD 5A COLHDG('得意先№') A TKNMKJ 42O COLHDG('得意先名') A TKNMKN 20A COLHDG('得意先カナ') A TKTEL 12A COLHDG('電話番号 ') A TKGYSH 2A COLHDG('業種コード') A TKFLG 1A COLHDG('フラグ ') A TKUR\ 11S 0 COLHDG('売上実績 ') A* A K TKTKCD
ＳＥＵの開始は先のＳＴＲＳＥＵコマンドまたは、ＰＤＭのメニューの３番（メンバーの処理）で開始するの
２通りの方法があります。
いずれも最終的には同じＳＥＵが開始されます。
ファイルＭ４２０を入力するには、
ＳＴＲＳＥＵ ＷＲＫＬＩＢ／ＱＤＤＳＳＲＣ Ｍ４２０
のように入力します。先に述べたように、ここではキーワードパラメータを省略しています。
メンバーＭ４２０がまだファイルに存在していないときは、次のようなが画面が表示されます。
桁 . . . . . : 1 71 編集 WRKLIB/QDDSSRC SEU==> M420 ***************** データの始め ************************************** ''''''' ''''''' ''''''' ''''''' ''''''' ''''''' ''''''' ''''''' ''''''' ''''''' ''''''' ''''''' ''''''' ''''''' ''''''' ''''''' ''''''' ''''''' ''''''' ***************** データの終り **************************************
この画面は入力モードの画面です。
必要は入力を終えて実行キーを押すと、次のように画面が変ります。
桁 . . . . . : 1 71 編集 WRKLIB/QDDSSRC SEU==> M420 ***************** データの始め ************************************** 0001.00 A UNIQUE 0002.00 A R M420R 0003.00 A TKSTS 1A COLHDG('状態') 0004.00 A TKTKCD 5A COLHDG('得意先№') 0005.00 A TKNMKJ 42O COLHDG('得意先名') 0006.00 A TKNMKN 20A COLHDG('得意先カナ') 0007.00 A TKTEL 12A COLHDG('電話番号 ') 0008.00 A TKGYSH 2A COLHDG('業種コード') 0009.00 A TKFLG 1A COLHDG('フラグ ') 0010.00 A TKUR\ 11S 0 COLHDG('売上実績 ') 0011.00 A* 0012.00 A K TKTKCD ***************** データの終り **************************************
入力ミスがあれば、原則として重ね打ちをして訂正すればよいのですが、訂正が多い場合などでは、
ＳＥＵのコマンドを使用して能率を上げます。
ＳＥＵのコマンド
ＳＥＵのコマンドは通常のコマンドと、行コマンドの２種があります。
通常コマンド
通常コマンドは、 SEU==> の後に入力します。次のようなものがあります。
Ｔ トップへ位置づけ表示 Ｂ ボトムへ位置づけ表示。 Ｆ 文字列探索（補足参照） Ｃ 文字列置換（補足参照） Ｈ 特定の文字列の行の非表示 ＳＡＶＥ メンバー保管
補足：
Ｆ（文字列探索）
ＡＢＣを探すときは、
Ｆ ＡＢＣ
のように入力します。
さらに次の探索を行うときは、Ｆ１６キーを押します。
２番目のパラメータとして
Ｆ ＡＢＣ Ａ
のようにＡ（またはＡＬＬ）をつけると、何件ヒットしたかもわかります。
ＳＥＵではメンバーのタイプがＲＰＧやＣＯＢＯＬのとき、文法チェックができます。
Ｆ ＊ＥＲＲ
とすると画面に表示されていない部分にある文法エラーの個所を探すことができます。
Ｃ（文字列置換）
ＡＢＣをＸＹＺに置換するときは、
Ｃ ＡＢＣ ＸＹＺ
のように入力します。
さらに続けて次の文字列ＡＢＣを置換するときは、Ｆ１７キーを押します。
全てのＡＢＣをＸＹＺに置換するには、
Ｃ ＡＢＣ ＸＹＺ Ａ
のように入力します。
演算仕様書のコメント行を非表示にするようなときは、
Ｈ Ｃ＊
のように入力します。
ＳＡＶＥ ＸＸＸ（メンバー保管）
メンバー名ＸＸＸで保管します。メンバー名は省略できます。
このときは開いているメンバーへ保管します。
行コマンド
行コマンドは、画面左の９９９９．９９のように表示された、行番号に重ね入力します。
行コマンド一覧（ｎは数字です。）
ｎｎｎｎ 表示移動。その行番号から表示します。 Ａ その行の次がコピー先（又は移動先）であることをしめします。 Ｂ その行の前がコピー先（又は移動先）であることをしめします。 Ｃ コピー対象の行（１行分）を示します。 Ｄ その行（１行分）を削除することを示します。 Ｉｎ その行の後ろに入力用の空行をｎ行作成します。 Ｍ 移動対象の行（１行分）を示します。 Ｏ 重ねコピー対象の行を示します。ブランクの桁にコピーです。 ＣＣ コピー対象の行（複数行）の範囲（開始と終了）を示します。 ＤＤ 削除対象の行（複数行）の範囲（開始と終了）を示します。 ＭＭ 移動対象の行（複数行）の範囲（開始と終了）を示します。 ＯＯ 上書きコピー対象の行の範囲（開始と終了）を示します。ブランクの桁にコピーです。 Ｌｎ その行だけ、左へｎ桁シフトを示します。 Ｒｎ その行だけ、右へｎ桁シフトを示します。 ＬＴｎ その行だけ、左へｎ桁シフトを示します。（切り捨てあり） ＲＴｎ その行だけ、右へｎ桁シフトを示します。（切り捨てトあり） ＬＬｎ ｎ桁左シフトの範囲（開始と終了）を示します。 ＲＲｎ ｎ桁右シフトの範囲（開始と終了）を示します。 ＬＬＴｎ ｎ桁左シフトの範囲（開始と終了）を示します。（トランケートあり） ＲＲＴｎ ｎ桁右シフトの範囲（開始と終了）を示します。（トランケートあり） ＲＰｎ その行をｎ行コピーします。
以下に行コマンドの例を示します。
例－１：行をコピー（２行目を４行目の後にコピー）
***************** データの始め ************************************** 0001.00 AAAAAAAAAAAAAAAAAAAAAAAAA C 02.00 BBBBBBBBBBBBBBBBBBBBBBBBBB 0003.00 CCCCCCCCCCCCCCCCCCCCCCCCCCC A 04.00 DDDDDDDDDDDDDDDDDDDDDDDDDDDD ***************** データの終り **************************************
例－２：行をコピー（２行目を４行目の前にコピー）
***************** データの始め ************************************** 0001.00 AAAAAAAAAAAAAAAAAAAAAAAAA C 02.00 BBBBBBBBBBBBBBBBBBBBBBBBBB 0003.00 CCCCCCCCCCCCCCCCCCCCCCCCCCC B 04.00 DDDDDDDDDDDDDDDDDDDDDDDDDDDD ***************** データの終り **************************************
例－３：行をコピー（１、２行目を４行目の後にコピー）
***************** データの始め ************************************** CC 1.00 AAAAAAAAAAAAAAAAAAAAAAAAA CC 2.00 BBBBBBBBBBBBBBBBBBBBBBBBBB 0003.00 CCCCCCCCCCCCCCCCCCCCCCCCCCC A 04.00 DDDDDDDDDDDDDDDDDDDDDDDDDDDD ***************** データの終り **************************************
例－４：行を移動（２行目を４行目の後に移動）
***************** データの始め ************************************** 0001.00 AAAAAAAAAAAAAAAAAAAAAAAAA M 02.00 BBBBBBBBBBBBBBBBBBBBBBBBBB 0003.00 CCCCCCCCCCCCCCCCCCCCCCCCCCC A 04.00 DDDDDDDDDDDDDDDDDDDDDDDDDDDD ***************** データの終り **************************************
例－５：行を移動（２行目を４行目の前に移動）
***************** データの始め ************************************** 0001.00 AAAAAAAAAAAAAAAAAAAAAAAAA M 02.00 BBBBBBBBBBBBBBBBBBBBBBBBBB 0003.00 CCCCCCCCCCCCCCCCCCCCCCCCCCC B 04.00 DDDDDDDDDDDDDDDDDDDDDDDDDDDD ***************** データの終り **************************************
例－６：行を移動（１、２行目を４行目の後に移動）
***************** データの始め ************************************** MM 1.00 AAAAAAAAAAAAAAAAAAAAAAAAA MM 2.00 BBBBBBBBBBBBBBBBBBBBBBBBBB 0003.00 CCCCCCCCCCCCCCCCCCCCCCCCCCC A 04.00 DDDDDDDDDDDDDDDDDDDDDDDDDDDD ***************** データの終り **************************************
例－７：行を削除とリピート（１行目を削除、３、４行目を削除、６行目リピート３回）
***************** データの始め ************************************** D 01.00 AAAAAAAAAAAAAAAAAAAAAAAAA 0002.00 BBBBBBBBBBBBBBBBBBBBBBBBBB DD 3.00 CCCCCCCCCCCCCCCCCCCCCCCCCCC DD 4.00 DDDDDDDDDDDDDDDDDDDDDDDDDDDD 0005.00 EEEEEEEEEEEEEEEEEEEEEEEEEEEEE RP3 .00 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF ***************** データの終り **************************************
例－８：重ねコピー（６行目を２～４行目に重ね）
***************** データの始め ************************************** 0001.00 AAAAAAAAAAAAAAAAAAAAAAAAA OO 2.00 BBBBBBBBBBBBBBBBBBBBBBBBBB 0003.00 CCCCCCCCCCCCCCCCCCCCCCCCCCC OO 4.00 DDDDDDDDDDDDDDDDDDDDDDDDDDDD 0005.00 EEEEEEEEEEEEEEEEEEEEEEEEEEEEE C 06.00 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF ***************** データの終り **************************************
例－９：シフト（１行目左へ２桁、２行目右へ３桁、４～６行目左へ４桁、８～９行目右へ５桁）
***************** データの始め ************************************** L2 1.00 AAAAAAAAAAAAAAAAAAAAAAA R3 2.00 BBBBBBBBBBBBBBBBBBBBBBBBBB 0003.00 CCCCCCCCCCCCCCCCCCCCCCCCCCC LL4 .00 DDDDDDDDDDDDDDDDDDDDDDDD 0005.00 EEEEEEEEEEEEEEEEEEEEEEEEE LL .00 FFFFFFFFFFFFFFFFFFFFFFFFFF 0007.00 GGGGGGGGGGGGGGGGGGGGGGGGGGGGGGG RR5 .00 HHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHH RR .00 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII ***************** データの終り **************************************
２行目、４～６行目、ブランク以外が桁落ちだとエラーになります。
このようなときは「トランケート（切り捨て）あり」を使用します。（行コマンド一覧を参照）
ＳＥＵの終了
ＳＥＵの編集を終了するときは、Ｆ３キーを押します。次のようなＳＥＵ終了画面が表示されます。
終了 選択項目を入力して，実行キーを押してください。 メンバーの作成／変更 . . . . . . . Y Y=YES, N=NO メンバー . . . . . . . . . . . . M420 名前，リストは F4ｷｰ ファイル . . . . . . . . . . . . QDDSSRC 名前，リストは F4ｷｰ ライブラリー . . . . . . . . . WRKLIB 名前 テキスト . . . . . . . . . . . . 得意先マスター メンバーの番号つけ直し . . . . . Y Y=YES, N=NO 開始 . . . . . . . . . . . . . 0001.00 0000.01-9999.99 増分値 . . . . . . . . . . . . 01.00 00.01-99.99 メンバーの印刷 . . . . . . . . . . N Y=YES, N=NO 編集に戻る . . . . . . . . . . . . N Y=YES, N=NO メンバー・リストの表示 . . . . . . N Y=YES, N=NO F3= 終了 F4=ﾌﾟﾛﾝﾌﾟﾄ F5= 最新表示 F12= 取消し F18= DBCS 変換
メンバー名、メンバーの番号のつけ直し、などに変更がなければ、そのまま実行キーを押します。
実行キーでなく、Ｆ３キーを押すと、先の編集画面での入力編集処理は失われてしまいます。
もどる 目 次
（Ｃ）ＣＯＰＹＲＩＧＨＴ ＩＳＨＩＯＫＡ ＫＡＴＳＵＨＩＤＥ ２０００