WD Popup calendar
PROCEDURE WIN_PopCalendar(dSelectionDate = DateSys())
IF dSelectionDate = "" THEN dSelectionDate = DateSys
g_Date is Date = dSelectionDate
d_SelectedDate is Date = g_Date
sOControl is string
// By default, the window returns the current value
MyWindow..ReturnedValue = d_SelectedDate