clicked

pfcmain.pbl   >   pfc_u_calendar   >   dw_cal   >   clicked

Name	Datatype
li_day	Integer
li_month	Integer
li_year	Integer
ls_clickedcolumn	String
ls_clickedcolumnID	String
ls_day	String
ls_return	String

event clicked;call super::clicked;//////////////////////////////////////////////////////////////////////////////
//
//	Event:  			clicked
//
//	(Arguments:		None)
//
//	(Returns:  		None)
//
//	Description:	
//
//////////////////////////////////////////////////////////////////////////////
//	
//	Revision History
//
//	Version
//	6.0   Initial version
//
//////////////////////////////////////////////////////////////////////////////
//
//	Copyright © 1996-1997 Sybase, Inc. and its subsidiaries.  All rights reserved.
//	Any distribution of the PowerBuilder Foundation Classes (PFC)
//	source code by other than Sybase, Inc. and its subsidiaries is prohibited.
//
//////////////////////////////////////////////////////////////////////////////

Integer 	li_month
Integer 	li_year
Integer 	li_day
String 	ls_clickedcolumn, ls_clickedcolumnID
String 	ls_day, ls_return

//Return if click was not on a valid dwobject, depending on what was
//clicked, dwo will be null or dwo.name will be "datawindow"
If IsNull(dwo) Then Return
If Pos(dwo.name, "cell") = 0 Then Return

//Initialize local values.
li_year = Year(id_date)
li_month = Month(id_date)
li_day = Day(id_date)

//Find which column was clicked on and return if it is not valid
ls_clickedcolumn = dwo.name
ls_clickedcolumnID = dwo.id
If ls_clickedcolumn = '' Then Return

//Set Day to the text of the clicked column. Return if it is an empty column
ls_day = dwo.primary[1]
If ls_day = "" then Return

//Convert to a number.
li_day = Integer(ls_day)

//Set the new date. 
of_SetDate (date(li_year, li_month, li_Day), True)

//If appropriate, hide the Calendar.
If IsValid(inv_dropdown) Then
	If ib_closeonclick Then
		// Set focus on the Requestor object which in turns hides the calendar.
		of_SetFocusOnRequestor()
	End If
End If

end event

Name	Owner
systemfunctions.date	systemfunctions
systemfunctions.day	systemfunctions
systemfunctions.integer	systemfunctions
systemfunctions.isnull	systemfunctions
systemfunctions.isvalid	systemfunctions
systemfunctions.month	systemfunctions
systemfunctions.pos	systemfunctions
systemfunctions.year	systemfunctions
pfc_u_calendar.of_setfocusonrequestor	pfc_u_calendar
pfc_u_calendar.of_setdate	pfc_u_calendar
pfc_u_dw.clicked	pfc_u_dw