modified

pfcapsrv.pbl   >   pfc_w_pagesetup   >   em_right   >   modified   

Full name pfc_w_pagesetup.em_right.modified
Access public
Extend of
Return value
Prototype event modified()

Name Datatype
No Data

Name Datatype
ls_rightmargin string 

event modified;call super::modified;//////////////////////////////////////////////////////////////////////////////
//
//	Event:  modified
//
//	Description:	 Validate the entered value.
//
//////////////////////////////////////////////////////////////////////////////
//	
//	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.
//
//////////////////////////////////////////////////////////////////////////////

string	ls_rightmargin

if IsNumber (this.text) then
	if Dec (this.text) < istr_pagesetup.i_minmarginright then
		ls_rightmargin = String (istr_pagesetup.i_minmarginright)
		of_MessageBox ("pfc_pagesetup_rightminimum", "Page Setup", &
			"Minimum right margin is " + ls_rightmargin, exclamation!, Ok!, 1)
		this.text = ls_rightmargin
	end if
end if
end event

     
Name Owner
No Data

     
Name Owner
systemfunctions.dec systemfunctions
systemfunctions.isnumber systemfunctions
systemfunctions.string systemfunctions
pfc_u_em.of_messagebox pfc_u_em
multilineedit.modified multilineedit

     
Full name
s_pagesetupattrib

     
Name Scope
No Data