例 1CF (フィールド単位) 接頭部コマンド
この例では、CF (フィールド単位) 接頭部コマンドを使用して再定義基準を入力する方法を示します。
Process Options Help
───────────────────────────────────────────────────────────────────────────────
File Manager Field Selection/Edit Line 1 of 11
Command ===> _____________________________________________________ Scroll CSR
----------- Criteria - Enter 1 or 2 to specify expression by field -----------
1 Id : +
2 Sel: +
Offset 0 CCSID _____
Cmd Seq SHE Ref Field Name Picture Type Start Length
**** Top of data ****
___ ___ 1 1 REDEFINES-LAYOUT AN 1 5
___ ___ 2 2 REDEF-TYPE X AN 1 1
cf 3 2 DATA-A AN 2 4
___ ___ 4 3 DATA-A1 XX AN 2 2
___ ___ 5 3 DATA-A2 XX AN 4 2
cf 6 2 DATA-B REDEFINES DATA-A AN 2 4
___ ___ 7 3 DATA-B1 99 ZD 2 2
___ ___ 8 3 DATA-B2 99 ZD 4 2
cf 9 2 DATA-C REDEFINES DATA-A AN 2 4
___ ___ 10 3 DATA-C1 S9(4) BI 2 2
___ ___ 11 3 DATA-C2 S9(4) BI 4 2
**** End of data ****
REDEFINES 文節があるか、REDEFINES 文節のターゲットになっているフィールドの横に CF コマンドを入力し、Enter キーを押します。
最初のフィールド DATA-A の「REDEFINES Criteria」パネルが表示されます。
Process Options Help
───────────────────────────────────────────────────────────────────────────────
File Manager REDEFINES Criteria: DATA-A Line 1 of 11
Command ===> _____________________________________________________ Scroll CSR
Cmd Con ( Field Name Op Value )
<-> - <---+----1----+----2----+----3----> <-> <---+----1----+----2----+-- -
*** **** Top of data ****
1 REDEFINES-LAYOUT
AND 2 REDEF-TYPE = A
AND 2 DATA-A
AND 3 DATA-A1
AND 3 DATA-A2
AND 2 DATA-B
AND 3 DATA-B1
AND 3 DATA-B2
AND 2 DATA-C
AND 3 DATA-C1
AND 3 DATA-C2
*** **** End of data ****
DATA-A 定義のサンプル・パネルのように式 = A を入力します。ブランクの場合、演算子のデフォルト設定は =
です。
F3 を押します。
Process Options Help
───────────────────────────────────────────────────────────────────────────────
File Manager REDEFINES Criteria: DATA-B Line 1 of 11
Command ===> _____________________________________________________ Scroll CSR
Cmd Con ( Field Name Op Value )
<-> - <---+----1----+----2----+----3----> <-> <---+----1----+----2----+-- -
*** **** Top of data ****
1 REDEFINES-LAYOUT
AND 2 REDEF-TYPE = B
AND 2 DATA-A
AND 3 DATA-A1
AND 3 DATA-A2
AND 2 DATA-B
AND 3 DATA-B1
AND 3 DATA-B2
AND 2 DATA-C
AND 3 DATA-C1
AND 3 DATA-C2
*** **** End of data ****
DATA-B 定義のサンプル・パネルのように式 = B を入力して、F3 を押します。
Process Options Help
───────────────────────────────────────────────────────────────────────────────
File Manager REDEFINES Criteria: DATA-C Line 1 of 11
Command ===> _____________________________________________________ Scroll CSR
Cmd Con ( Field Name Op Value )
<-> - <---+----1----+----2----+----3----> <-> <---+----1----+----2----+-- -
*** **** Top of data ****
1 REDEFINES-LAYOUT
AND 2 REDEF-TYPE = C
AND 2 DATA-A
AND 3 DATA-A1
AND 3 DATA-A2
AND 2 DATA-B
AND 3 DATA-B1
AND 3 DATA-B2
AND 2 DATA-C
AND 3 DATA-C1
AND 3 DATA-C2
*** **** End of data ****
DATA-C 定義のサンプル・パネルのように式 = C を入力して、F3 を押します。
Process Options Help
───────────────────────────────────────────────────────────────────────────────
File Manager Field Selection/Edit Line 1 of 11
Command ===> _____________________________________________________ Scroll CSR
----------- Criteria - Enter 1 or 2 to specify expression by field -----------
1 Id : +
2 Sel: +
Offset 0 CCSID _____
Cmd Seq SHE Ref Field Name Picture Type Start Length
**** Top of data ****
___ ___ 1 1 REDEFINES-LAYOUT AN 1 5
___ ___ 2 2 REDEF-TYPE X AN 1 1
___ ___ 3 2 DATA-A AN 2 4
___ ___ 4 3 DATA-A1 XX AN 2 2
___ ___ 5 3 DATA-A2 XX AN 4 2
___ ___ 6 2 DATA-B REDEFINES DATA-A AN 2 4
___ ___ 7 3 DATA-B1 99 ZD 2 2
___ ___ 8 3 DATA-B2 99 ZD 4 2
___ ___ 9 2 DATA-C REDEFINES DATA-A AN 2 4
___ ___ 10 3 DATA-C1 S9(4) BI 2 2
___ ___ 11 3 DATA-C2 S9(4) BI 4 2
**** End of data ****
注: 再定義基準のあるフィールド (フィールド 3、6、および 9) では、その参照番号が赤で「Field Selection/Edit」パネルに強調表示されます。