PRIM_DLG - Validate メソッド

簡単なリポジトリ フィールドとテーブル規則を使ってフィールドを検証します

PRIM_DLG (PRIM_DLG) のメンバ

ﾊﾟﾗﾒｰﾀｰ

名前ﾀｲﾌﾟﾃﾞｰﾀ ﾀｲﾌﾟ記述
Valid*Result (任意)ブール値フィールドが妥当性規則を渡す場合 TRUE を返します
Operation*Input列挙フィールド検証の対象となるオペレーション (挿入、更新、削除)
Table*Input (任意)PRIM_OBJT検証に使用されるテーブル

詳細

Validate メソッドにより、ファイルやフィールドの規則に対する、ダイアログに含まれるフィールドの検証ができるようになります。
 
検証処理は、挿入、更新、削除時の検証に利用できます。
 
valid が FALSE で返された場合、フィールドの HasError プロパティに TRUE が設定されます。
 
LANSA テーブルに対し検証するには、テーブル名に接頭辞 '#' が必要です。
 
この Validate メソッドには、複雑なロジックや検索規則は導入されていません。

例

以下の例では、ダイアログ内のフィールドが、 xEmployee テーブルに対して検証されています。

Begin_Com Role(*EXTENDS #PRIM_WEB) Theme(#SYS_THEME)
 
    Define_Com Class(#PRIM_TBLO) Name(#Layout1)
    Define_Com Class(#PRIM_TBLO.Row) Name(#Layout1Row1) Parent(#Layout1)
    Define_Com Class(#PRIM_TBLO.Column) Name(#Layout1Column1) Parent(#Layout1)
    Define_Com Class(#PRIM_TBLO.Item) Name(#Layout1Item1) Alignment(TopLeft) Column(#Layout1Column1) Manage(#xEmployeeIdentification) Parent(#Layout1) Row(#Layout1Row1) Sizing(FitToWidth) Flow(Down) Marginleft(8) Marginright(8) Margintop(8)
    Define_Com Class(#PRIM_TBLO.Item) Name(#Layout1Item2) Alignment(TopLeft) Column(#Layout1Column1) Manage(#xEmployeeSurname) Parent(#Layout1) Row(#Layout1Row1) Sizing(FitToWidth) Flow(Down) Marginleft(8) Marginright(8) Margintop(8)
    Define_Com Class(#PRIM_TBLO.Item) Name(#Layout1Item3) Alignment(TopLeft) Column(#Layout1Column1) Manage(#xEmployeeGivenNames) Parent(#Layout1) Row(#Layout1Row1) Sizing(FitToWidth) Flow(Down) Marginleft(8) Marginright(8) Margintop(8)
    Define_Com Class(#PRIM_TBLO.Item) Name(#Layout1Item4) Alignment(TopLeft) Column(#Layout1Column1) Manage(#xEmployeeStartDate) Parent(#Layout1) Row(#Layout1Row1) Sizing(FitToWidth) Flow(Down) Marginleft(8) Marginright(8) Margintop(8)
    Define_Com Class(#PRIM_TBLO.Item) Name(#Layout1Item5) Alignment(TopLeft) Column(#Layout1Column1) Manage(#ButtonValidate) Parent(#Layout1) Row(#Layout1Row1) Sizing(FitToWidth) Flow(Down) Marginleft(8) Marginright(8) Margintop(8)
 
    Define_Com Class(#PRIM_DLG) Name(#Dialog) Width(360) Height(600) Layoutmanager(#Layout1) Autoclose(True)
    Define_Com Class(#xEmployeeIdentification.EditField) Name(#xEmployeeIdentification) Parent(#Dialog) Displayposition(1) Tabposition(1)
    Define_Com Class(#xEmployeeSurname.EditField) Name(#xEmployeeSurname) Parent(#Dialog) Displayposition(2) Tabposition(1)
    Define_Com Class(#xEmployeeGivenNames.EditField) Name(#xEmployeeGivenNames) Parent(#Dialog) Displayposition(4) Tabposition(1)
    Define_Com Class(#xEmployeeStartDate.DateTimeField) Name(#xEmployeeStartDate) Parent(#Dialog) Displayposition(5) Tabposition(1)
    Define_Com Class(#prim_md.FlatButton) Name(#ButtonValidate) Parent(#Dialog) Displayposition(5) Tabposition(5) Caption('Validate')
 
        Evtroutine Handling(#COM_OWNER.Initialize)
 
            #Dialog.show
 
        Endroutine
 
        Evtroutine Handling(#ButtonValidate.Click)
 
            #Dialog.Validate( Update #xEmployee )
 
        Endroutine
 
End_Com

参照

すべてのコンポーネント クラス

テクニカルリファレンス

EPC142030 February 2019