$PBExportHeader$w_credport_edit_ch_subid.srw forward global type w_credport_edit_ch_subid from window end type type rb_10 from radiobutton within w_credport_edit_ch_subid end type type rb_9 from radiobutton within w_credport_edit_ch_subid end type type rb_8 from radiobutton within w_credport_edit_ch_subid end type type rb_7 from radiobutton within w_credport_edit_ch_subid end type type rb_6 from radiobutton within w_credport_edit_ch_subid end type type rb_5 from radiobutton within w_credport_edit_ch_subid end type type rb_4 from radiobutton within w_credport_edit_ch_subid end type type rb_3 from radiobutton within w_credport_edit_ch_subid end type type rb_2 from radiobutton within w_credport_edit_ch_subid end type type rb_1 from radiobutton within w_credport_edit_ch_subid end type type gb_1 from groupbox within w_credport_edit_ch_subid end type type gb_2 from groupbox within w_credport_edit_ch_subid end type type gb_3 from groupbox within w_credport_edit_ch_subid end type type gb_4 from groupbox within w_credport_edit_ch_subid end type type gb_5 from groupbox within w_credport_edit_ch_subid end type end forward global type w_credport_edit_ch_subid from window integer width = 3776 integer height = 1560 boolean titlebar = true string title = "选择" boolean controlmenu = true windowtype windowtype = response! long backcolor = 67108864 string icon = "AppIcon!" boolean center = true rb_10 rb_10 rb_9 rb_9 rb_8 rb_8 rb_7 rb_7 rb_6 rb_6 rb_5 rb_5 rb_4 rb_4 rb_3 rb_3 rb_2 rb_2 rb_1 rb_1 gb_1 gb_1 gb_2 gb_2 gb_3 gb_3 gb_4 gb_4 gb_5 gb_5 end type global w_credport_edit_ch_subid w_credport_edit_ch_subid on w_credport_edit_ch_subid.create this.rb_10=create rb_10 this.rb_9=create rb_9 this.rb_8=create rb_8 this.rb_7=create rb_7 this.rb_6=create rb_6 this.rb_5=create rb_5 this.rb_4=create rb_4 this.rb_3=create rb_3 this.rb_2=create rb_2 this.rb_1=create rb_1 this.gb_1=create gb_1 this.gb_2=create gb_2 this.gb_3=create gb_3 this.gb_4=create gb_4 this.gb_5=create gb_5 this.Control[]={this.rb_10,& this.rb_9,& this.rb_8,& this.rb_7,& this.rb_6,& this.rb_5,& this.rb_4,& this.rb_3,& this.rb_2,& this.rb_1,& this.gb_1,& this.gb_2,& this.gb_3,& this.gb_4,& this.gb_5} end on on w_credport_edit_ch_subid.destroy destroy(this.rb_10) destroy(this.rb_9) destroy(this.rb_8) destroy(this.rb_7) destroy(this.rb_6) destroy(this.rb_5) destroy(this.rb_4) destroy(this.rb_3) destroy(this.rb_2) destroy(this.rb_1) destroy(this.gb_1) destroy(this.gb_2) destroy(this.gb_3) destroy(this.gb_4) destroy(this.gb_5) end on type rb_10 from radiobutton within w_credport_edit_ch_subid integer x = 2071 integer y = 836 integer width = 795 integer height = 64 integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 33554432 long backcolor = 67108864 string text = "供应商费用单→费用项目科目" end type type rb_9 from radiobutton within w_credport_edit_ch_subid integer x = 1042 integer y = 836 integer width = 795 integer height = 64 integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 33554432 long backcolor = 67108864 string text = "客户费用单→费用项目科目" end type type rb_8 from radiobutton within w_credport_edit_ch_subid integer x = 142 integer y = 836 integer width = 795 integer height = 64 integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 33554432 long backcolor = 67108864 string text = "费用项目→会计科目" end type type rb_7 from radiobutton within w_credport_edit_ch_subid integer x = 2071 integer y = 592 integer width = 795 integer height = 64 integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 33554432 long backcolor = 67108864 string text = "转帐单→出纳帐号→转入科目" end type type rb_6 from radiobutton within w_credport_edit_ch_subid integer x = 1042 integer y = 592 integer width = 795 integer height = 64 integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 33554432 long backcolor = 67108864 string text = "转帐单→出纳帐号→转出科目" end type type rb_5 from radiobutton within w_credport_edit_ch_subid integer x = 142 integer y = 592 integer width = 667 integer height = 64 integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 33554432 long backcolor = 67108864 string text = "出纳帐号→会计科目" end type type rb_4 from radiobutton within w_credport_edit_ch_subid integer x = 1042 integer y = 360 integer width = 667 integer height = 64 integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 33554432 long backcolor = 67108864 string text = "供应商→其它应付科目" end type type rb_3 from radiobutton within w_credport_edit_ch_subid integer x = 142 integer y = 360 integer width = 667 integer height = 64 integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 33554432 long backcolor = 67108864 string text = "供应商→应付科目" end type type rb_2 from radiobutton within w_credport_edit_ch_subid integer x = 1042 integer y = 112 integer width = 667 integer height = 64 integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 33554432 long backcolor = 67108864 string text = "客户→其它应收科目" end type type rb_1 from radiobutton within w_credport_edit_ch_subid integer x = 146 integer y = 124 integer width = 667 integer height = 64 integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 33554432 long backcolor = 67108864 string text = "客户→应收科目" end type type gb_1 from groupbox within w_credport_edit_ch_subid integer x = 73 integer y = 32 integer width = 3136 integer height = 196 integer taborder = 10 integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 16711680 long backcolor = 67108864 string text = "客户" end type type gb_2 from groupbox within w_credport_edit_ch_subid integer x = 69 integer y = 272 integer width = 3136 integer height = 196 integer taborder = 10 integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 16711680 long backcolor = 67108864 string text = "供应商" end type type gb_3 from groupbox within w_credport_edit_ch_subid integer x = 78 integer y = 752 integer width = 3136 integer height = 196 integer taborder = 20 integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 16711680 long backcolor = 67108864 string text = "费用项目" end type type gb_4 from groupbox within w_credport_edit_ch_subid integer x = 78 integer y = 512 integer width = 3136 integer height = 196 integer taborder = 30 integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 16711680 long backcolor = 67108864 string text = "出纳帐号" end type type gb_5 from groupbox within w_credport_edit_ch_subid integer x = 2281 integer y = 1120 integer width = 2263 integer height = 196 integer taborder = 30 integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 16711680 long backcolor = 67108864 string text = "供应商" end type