Check_Field_Exists メソッド

フィールドが現在の画面またはサブファイルに存在するかどうかを確認します。

構文

Define_Com Class(#vf_sy122) Name(#myscreen_wrapper) Parent(#COM_OWNER)

#bFound :=  #myscreen_wrapper.Check_Field_Exists(sName iInd)

 

パラメータ

Name Char 256 - 必須 カーソルを配置する位置の行番号を指定する整数。  Index 整数 - 任意 フィールドのサブファイル行を指定する整数。 注: 指定した行インデックスは現在のサブファイル・ページに存在していなければいけません。

 

戻り値

Found ブール値 true – 現在の画面でフィールドが見つかりました。 false – フィールドは見つかりませんでした。

 

例:

 

Define_Com Class(#vf_sy122) Name(#myscreen_wrapper) Parent(#COM_OWNER)

#FldFound := #myscreen_wrapper.Check_Field_Exists("SURNAME")

#FldFound := #myscreen_wrapper.Check_Field_Exists("SURNAME" #listcount)

 

Dowhile (#myscreen_wrapper.check_field_exists( "SKILLCODE" #listcount ))

#myscreen_wrapper.getvalue From("skillcode") Value(#skilcode) Index(#listcount)

#listcount += 1

Endwhile