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

$PBExportHeader$w_main_child_jg.srw
forward
global type w_main_child_jg from w_mface_base
end type
type p_3 from picture within w_main_child_jg
end type
type st_4 from uo_text_m within w_main_child_jg
end type
type st_1 from uo_text_m within w_main_child_jg
end type
type st_7 from uo_text_m within w_main_child_jg
end type
type st_8 from uo_text_m within w_main_child_jg
end type
type st_25 from uo_text_m within w_main_child_jg
end type
type p_6 from picture within w_main_child_jg
end type
type p_4 from picture within w_main_child_jg
end type
type st_18 from uo_text_m within w_main_child_jg
end type
type st_27 from uo_text_m within w_main_child_jg
end type
type st_19 from uo_text_m within w_main_child_jg
end type
type st_23 from uo_text_m within w_main_child_jg
end type
type st_15 from uo_text_m within w_main_child_jg
end type
type st_30 from uo_text_m within w_main_child_jg
end type
type st_13 from uo_text_m within w_main_child_jg
end type
type st_34 from uo_text_m within w_main_child_jg
end type
type p_22 from picture within w_main_child_jg
end type
type p_19 from picture within w_main_child_jg
end type
type p_16 from picture within w_main_child_jg
end type
type st_12 from uo_text_m within w_main_child_jg
end type
type p_15 from picture within w_main_child_jg
end type
type st_9 from uo_text_m within w_main_child_jg
end type
type p_12 from picture within w_main_child_jg
end type
type st_11 from uo_text_m within w_main_child_jg
end type
type p_1 from picture within w_main_child_jg
end type
type st_3 from uo_text_m within w_main_child_jg
end type
type p_9 from picture within w_main_child_jg
end type
type p_39 from picture within w_main_child_jg
end type
type p_42 from picture within w_main_child_jg
end type
type p_14 from picture within w_main_child_jg
end type
type st_14 from uo_text_m within w_main_child_jg
end type
type st_5 from uo_text_m within w_main_child_jg
end type
type p_5 from picture within w_main_child_jg
end type
type st_31 from uo_text_m within w_main_child_jg
end type
type p_38 from picture within w_main_child_jg
end type
type st_10 from uo_text_m within w_main_child_jg
end type
type p_10 from picture within w_main_child_jg
end type
type st_2 from uo_text_m within w_main_child_jg
end type
type ln_171 from line within w_main_child_jg
end type
type st_40 from uo_text_m within w_main_child_jg
end type
type p_2 from picture within w_main_child_jg
end type
type ln_1 from line within w_main_child_jg
end type
type rr_1 from roundrectangle within w_main_child_jg
end type
end forward

global type w_main_child_jg from w_mface_base
integer x = 1001
integer y = 80
integer width = 2601
integer height = 1352
boolean titlebar = false
boolean controlmenu = false
boolean minbox = false
boolean maxbox = false
boolean resizable = false
boolean border = false
windowtype windowtype = child!
p_3 p_3
st_4 st_4
st_1 st_1
st_7 st_7
st_8 st_8
st_25 st_25
p_6 p_6
p_4 p_4
st_18 st_18
st_27 st_27
st_19 st_19
st_23 st_23
st_15 st_15
st_30 st_30
st_13 st_13
st_34 st_34
p_22 p_22
p_19 p_19
p_16 p_16
st_12 st_12
p_15 p_15
st_9 st_9
p_12 p_12
st_11 st_11
p_1 p_1
st_3 st_3
p_9 p_9
p_39 p_39
p_42 p_42
p_14 p_14
st_14 st_14
st_5 st_5
p_5 p_5
st_31 st_31
p_38 p_38
st_10 st_10
p_10 p_10
st_2 st_2
ln_171 ln_171
st_40 st_40
p_2 p_2
ln_1 ln_1
rr_1 rr_1
end type
global w_main_child_jg w_main_child_jg

forward prototypes
public function integer wf_kk ()
end prototypes

public function integer wf_kk ();st_40.x=0
st_40.y=0
st_40.width=this.width
st_40.height=this.height
int i

for i=1 to this.width/200+1
	st_40.x=st_40.x+200
	sleep(0.4)
next
	
return 0
end function

on w_main_child_jg.create
int iCurrent
call super::create
this.p_3=create p_3
this.st_4=create st_4
this.st_1=create st_1
this.st_7=create st_7
this.st_8=create st_8
this.st_25=create st_25
this.p_6=create p_6
this.p_4=create p_4
this.st_18=create st_18
this.st_27=create st_27
this.st_19=create st_19
this.st_23=create st_23
this.st_15=create st_15
this.st_30=create st_30
this.st_13=create st_13
this.st_34=create st_34
this.p_22=create p_22
this.p_19=create p_19
this.p_16=create p_16
this.st_12=create st_12
this.p_15=create p_15
this.st_9=create st_9
this.p_12=create p_12
this.st_11=create st_11
this.p_1=create p_1
this.st_3=create st_3
this.p_9=create p_9
this.p_39=create p_39
this.p_42=create p_42
this.p_14=create p_14
this.st_14=create st_14
this.st_5=create st_5
this.p_5=create p_5
this.st_31=create st_31
this.p_38=create p_38
this.st_10=create st_10
this.p_10=create p_10
this.st_2=create st_2
this.ln_171=create ln_171
this.st_40=create st_40
this.p_2=create p_2
this.ln_1=create ln_1
this.rr_1=create rr_1
iCurrent=UpperBound(this.Control)
this.Control[iCurrent+1]=this.p_3
this.Control[iCurrent+2]=this.st_4
this.Control[iCurrent+3]=this.st_1
this.Control[iCurrent+4]=this.st_7
this.Control[iCurrent+5]=this.st_8
this.Control[iCurrent+6]=this.st_25
this.Control[iCurrent+7]=this.p_6
this.Control[iCurrent+8]=this.p_4
this.Control[iCurrent+9]=this.st_18
this.Control[iCurrent+10]=this.st_27
this.Control[iCurrent+11]=this.st_19
this.Control[iCurrent+12]=this.st_23
this.Control[iCurrent+13]=this.st_15
this.Control[iCurrent+14]=this.st_30
this.Control[iCurrent+15]=this.st_13
this.Control[iCurrent+16]=this.st_34
this.Control[iCurrent+17]=this.p_22
this.Control[iCurrent+18]=this.p_19
this.Control[iCurrent+19]=this.p_16
this.Control[iCurrent+20]=this.st_12
this.Control[iCurrent+21]=this.p_15
this.Control[iCurrent+22]=this.st_9
this.Control[iCurrent+23]=this.p_12
this.Control[iCurrent+24]=this.st_11
this.Control[iCurrent+25]=this.p_1
this.Control[iCurrent+26]=this.st_3
this.Control[iCurrent+27]=this.p_9
this.Control[iCurrent+28]=this.p_39
this.Control[iCurrent+29]=this.p_42
this.Control[iCurrent+30]=this.p_14
this.Control[iCurrent+31]=this.st_14
this.Control[iCurrent+32]=this.st_5
this.Control[iCurrent+33]=this.p_5
this.Control[iCurrent+34]=this.st_31
this.Control[iCurrent+35]=this.p_38
this.Control[iCurrent+36]=this.st_10
this.Control[iCurrent+37]=this.p_10
this.Control[iCurrent+38]=this.st_2
this.Control[iCurrent+39]=this.ln_171
this.Control[iCurrent+40]=this.st_40
this.Control[iCurrent+41]=this.p_2
this.Control[iCurrent+42]=this.ln_1
this.Control[iCurrent+43]=this.rr_1
end on

on w_main_child_jg.destroy
call super::destroy
destroy(this.p_3)
destroy(this.st_4)
destroy(this.st_1)
destroy(this.st_7)
destroy(this.st_8)
destroy(this.st_25)
destroy(this.p_6)
destroy(this.p_4)
destroy(this.st_18)
destroy(this.st_27)
destroy(this.st_19)
destroy(this.st_23)
destroy(this.st_15)
destroy(this.st_30)
destroy(this.st_13)
destroy(this.st_34)
destroy(this.p_22)
destroy(this.p_19)
destroy(this.p_16)
destroy(this.st_12)
destroy(this.p_15)
destroy(this.st_9)
destroy(this.p_12)
destroy(this.st_11)
destroy(this.p_1)
destroy(this.st_3)
destroy(this.p_9)
destroy(this.p_39)
destroy(this.p_42)
destroy(this.p_14)
destroy(this.st_14)
destroy(this.st_5)
destroy(this.p_5)
destroy(this.st_31)
destroy(this.p_38)
destroy(this.st_10)
destroy(this.p_10)
destroy(this.st_2)
destroy(this.ln_171)
destroy(this.st_40)
destroy(this.p_2)
destroy(this.ln_1)
destroy(this.rr_1)
end on

event open;setnull(io_cont)
end event

event mousemove;call super::mousemove;window ls_w
ls_w=this.parentwindow()
ls_w.triggerevent("mousemove")
end event

event closequery;return 1
end event

event key;f_x_genapp_frame()
end event

type p_3 from picture within w_main_child_jg
integer x = 1614
integer y = 464
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_11.triggerevent(clicked!)
end event

type st_4 from uo_text_m within w_main_child_jg
integer x = 1943
integer y = 628
integer width = 617
integer height = 64
boolean bringtotop = true
integer textsize = -9
boolean underline = true
long textcolor = 0
string text = "外协库存物料进出明细"
end type

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

type st_1 from uo_text_m within w_main_child_jg
integer x = 1943
integer y = 1140
integer width = 562
integer height = 64
boolean bringtotop = true
integer textsize = -9
boolean underline = true
long textcolor = 0
string text = "供应商交期达成统计表"
end type

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

type st_7 from uo_text_m within w_main_child_jg
integer x = 914
integer y = 1228
integer width = 288
integer height = 52
boolean bringtotop = true
integer textsize = -9
boolean underline = true
string text = "产品及物料"
end type

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

type st_8 from uo_text_m within w_main_child_jg
integer x = 562
integer y = 1228
integer width = 187
integer height = 52
boolean bringtotop = true
integer textsize = -9
boolean underline = true
string text = "供应商"
end type

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

type st_25 from uo_text_m within w_main_child_jg
integer x = 119
integer y = 1228
integer width = 297
integer height = 52
boolean bringtotop = true
integer textsize = -9
boolean underline = true
string text = "供应商类别"
end type

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

type p_6 from picture within w_main_child_jg
integer x = 933
integer y = 720
integer width = 187
integer height = 164
boolean originalsize = true
string picturename = "graphics\arrow_8.bmp"
boolean focusrectangle = false
end type

type p_4 from picture within w_main_child_jg
integer x = 933
integer y = 312
integer width = 187
integer height = 164
boolean originalsize = true
string picturename = "graphics\arrow_7.bmp"
boolean focusrectangle = false
end type

type st_18 from uo_text_m within w_main_child_jg
integer x = 1943
integer y = 1260
integer width = 553
integer height = 64
boolean bringtotop = true
integer textsize = -9
long textcolor = 0
string text = "更多报表>>"
end type

event clicked;call super::clicked;m_jg_rp om_1
om_1 = CREATE m_jg_rp
om_1.PopMenu(w_main_child_jg.X+THIS.X,w_main_child_jg.Y+THIS.Y)
DESTROY om_1

end event

type st_27 from uo_text_m within w_main_child_jg
integer x = 1943
integer y = 1012
integer width = 562
integer height = 64
boolean bringtotop = true
integer textsize = -9
boolean underline = true
long textcolor = 0
string text = "外协商加工金额汇总表"
end type

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

type st_19 from uo_text_m within w_main_child_jg
integer x = 1943
integer y = 884
integer width = 617
integer height = 64
boolean bringtotop = true
integer textsize = -9
boolean underline = true
long textcolor = 0
string text = "外协收货(外协商)统计表"
end type

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

type st_23 from uo_text_m within w_main_child_jg
integer x = 1943
integer y = 756
integer width = 453
integer height = 64
boolean bringtotop = true
integer textsize = -9
boolean underline = true
long textcolor = 0
string text = "外协商历史结存表"
end type

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

type st_15 from uo_text_m within w_main_child_jg
integer x = 1943
integer y = 372
integer width = 553
integer height = 64
boolean bringtotop = true
integer textsize = -9
boolean underline = true
long textcolor = 0
string text = "外协进仓统计表"
end type

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

type st_30 from uo_text_m within w_main_child_jg
integer x = 1943
integer y = 500
integer width = 553
integer height = 64
boolean bringtotop = true
integer textsize = -9
boolean underline = true
long textcolor = 0
string text = "外协出仓统计表"
end type

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

type st_13 from uo_text_m within w_main_child_jg
integer x = 1943
integer y = 244
integer width = 553
integer height = 64
boolean bringtotop = true
integer textsize = -9
boolean underline = true
long textcolor = 0
string text = "外协订单统计表"
end type

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

type st_34 from uo_text_m within w_main_child_jg
integer x = 1554
integer y = 228
integer width = 306
integer height = 52
boolean bringtotop = true
integer textsize = -9
long textcolor = 0
string text = "辅助功能"
alignment alignment = center!
end type

event clicked;call super::clicked;m_jg_fz om_1
om_1 = CREATE m_jg_fz
om_1.PopMenu(w_main_child_jg.X+THIS.X,w_main_child_jg.Y+THIS.Y)
DESTROY om_1

end event

type p_22 from picture within w_main_child_jg
integer x = 1627
integer y = 60
integer width = 160
integer height = 136
string pointer = "HAND.CUR"
string picturename = "graphics\bt_sys1.bmp"
boolean focusrectangle = false
end type

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

type p_19 from picture within w_main_child_jg
integer x = 704
integer y = 720
integer width = 91
integer height = 152
string picturename = "graphics\arrow_4.bmp"
boolean focusrectangle = false
end type

type p_16 from picture within w_main_child_jg
integer x = 421
integer y = 120
integer width = 169
integer height = 80
string picturename = "graphics\arrow_1.bmp"
boolean focusrectangle = false
end type

type st_12 from uo_text_m within w_main_child_jg
integer x = 1038
integer y = 632
integer width = 398
integer height = 52
boolean bringtotop = true
integer textsize = -9
string text = "外协商库存表"
alignment alignment = center!
end type

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

type p_15 from picture within w_main_child_jg
integer x = 658
integer y = 464
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;st_9.triggerevent(clicked!)
end event

type st_9 from uo_text_m within w_main_child_jg
integer x = 594
integer y = 632
integer width = 315
integer height = 52
boolean bringtotop = true
integer textsize = -9
string text = "库存表"
alignment alignment = center!
end type

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

type p_12 from picture within w_main_child_jg
integer x = 1143
integer y = 464
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;st_12.triggerevent(clicked!)
end event

type st_11 from uo_text_m within w_main_child_jg
integer x = 1536
integer y = 632
integer width = 343
integer height = 52
boolean bringtotop = true
integer textsize = -9
string text = "外协商结存"
alignment alignment = center!
end type

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

type p_1 from picture within w_main_child_jg
integer x = 704
integer y = 312
integer width = 91
integer height = 152
string picturename = "graphics\arrow_4.bmp"
boolean focusrectangle = false
end type

type st_3 from uo_text_m within w_main_child_jg
integer x = 2094
integer y = 132
integer width = 306
integer height = 52
boolean bringtotop = true
integer textsize = -9
string pointer = " "
long textcolor = 0
string text = "报表"
end type

event clicked;//
end event

type p_9 from picture within w_main_child_jg
integer x = 1929
integer y = 60
integer width = 183
integer height = 160
string pointer = " "
boolean originalsize = true
string picturename = "graphics\bbxx.bmp"
boolean focusrectangle = false
end type

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

type p_39 from picture within w_main_child_jg
integer x = 942
integer y = 928
integer width = 169
integer height = 80
string picturename = "graphics\arrow_10.bmp"
boolean focusrectangle = false
end type

type p_42 from picture within w_main_child_jg
integer x = 1394
integer y = 548
integer width = 169
integer height = 80
string picturename = "graphics\arrow_1.bmp"
boolean focusrectangle = false
end type

type p_14 from picture within w_main_child_jg
integer x = 1143
integer y = 868
integer width = 183
integer height = 160
boolean bringtotop = true
string pointer = "HAND.CUR"
boolean originalsize = true
string picturename = "graphics\ygzl.bmp"
boolean focusrectangle = false
end type

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

type st_14 from uo_text_m within w_main_child_jg
integer x = 1038
integer y = 1036
integer width = 398
integer height = 52
boolean bringtotop = true
integer textsize = -9
string text = "外协商加工价格"
alignment alignment = center!
end type

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

type st_5 from uo_text_m within w_main_child_jg
integer x = 110
integer y = 1036
integer width = 315
integer height = 52
boolean bringtotop = true
integer textsize = -9
long textcolor = 0
string text = "询价单"
alignment alignment = center!
end type

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

type p_5 from picture within w_main_child_jg
integer x = 174
integer y = 868
integer width = 183
integer height = 160
boolean bringtotop = true
string pointer = "HAND.CUR"
boolean originalsize = true
string picturename = "graphics\ygzl.bmp"
boolean focusrectangle = false
end type

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

type st_31 from uo_text_m within w_main_child_jg
integer x = 539
integer y = 228
integer width = 425
integer height = 52
boolean bringtotop = true
integer textsize = -9
string text = "外协发出/退回单"
alignment alignment = center!
end type

event clicked;call super::clicked;m_jg_cc om_1
om_1 = CREATE m_jg_cc
om_1.PopMenu(w_main_child_jg.X+THIS.X,w_main_child_jg.Y+THIS.Y)
DESTROY om_1
end event

type p_38 from picture within w_main_child_jg
integer x = 658
integer y = 60
integer width = 183
integer height = 160
string pointer = "HAND.CUR"
boolean originalsize = true
string picturename = "graphics\jgcc.bmp"
boolean focusrectangle = false
end type

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

type st_10 from uo_text_m within w_main_child_jg
integer x = 539
integer y = 1036
integer width = 425
integer height = 52
boolean bringtotop = true
integer textsize = -9
string text = "外协收货/返工单"
alignment alignment = center!
end type

event clicked;call super::clicked;m_jg_sh om_1
om_1 = CREATE m_jg_sh
om_1.PopMenu(w_main_child_jg.X+THIS.X,w_main_child_jg.Y+THIS.Y)
DESTROY om_1

end event

type p_10 from picture within w_main_child_jg
integer x = 658
integer y = 868
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;st_10.triggerevent(clicked!)
end event

type st_2 from uo_text_m within w_main_child_jg
integer x = 110
integer y = 228
integer width = 315
integer height = 52
boolean bringtotop = true
integer textsize = -9
string text = "外协订单"
alignment alignment = center!
end type

event clicked;call super::clicked;f_sys_main(916)

end event

type ln_171 from line within w_main_child_jg
long linecolor = 276856960
integer linethickness = 4
integer beginx = 27
integer beginy = 128
integer endx = 27
integer endy = 128
end type

type st_40 from uo_text_m within w_main_child_jg
boolean visible = false
integer x = 402
integer width = 297
integer height = 80
boolean bringtotop = true
integer textsize = -9
string text = ""
boolean border = true
end type

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

type p_2 from picture within w_main_child_jg
integer x = 174
integer y = 60
integer width = 183
integer height = 160
string pointer = "HAND.CUR"
boolean originalsize = true
string picturename = "graphics\scjh.bmp"
boolean focusrectangle = false
end type

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

type ln_1 from line within w_main_child_jg
long linecolor = 33554432
linestyle linestyle = dot!
integer linethickness = 4
integer beginx = 1879
integer beginy = 36
integer endx = 1879
integer endy = 1300
end type

type rr_1 from roundrectangle within w_main_child_jg
long linecolor = 15780518
integer linethickness = 6
long fillcolor = 16777215
integer x = 18
integer y = 1180
integer width = 1842
integer height = 144
integer cornerheight = 40
integer cornerwidth = 46
end type