Kbase 19927: 4GL/ABL: How to LEAVE a Date Field without entering a date value?
Autor |
  Progress Software Corporation - Progress |
Acesso |
  Público |
Publicação |
  11/25/2009 |
|
Status: Verified
GOAL:
4GL/ABL: How to LEAVE a Date Field without entering a date value?
GOAL:
How to LEAVE a DATE FILL-IN without entering a date value after having pressed a DELETE-CHARACTER or a BACKSPACE key in the FILL-IN?
GOAL:
How to avoid the error "** The month of a date must be from 1 to 12. (80)" ON LEAVE of a DATE FILL-IN after a DELETE-CHARACTER or a BACKSPACE key press?
FACT(s) (Environment):
All Supported Operating Systems
Progress 9.x
OpenEdge 10.x
FIX:
To LEAVE a DATE FILL-IN without entering a date value after having pressed a DELETE-CHARACTER or a BACKSPACE key in the FILL-IN, create a trigger similar to the following:
ON BACKSPACE, DELETE-CHARACTER OF FILL-IN-2 IN FRAME DEFAULT-FRAME /* Fill 2 */
DO:
ASSIGN
FILL-IN-2:SCREEN-VALUE = "?".
APPLY "ENTRY" to FILL-IN-3.
FILL-IN-2:SENSITIVE = YES.
RETURN NO-APPLY.
END.