12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758 |
- $PBExportHeader$w_check_ware.srw
- forward
- global type w_check_ware from window
- end type
- type dw_1 from u_dw_rbtnfilter within w_check_ware
- end type
- end forward
- global type w_check_ware from window
- integer width = 2421
- integer height = 1267
- boolean titlebar = true
- string title = "Untitled"
- boolean controlmenu = true
- boolean minbox = true
- boolean maxbox = true
- boolean resizable = true
- long backcolor = 67108864
- string icon = "AppIcon!"
- boolean center = true
- dw_1 dw_1
- end type
- global w_check_ware w_check_ware
- type variables
- s_edit_index_tran s_tran
- long ins_scid,ins_outwareid
- end variables
- on w_check_ware.create
- this.dw_1=create dw_1
- this.Control[]={this.dw_1}
- end on
- on w_check_ware.destroy
- destroy(this.dw_1)
- end on
- event open;s_tran = Message.PowerObjectParm
- ins_scid = s_tran.c_long
- ins_outwareid = s_tran.d_long
- dw_1.SetTransObject (sqlca)
- dw_1.retrieve(ins_scid,ins_outwareid)
- end event
- type dw_1 from u_dw_rbtnfilter within w_check_ware
- integer x = 7
- integer y = 10
- integer width = 2366
- integer height = 1149
- string dataobject = "dw_outware_check_ware"
- boolean hscrollbar = true
- boolean vscrollbar = true
- boolean hsplitscroll = true
- boolean rbutton_filter_use = true
- end type
|