Uses simple repository field and table rules to validate field
Member of View (PRIM_VIEW)
Name | Type | Data Type | Description |
---|---|---|---|
Valid | *Result (Optional) | Boolean | Returns true if field passes the validation rules |
Operation | *Input | Enumeration | The operation for the field to be validated against(insert, update and delete) |
Table | *Input (Optional) | PRIM_OBJT | Table for field to be validated against |
The Validate method allows for fields contained in Dialog to be validated against table and field rules. The validate operation allows for the validation usage on insert, update and deletion. If the valid parameter is returned as false the field property HasError will be set to true. Validating against a LANSA table requires the table name to be prefixed with '#'. Complex logic and look up rules are not implemented for use in the validate method.
This example shows the fields in the View being validated against the xEmployee table.
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) Displayposition(1) Define_Com Class(#PRIM_TBLO.Column) Name(#Layout1Column1) Parent(#Layout1) Displayposition(1) 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_TBLO) Name(#Layout2) Define_Com Class(#PRIM_TBLO.Row) Name(#Layout2Row1) Displayposition(1) Parent(#Layout2) Define_Com Class(#PRIM_TBLO.Column) Name(#Layout2Column1) Displayposition(1) Parent(#Layout2) Define_Com Class(#PRIM_TBLO.Item) Name(#Layout2Item1) Column(#Layout2Column1) Manage(#ViewContainer) Parent(#Layout2) Row(#Layout2Row1) Define_Com Class(#prim_md.ViewContainer) Name(#ViewContainer) Parent(#COM_OWNER) Displayposition(1) Tabposition(1) Height(800) Width(1200) Define_Com Class(#PRIM_View) Name(#View) Layoutmanager(#Layout1) Displayposition(1) Parent(#ViewContainer) Height(800) Left(400) Tabposition(1) Width(1200) Define_Com Class(#xEmployeeIdentification.EditField) Name(#xEmployeeIdentification) Parent(#View) Displayposition(1) Tabposition(4) Left(8) Top(8) Width(1184) Define_Com Class(#xEmployeeSurname.EditField) Name(#xEmployeeSurname) Parent(#View) Displayposition(2) Tabposition(3) Left(8) Top(91) Width(1184) Define_Com Class(#xEmployeeGivenNames.EditField) Name(#xEmployeeGivenNames) Parent(#View) Displayposition(3) Tabposition(2) Left(8) Top(174) Width(1184) Define_Com Class(#xEmployeeStartDate.DateTimeField) Name(#xEmployeeStartDate) Parent(#View) Displayposition(4) Tabposition(1) Left(8) Top(257) Width(1184) Define_Com Class(#prim_md.FlatButton) Name(#ButtonValidate) Parent(#View) Displayposition(5) Tabposition(5) Caption('Validate') Left(8) Top(340) Width(1184) Evtroutine Handling(#COM_OWNER.Initialize) #View.show Endroutine Evtroutine Handling(#ButtonValidate.Click) #View.Validate( Update #xEmployee ) Endroutine End_Com
V14SP2 April 2018