サブファイル選択制御方法
画面DDS
| A**************************************************************** | |
| A*画面1 | |
| A**************************************************************** | |
| A CA05 CA07 CF01 | |
|
|
| A CTLFLD 1Y 0H SFLCHCCTL (このフィールドに選択情報が入ります) | |
| A G\OUT 72O O 5 2 | |
| A STRNO 9Y 0H | |
| A STCUCD 6Y 0H | |
| A STMGCD 9Y 0H | |
| A STSURI 2Y 0H | |
| A STTRCD 6Y 0H | |
| A R SFLCT1 SFLCTL(SFLRE1) OVERLAY | |
|
|
| A SFLSNGCHC (シングル選択) | |
| A CHCSLT((*COLOR PNK)) | |
| A SFLPAG(18) SFLSIZ(19) | |
| A 41 SFLDSP | |
| A 42 SFLDSPCTL | |
| A 43 SFLCLR | |
|
|
| A F3 5S 0H SFLSCROLL | |
| A F2 4S 0H SFLRCDNBR(CURSOR *TOP) | |
| A 1 30'テスト画面' | |
| A COLOR(WHT) | |
| A 2 2'口座番号' | |
| A G\CUCD 6Y 0O +1TEXT('口座№') | |
| A G\CUNK 42O O +1TEXT('口座名') | |
| A 4 2'銘柄コード 銘柄名 売買+ | |
| A 約定日 数量 単価 + | |
| A ' | |
| A COLOR(WHT) DSPATR(RI) | |
| A R SCRMSG | |
| A CMDMSG 70O O 23 2TEXT('コマンド') | |
| A COLOR(BLU) | |
| A ERRMSG 70O O 24 2TEXT('エラーメッセージ') | |
| A COLOR(RED) |
横セパレート(SFLLIN)を使いたいけれど使用できない(コンパイルは通るがABENDする。)