pfc_propertysyntax

pfcutil.pbl   >   pfc_u_tabpg_dwproperty_srvresize   >   pfc_propertysyntax

Name	Datatype
lb_desired	boolean
lb_scale	boolean
li_excludecount	integer
li_index	integer
li_movex	integer
li_movey	integer
li_rc	integer
li_row	integer
li_scalex	integer
li_scaley	integer
li_styledesired	integer
li_upper	integer
lnv_conversion	n_cst_conversion
ls_exclude	string
ls_excludecols	string[]
ls_object	string
ls_syntax	string

event pfc_propertysyntax;call super::pfc_propertysyntax;//////////////////////////////////////////////////////////////////////////////
//
//	Function:  		pfc_propertysyntax
//
//	Access:    		Public
//
//	Arguments:  	None
//
//	Returns:   		String
//	  The syntax required to create the currently selections.
//   '!' in error
//
//	Description:  
//	Create the required syntax to match the current selections.
//
//////////////////////////////////////////////////////////////////////////////
//
//	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_movex, li_movey, li_scalex, li_scaley
string	ls_object
boolean	lb_scale
integer	li_upper
integer	li_row
integer 	li_rc
integer	li_styledesired
integer	li_index
integer	li_excludecount=0
string	ls_excludecols[]
string	ls_exclude
string	ls_syntax
boolean	lb_desired
n_cst_conversion lnv_conversion

// Validate references.
If IsNull(idw_requestor) or Not IsValid(idw_requestor) Then
	Return '!'
End If
If IsNull(idw_requestor.inv_resize) or Not IsValid(idw_requestor.inv_resize) Then
	Return '!'
End If


// -- Start the service. --
ls_syntax += 'This.of_SetResize(True)~r~n'

// -- Register Objects. --

// Get the number of items in the datawindow.
li_upper = dw_register.RowCount()
For li_row = 1 to li_upper
	// Get the column name.
	ls_object = dw_register.object.objectname.primary[li_row]
	
	// Is the object selected to be registered?
	If dw_register.object.register.primary[li_row] = 'Y' THEN
	
		// Get the registering parameters.
		lb_scale = (dw_register.object.method.primary[li_row] = 'S')
		If Not lb_scale Then
			li_movex = dw_register.object.movex.primary[li_row]
			li_movey = dw_register.object.movey.primary[li_row]
			li_scalex = dw_register.object.scalex.primary[li_row]
			li_scaley = dw_register.object.scaley.primary[li_row]
		End If

		If lb_scale Then
			ls_syntax += '~r~nThis.inv_resize.of_Register("'+ &
				Trim(ls_object)+'", inv_resize.SCALE)'
		Else
			ls_syntax += '~r~nThis.inv_resize.of_Register("'+ &
				Trim(ls_object)+'", '+String(li_movex)+ ', ' +String(li_movey) + &
				', ' +String(li_scalex) + ', ' +String(li_scaley) +')'
		End If
		
	End If
Next

Return ls_syntax

end event

Name	Owner
datawindow.rowcount	datawindow
systemfunctions.isnull	systemfunctions
systemfunctions.isvalid	systemfunctions
systemfunctions.string	systemfunctions
systemfunctions.trim	systemfunctions
pfc_u_tabpg_dwproperty_base.pfc_propertysyntax	pfc_u_tabpg_dwproperty_base

Full name
pfc_u_tabpg_dwproperty_srvresize