[ 
Image Added |../../index.htm#lansa/upd_entry_e.htm]
現在地:
| Anchor |
|---|
| _Ref428890058 |
|---|
| _Ref428890058 |
|---|
|
...
...
7.124.3 UPD_ENTRY の使用例 例1：ワークステーションからリストへの入力を定義、初期化し、受け入れます。入力を処理し、妥当性検査を実行してから、データベースを更新します。
DEF_LIST NAME(#ORDERLINE) FIELDS(#ORDLIN #PRODUCT #QUANTITY #PRICE) SET_MODE TO(*ADD) CHANGE FIELD(#ORDERLINE) TO(*NULL) INZ_LIST NAMED(#ORDERLINE) NUM_ENTRYS(10) DISPLAY BROWSELIST(#ORDERLINE) BEGINCHECK SELECTLIST NAMED(#ORDERLINE) GET_ENTRYS(*NOTNULL) * VALUECHECK -- * CONDCHECK | Various validation checks * RANGECHECK | performed against each list entry * FILECHECK -- UPD_ENTRY IN_LIST(#ORDERLINE) ENDSELECT ENDCHECK IF_ERROR(*LASTDIS) SELECTLIST NAMED(#ORDERLINE) GET_ENTRYS(*ALL) INSERT FIELDS(#ORDERLINE) TO_FILE(ORDLIN) ENDSELECT
[ Image Added |../../index.htm#lansa/upd_entry_e.htm]