[archive] How to terminate Accept in Msg-Validate event of an entry field

[Migrated content. Thread originally posted on 08 January 2007]

I want to terminate Accept in a Msg-Validate event of an entry field but I am not able to. I have tried "move EVENT-ACTION-TERMINATE to EVENT-ACTION" and "move EVENT-ACTION-FAIL-TERMINATE to EVENT-ACTION", both seem to be ignored by the RT v6.1.

My accept statement is:
ACCEPT Screen-Name on EXCEPTION PERFORM Screen-Name-Evaluate-Func

The entry field is one of the controls on Screen-Name. Tab Key is used to move from one control to another.

Any help would be much appreciated.

MSG-VALIDATE (value 16391)
This event occurs immediately after the runtime performs intrinsic validation of a field at data entry (for example, the REQUIRED phrase). Specifically, an MSG-VALIDATE event is generated whenever an activatable control terminates and the termination is not the result of:

an event, except for CMD-GOTO, or CMD-TABCHANGED
a message, except "status 95"
an exception, except for those that also cause movement between fields in a Screen Section
When the above conditions are met, it is a good point in the program to perform other validation of a control's data.

If the EVENT-ACTION element is set to EVENT-ACTION-CONTINUE (value 2), the control remains active so the user can correct any errors. Note that MSG-VALIDATE is not generated for controls with the SELF-ACT style, nor is it sent when the runtime does not normally perform validation (for example, in response to a function key). This message is generated for any control that is activated, even if it does not have a value. Due to the dynamic nature of graphical screens, a user can exit a screen without all the fields being validated, therefore, validation should also be performed after completion of data entry

Is an extract of acugt help, maybe can help you

[Migrated content. Thread originally posted on 08 January 2007]

I want to terminate Accept in a Msg-Validate event of an entry field but I am not able to. I have tried "move EVENT-ACTION-TERMINATE to EVENT-ACTION" and "move EVENT-ACTION-FAIL-TERMINATE to EVENT-ACTION", both seem to be ignored by the RT v6.1.

My accept statement is:
ACCEPT Screen-Name on EXCEPTION PERFORM Screen-Name-Evaluate-Func

The entry field is one of the controls on Screen-Name. Tab Key is used to move from one control to another.

Any help would be much appreciated.

Thanks ciacsl,

I had to set a flag in MSG-VALIDATE event and catch it in "After Procedure" and "move 3 to accept-control", that terminates the accept when I want it to.