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
