of_setstyle


pfcdwsrv.pbl   >   pfc_n_cst_dwsrv_filter   >   of_setstyle   

Full name pfc_n_cst_dwsrv_filter.of_setstyle
Access public
Extend of integer
Return value integer
Prototype public function integer of_setstyle(integer)

Name Datatype
No Data

Name Datatype
No Data

public function integer of_setstyle (integer ai_style);//////////////////////////////////////////////////////////////////////////////
//
//	Function:  of_SetStyle
//
//	Access:    Public
//
//	Arguments:
//   ai_filter_style  :  A value representing the desired filter dialog
//						Values are:
//							0 = PowerBuilder default filter style (Default)
//							1 = PFC Extended Filter Wizard (sophisticated end-user)
//							2 = Simple Filter (a=b) style
//
//	Returns:   Integer
//   1 if it succeeds and -1 if an error occurs.
//
//	Description:  Sets the style of filter dialog to be used when 
//               of_Filter is called.
//
//////////////////////////////////////////////////////////////////////////////
//
//	Revision History
//
//	Version
//	5.0   Initial version
//	5.0.03	Removed IsValid check on idw_requestor
//	6.0	Use of constants within services.
//			Default style now includes dialog help.
//
//////////////////////////////////////////////////////////////////////////////
//
//	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.
//
//////////////////////////////////////////////////////////////////////////////

// Check to see if the passed style number is valid.
IF IsNull (ai_style) THEN Return -1

CHOOSE CASE ai_style
	CASE DEFAULT, EXTENDED, SIMPLE
		ii_style = ai_style
		
		if ii_style = DEFAULT then
			if isValid (idw_requestor) then
				if len (idw_requestor.dataobject) > 0 then
					idw_requestor.object.datawindow.help.command = 1
					idw_requestor.object.datawindow.help.file = "pfcdlg.hlp"
					idw_requestor.object.datawindow.help.typeid.setfilter = "300"
				end if
			end if
		end if
		
		Return 1
END CHOOSE

Return -1
end function

     
Name Owner
pfc_u_tabpg_dwproperty_buffers.dw_requestorview.constructor dw_requestorview
pfc_u_tabpg_dwproperty_srvfilter.pfc_propertyapply pfc_u_tabpg_dwproperty_srvfilter

     
Name Owner
systemfunctions.isnull systemfunctions
systemfunctions.isvalid systemfunctions
systemfunctions.len systemfunctions

     
Full name
No Data

     
Name Scope
No Data