$PBExportHeader$w_main_child_sc.srw forward global type w_main_child_sc from w_mface_base end type type st_17 from uo_text_m within w_main_child_sc end type type st_16 from uo_text_m within w_main_child_sc end type type p_10 from picture within w_main_child_sc end type type st_14 from uo_text_m within w_main_child_sc end type type p_8 from picture within w_main_child_sc end type type st_13 from uo_text_m within w_main_child_sc end type type st_11 from uo_text_m within w_main_child_sc end type type st_5 from uo_text_m within w_main_child_sc end type type p_3 from picture within w_main_child_sc end type type st_12 from uo_text_m within w_main_child_sc end type type st_10 from uo_text_m within w_main_child_sc end type type st_8 from uo_text_m within w_main_child_sc end type type st_15 from uo_text_m within w_main_child_sc end type type st_2 from uo_text_m within w_main_child_sc end type type st_19 from uo_text_m within w_main_child_sc end type type st_23 from uo_text_m within w_main_child_sc end type type st_27 from uo_text_m within w_main_child_sc end type type st_30 from uo_text_m within w_main_child_sc end type type st_31 from uo_text_m within w_main_child_sc end type type p_7 from picture within w_main_child_sc end type type p_6 from picture within w_main_child_sc end type type st_7 from uo_text_m within w_main_child_sc end type type p_5 from picture within w_main_child_sc end type type p_4 from picture within w_main_child_sc end type type st_6 from uo_text_m within w_main_child_sc end type type st_3 from uo_text_m within w_main_child_sc end type type p_2 from picture within w_main_child_sc end type type st_9 from uo_text_m within w_main_child_sc end type type p_9 from picture within w_main_child_sc end type type st_1 from uo_text_m within w_main_child_sc end type type p_1 from picture within w_main_child_sc end type type st_4 from uo_text_m within w_main_child_sc end type type ln_1 from line within w_main_child_sc end type type rr_1 from roundrectangle within w_main_child_sc end type end forward global type w_main_child_sc 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! st_17 st_17 st_16 st_16 p_10 p_10 st_14 st_14 p_8 p_8 st_13 st_13 st_11 st_11 st_5 st_5 p_3 p_3 st_12 st_12 st_10 st_10 st_8 st_8 st_15 st_15 st_2 st_2 st_19 st_19 st_23 st_23 st_27 st_27 st_30 st_30 st_31 st_31 p_7 p_7 p_6 p_6 st_7 st_7 p_5 p_5 p_4 p_4 st_6 st_6 st_3 st_3 p_2 p_2 st_9 st_9 p_9 p_9 st_1 st_1 p_1 p_1 st_4 st_4 ln_1 ln_1 rr_1 rr_1 end type global w_main_child_sc w_main_child_sc forward prototypes public function integer wf_kk () end prototypes public function integer wf_kk ();st_4.x=0 st_4.y=0 st_4.width=this.width st_4.height=this.height int i for i=1 to this.width/200+1 st_4.x=st_4.x+200 sleep(0.4) next return 0 end function on w_main_child_sc.create int iCurrent call super::create this.st_17=create st_17 this.st_16=create st_16 this.p_10=create p_10 this.st_14=create st_14 this.p_8=create p_8 this.st_13=create st_13 this.st_11=create st_11 this.st_5=create st_5 this.p_3=create p_3 this.st_12=create st_12 this.st_10=create st_10 this.st_8=create st_8 this.st_15=create st_15 this.st_2=create st_2 this.st_19=create st_19 this.st_23=create st_23 this.st_27=create st_27 this.st_30=create st_30 this.st_31=create st_31 this.p_7=create p_7 this.p_6=create p_6 this.st_7=create st_7 this.p_5=create p_5 this.p_4=create p_4 this.st_6=create st_6 this.st_3=create st_3 this.p_2=create p_2 this.st_9=create st_9 this.p_9=create p_9 this.st_1=create st_1 this.p_1=create p_1 this.st_4=create st_4 this.ln_1=create ln_1 this.rr_1=create rr_1 iCurrent=UpperBound(this.Control) this.Control[iCurrent+1]=this.st_17 this.Control[iCurrent+2]=this.st_16 this.Control[iCurrent+3]=this.p_10 this.Control[iCurrent+4]=this.st_14 this.Control[iCurrent+5]=this.p_8 this.Control[iCurrent+6]=this.st_13 this.Control[iCurrent+7]=this.st_11 this.Control[iCurrent+8]=this.st_5 this.Control[iCurrent+9]=this.p_3 this.Control[iCurrent+10]=this.st_12 this.Control[iCurrent+11]=this.st_10 this.Control[iCurrent+12]=this.st_8 this.Control[iCurrent+13]=this.st_15 this.Control[iCurrent+14]=this.st_2 this.Control[iCurrent+15]=this.st_19 this.Control[iCurrent+16]=this.st_23 this.Control[iCurrent+17]=this.st_27 this.Control[iCurrent+18]=this.st_30 this.Control[iCurrent+19]=this.st_31 this.Control[iCurrent+20]=this.p_7 this.Control[iCurrent+21]=this.p_6 this.Control[iCurrent+22]=this.st_7 this.Control[iCurrent+23]=this.p_5 this.Control[iCurrent+24]=this.p_4 this.Control[iCurrent+25]=this.st_6 this.Control[iCurrent+26]=this.st_3 this.Control[iCurrent+27]=this.p_2 this.Control[iCurrent+28]=this.st_9 this.Control[iCurrent+29]=this.p_9 this.Control[iCurrent+30]=this.st_1 this.Control[iCurrent+31]=this.p_1 this.Control[iCurrent+32]=this.st_4 this.Control[iCurrent+33]=this.ln_1 this.Control[iCurrent+34]=this.rr_1 end on on w_main_child_sc.destroy call super::destroy destroy(this.st_17) destroy(this.st_16) destroy(this.p_10) destroy(this.st_14) destroy(this.p_8) destroy(this.st_13) destroy(this.st_11) destroy(this.st_5) destroy(this.p_3) destroy(this.st_12) destroy(this.st_10) destroy(this.st_8) destroy(this.st_15) destroy(this.st_2) destroy(this.st_19) destroy(this.st_23) destroy(this.st_27) destroy(this.st_30) destroy(this.st_31) destroy(this.p_7) destroy(this.p_6) destroy(this.st_7) destroy(this.p_5) destroy(this.p_4) destroy(this.st_6) destroy(this.st_3) destroy(this.p_2) destroy(this.st_9) destroy(this.p_9) destroy(this.st_1) destroy(this.p_1) destroy(this.st_4) 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 st_17 from uo_text_m within w_main_child_sc integer x = 1929 integer y = 1204 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(225) end event type st_16 from uo_text_m within w_main_child_sc integer x = 1330 integer y = 644 integer width = 448 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(222) end event event constructor;call super::constructor;IF sys_version_type <> 2 THEN This.Visible = False END IF end event type p_10 from picture within w_main_child_sc integer x = 1467 integer y = 480 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_16.triggerevent(clicked!) end event event constructor;IF sys_version_type <> 2 THEN This.Visible = False END IF end event type st_14 from uo_text_m within w_main_child_sc integer x = 1929 integer y = 964 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(209) end event event constructor;call super::constructor;if sys_version_type <> 2 then this.visible = false end if end event type p_8 from picture within w_main_child_sc integer x = 1467 integer y = 28 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_13.triggerevent(clicked!) end event event constructor;IF sys_version_type <> 2 THEN This.Visible = False END IF end event type st_13 from uo_text_m within w_main_child_sc integer x = 1330 integer y = 212 integer width = 448 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(203) end event event constructor;call super::constructor;IF sys_version_type <> 2 THEN This.Visible = False END IF end event type st_11 from uo_text_m within w_main_child_sc integer x = 1929 integer y = 1084 integer width = 553 integer height = 64 boolean bringtotop = true integer textsize = -9 boolean underline = true long textcolor = 0 string text = "增料单统计表" end type event constructor;call super::constructor;if sys_version_type <> 2 then this.visible = false end if end event event clicked;call super::clicked;f_sys_main(206) end event type st_5 from uo_text_m within w_main_child_sc integer x = 23 integer y = 188 integer width = 448 integer height = 96 boolean bringtotop = true integer textsize = -9 long textcolor = 0 string text = "销售订单物料运算及工价设定表" alignment alignment = center! end type event clicked;call super::clicked;f_sys_main(175) end event event constructor;call super::constructor;IF sys_version_type <> 2 THEN This.Visible = False END IF end event type p_3 from picture within w_main_child_sc integer x = 155 integer y = 28 integer width = 183 integer height = 160 boolean bringtotop = true string pointer = "HAND.CUR" boolean originalsize = true string picturename = "graphics\xsd.bmp" boolean focusrectangle = false end type event clicked;st_5.triggerevent(clicked!) end event event constructor;IF sys_version_type <> 2 THEN This.Visible = False END IF end event type st_12 from uo_text_m within w_main_child_sc integer x = 969 integer y = 1232 integer width = 343 integer height = 52 boolean bringtotop = true integer textsize = -9 boolean underline = true string text = "领料工作中心" end type event clicked;call super::clicked;f_sys_main(211) end event type st_10 from uo_text_m within w_main_child_sc integer x = 119 integer y = 1232 integer width = 242 integer height = 52 boolean bringtotop = true integer textsize = -9 boolean underline = true string text = "物料类别" end type event clicked;call super::clicked;f_sys_main(328) end event type st_8 from uo_text_m within w_main_child_sc integer x = 521 integer y = 1232 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_15 from uo_text_m within w_main_child_sc integer x = 1472 integer y = 1232 integer width = 242 integer height = 52 boolean bringtotop = true integer textsize = -9 boolean underline = true string text = "物料清单" end type event clicked;call super::clicked;f_sys_main(202) end event type st_2 from uo_text_m within w_main_child_sc integer x = 1929 integer y = 364 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(218) end event type st_19 from uo_text_m within w_main_child_sc integer x = 1929 integer y = 724 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(310) end event type st_23 from uo_text_m within w_main_child_sc integer x = 1929 integer y = 604 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(324) end event type st_27 from uo_text_m within w_main_child_sc integer x = 1929 integer y = 844 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(323) end event type st_30 from uo_text_m within w_main_child_sc integer x = 1929 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(215) end event type st_31 from uo_text_m within w_main_child_sc integer x = 1929 integer y = 484 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(307) end event type p_7 from picture within w_main_child_sc integer x = 859 integer y = 312 integer width = 91 integer height = 148 boolean bringtotop = true string pointer = "HAND.CUR" string picturename = "graphics\arrow_4.bmp" boolean focusrectangle = false end type event constructor;//IF sys_version_type <> 2 THEN // THIS.Visible = FALSE //END IF // end event type p_6 from picture within w_main_child_sc integer x = 859 integer y = 728 integer width = 91 integer height = 148 boolean bringtotop = true string pointer = "HAND.CUR" string picturename = "graphics\arrow_4.bmp" boolean focusrectangle = false end type type st_7 from uo_text_m within w_main_child_sc integer x = 759 integer y = 644 integer width = 293 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_5 from picture within w_main_child_sc integer x = 814 integer y = 480 integer width = 183 integer height = 160 boolean bringtotop = true string pointer = "HAND.CUR" string picturename = "graphics\kc.bmp" boolean focusrectangle = false end type event clicked;st_7.triggerevent(clicked!) end event type p_4 from picture within w_main_child_sc integer x = 814 integer y = 892 integer width = 183 integer height = 160 boolean bringtotop = true string pointer = "HAND.CUR" boolean originalsize = true string picturename = "graphics\scjc.bmp" boolean focusrectangle = false end type event clicked;st_6.triggerevent(clicked!) end event type st_6 from uo_text_m within w_main_child_sc integer x = 681 integer y = 1052 integer width = 448 integer height = 52 boolean bringtotop = true integer textsize = -9 string text = "生产进仓单" alignment alignment = center! end type event clicked;call super::clicked;f_sys_main(207) end event type st_3 from uo_text_m within w_main_child_sc integer x = 681 integer y = 212 integer width = 448 integer height = 52 boolean bringtotop = true integer textsize = -9 string text = "领料出仓单" alignment alignment = center! end type event clicked;call super::clicked;f_sys_main(208) end event type p_2 from picture within w_main_child_sc integer x = 814 integer y = 28 integer width = 183 integer height = 160 boolean bringtotop = true string pointer = "HAND.CUR" boolean originalsize = true string picturename = "graphics\llcc.bmp" boolean focusrectangle = false end type event clicked;st_3.triggerevent(clicked!) end event type st_9 from uo_text_m within w_main_child_sc integer x = 2094 integer y = 132 integer width = 165 integer height = 60 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_sc 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_9.triggerevent(clicked!) end event type st_1 from uo_text_m within w_main_child_sc integer x = 23 integer y = 644 integer width = 453 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(171) end event type p_1 from picture within w_main_child_sc integer x = 155 integer y = 480 integer width = 183 integer height = 160 boolean bringtotop = true string pointer = "HAND.CUR" boolean originalsize = true string picturename = "graphics\xsdd.bmp" boolean focusrectangle = false end type event clicked;st_1.triggerevent(clicked!) end event type st_4 from uo_text_m within w_main_child_sc boolean visible = false integer width = 297 integer height = 80 integer textsize = -9 string text = "" boolean border = true end type event clicked;call super::clicked;f_sys_main(406) end event type ln_1 from line within w_main_child_sc 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_sc 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