INCLUDE "pickdate.4gh"

FORWARD pickDateWCL

HANDLER pickDateWCL::pickDateWN_start() RETURNING VOID
CALL startDate(getWindow())
END HANDLER -- pickDateWCL::pickDateWN_start

HANDLER pickDateWCL::pickDateWN_winFocusIn() RETURNING VOID
# if not done already, fill the date frame
CALL dateFocusIn()
END HANDLER -- pickDateWCL::pickDateWN_winFocusIn

HANDLER pickDateWCL::pickDateWN_finish(byWhom smallint) RETURNING BOOLEAN
# don't allow them to finish from a child window
IF byWhom = ixWindow::closedBySysMenu THEN
    RETURN FALSE
ELSE
    RETURN TRUE
END IF
END HANDLER -- pickDateWCL::pickDateWN_finish

HANDLER ixListBox::pickDateWN_monthLB_select() RETURNING VOID
CALL selectMYLB()
END HANDLER -- ixListBox::pickDateWN_monthLB_select

HANDLER ixButton::pickDateWN_nextMonthBN_activate() RETURNING VOID
CALL incrMonth(1)
END HANDLER -- ixButton::pickDateWN_nextMonthBN_activate

HANDLER ixButton::pickDateWN_prevMonthBN_activate() RETURNING VOID
CALL incrMonth(-1)
END HANDLER -- ixButton::pickDateWN_prevMonthBN_activate

HANDLER ixListBox::pickDateWN_yearLB_select() RETURNING VOID
CALL selectMYLB()
END HANDLER -- ixListBox::pickDateWN_yearLB_select

HANDLER ixButton::pickDateWN_nextYearBN_activate() RETURNING VOID
CALL incrYear(1)
END HANDLER -- ixButton::pickDateWN_nextYearBN_activate

HANDLER ixButton::pickDateWN_prevYearBN_activate() RETURNING VOID
CALL incrYear(-1)
END HANDLER -- ixButton::pickDateWN_prevYearBN_activate

HANDLER ixButton::pickDateWN_date11BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date11BN_activate

HANDLER ixButton::pickDateWN_date21BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date21BN_activate

HANDLER ixButton::pickDateWN_date31BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date31BN_activate

HANDLER ixButton::pickDateWN_date41BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date41BN_activate

HANDLER ixButton::pickDateWN_date51BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date51BN_activate

HANDLER ixButton::pickDateWN_date61BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date61BN_activate

HANDLER ixButton::pickDateWN_date71BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date71BN_activate

HANDLER ixButton::pickDateWN_date12BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date12BN_activate

HANDLER ixButton::pickDateWN_date22BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date22BN_activate

HANDLER ixButton::pickDateWN_date32BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date32BN_activate

HANDLER ixButton::pickDateWN_date42BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date42BN_activate

HANDLER ixButton::pickDateWN_date52BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date52BN_activate

HANDLER ixButton::pickDateWN_date62BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date62BN_activate

HANDLER ixButton::pickDateWN_date72BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date72BN_activate

HANDLER ixButton::pickDateWN_date13BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date13BN_activate

HANDLER ixButton::pickDateWN_date23BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date23BN_activate

HANDLER ixButton::pickDateWN_date33BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date33BN_activate

HANDLER ixButton::pickDateWN_date43BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date43BN_activate

HANDLER ixButton::pickDateWN_date53BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date53BN_activate

HANDLER ixButton::pickDateWN_date63BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date63BN_activate

HANDLER ixButton::pickDateWN_date73BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date73BN_activate

HANDLER ixButton::pickDateWN_date14BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date14BN_activate

HANDLER ixButton::pickDateWN_date24BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date24BN_activate

HANDLER ixButton::pickDateWN_date34BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date34BN_activate

HANDLER ixButton::pickDateWN_date44BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date44BN_activate

HANDLER ixButton::pickDateWN_date54BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date54BN_activate

HANDLER ixButton::pickDateWN_date64BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date64BN_activate

HANDLER ixButton::pickDateWN_date74BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date74BN_activate

HANDLER ixButton::pickDateWN_date15BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date15BN_activate

HANDLER ixButton::pickDateWN_date25BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date25BN_activate

HANDLER ixButton::pickDateWN_date35BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date35BN_activate

HANDLER ixButton::pickDateWN_date45BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date45BN_activate

HANDLER ixButton::pickDateWN_date55BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date55BN_activate

HANDLER ixButton::pickDateWN_date65BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date65BN_activate

HANDLER ixButton::pickDateWN_date75BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date75BN_activate

HANDLER ixButton::pickDateWN_date16BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date16BN_activate

HANDLER ixButton::pickDateWN_date26BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date26BN_activate

HANDLER ixButton::pickDateWN_date36BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date36BN_activate

HANDLER ixButton::pickDateWN_date46BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date46BN_activate

HANDLER ixButton::pickDateWN_date56BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date56BN_activate

HANDLER ixButton::pickDateWN_date66BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date66BN_activate

HANDLER ixButton::pickDateWN_date76BN_activate() RETURNING VOID
CALL dateBN(self)
END HANDLER -- ixButton::pickDateWN_date76BN_activate

HANDLER ixButton::pickDateWN_cancelBN_activate() RETURNING VOID
CALL dateCancelBN()
END HANDLER -- ixButton::pickDateWN_cancelBN_activate

FUNCTION pickDateWCL::pickDateWCL( 
	geometry ixGeometry,
	appearance ixAppearance,
	windowStyle SMALLINT,
	containingWindow ixWindow,
	title CHAR(*),
	enabled BOOLEAN,
	helpFile CHAR(*),
	name CHAR(*),
	helpNum INTEGER,
	source BOOLEAN,
	shown BOOLEAN,
	topicName CHAR(*),
	icon CHAR(*)
)
	: ixWindow(
		containingWindow : containingWindow,
		name : name,
		enabled : enabled,
		shown : shown,
		helpNum : helpNum,
		geometry : geometry,
		appearance : appearance,
		helpFile : helpFile,
		title : title,
		icon : icon,
		windowStyle : windowStyle,
		topicName : topicName,
		source : source
	)

	VARIABLE itemList ixVector
	VARIABLE includeTable ixRow
	VARIABLE result INTEGER
	LET result = 0

	HANDLE start WITH
		pickDateWCL::pickDateWN_start
	HANDLE winFocusIn WITH
		pickDateWCL::pickDateWN_winFocusIn
	HANDLE finish WITH
		pickDateWCL::pickDateWN_finish
	LET itemList = NEW ixVector()
	LET result = itemList.insert(NEW ixString("January"))
	LET result = itemList.insert(NEW ixString("Februrary"))
	LET result = itemList.insert(NEW ixString("March"))
	LET result = itemList.insert(NEW ixString("April"))
	LET result = itemList.insert(NEW ixString("May"))
	LET result = itemList.insert(NEW ixString("June"))
	LET result = itemList.insert(NEW ixString("July"))
	LET result = itemList.insert(NEW ixString("August"))
	LET result = itemList.insert(NEW ixString("September"))
	LET result = itemList.insert(NEW ixString("October"))
	LET result = itemList.insert(NEW ixString("November"))
	LET result = itemList.insert(NEW ixString("December"))
	LET monthLB = NEW ixListBox( 
		geometry : NEW ixGeometry( 
			top : 10,
			left : 812,
			height : 2441,
			width : 1200
		),
		appearance : NEW ixAppearance( 
			fontName : NULL,
			fontSize : 8,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : 16777215
		),
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		style : ixListBox::dropDown,
		name : "monthLB",
		helpNum : 0,
		itemList : itemList,
		shown : TRUE,
		sorted : FALSE,
		container : SELF
	)
	HANDLE monthLB.select WITH
		ixListBox::pickDateWN_monthLB_select
	LET nextMonthBN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 10,
			left : 2029,
			height : 320,
			width : 320
		),
		appearance : NEW ixAppearance( 
			fontName : NULL,
			fontSize : NULL,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : ">",
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "nextMonthBN",
		helpNum : 0,
		shown : TRUE,
		container : SELF
	)
	HANDLE nextMonthBN.activate WITH
		ixButton::pickDateWN_nextMonthBN_activate
	LET prevMonthBN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 10,
			left : 475,
			height : 320,
			width : 320
		),
		appearance : NEW ixAppearance( 
			fontName : NULL,
			fontSize : NULL,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : "<",
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "prevMonthBN",
		helpNum : 0,
		shown : TRUE,
		container : SELF
	)
	HANDLE prevMonthBN.activate WITH
		ixButton::pickDateWN_prevMonthBN_activate
	LET itemList = NEW ixVector()
	LET result = itemList.insert(NEW ixString(""))
	LET yearLB = NEW ixListBox( 
		geometry : NEW ixGeometry( 
			top : 350,
			left : 1012,
			height : 3200,
			width : 800
		),
		appearance : NEW ixAppearance( 
			fontName : NULL,
			fontSize : 8,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : 16777215
		),
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		style : ixListBox::dropDown,
		name : "yearLB",
		helpNum : 0,
		itemList : itemList,
		shown : TRUE,
		sorted : FALSE,
		container : SELF
	)
	HANDLE yearLB.select WITH
		ixListBox::pickDateWN_yearLB_select
	LET nextYearBN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 350,
			left : 1829,
			height : 320,
			width : 320
		),
		appearance : NEW ixAppearance( 
			fontName : NULL,
			fontSize : NULL,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : ">",
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "nextYearBN",
		helpNum : 0,
		shown : TRUE,
		container : SELF
	)
	HANDLE nextYearBN.activate WITH
		ixButton::pickDateWN_nextYearBN_activate
	LET prevYearBN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 350,
			left : 675,
			height : 320,
			width : 320
		),
		appearance : NEW ixAppearance( 
			fontName : NULL,
			fontSize : NULL,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : "<",
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "prevYearBN",
		helpNum : 0,
		shown : TRUE,
		container : SELF
	)
	HANDLE prevYearBN.activate WITH
		ixButton::pickDateWN_prevYearBN_activate
	LET dateFR = NEW ixFrame( 
		geometry : NEW ixGeometry( 
			top : 690,
			left : 10,
			height : 2600,
			width : 2800
		),
		appearance : NEW ixAppearance( 
			fontName : NULL,
			fontSize : NULL,
			fontBold : NULL,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		enabled : TRUE,
		helpFile : NULL,
		borderWidth : 20,
		name : "dateFR",
		helpNum : 0,
		shown : TRUE,
		container : SELF
	)
	LET sunLL = NEW ixLabel( 
		geometry : NEW ixGeometry( 
			top : 0,
			left : 0,
			height : 200,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : NULL,
			fontSize : 8,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : 16777215
		),
		name : "sunLL",
		shown : TRUE,
		labelJustify : ixLabel::centerJustify,
		text : "SUN",
		container : dateFR
	)
	LET monLL = NEW ixLabel( 
		geometry : NEW ixGeometry( 
			top : 0,
			left : 400,
			height : 200,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : NULL,
			fontSize : 8,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : 16777215
		),
		name : "monLL",
		shown : TRUE,
		labelJustify : ixLabel::centerJustify,
		text : "MON",
		container : dateFR
	)
	LET tueLL = NEW ixLabel( 
		geometry : NEW ixGeometry( 
			top : 0,
			left : 800,
			height : 200,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : NULL,
			fontSize : 8,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : 16777215
		),
		name : "tueLL",
		shown : TRUE,
		labelJustify : ixLabel::centerJustify,
		text : "TUE",
		container : dateFR
	)
	LET wedLL = NEW ixLabel( 
		geometry : NEW ixGeometry( 
			top : 0,
			left : 1200,
			height : 200,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : NULL,
			fontSize : 8,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : 16777215
		),
		name : "wedLL",
		shown : TRUE,
		labelJustify : ixLabel::centerJustify,
		text : "WED",
		container : dateFR
	)
	LET thuLL = NEW ixLabel( 
		geometry : NEW ixGeometry( 
			top : 0,
			left : 1600,
			height : 200,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : NULL,
			fontSize : 8,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : 16777215
		),
		name : "thuLL",
		shown : TRUE,
		labelJustify : ixLabel::centerJustify,
		text : "THU",
		container : dateFR
	)
	LET friLL = NEW ixLabel( 
		geometry : NEW ixGeometry( 
			top : 0,
			left : 2000,
			height : 200,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : NULL,
			fontSize : 8,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : 16777215
		),
		name : "friLL",
		shown : TRUE,
		labelJustify : ixLabel::centerJustify,
		text : "FRI",
		container : dateFR
	)
	LET satLL = NEW ixLabel( 
		geometry : NEW ixGeometry( 
			top : 0,
			left : 2400,
			height : 200,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : NULL,
			fontSize : 8,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : 16777215
		),
		name : "satLL",
		shown : TRUE,
		labelJustify : ixLabel::centerJustify,
		text : "SAT",
		container : dateFR
	)
	LET date11BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 200,
			left : 0,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date11BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date11BN.activate WITH
		ixButton::pickDateWN_date11BN_activate
	LET date21BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 200,
			left : 400,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date21BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date21BN.activate WITH
		ixButton::pickDateWN_date21BN_activate
	LET date31BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 200,
			left : 800,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date31BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date31BN.activate WITH
		ixButton::pickDateWN_date31BN_activate
	LET date41BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 200,
			left : 1200,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date41BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date41BN.activate WITH
		ixButton::pickDateWN_date41BN_activate
	LET date51BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 200,
			left : 1600,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date51BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date51BN.activate WITH
		ixButton::pickDateWN_date51BN_activate
	LET date61BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 200,
			left : 2000,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date61BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date61BN.activate WITH
		ixButton::pickDateWN_date61BN_activate
	LET date71BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 200,
			left : 2400,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date71BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date71BN.activate WITH
		ixButton::pickDateWN_date71BN_activate
	LET date12BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 600,
			left : 0,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date12BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date12BN.activate WITH
		ixButton::pickDateWN_date12BN_activate
	LET date22BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 600,
			left : 400,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date22BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date22BN.activate WITH
		ixButton::pickDateWN_date22BN_activate
	LET date32BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 600,
			left : 800,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date32BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date32BN.activate WITH
		ixButton::pickDateWN_date32BN_activate
	LET date42BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 600,
			left : 1200,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date42BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date42BN.activate WITH
		ixButton::pickDateWN_date42BN_activate
	LET date52BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 600,
			left : 1600,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date52BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date52BN.activate WITH
		ixButton::pickDateWN_date52BN_activate
	LET date62BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 600,
			left : 2000,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date62BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date62BN.activate WITH
		ixButton::pickDateWN_date62BN_activate
	LET date72BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 600,
			left : 2400,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date72BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date72BN.activate WITH
		ixButton::pickDateWN_date72BN_activate
	LET date13BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1000,
			left : 0,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date13BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date13BN.activate WITH
		ixButton::pickDateWN_date13BN_activate
	LET date23BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1000,
			left : 400,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date23BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date23BN.activate WITH
		ixButton::pickDateWN_date23BN_activate
	LET date33BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1000,
			left : 800,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date33BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date33BN.activate WITH
		ixButton::pickDateWN_date33BN_activate
	LET date43BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1000,
			left : 1200,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date43BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date43BN.activate WITH
		ixButton::pickDateWN_date43BN_activate
	LET date53BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1000,
			left : 1600,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date53BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date53BN.activate WITH
		ixButton::pickDateWN_date53BN_activate
	LET date63BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1000,
			left : 2000,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date63BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date63BN.activate WITH
		ixButton::pickDateWN_date63BN_activate
	LET date73BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1000,
			left : 2400,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date73BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date73BN.activate WITH
		ixButton::pickDateWN_date73BN_activate
	LET date14BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1400,
			left : 0,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date14BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date14BN.activate WITH
		ixButton::pickDateWN_date14BN_activate
	LET date24BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1400,
			left : 400,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date24BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date24BN.activate WITH
		ixButton::pickDateWN_date24BN_activate
	LET date34BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1400,
			left : 800,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date34BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date34BN.activate WITH
		ixButton::pickDateWN_date34BN_activate
	LET date44BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1400,
			left : 1200,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date44BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date44BN.activate WITH
		ixButton::pickDateWN_date44BN_activate
	LET date54BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1400,
			left : 1600,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date54BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date54BN.activate WITH
		ixButton::pickDateWN_date54BN_activate
	LET date64BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1400,
			left : 2000,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date64BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date64BN.activate WITH
		ixButton::pickDateWN_date64BN_activate
	LET date74BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1400,
			left : 2400,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date74BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date74BN.activate WITH
		ixButton::pickDateWN_date74BN_activate
	LET date15BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1800,
			left : 0,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date15BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date15BN.activate WITH
		ixButton::pickDateWN_date15BN_activate
	LET date25BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1800,
			left : 400,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date25BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date25BN.activate WITH
		ixButton::pickDateWN_date25BN_activate
	LET date35BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1800,
			left : 800,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date35BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date35BN.activate WITH
		ixButton::pickDateWN_date35BN_activate
	LET date45BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1800,
			left : 1200,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date45BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date45BN.activate WITH
		ixButton::pickDateWN_date45BN_activate
	LET date55BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1800,
			left : 1600,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date55BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date55BN.activate WITH
		ixButton::pickDateWN_date55BN_activate
	LET date65BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1800,
			left : 2000,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date65BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date65BN.activate WITH
		ixButton::pickDateWN_date65BN_activate
	LET date75BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 1800,
			left : 2400,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date75BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date75BN.activate WITH
		ixButton::pickDateWN_date75BN_activate
	LET date16BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 2200,
			left : 0,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date16BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date16BN.activate WITH
		ixButton::pickDateWN_date16BN_activate
	LET date26BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 2200,
			left : 400,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date26BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date26BN.activate WITH
		ixButton::pickDateWN_date26BN_activate
	LET date36BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 2200,
			left : 800,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date36BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date36BN.activate WITH
		ixButton::pickDateWN_date36BN_activate
	LET date46BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 2200,
			left : 1200,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date46BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date46BN.activate WITH
		ixButton::pickDateWN_date46BN_activate
	LET date56BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 2200,
			left : 1600,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date56BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date56BN.activate WITH
		ixButton::pickDateWN_date56BN_activate
	LET date66BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 2200,
			left : 2000,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date66BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date66BN.activate WITH
		ixButton::pickDateWN_date66BN_activate
	LET date76BN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 2200,
			left : 2400,
			height : 400,
			width : 400
		),
		appearance : NEW ixAppearance( 
			fontName : "Courier",
			fontSize : 12,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : NULL,
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "date76BN",
		helpNum : 0,
		shown : TRUE,
		container : dateFR
	)
	HANDLE date76BN.activate WITH
		ixButton::pickDateWN_date76BN_activate
	LET cancelBN = NEW ixButton( 
		geometry : NEW ixGeometry( 
			top : 3335,
			left : 2080,
			height : 300,
			width : 700
		),
		appearance : NEW ixAppearance( 
			fontName : NULL,
			fontSize : NULL,
			fontBold : TRUE,
			fontItalic : NULL,
			fontUnderline : NULL,
			foreColor : NULL,
			backColor : NULL
		),
		title : "Cancel",
		enabled : TRUE,
		tabIndex : NULL,
		tabEnabled : TRUE,
		theDefault : FALSE,
		name : "cancelBN",
		helpNum : 0,
		shown : TRUE,
		container : SELF
	)
	HANDLE cancelBN.activate WITH
		ixButton::pickDateWN_cancelBN_activate
END FUNCTION -- pickDateWCL::pickDateWCL