of_setstyle

pfcdwsrv.pbl   >   pfc_n_cst_dwsrv_sort   >   of_setstyle

public function integer of_setstyle (integer ai_style);//////////////////////////////////////////////////////////////////////////////
//
//	Function:  		of_SetStyle
//
//	Access:    		Public
//
//	Arguments:
//   ai_sort_style (integer)   A value that determines the style
//									    of sort dialog.
//						Values are:
//							0 = PowerBuilder default sort style dialog (Default)
//							1 = Drag and Drop style dialog
//							2 = Simple (single column) style dialog
//							3 = DDLB style dialog
//
//	Returns:   		Integer
//   					1 if successful, otherwise -1
//
//	Description:  	Sets the style of sort dialog to be used when 
//               	of_Sort is called.
//
//////////////////////////////////////////////////////////////////////////////
//
//	Revision History
//
//	Version
//	5.0   Initial version
// 6.0	Use of constants within services.
//			Default style now has 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
End If

CHOOSE CASE ai_style
	CASE DEFAULT, DRAGDROP, SIMPLE, DROPDOWNLISTBOX
		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.setsort = "1200"
					idw_requestor.object.datawindow.help.typeid.setsortexpr = "800"
				end if
			end if
		end if
		
		Return 1
END CHOOSE

Return -1
end function

Name	Owner
w_resp_customer_search.dw_master.constructor	dw_master
w_resp_employee.dw_master.constructor	dw_master
w_resp_sales_order.dw_master.constructor	dw_master
w_resp_salesperson.dw_view.constructor	dw_view
w_resp_salesperson.dw_master.constructor	dw_master
pfc_u_tabpg_dwproperty_buffers.dw_requestorview.constructor	dw_requestorview
pfc_u_tabpg_dwproperty_srvsort.pfc_propertyapply	pfc_u_tabpg_dwproperty_srvsort

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