itemerror

pfcmain.pbl   >   pfc_u_dw   >   itemerror

Name	Datatype
li_rc	integer
lw_parent	w_master

event itemerror;//////////////////////////////////////////////////////////////////////////////
//	Event:			itemerror
//	Description:	Send itemerror notification to services
//////////////////////////////////////////////////////////////////////////////
//	Rev. History	Version
//						5.0   Initial version
// 					6.0	Enhanced to support the linkage service.
//////////////////////////////////////////////////////////////////////////////
//	Copyright © 1996-1999 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_rc
w_master	lw_parent

// If appropriate replace an empty string with a null value and suppress the 
//	standard DataWindow Value Required Message. 
If IsValid(inv_ReqColumn) then
	li_rc = inv_ReqColumn.of_SetToNullIfEmpty(row, String(dwo.Name), This.GetText())
	If li_rc > 0 then
		If li_rc =1 then
			// Item was changed from an Empty to a Null value.  Notify itemchanged...
			this.Event itemchanged (row, dwo, data)
		end if
		return 3		// Reject the data value but allow focus to change.
	end if
end if

// If the window is closing Suppress all Errors. 
this.of_GetParentWindow(lw_parent)
If IsValid(lw_parent) then
	If lw_parent.TriggerEvent ("pfc_descendant") = 1 then	
		If lw_parent.of_GetCloseStatus() then
			return 1   	//	Reject the data value with no message box.
		end if
	end if
end if
end event

Name	Owner
powerobject.triggerevent	powerobject
datawindow.gettext	datawindow
systemfunctions.isvalid	systemfunctions
systemfunctions.string	systemfunctions
pfc_n_cst_dwsrv_reqcolumn.of_settonullifempty	pfc_n_cst_dwsrv_reqcolumn
pfc_u_dw.of_GetParentWindow	pfc_u_dw
pfc_w_master.of_getclosestatus	pfc_w_master
pfc_u_dw.itemchanged	pfc_u_dw