Q5/ws_objects/Ew_mainface.pbl.src/w_sys_init_guide_zl.srw

$PBExportHeader$w_sys_init_guide_zl.srw
forward
global type w_sys_init_guide_zl from w_publ_base
end type
type cb_next from uo_imflatbutton within w_sys_init_guide_zl
end type
type tab_1 from tab within w_sys_init_guide_zl
end type
type tabpage_1 from userobject within tab_1
end type
type st_msg_cusarea from statictext within tabpage_1
end type
type st_msg_mtrltype from statictext within tabpage_1
end type
type st_msg_storage from statictext within tabpage_1
end type
type st_msg_sc from statictext within tabpage_1
end type
type st_6 from statictext within tabpage_1
end type
type st_4 from statictext within tabpage_1
end type
type st_2 from statictext within tabpage_1
end type
type st_1 from statictext within tabpage_1
end type
type p_3 from picture within tabpage_1
end type
type p_2 from picture within tabpage_1
end type
type p_1 from picture within tabpage_1
end type
type p_4 from picture within tabpage_1
end type
type st_5 from uo_text_m within tabpage_1
end type
type st_3 from uo_text_m within tabpage_1
end type
type st_41 from uo_text_m within tabpage_1
end type
type st_42 from uo_text_m within tabpage_1
end type
type tabpage_1 from userobject within tab_1
st_msg_cusarea st_msg_cusarea
st_msg_mtrltype st_msg_mtrltype
st_msg_storage st_msg_storage
st_msg_sc st_msg_sc
st_6 st_6
st_4 st_4
st_2 st_2
st_1 st_1
p_3 p_3
p_2 p_2
p_1 p_1
p_4 p_4
st_5 st_5
st_3 st_3
st_41 st_41
st_42 st_42
end type
type tabpage_2 from userobject within tab_1
end type
type st_qtjcyy from statictext within tabpage_2
end type
type st_cnzh from statictext within tabpage_2
end type
type st_szxm from statictext within tabpage_2
end type
type st_jsfs from statictext within tabpage_2
end type
type st_ywy from statictext within tabpage_2
end type
type st_16 from statictext within tabpage_2
end type
type st_15 from uo_text_m within tabpage_2
end type
type p_9 from picture within tabpage_2
end type
type st_14 from statictext within tabpage_2
end type
type st_13 from uo_text_m within tabpage_2
end type
type p_8 from picture within tabpage_2
end type
type st_12 from statictext within tabpage_2
end type
type st_11 from uo_text_m within tabpage_2
end type
type p_7 from picture within tabpage_2
end type
type st_10 from statictext within tabpage_2
end type
type st_9 from uo_text_m within tabpage_2
end type
type p_6 from picture within tabpage_2
end type
type st_8 from uo_text_m within tabpage_2
end type
type p_5 from picture within tabpage_2
end type
type st_7 from statictext within tabpage_2
end type
type tabpage_2 from userobject within tab_1
st_qtjcyy st_qtjcyy
st_cnzh st_cnzh
st_szxm st_szxm
st_jsfs st_jsfs
st_ywy st_ywy
st_16 st_16
st_15 st_15
p_9 p_9
st_14 st_14
st_13 st_13
p_8 p_8
st_12 st_12
st_11 st_11
p_7 p_7
st_10 st_10
st_9 st_9
p_6 p_6
st_8 st_8
p_5 p_5
st_7 st_7
end type
type tabpage_3 from userobject within tab_1
end type
type st_kh from statictext within tabpage_3
end type
type st_gys from statictext within tabpage_3
end type
type st_cp from statictext within tabpage_3
end type
type st_22 from statictext within tabpage_3
end type
type st_21 from uo_text_m within tabpage_3
end type
type p_12 from picture within tabpage_3
end type
type st_20 from statictext within tabpage_3
end type
type st_19 from uo_text_m within tabpage_3
end type
type p_11 from picture within tabpage_3
end type
type st_18 from statictext within tabpage_3
end type
type st_17 from uo_text_m within tabpage_3
end type
type p_10 from picture within tabpage_3
end type
type tabpage_3 from userobject within tab_1
st_kh st_kh
st_gys st_gys
st_cp st_cp
st_22 st_22
st_21 st_21
p_12 p_12
st_20 st_20
st_19 st_19
p_11 p_11
st_18 st_18
st_17 st_17
p_10 p_10
end type
type tab_1 from tab within w_sys_init_guide_zl
tabpage_1 tabpage_1
tabpage_2 tabpage_2
tabpage_3 tabpage_3
end type
end forward

global type w_sys_init_guide_zl from w_publ_base
integer width = 2277
integer height = 1332
boolean titlebar = false
string title = ""
boolean controlmenu = false
boolean minbox = false
boolean border = false
windowtype windowtype = child!
long backcolor = 16777215
event ue_chk_sc ( )
event ue_chk_storage ( )
event ue_chk_mtrltype ( )
event ue_chk_cusarea ( )
event ue_chk_ywy ( )
event ue_chk_jsfs ( )
event ue_chk_szxm ( )
event ue_chk_cnzh ( )
event ue_chk_qtjcyy ( )
event ue_chk_cp ( )
event gys ( )
event ue_chk_gys ( )
event ue_chk_kh ( )
cb_next cb_next
tab_1 tab_1
end type
global w_sys_init_guide_zl w_sys_init_guide_zl

forward prototypes
public subroutine wf ()
end prototypes

event ue_chk_sc();Long ll_cnt
SELECT count(*)
	INTO :ll_cnt
	From u_scdef;
IF sqlca.SQLCode <> 0 THEN
	ll_cnt = 0
END IF


tab_1.tabpage_1.st_msg_sc.Text = "已设"+String(ll_cnt)+"条数据"

end event

event ue_chk_storage();Long ll_cnt
SELECT count(*)
	INTO :ll_cnt
	From u_storage;
IF sqlca.SQLCode <> 0 THEN
	ll_cnt = 0
END IF


tab_1.tabpage_1.st_msg_storage.Text = "已设"+String(ll_cnt)+"条数据"

end event

event ue_chk_mtrltype();Long ll_cnt
SELECT count(*)
	INTO :ll_cnt
	From u_mtrltype;
IF sqlca.SQLCode <> 0 THEN
	ll_cnt = 0
END IF


tab_1.tabpage_1.st_msg_mtrltype.Text = "已设"+String(ll_cnt)+"条数据"

end event

event ue_chk_cusarea();Long ll_cnt
SELECT count(*)
	INTO :ll_cnt
	From u_cusarea;
IF sqlca.SQLCode <> 0 THEN
	ll_cnt = 0
END IF


tab_1.tabpage_1.st_msg_cusarea.Text = "已设"+String(ll_cnt)+"条数据"

end event

event ue_chk_ywy();Long ll_cnt
SELECT count(*)
	INTO :ll_cnt
	From u_outrepdef;
IF sqlca.SQLCode <> 0 THEN
	ll_cnt = 0
END IF


tab_1.tabpage_2.st_ywy.Text = "已设"+String(ll_cnt)+"条数据"
end event

event ue_chk_jsfs();Long ll_cnt
SELECT count(*)
	INTO :ll_cnt
	From cw_banktype;
IF sqlca.SQLCode <> 0 THEN
	ll_cnt = 0
END IF


tab_1.tabpage_2.st_jsfs.Text = "已设"+String(ll_cnt)+"条数据"
end event

event ue_chk_szxm();Long ll_cnt
SELECT count(*)
	INTO :ll_cnt
	From u_itemdef;
IF sqlca.SQLCode <> 0 THEN
	ll_cnt = 0
END IF


tab_1.tabpage_2.st_szxm.Text = "已设"+String(ll_cnt)+"条数据"
end event

event ue_chk_cnzh();Long ll_cnt
SELECT count(*)
	INTO :ll_cnt
	From u_accounts;
IF sqlca.SQLCode <> 0 THEN
	ll_cnt = 0
END IF


tab_1.tabpage_2.st_cnzh.Text = "已设"+String(ll_cnt)+"条数据"
end event

event ue_chk_qtjcyy();Long ll_cnt
SELECT count(*)
	INTO :ll_cnt
	From u_static;
IF sqlca.SQLCode <> 0 THEN
	ll_cnt = 0
END IF


tab_1.tabpage_2.st_qtjcyy.Text = "已设"+String(ll_cnt)+"条数据"
end event

event ue_chk_cp();Long ll_cnt
SELECT count(*)
	INTO :ll_cnt
	From u_mtrldef;
IF sqlca.SQLCode <> 0 THEN
	ll_cnt = 0
END IF


tab_1.tabpage_3.st_cp.Text = "已设"+String(ll_cnt)+"条数据"
end event

event ue_chk_gys();Long ll_cnt
SELECT count(*)
	INTO :ll_cnt
	From u_spt;
IF sqlca.SQLCode <> 0 THEN
	ll_cnt = 0
END IF


tab_1.tabpage_3.st_gys.Text = "已设"+String(ll_cnt)+"条数据"
end event

event ue_chk_kh();Long ll_cnt
SELECT count(*)
	INTO :ll_cnt
	From u_cust;
IF sqlca.SQLCode <> 0 THEN
	ll_cnt = 0
END IF


tab_1.tabpage_3.st_kh.Text = "已设"+String(ll_cnt)+"条数据"
end event

public subroutine wf ();return
end subroutine

on w_sys_init_guide_zl.create
int iCurrent
call super::create
this.cb_next=create cb_next
this.tab_1=create tab_1
iCurrent=UpperBound(this.Control)
this.Control[iCurrent+1]=this.cb_next
this.Control[iCurrent+2]=this.tab_1
end on

on w_sys_init_guide_zl.destroy
call super::destroy
destroy(this.cb_next)
destroy(this.tab_1)
end on

event open;call super::open;This.TriggerEvent('ue_chk_sc')
This.TriggerEvent('ue_chk_storage')
This.TriggerEvent('ue_chk_mtrltype')
This.TriggerEvent('ue_chk_cusarea')
This.TriggerEvent('ue_chk_ywy')
This.TriggerEvent('ue_chk_jsfs')
This.TriggerEvent('ue_chk_szxm')
This.TriggerEvent('ue_chk_cnzh')
This.TriggerEvent('ue_chk_qtjcyy')
This.TriggerEvent('ue_chk_cp')
This.TriggerEvent('ue_chk_gys')
This.TriggerEvent('ue_chk_kh')


//tab_1.y=this.y
//
end event

event close;//f_set_sysmessage()
end event

type cb_func from w_publ_base`cb_func within w_sys_init_guide_zl
boolean visible = false
integer x = 1646
integer y = 1604
integer width = 357
integer height = 96
string text = "<上一步(&B)"
string normalpicname = ""
integer picsize = 0
toolbaralignment pic_align = alignatleft!
boolean border = true
end type

event cb_func::clicked;//if dw_1.update()<>1 then 
//	messagebox('提示','系统用户信息修改失败,请重试!', Information!, OK! )
//	rollback;
//else
//	messagebox('提示','系统用户信息修改成功!', Information!, OK! )
//	commit;
//	f_set_sysmessage()
//end if
end event

type cb_exit from w_publ_base`cb_exit within w_sys_init_guide_zl
boolean visible = false
integer x = 2359
integer y = 1604
integer width = 357
integer taborder = 30
string text = "取消(&C)"
string normalpicname = ""
end type

type cb_next from uo_imflatbutton within w_sys_init_guide_zl
boolean visible = false
integer x = 2002
integer y = 1604
integer width = 357
integer height = 96
integer taborder = 30
boolean bringtotop = true
string text = "下一步>(&N)"
end type

type tab_1 from tab within w_sys_init_guide_zl
integer width = 2272
integer height = 1324
integer taborder = 20
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long backcolor = 16777215
boolean raggedright = true
boolean focusonbuttondown = true
integer selectedtab = 1
tabpage_1 tabpage_1
tabpage_2 tabpage_2
tabpage_3 tabpage_3
end type

on tab_1.create
this.tabpage_1=create tabpage_1
this.tabpage_2=create tabpage_2
this.tabpage_3=create tabpage_3
this.Control[]={this.tabpage_1,&
this.tabpage_2,&
this.tabpage_3}
end on

on tab_1.destroy
destroy(this.tabpage_1)
destroy(this.tabpage_2)
destroy(this.tabpage_3)
end on

type tabpage_1 from userobject within tab_1
event create ( )
event destroy ( )
integer x = 18
integer y = 96
integer width = 2235
integer height = 1212
long backcolor = 16777215
string text = "1.基础资料（必须）"
long tabtextcolor = 33554432
long tabbackcolor = 16777215
long picturemaskcolor = 536870912
st_msg_cusarea st_msg_cusarea
st_msg_mtrltype st_msg_mtrltype
st_msg_storage st_msg_storage
st_msg_sc st_msg_sc
st_6 st_6
st_4 st_4
st_2 st_2
st_1 st_1
p_3 p_3
p_2 p_2
p_1 p_1
p_4 p_4
st_5 st_5
st_3 st_3
st_41 st_41
st_42 st_42
end type

on tabpage_1.create
this.st_msg_cusarea=create st_msg_cusarea
this.st_msg_mtrltype=create st_msg_mtrltype
this.st_msg_storage=create st_msg_storage
this.st_msg_sc=create st_msg_sc
this.st_6=create st_6
this.st_4=create st_4
this.st_2=create st_2
this.st_1=create st_1
this.p_3=create p_3
this.p_2=create p_2
this.p_1=create p_1
this.p_4=create p_4
this.st_5=create st_5
this.st_3=create st_3
this.st_41=create st_41
this.st_42=create st_42
this.Control[]={this.st_msg_cusarea,&
this.st_msg_mtrltype,&
this.st_msg_storage,&
this.st_msg_sc,&
this.st_6,&
this.st_4,&
this.st_2,&
this.st_1,&
this.p_3,&
this.p_2,&
this.p_1,&
this.p_4,&
this.st_5,&
this.st_3,&
this.st_41,&
this.st_42}
end on

on tabpage_1.destroy
destroy(this.st_msg_cusarea)
destroy(this.st_msg_mtrltype)
destroy(this.st_msg_storage)
destroy(this.st_msg_sc)
destroy(this.st_6)
destroy(this.st_4)
destroy(this.st_2)
destroy(this.st_1)
destroy(this.p_3)
destroy(this.p_2)
destroy(this.p_1)
destroy(this.p_4)
destroy(this.st_5)
destroy(this.st_3)
destroy(this.st_41)
destroy(this.st_42)
end on

type st_msg_cusarea from statictext within tabpage_1
integer x = 827
integer y = 1032
integer width = 1303
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 255
long backcolor = 16777215
string text = "已设N条"
boolean focusrectangle = false
end type

type st_msg_mtrltype from statictext within tabpage_1
integer x = 827
integer y = 736
integer width = 1303
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 255
long backcolor = 16777215
string text = "已设N条"
boolean focusrectangle = false
end type

type st_msg_storage from statictext within tabpage_1
integer x = 827
integer y = 480
integer width = 1303
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 255
long backcolor = 16777215
string text = "已设N条"
boolean focusrectangle = false
end type

type st_msg_sc from statictext within tabpage_1
integer x = 827
integer y = 236
integer width = 1303
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 255
long backcolor = 16777215
string text = "已设N条"
boolean focusrectangle = false
end type

type st_6 from statictext within tabpage_1
integer x = 832
integer y = 920
integer width = 837
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long backcolor = 16777215
string text = "区分客户区域,方便数据维护,查找"
alignment alignment = center!
boolean focusrectangle = false
end type

type st_4 from statictext within tabpage_1
integer x = 827
integer y = 648
integer width = 837
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long backcolor = 16777215
string text = "区分物料分类,方便数据维护,查找"
alignment alignment = center!
boolean focusrectangle = false
end type

type st_2 from statictext within tabpage_1
integer x = 827
integer y = 392
integer width = 507
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long backcolor = 16777215
string text = "企业存放物料的地方"
alignment alignment = center!
boolean focusrectangle = false
end type

type st_1 from statictext within tabpage_1
integer x = 827
integer y = 136
integer width = 1303
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long backcolor = 16777215
string text = "区分企业内部独立核算的各部分,如分公司,分厂,分店"
alignment alignment = center!
boolean focusrectangle = false
end type

type p_3 from picture within tabpage_1
integer x = 151
integer y = 884
integer width = 183
integer height = 160
boolean bringtotop = true
string pointer = "HAND.CUR"
boolean originalsize = true
string picturename = "graphics\cgd.bmp"
boolean focusrectangle = false
end type

event clicked;tab_1.tabpage_1.st_5.triggerevent(clicked!) 
end event

type p_2 from picture within tabpage_1
integer x = 151
integer y = 600
integer width = 183
integer height = 160
boolean bringtotop = true
string pointer = "HAND.CUR"
boolean originalsize = true
string picturename = "graphics\pyd.bmp"
boolean focusrectangle = false
end type

event clicked;tab_1.tabpage_1.st_3.triggerevent(clicked!)  
end event

type p_1 from picture within tabpage_1
integer x = 151
integer y = 332
integer width = 183
integer height = 160
boolean bringtotop = true
string pointer = "HAND.CUR"
boolean originalsize = true
string picturename = "graphics\ckjc.bmp"
boolean focusrectangle = false
end type

event clicked;st_41.triggerevent(clicked!) 
end event

type p_4 from picture within tabpage_1
integer x = 151
integer y = 64
integer width = 183
integer height = 160
boolean bringtotop = true
string pointer = "HAND.CUR"
boolean originalsize = true
string picturename = "graphics\kc.bmp"
boolean focusrectangle = false
end type

event clicked;tab_1.tabpage_1.st_42.triggerevent(clicked!)
end event

type st_5 from uo_text_m within tabpage_1
integer x = 96
integer y = 1060
integer width = 306
integer height = 52
boolean bringtotop = true
integer textsize = -9
boolean underline = true
long textcolor = 0
string text = "客户区域"
alignment alignment = center!
end type

event clicked;call super::clicked;f_sys_main(116)
end event

type st_3 from uo_text_m within tabpage_1
integer x = 96
integer y = 776
integer width = 306
integer height = 52
boolean bringtotop = true
integer textsize = -9
boolean underline = true
string text = "物料类别"
alignment alignment = center!
end type

event clicked;call super::clicked;f_sys_main(328)
end event

type st_41 from uo_text_m within tabpage_1
integer x = 96
integer y = 508
integer width = 293
integer height = 52
boolean bringtotop = true
integer textsize = -9
boolean underline = true
string text = "仓库"
alignment alignment = center!
end type

event clicked;call super::clicked;f_sys_main(807)
end event

type st_42 from uo_text_m within tabpage_1
integer x = 96
integer y = 240
integer width = 293
integer height = 52
boolean bringtotop = true
integer textsize = -9
boolean underline = true
string text = "分部"
alignment alignment = center!
end type

event clicked;call super::clicked;f_sys_main(819)
end event

type tabpage_2 from userobject within tab_1
event create ( )
event destroy ( )
integer x = 18
integer y = 96
integer width = 2235
integer height = 1212
long backcolor = 16777215
string text = "2.基础资料（必须）"
long tabtextcolor = 33554432
long tabbackcolor = 16777215
long picturemaskcolor = 536870912
st_qtjcyy st_qtjcyy
st_cnzh st_cnzh
st_szxm st_szxm
st_jsfs st_jsfs
st_ywy st_ywy
st_16 st_16
st_15 st_15
p_9 p_9
st_14 st_14
st_13 st_13
p_8 p_8
st_12 st_12
st_11 st_11
p_7 p_7
st_10 st_10
st_9 st_9
p_6 p_6
st_8 st_8
p_5 p_5
st_7 st_7
end type

on tabpage_2.create
this.st_qtjcyy=create st_qtjcyy
this.st_cnzh=create st_cnzh
this.st_szxm=create st_szxm
this.st_jsfs=create st_jsfs
this.st_ywy=create st_ywy
this.st_16=create st_16
this.st_15=create st_15
this.p_9=create p_9
this.st_14=create st_14
this.st_13=create st_13
this.p_8=create p_8
this.st_12=create st_12
this.st_11=create st_11
this.p_7=create p_7
this.st_10=create st_10
this.st_9=create st_9
this.p_6=create p_6
this.st_8=create st_8
this.p_5=create p_5
this.st_7=create st_7
this.Control[]={this.st_qtjcyy,&
this.st_cnzh,&
this.st_szxm,&
this.st_jsfs,&
this.st_ywy,&
this.st_16,&
this.st_15,&
this.p_9,&
this.st_14,&
this.st_13,&
this.p_8,&
this.st_12,&
this.st_11,&
this.p_7,&
this.st_10,&
this.st_9,&
this.p_6,&
this.st_8,&
this.p_5,&
this.st_7}
end on

on tabpage_2.destroy
destroy(this.st_qtjcyy)
destroy(this.st_cnzh)
destroy(this.st_szxm)
destroy(this.st_jsfs)
destroy(this.st_ywy)
destroy(this.st_16)
destroy(this.st_15)
destroy(this.p_9)
destroy(this.st_14)
destroy(this.st_13)
destroy(this.p_8)
destroy(this.st_12)
destroy(this.st_11)
destroy(this.p_7)
destroy(this.st_10)
destroy(this.st_9)
destroy(this.p_6)
destroy(this.st_8)
destroy(this.p_5)
destroy(this.st_7)
end on

type st_qtjcyy from statictext within tabpage_2
integer x = 695
integer y = 1152
integer width = 1303
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 255
long backcolor = 16777215
string text = "已设N条"
boolean focusrectangle = false
end type

type st_cnzh from statictext within tabpage_2
integer x = 699
integer y = 956
integer width = 1303
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 255
long backcolor = 16777215
string text = "已设N条"
boolean focusrectangle = false
end type

type st_szxm from statictext within tabpage_2
integer x = 709
integer y = 696
integer width = 1303
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 255
long backcolor = 16777215
string text = "已设N条"
boolean focusrectangle = false
end type

type st_jsfs from statictext within tabpage_2
integer x = 709
integer y = 440
integer width = 1303
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 255
long backcolor = 16777215
string text = "已设N条"
boolean focusrectangle = false
end type

type st_ywy from statictext within tabpage_2
integer x = 704
integer y = 168
integer width = 1303
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 255
long backcolor = 16777215
string text = "已设N条"
boolean focusrectangle = false
end type

type st_16 from statictext within tabpage_2
integer x = 709
integer y = 1048
integer width = 1248
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long backcolor = 16777215
string text = "例如：初始化进仓，异常进出仓"
boolean focusrectangle = false
end type

type st_15 from uo_text_m within tabpage_2
integer x = 91
integer y = 1132
integer width = 343
integer height = 56
boolean bringtotop = true
integer textsize = -9
boolean underline = true
string text = "其它进出原因"
alignment alignment = center!
end type

event clicked;call super::clicked;f_sys_main(327)
end event

type p_9 from picture within tabpage_2
integer x = 91
integer y = 968
integer width = 146
integer height = 140
boolean bringtotop = true
string pointer = "HAND.CUR"
string picturename = "graphics\kqfx.bmp"
boolean focusrectangle = false
end type

event clicked;tab_1.tabpage_2.st_15.triggerevent(clicked!)
end event

type st_14 from statictext within tabpage_2
integer x = 709
integer y = 852
integer width = 923
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long backcolor = 16777215
string text = "现金，银行"
boolean focusrectangle = false
end type

type st_13 from uo_text_m within tabpage_2
integer x = 91
integer y = 864
integer width = 293
integer height = 56
boolean bringtotop = true
integer textsize = -9
boolean underline = true
string text = "出纳账号"
alignment alignment = center!
end type

event clicked;call super::clicked;f_sys_main(513)
end event

type p_8 from picture within tabpage_2
integer x = 91
integer y = 704
integer width = 192
integer height = 160
boolean bringtotop = true
string pointer = "HAND.CUR"
string picturename = "graphics\kqds.bmp"
boolean focusrectangle = false
end type

event clicked;tab_1.tabpage_2.st_13.triggerevent(clicked!)
end event

type st_12 from statictext within tabpage_2
integer x = 709
integer y = 592
integer width = 1152
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long backcolor = 16777215
string text = "例如：销售收入，采购支出等"
boolean focusrectangle = false
end type

type st_11 from uo_text_m within tabpage_2
integer x = 91
integer y = 640
integer width = 293
integer height = 56
boolean bringtotop = true
integer textsize = -9
boolean underline = true
string text = "收支项目"
alignment alignment = center!
end type

event clicked;call super::clicked;f_sys_main(530)
end event

type p_7 from picture within tabpage_2
integer x = 91
integer y = 464
integer width = 183
integer height = 160
boolean bringtotop = true
string pointer = "HAND.CUR"
string picturename = "graphics\khth.bmp"
boolean focusrectangle = false
end type

event clicked;tab_1.tabpage_2.st_11.triggerevent(clicked!)
end event

type st_10 from statictext within tabpage_2
integer x = 709
integer y = 340
integer width = 686
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long backcolor = 16777215
string text = "例如：现金，记账"
boolean focusrectangle = false
end type

type st_9 from uo_text_m within tabpage_2
integer x = 91
integer y = 392
integer width = 293
integer height = 56
boolean bringtotop = true
integer textsize = -9
boolean underline = true
string text = "结算方式"
alignment alignment = center!
end type

event clicked;call super::clicked;f_sys_main(101)
end event

type p_6 from picture within tabpage_2
integer x = 91
integer y = 232
integer width = 187
integer height = 160
boolean bringtotop = true
string pointer = "HAND.CUR"
string picturename = "graphics\jgft.bmp"
boolean focusrectangle = false
end type

event clicked;tab_1.tabpage_2.st_9.triggerevent(clicked!)
end event

type st_8 from uo_text_m within tabpage_2
integer x = 91
integer y = 164
integer width = 293
integer height = 76
boolean bringtotop = true
integer textsize = -9
boolean underline = true
string text = "业务员"
alignment alignment = center!
end type

event clicked;call super::clicked;f_sys_main(118)
end event

type p_5 from picture within tabpage_2
integer x = 91
integer width = 183
integer height = 160
boolean bringtotop = true
string pointer = "HAND.CUR"
string picturename = "graphics\kqfk.bmp"
boolean focusrectangle = false
end type

event clicked;tab_1.tabpage_2.st_8.triggerevent(clicked!)
end event

type st_7 from statictext within tabpage_2
integer x = 709
integer y = 60
integer width = 1001
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long backcolor = 16777215
string text = "公司业务员"
boolean focusrectangle = false
end type

type tabpage_3 from userobject within tab_1
integer x = 18
integer y = 96
integer width = 2235
integer height = 1212
long backcolor = 16777215
string text = "3.基础资料（可选）"
long tabtextcolor = 33554432
long tabbackcolor = 16777215
long picturemaskcolor = 536870912
st_kh st_kh
st_gys st_gys
st_cp st_cp
st_22 st_22
st_21 st_21
p_12 p_12
st_20 st_20
st_19 st_19
p_11 p_11
st_18 st_18
st_17 st_17
p_10 p_10
end type

on tabpage_3.create
this.st_kh=create st_kh
this.st_gys=create st_gys
this.st_cp=create st_cp
this.st_22=create st_22
this.st_21=create st_21
this.p_12=create p_12
this.st_20=create st_20
this.st_19=create st_19
this.p_11=create p_11
this.st_18=create st_18
this.st_17=create st_17
this.p_10=create p_10
this.Control[]={this.st_kh,&
this.st_gys,&
this.st_cp,&
this.st_22,&
this.st_21,&
this.p_12,&
this.st_20,&
this.st_19,&
this.p_11,&
this.st_18,&
this.st_17,&
this.p_10}
end on

on tabpage_3.destroy
destroy(this.st_kh)
destroy(this.st_gys)
destroy(this.st_cp)
destroy(this.st_22)
destroy(this.st_21)
destroy(this.p_12)
destroy(this.st_20)
destroy(this.st_19)
destroy(this.p_11)
destroy(this.st_18)
destroy(this.st_17)
destroy(this.p_10)
end on

type st_kh from statictext within tabpage_3
integer x = 731
integer y = 1060
integer width = 1303
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 255
long backcolor = 16777215
string text = "已设N条"
boolean focusrectangle = false
end type

type st_gys from statictext within tabpage_3
integer x = 713
integer y = 640
integer width = 1303
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 255
long backcolor = 16777215
string text = "已设N条"
boolean focusrectangle = false
end type

type st_cp from statictext within tabpage_3
integer x = 722
integer y = 288
integer width = 1303
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 255
long backcolor = 16777215
string text = "已设N条"
boolean focusrectangle = false
end type

type st_22 from statictext within tabpage_3
integer x = 727
integer y = 940
integer width = 837
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long backcolor = 16777215
string text = "客户（可通过系统管理批量导入）"
boolean focusrectangle = false
end type

type st_21 from uo_text_m within tabpage_3
integer x = 69
integer y = 1004
integer width = 293
integer height = 76
boolean bringtotop = true
integer textsize = -9
boolean underline = true
string text = "客户"
alignment alignment = center!
end type

event clicked;call super::clicked;f_sys_main(105)
end event

type p_12 from picture within tabpage_3
integer x = 105
integer y = 832
integer width = 183
integer height = 160
boolean bringtotop = true
string pointer = "HAND.CUR"
string picturename = "graphics\kqfk.bmp"
boolean focusrectangle = false
end type

event clicked;tab_1.tabpage_3.st_21.triggerevent(clicked!)
end event

type st_20 from statictext within tabpage_3
integer x = 727
integer y = 548
integer width = 891
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long backcolor = 16777215
string text = "供应商（可通过系统管理批量导入）"
boolean focusrectangle = false
end type

type st_19 from uo_text_m within tabpage_3
integer x = 73
integer y = 612
integer width = 293
integer height = 76
boolean bringtotop = true
integer textsize = -9
boolean underline = true
string text = "供应商"
alignment alignment = center!
end type

event clicked;call super::clicked;f_sys_main(404)
end event

type p_11 from picture within tabpage_3
integer x = 105
integer y = 440
integer width = 183
integer height = 160
boolean bringtotop = true
string pointer = "HAND.CUR"
string picturename = "graphics\kqfk.bmp"
boolean focusrectangle = false
end type

event clicked;tab_1.tabpage_3.st_19.triggerevent(clicked!)
end event

type st_18 from statictext within tabpage_3
integer x = 727
integer y = 196
integer width = 1330
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long backcolor = 16777215
string text = "成品 ，半成品 ，原材料（可通过系统管理批量导入）"
boolean focusrectangle = false
end type

type st_17 from uo_text_m within tabpage_3
integer x = 105
integer y = 260
integer width = 293
integer height = 76
boolean bringtotop = true
integer textsize = -9
boolean underline = true
string text = "产品及物料"
alignment alignment = center!
end type

event clicked;call super::clicked;f_sys_main(201)
end event

type p_10 from picture within tabpage_3
integer x = 105
integer y = 88
integer width = 183
integer height = 160
boolean bringtotop = true
string pointer = "HAND.CUR"
string picturename = "graphics\bbxx.bmp"
boolean focusrectangle = false
end type

event clicked;tab_1.tabpage_3.st_17.triggerevent(clicked!)
end event