サブファイル選択制御方法
画面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する。)