Page History
[ 
|../../index.htm#lansa/check_for_e.htm]
現在地:
...
7.13.3 CHECK_FOR の使用例
例1：ファイル 例1：ファイル CUSMST 内に、フィールド #CUSNUM の現行値と一致するキーを持つレコードが存在するかどうかを検査します。
CHECK_
...
FOR IN_FILE(CUSMST)
...
WITH_KEY(#CUSNUM)
IF_
...
STATUS IS_NOT(*EQUALKEY)
...
ABORT MSGTXT('Customer not found in customer master')
ENDIF
どのような場合に、CHECK_FOR コマンドによって返される状況が、より一般的な *OKAY ではなく、*EQUALKEY または *NOTEQUALKEY になるかに注意してください。
例2：指定された税コードを有効な税コードのテーブルと照合します。テーブルと照合する最初のキーとして、税区分
例2：指定された税コードを有効な税コードのテーブルと照合します。テーブルと照合する最初のキーとして、税区分 (この例では常に所得税) を指定します。
CHECK_
...
FOR IN_FILE(TAXTAB)
...
WITH_KEY('INCOME'
...
#TAXCDE)
IF_
...
STATUS IS_NOT(*EQUALKEY)
MESSAGE MSGTXT('Tax code specified not valid for income tax')
ENDIF
MESSAGE MSGTXT('Tax code specified not valid for income tax') ENDIF
[ |../../index.htm#lansa/check_for_e.htm]