Step 7. Add Error Handling to the Web Page

1.  With your web page open in the editor at the Design tab, drag your Pop-Up component, iiiMessagesPopUp onto a blank space in the left hand column.

     On the Details tab, change its Name to Messages. Your source now contains a Define_Com similar to the following:

Define_Com Class(#iiiMessagesPopUp) Name(#Messages) Left(276) Parent(#COM_OWNER) Top(365)

2.  On the Design tab, with your pop_up component selected, use the Bring Forward button on the Home ribbon, to bring the pop-up to the front.

3.  Using the Layout ribbon, change the Pop-Up's Alignment to Center and leave Flow as None.

     Change Span for Columns to 2.

4.  Switch to the Source tab and extend the Save method to show the Pop-Up component if an error has occurred. To do this you simply need to invoke the Show method in the Messages pop-up, which will then read Sys_MsgQ.messages and populate the List control. Extend the If (#io$sts = OK) as shown:

. . . .

Evtroutine Handling(#SaveEmployee.Completed)

If (#io$sts = OK)

#xEmployee := *null





. . . .

     Note: The above code is part of the Save method in your web page.

5.  Add a statement to the Save method before executing SaveEmployee, to clear messages in Sys_MsgQ, as shown:

Mthroutine Name(Save) Access(*private)

Define_Com Class( Name(#SaveEmployee)

* Clear messages


. . . .

     Note: Once again, remember you can investigate components such as Sys_MsgQ using F2 to show the Features tab.

6.  Compile the iiiAddEmployee web page.

7.  Execute your Add Employee web page. Enter a new employee number and click the Save button while leaving some of the input fields blank. The messages pop-up should be displayed, containing all validation error messages: