of_getsheetsbyclass

pfcwnsrv.pbl   >   pfc_n_cst_winsrv_sheetmanager   >   of_getsheetsbyclass

Name	Datatype
li_counter	integer
lw_sheet	window

public function integer of_getsheetsbyclass (ref window aw_sheet[], string as_classname);//////////////////////////////////////////////////////////////////////////////
//
//	Function:  of_GetSheetsbyClass
//
//	Access:  public
//
//	Arguments:
//	aw_sheet[] by ref
//	as_classname:  classname of the sheets to get
//
//	Returns:  integer
//	number of sheets of classname specified
//	-1 = error
//
//	Description:  Get reference to all open sheets with classname specified
//
//////////////////////////////////////////////////////////////////////////////
//
//	Revision History
//
//	Version
//	5.0   Initial version
//
//////////////////////////////////////////////////////////////////////////////
//
//	Copyright © 1996-1999 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_counter
window	lw_sheet

// Validate window requestor
if IsNull(iw_requestor) Or not IsValid (iw_requestor) then
	return -1
end if

// Get all sheets of classname
lw_sheet = iw_requestor.GetFirstSheet ()
if IsValid (lw_sheet) then
	do
		if ClassName (lw_sheet) = as_classname then
			li_counter++
			aw_sheet[li_counter] = lw_sheet
		end if
		lw_sheet = iw_requestor.GetNextSheet (lw_sheet)
	loop until IsNull(lw_sheet) Or not IsValid (lw_sheet)
end if

return li_counter

end function

Name	Owner
window.getfirstsheet	window
window.getnextsheet	window
systemfunctions.classname	systemfunctions
systemfunctions.isnull	systemfunctions
systemfunctions.isvalid	systemfunctions