123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345 |
- $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
|