Q5/ws_objects/Ew_publ903_bill.pbl.src/f_reset_uc.srf

$PBExportHeader$f_reset_uc.srf
global type f_reset_uc from function_object
end type

forward prototypes
global subroutine f_reset_uc (long arg_mainid, long arg_width, long arg_height)
end prototypes

global subroutine f_reset_uc (long arg_mainid, long arg_width, long arg_height);IF IsValid(s_sys_win_open[arg_mainid].win) THEN
	w_publ_1ton_share_detail w_1
	
	w_1 = s_sys_win_open[arg_mainid].win	
	
	w_1.uc_width = arg_width
	w_1.uc_height = arg_height
	w_1.TriggerEvent(Resize!)
	w_1.wf_reset_uc()
END IF


end subroutine