of_setzoom


pfcdwsrv.pbl   >   pfc_n_cst_dssrv_printpreview   >   of_setzoom   

Full name pfc_n_cst_dssrv_printpreview.of_setzoom
Access public
Extend of integer
Return value integer
Prototype public function integer of_setzoom()

Name Datatype
No Data

Name Datatype
li_zoom integer
lnv_zoomattrib n_cst_zoomattrib

public function integer of_setzoom ();//////////////////////////////////////////////////////////////////////////////
//
//	Function:  of_SetZoom
//
//	Access:  public
//
//	Arguments:  none
//
//	Returns:  integer
//	 Zoom level that the user selected
//	 0 = User cancelled from zoom dialog
//	-1 = error
//
//	Description:  Sets the zoom level of print preview
//
//////////////////////////////////////////////////////////////////////////////
//
//	Revision History
//
//	Version
//	5.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_zoom
n_cst_zoomattrib	lnv_zoomattrib

if IsNull(ids_requestor) Or not IsValid (ids_requestor) then
	return -1
end if

lnv_zoomattrib.ids_obj = ids_requestor
lnv_zoomattrib.ii_zoom = of_GetZoom()
if lnv_zoomattrib.ii_zoom = -1 then
	return -1
end if

OpenWithParm (w_zoom, lnv_zoomattrib)
li_zoom = message.DoubleParm
return li_zoom

end function

     
Name Owner
pfc_n_ds.pfc_zoom pfc_n_ds

     
Name Owner
systemfunctions.isnull systemfunctions
systemfunctions.isvalid systemfunctions
systemfunctions.openwithparm systemfunctions
pfc_n_cst_dssrv_printpreview.of_getzoom pfc_n_cst_dssrv_printpreview

     
Full name
w_zoom
demopfc

     
Name Scope
No Data