of_setbase


pfcmain.pbl   >   pfc_u_tvs   >   of_setbase   

Full name pfc_u_tvs.of_setbase
Access public
Extend of integer
Return value integer
Prototype public function integer of_setbase(boolean)

Name Datatype
No Data

Name Datatype
li_rc integer

public function integer of_setbase (boolean ab_switch);//////////////////////////////////////////////////////////////////////////////
//
//	Function:  of_SetBase
//
//	Access:  public
//
//	Arguments:
//	ab_switch   enable/disable the base treeview service
//
//	Returns:  integer
//	 1 = success
//	-1 = error
//
//	Description:
//	Instantiates or destroys the base treeview service
//
//////////////////////////////////////////////////////////////////////////////
//
//	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_rc

// Check arguments
if IsNull (ab_switch) then
	return -1
end if

if ab_Switch then
	if IsNull(inv_base) Or not IsValid (inv_base) then
		inv_base = create n_cst_tvsrv
		inv_base.of_SetRequestor (this)
		li_rc = 1
	end if
else
	if IsValid (inv_base) then
		destroy inv_base
		li_rc = 1
	end if	
end if

return li_rc


end function

     
Name Owner
pfc_u_tvs.destructor pfc_u_tvs

     
Name Owner
systemfunctions.isnull systemfunctions
systemfunctions.isvalid systemfunctions
pfc_n_cst_tvsrv.of_setrequestor pfc_n_cst_tvsrv

     
Full name
No Data

     
Name Scope
No Data