DatePicker: How to inform back Dialog System of any update in the component?

Problem:

Ther screenset uses the Datepicker component and the screenset needs to be informed back of any update which occured in the component

comment below used with the demo delivered in Netx:

[Net Express]\\DialogSystem\\DEMO\\COMMONCONTROLS\\DATETIME

Resolution:

1) set a CALLBACK on the p2ce-losefocus event

          MOVE '"' & ProgramID & z'p2ce-losefocus"' TO MessageName

          INVOKE EntryCallBack "new" USING MessageName

                                 RETURNING aCallback

          MOVE p2ce-losefocus TO i

          INVOKE aDatePicker "SetEvent" USING i aCallback

          INVOKE aCallback "finalize" RETURNING aCallback

2) in the CALLBACK entry, post on event to Dialog System

      Entry ProgramID & "p2ce-losefocus" USING anEvent.

          INVOKE anEvent "getObject" RETURNING aDatePicker

          INVOKE aDatePicker "getAncestor" RETURNING aWindow

          INVOKE aWindow "getID" RETURNING aHWND

          MOVE 34570 TO Event-Type

          PERFORM Post-User-Event-Routine

          EXIT PROGRAM

3) In Dialog system, manage the event

USER-EVENT

     XIF= 34570 $EVENT-DATA OCX-LF

   OCX-LF

     EXECUTE-PROCEDURE GET-DATE