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

構文

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
  • No labels