Q5/ws_objects/Ew_aifmb.pbl.src/w_aifmb_myproductcode.srw

$PBExportHeader$w_aifmb_myproductcode.srw
forward
global type w_aifmb_myproductcode from window
end type
type cb_1 from commandbutton within w_aifmb_myproductcode
end type
type em_1 from editmask within w_aifmb_myproductcode
end type
type cb_2 from commandbutton within w_aifmb_myproductcode
end type
type em_2 from editmask within w_aifmb_myproductcode
end type
type tv_1 from uo_aifmb_tv_class within w_aifmb_myproductcode
end type
type cb_edit from uo_imflatbutton within w_aifmb_myproductcode
end type
type cb_del from uo_imflatbutton within w_aifmb_myproductcode
end type
type cb_add from uo_imflatbutton within w_aifmb_myproductcode
end type
type r_bar from rectangle within w_aifmb_myproductcode
end type
type cb_search from commandbutton within w_aifmb_myproductcode
end type
type st_2 from statictext within w_aifmb_myproductcode
end type
type sle_keyword from singlelineedit within w_aifmb_myproductcode
end type
type cbx_end from checkbox within w_aifmb_myproductcode
end type
type cbx_begin from checkbox within w_aifmb_myproductcode
end type
type st_1 from statictext within w_aifmb_myproductcode
end type
type pb_3 from picturebutton within w_aifmb_myproductcode
end type
type em_4 from editmask within w_aifmb_myproductcode
end type
type pb_1 from picturebutton within w_aifmb_myproductcode
end type
type em_3 from editmask within w_aifmb_myproductcode
end type
type cbx_standard from checkbox within w_aifmb_myproductcode
end type
type cb_sync from uo_imflatbutton within w_aifmb_myproductcode
end type
type dw_1 from u_dw_rbtnfilter within w_aifmb_myproductcode
end type
type cb_exit from uo_imflatbutton within w_aifmb_myproductcode
end type
type cb_reflash from uo_imflatbutton within w_aifmb_myproductcode
end type
type ln_bar from line within w_aifmb_myproductcode
end type
type ln_bar2 from line within w_aifmb_myproductcode
end type
type ln_1 from line within w_aifmb_myproductcode
end type
type ln_2 from line within w_aifmb_myproductcode
end type
type ln_3 from line within w_aifmb_myproductcode
end type
type ln_4 from line within w_aifmb_myproductcode
end type
type ole_1 from uo_aifmb_webbrowser within w_aifmb_myproductcode
end type
end forward

global type w_aifmb_myproductcode from window
integer width = 4114
integer height = 2208
windowtype windowtype = child!
long backcolor = 67108864
string icon = "AppIcon!"
boolean center = true
event ue_sync_node ( )
event ue_search ( )
event ue_view_pics ( )
cb_1 cb_1
em_1 em_1
cb_2 cb_2
em_2 em_2
tv_1 tv_1
cb_edit cb_edit
cb_del cb_del
cb_add cb_add
r_bar r_bar
cb_search cb_search
st_2 st_2
sle_keyword sle_keyword
cbx_end cbx_end
cbx_begin cbx_begin
st_1 st_1
pb_3 pb_3
em_4 em_4
pb_1 pb_1
em_3 em_3
cbx_standard cbx_standard
cb_sync cb_sync
dw_1 dw_1
cb_exit cb_exit
cb_reflash cb_reflash
ln_bar ln_bar
ln_bar2 ln_bar2
ln_1 ln_1
ln_2 ln_2
ln_3 ln_3
ln_4 ln_4
ole_1 ole_1
end type
global w_aifmb_myproductcode w_aifmb_myproductcode

type variables
long ins_nodeid_arr[]

end variables

event ue_sync_node();uo_aifmb = Create uo_aifmb
Int rslt = 1
String arg_msg
IF uo_aifmb.uf_sync_node(arg_msg) <> 1 THEN
	rslt = 0
	GOTO ext
END IF
ext:
Destroy uo_aifmb
IF rslt = 1 THEN
	MessageBox('提示', '同步成功')
	cb_reflash.TriggerEvent(Clicked!)
ELSE
	MessageBox('ERROR', arg_msg)
END IF

end event

event ue_search();DataStore ds_productcode
ds_productcode = Create DataStore
uo_aifmb = Create uo_aifmb
Int rslt = 1
String arg_msg
DateTime ld_starttime, ld_endtime

IF cbx_begin.Checked THEN
	ld_starttime = DateTime(Date(em_3.Text), Time(0))
ELSE
	SetNull(ld_starttime)
END IF

IF cbx_end.Checked THEN
	ld_endtime = DateTime(Date(em_4.Text), Time(0))
ELSE
	SetNull(ld_endtime)
END IF

ds_productcode.DataObject = 'ds_aifmb_searchproductentrelation'

Long ll_entids[]
Long ll_curEntid
IF uo_aifmb.uf_getlocaluserid(ll_curEntid, arg_msg) <> 1 THEN
	rslt = 0
	GOTO ext
END IF

ll_entids[1] = ll_curEntid

Long pageindex = 0
Long pagesize = 0

pageindex = Long(em_1.Text)
IF pageindex <= 0 THEN
	em_1.Text = '1'
	pageindex = 1
END IF

pagesize = Long(em_2.Text)
IF pagesize <= 0 THEN
	em_2.Text = '10'
	pagesize = 10
END IF

IF uo_aifmb.uf_searchproductentrelationlist(cbx_standard.Checked, ld_starttime, ld_endtime, sle_keyword.Text, ins_nodeid_arr,ll_entids, pageindex, pagesize, ds_productcode, arg_msg) <> 1 THEN
	rslt = 0
	GOTO ext
END IF

dw_1.Reset()
ds_productcode.RowsCopy(1, ds_productcode.RowCount(), Primary!, dw_1, 1, Primary!)

ext:
Destroy ds_productcode
Destroy uo_aifmb
IF rslt = 0 THEN
	MessageBox('ERROR', arg_msg)
END IF

end event

event ue_view_pics();long ll_row
ll_row = dw_1.GetRow()

if ll_row <= 0 then return

s_aifmb_myproductcode_pics_parm s_parm
s_parm.relationid = dw_1.Object.relationid[ll_row]
s_parm.mtrlname = dw_1.Object.mtrlname[ll_row]

openwithparm(w_aifmb_myproductcode_pics, s_parm)
end event

on w_aifmb_myproductcode.create
this.cb_1=create cb_1
this.em_1=create em_1
this.cb_2=create cb_2
this.em_2=create em_2
this.tv_1=create tv_1
this.cb_edit=create cb_edit
this.cb_del=create cb_del
this.cb_add=create cb_add
this.r_bar=create r_bar
this.cb_search=create cb_search
this.st_2=create st_2
this.sle_keyword=create sle_keyword
this.cbx_end=create cbx_end
this.cbx_begin=create cbx_begin
this.st_1=create st_1
this.pb_3=create pb_3
this.em_4=create em_4
this.pb_1=create pb_1
this.em_3=create em_3
this.cbx_standard=create cbx_standard
this.cb_sync=create cb_sync
this.dw_1=create dw_1
this.cb_exit=create cb_exit
this.cb_reflash=create cb_reflash
this.ln_bar=create ln_bar
this.ln_bar2=create ln_bar2
this.ln_1=create ln_1
this.ln_2=create ln_2
this.ln_3=create ln_3
this.ln_4=create ln_4
this.ole_1=create ole_1
this.Control[]={this.cb_1,&
this.em_1,&
this.cb_2,&
this.em_2,&
this.tv_1,&
this.cb_edit,&
this.cb_del,&
this.cb_add,&
this.r_bar,&
this.cb_search,&
this.st_2,&
this.sle_keyword,&
this.cbx_end,&
this.cbx_begin,&
this.st_1,&
this.pb_3,&
this.em_4,&
this.pb_1,&
this.em_3,&
this.cbx_standard,&
this.cb_sync,&
this.dw_1,&
this.cb_exit,&
this.cb_reflash,&
this.ln_bar,&
this.ln_bar2,&
this.ln_1,&
this.ln_2,&
this.ln_3,&
this.ln_4,&
this.ole_1}
end on

on w_aifmb_myproductcode.destroy
destroy(this.cb_1)
destroy(this.em_1)
destroy(this.cb_2)
destroy(this.em_2)
destroy(this.tv_1)
destroy(this.cb_edit)
destroy(this.cb_del)
destroy(this.cb_add)
destroy(this.r_bar)
destroy(this.cb_search)
destroy(this.st_2)
destroy(this.sle_keyword)
destroy(this.cbx_end)
destroy(this.cbx_begin)
destroy(this.st_1)
destroy(this.pb_3)
destroy(this.em_4)
destroy(this.pb_1)
destroy(this.em_3)
destroy(this.cbx_standard)
destroy(this.cb_sync)
destroy(this.dw_1)
destroy(this.cb_exit)
destroy(this.cb_reflash)
destroy(this.ln_bar)
destroy(this.ln_bar2)
destroy(this.ln_1)
destroy(this.ln_2)
destroy(this.ln_3)
destroy(this.ln_4)
destroy(this.ole_1)
end on

event resize;ln_bar.EndX = THIS.Width
ln_bar2.EndX = THIS.Width
ln_1.EndX = THIS.Width
ln_2.EndX = THIS.Width
ln_3.EndX = THIS.Width
ln_4.EndX = THIS.Width
r_bar.Width = THIS.Width


tv_1.Height = this.WorkSpaceHeight() - tv_1.Y
dw_1.Height = this.WorkSpaceHeight() - dw_1.Y
dw_1.Width = this.WOrkSpaceWidth() - dw_1.X

ole_1.X = this.WorkSpaceWidth() - ole_1.Width
end event

event open;ole_1.Object.Navigate("http://www.fib2b.cn/ad/adforerp.htm?positionid=32")
em_3.Text = string(RelativeDate(Today(), - 7), 'yyyy-MM-dd')
em_4.Text = string(Today(), 'yyyy-MM-dd')

dw_1.SetTransObject(sqlca)
cb_reflash.triggerevent(clicked!)
end event

type cb_1 from commandbutton within w_aifmb_myproductcode
integer x = 951
integer y = 308
integer width = 242
integer height = 84
integer taborder = 140
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
string text = "上一页"
end type

event clicked;long pageindex
pageindex = long(em_1.Text)
pageindex -= 1
em_1.Text = string(pageindex)

parent.triggerevent('ue_search')
end event

type em_1 from editmask within w_aifmb_myproductcode
integer x = 1193
integer y = 308
integer width = 165
integer height = 84
integer taborder = 140
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 33554432
string text = "1"
alignment alignment = right!
borderstyle borderstyle = stylelowered!
string mask = "#,##0"
end type

type cb_2 from commandbutton within w_aifmb_myproductcode
integer x = 1358
integer y = 308
integer width = 242
integer height = 84
integer taborder = 140
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
string text = "下一页"
end type

event clicked;long pageindex
pageindex = long(em_1.Text)
pageindex += 1
em_1.Text = string(pageindex)

parent.triggerevent('ue_search')
end event

type em_2 from editmask within w_aifmb_myproductcode
integer x = 1623
integer y = 308
integer width = 165
integer height = 84
integer taborder = 140
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 33554432
string text = "10"
alignment alignment = right!
borderstyle borderstyle = stylelowered!
string mask = "#,##0"
end type

type tv_1 from uo_aifmb_tv_class within w_aifmb_myproductcode
event destroy ( )
integer y = 420
integer width = 841
integer taborder = 90
end type

on tv_1.destroy
call uo_aifmb_tv_class::destroy
end on

event ue_selectionchanged;call super::ue_selectionchanged;ins_nodeid_arr = uo_nodeid_arr
IF uo_keyword <> '' THEN
	sle_keyword.Text = uo_keyword
END IF

end event

type cb_edit from uo_imflatbutton within w_aifmb_myproductcode
integer x = 151
integer width = 151
integer height = 164
integer taborder = 110
string text = "修改"
string normalpicname = "open.BMP"
integer picsize = 16
toolbaralignment pic_align = alignattop!
boolean border = false
end type

event clicked;call super::clicked;Long row
row = dw_1.GetRow()
IF row <= 0 THEN RETURN


s_aifmb_addmodproductentrelation s_tran

s_tran.RelationID = dw_1.Object.RelationID[row]
s_tran.nodeid = dw_1.Object.nodeid[row]
s_tran.mtrlid = dw_1.Object.mtrlid[row]
s_tran.mtrlcode = dw_1.Object.mtrlcode[row]
s_tran.mtrlname = dw_1.Object.mtrlname[row]
s_tran.mtrlmode = dw_1.Object.mtrlmode[row]
s_tran.unit = dw_1.Object.unit[row]
s_tran.net_weight = dw_1.Object.net_weight[row]
s_tran.gross_weight = dw_1.Object.gross_weight[row]
s_tran.cubage = dw_1.Object.cubage[row]
s_tran.mtrlengname = dw_1.Object.mtrlengname[row]
s_tran.dscrp = dw_1.Object.dscrp[row]
s_tran.QualityDscrp = dw_1.Object.QualityDscrp[row]
//s_tran.CustomCode = dw_1.Object.CustomCode[row]
s_tran.MPrice = dw_1.Object.MPrice[row]
s_tran.NPrice = dw_1.Object.NPrice[row]
s_tran.productid = dw_1.Object.ProductID[row]
//s_tran.isPublic = (dw_1.Object.isPublic[row] = 1)

OpenWithParm(w_aifmb_addproductcode, s_tran)

s_tran = Message.PowerObjectParm

IF s_tran.RelationID > 0 THEN
	dw_1.Object.RelationID[row] = s_tran.RelationID
	dw_1.Object.nodeid[row] = s_tran.nodeid
	dw_1.Object.mtrlid[row] = s_tran.mtrlid
	dw_1.Object.mtrlcode[row] = s_tran.mtrlcode
	dw_1.Object.mtrlname[row] = s_tran.mtrlname
	dw_1.Object.mtrlmode[row] = s_tran.mtrlmode
	dw_1.Object.unit[row] = s_tran.unit
	dw_1.Object.net_weight[row] = s_tran.net_weight
	dw_1.Object.gross_weight[row] = s_tran.gross_weight
	dw_1.Object.cubage[row] = s_tran.cubage
	dw_1.Object.mtrlengname[row] = s_tran.mtrlengname
	dw_1.Object.dscrp[row] = s_tran.dscrp
	dw_1.Object.QualityDscrp[row] = s_tran.QualityDscrp
//	dw_1.Object.CustomCode[row] = s_tran.CustomCode
	dw_1.Object.MPrice[row] = s_tran.MPrice
	dw_1.Object.NPrice[row] = s_tran.NPrice
//	IF s_tran.isPublic THEN
//		dw_1.Object.isPublic[row] = 1
//	ELSE
//		dw_1.Object.isPublic[row] = 0
//	END IF
END IF

end event

type cb_del from uo_imflatbutton within w_aifmb_myproductcode
integer x = 302
integer width = 151
integer height = 164
integer taborder = 100
string text = "删除"
string normalpicname = "delete.BMP"
integer picsize = 16
toolbaralignment pic_align = alignattop!
boolean border = false
end type

event clicked;call super::clicked;Long row
row = dw_1.GetRow()
IF row <= 0 THEN RETURN

Int rslt = 1
String arg_msg

uo_aifmb = Create uo_aifmb

IF uo_aifmb.uf_removeproductentrelation(dw_1.Object.relationid[row], arg_msg) <> 1 THEN
	rslt = 0
	GOTO ext
END IF

ext:
Destroy uo_aifmb

IF rslt = 1 THEN
	dw_1.deleteRow(row)
	MessageBox('OK', '删除成功')
ELSE
	MessageBox('ERROR', arg_msg)
END IF

end event

type cb_add from uo_imflatbutton within w_aifmb_myproductcode
integer width = 151
integer height = 164
integer taborder = 90
string text = "新建"
string normalpicname = "new.BMP"
integer picsize = 16
toolbaralignment pic_align = alignattop!
boolean border = false
end type

event clicked;call super::clicked;open(w_aifmb_addproductcode)

s_aifmb_addmodproductentrelation s_tran
s_tran = Message.PowerObjectParm
long row
IF s_tran.RelationID > 0 THEN
	row = dw_1.InsertRow(0)
	dw_1.Object.RelationID[row] = s_tran.RelationID
	dw_1.Object.nodeid[row] = s_tran.nodeid
	dw_1.Object.mtrlid[row] = s_tran.mtrlid
	dw_1.Object.mtrlcode[row] = s_tran.mtrlcode
	dw_1.Object.mtrlname[row] = s_tran.mtrlname
	dw_1.Object.mtrlmode[row] = s_tran.mtrlmode
	dw_1.Object.unit[row] = s_tran.unit
	dw_1.Object.net_weight[row] = s_tran.net_weight
	dw_1.Object.gross_weight[row] = s_tran.gross_weight
	dw_1.Object.cubage[row] = s_tran.cubage
	dw_1.Object.mtrlengname[row] = s_tran.mtrlengname
	dw_1.Object.dscrp[row] = s_tran.dscrp
	dw_1.Object.QualityDscrp[row] = s_tran.QualityDscrp
//	dw_1.Object.CustomCode[row] = s_tran.CustomCode
	dw_1.Object.MPrice[row] = s_tran.MPrice
	dw_1.Object.NPrice[row] = s_tran.NPrice
//	IF s_tran.isPublic THEN
//		dw_1.Object.isPublic[row] = 1
//	ELSE
//		dw_1.Object.isPublic[row] = 0
//	END IF
END IF
end event

type r_bar from rectangle within w_aifmb_myproductcode
long linecolor = 16777215
integer linethickness = 4
long fillcolor = 1073741824
integer x = 2139
integer width = 146
integer height = 68
end type

event constructor;this.fillcolor = 14215660
this.linecolor = 14215660
this.x = -1
this.y = -1
this.height = ln_3.beginy - 5

end event

type cb_search from commandbutton within w_aifmb_myproductcode
integer x = 663
integer y = 308
integer width = 242
integer height = 84
integer taborder = 130
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
string text = "查找"
end type

event clicked;parent.triggerevent('ue_search')
end event

type st_2 from statictext within w_aifmb_myproductcode
integer x = 41
integer y = 324
integer width = 183
integer height = 48
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 33554432
long backcolor = 67108864
string text = "关键字"
boolean focusrectangle = false
end type

event constructor;this.backcolor = 14215660
end event

type sle_keyword from singlelineedit within w_aifmb_myproductcode
integer x = 229
integer y = 308
integer width = 402
integer height = 84
integer taborder = 120
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 33554432
borderstyle borderstyle = stylelowered!
end type

type cbx_end from checkbox within w_aifmb_myproductcode
integer x = 978
integer y = 204
integer width = 174
integer height = 60
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 33554432
long backcolor = 67108864
string text = "<="
end type

event constructor;this.backcolor = 14215660
end event

type cbx_begin from checkbox within w_aifmb_myproductcode
integer x = 293
integer y = 204
integer width = 174
integer height = 60
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 33554432
long backcolor = 67108864
string text = ">="
end type

event constructor;this.backcolor = 14215660
end event

type st_1 from statictext within w_aifmb_myproductcode
integer x = 37
integer y = 208
integer width = 247
integer height = 48
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 33554432
long backcolor = 67108864
string text = "发布日期"
boolean focusrectangle = false
end type

event constructor;this.backcolor = 14215660
end event

type pb_3 from picturebutton within w_aifmb_myproductcode
integer x = 1541
integer y = 188
integer width = 101
integer height = 92
integer taborder = 110
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
string picturename = "date.BMP"
alignment htextalign = left!
end type

event clicked;em_4.triggerevent(rbuttondown!)
end event

type em_4 from editmask within w_aifmb_myproductcode
integer x = 1129
integer y = 188
integer width = 407
integer height = 88
integer taborder = 100
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 33554432
borderstyle borderstyle = stylelowered!
maskdatatype maskdatatype = datemask!
string mask = "yyyy-mm-dd"
boolean spin = true
end type

event rbuttondown;s_calender_arg s_calender
s_calender.PointerX = THIS.PointerX()
s_calender.PointerY = THIS.PointerY()
s_calender.X = THIS.X
s_calender.Y = THIS.Y


OpenWithParm(w_calendar,s_calender)
THIS.Text = String(id_date_selected)


end event

type pb_1 from picturebutton within w_aifmb_myproductcode
integer x = 855
integer y = 188
integer width = 101
integer height = 92
integer taborder = 90
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
string picturename = "date.BMP"
alignment htextalign = left!
end type

event clicked;em_3.triggerevent(rbuttondown!)
end event

type em_3 from editmask within w_aifmb_myproductcode
integer x = 439
integer y = 188
integer width = 407
integer height = 88
integer taborder = 80
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 33554432
borderstyle borderstyle = stylelowered!
maskdatatype maskdatatype = datemask!
string mask = "yyyy-mm-dd"
boolean spin = true
end type

event rbuttondown;s_calender_arg s_calender
s_calender.PointerX = THIS.PointerX()
s_calender.PointerY = THIS.PointerY()
s_calender.X = THIS.X
s_calender.Y = THIS.Y


OpenWithParm(w_calendar,s_calender)
THIS.Text = String(id_date_selected)


end event

type cbx_standard from checkbox within w_aifmb_myproductcode
boolean visible = false
integer x = 37
integer y = 196
integer width = 238
integer height = 84
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 33554432
long backcolor = 67108864
string text = "标准"
end type

event constructor;this.backcolor = 14215660
end event

type cb_sync from uo_imflatbutton within w_aifmb_myproductcode
integer x = 603
integer width = 274
integer height = 164
integer taborder = 80
string text = "同步基类"
string normalpicname = "refresh.BMP"
integer picsize = 16
toolbaralignment pic_align = alignattop!
boolean border = false
end type

event clicked;call super::clicked;parent.triggerevent('ue_sync_node')
end event

type dw_1 from u_dw_rbtnfilter within w_aifmb_myproductcode
integer x = 841
integer y = 420
integer width = 3250
integer height = 984
integer taborder = 80
string dataobject = "dw_aifmb_searchproductentrelation"
boolean hscrollbar = true
boolean vscrollbar = true
boolean hsplitscroll = true
boolean rbutton_filter_use = true
boolean rbutton_setposition_use = true
boolean titleclick_sort_use = true
boolean autosave_filter_use = false
boolean autosave_sort_use = false
boolean autosave_setlayout_use = false
boolean autosave_columnvisible_use = false
end type

event clicked;call super::clicked;IF row > 0 THEN
	This.SetRow(row)
END IF


end event

event rowfocuschanged;call super::rowfocuschanged;This.SelectRow(0, False)
IF currentrow > 0 THEN
	This.SelectRow(currentrow, True)
END IF

end event

event doubleclicked;call super::doubleclicked;parent.triggerevent('ue_view_pics')
end event

type cb_exit from uo_imflatbutton within w_aifmb_myproductcode
integer x = 878
integer width = 151
integer height = 164
integer taborder = 70
string text = "退出"
boolean cancel = true
string normalpicname = "exit.bmp"
integer picsize = 16
toolbaralignment pic_align = alignattop!
boolean border = false
end type

event clicked;call super::clicked;Close(PARENT)

end event

type cb_reflash from uo_imflatbutton within w_aifmb_myproductcode
integer x = 453
integer width = 151
integer height = 164
integer taborder = 10
string text = "刷新"
string normalpicname = "refresh.BMP"
integer picsize = 16
toolbaralignment pic_align = alignattop!
boolean border = false
end type

event clicked;call super::clicked;tv_1.uf_build_tree()
end event

type ln_bar from line within w_aifmb_myproductcode
long linecolor = 268435456
integer linethickness = 4
integer beginy = 168
integer endx = 2007
integer endy = 168
end type

type ln_bar2 from line within w_aifmb_myproductcode
long linecolor = 16777215
integer linethickness = 4
integer beginy = 172
integer endx = 2039
integer endy = 172
end type

type ln_1 from line within w_aifmb_myproductcode
long linecolor = 268435456
integer linethickness = 4
integer beginy = 288
integer endx = 2016
integer endy = 288
end type

type ln_2 from line within w_aifmb_myproductcode
long linecolor = 16777215
integer linethickness = 4
integer beginy = 292
integer endx = 2048
integer endy = 292
end type

type ln_3 from line within w_aifmb_myproductcode
long linecolor = 268435456
integer linethickness = 4
integer beginy = 408
integer endx = 2016
integer endy = 408
end type

type ln_4 from line within w_aifmb_myproductcode
long linecolor = 16777215
integer linethickness = 4
integer beginy = 412
integer endx = 2048
integer endy = 412
end type

type ole_1 from uo_aifmb_webbrowser within w_aifmb_myproductcode
integer x = 2272
integer width = 1829
integer height = 284
integer taborder = 40
boolean bringtotop = true
string binarykey = "w_aifmb_myproductcode.win"
end type


Start of PowerBuilder Binary Data Section : Do NOT Edit
0Dw_aifmb_myproductcode.bin 
2B00000a00e011cfd0e11ab1a1000000000000000000000000000000000003003e0009fffe000000060000000000000000000000010000000100000000000010000000000200000001fffffffe0000000000000000fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffdfffffffefffffffefffffffeffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff006f00520074006f004500200074006e00790072000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000050016ffffffffffffffff000000010000000000000000000000000000000000000000000000000000000028a2860001cec63100000003000001800000000000500003004f0042005800430054005300450052004d0041000000000000000000000000000000000000000000000000000000000000000000000000000000000102001affffffff00000002ffffffff000000000000000000000000000000000000000000000000000000000000000000000000000000000000009c00000000004200500043004f00530058004f00540041005200450047000000000000000000000000000000000000000000000000000000000000000000000000000000000001001affffffffffffffff000000038856f96111d0340ac0006ba9a205d74f0000000028a2860001cec63128a2860001cec631000000000000000000000000004f00430054004e004e00450053005400000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000001020012ffffffffffffffffffffffff000000000000000000000000000000000000000000000000000000000000000000000000000000030000009c000000000000000100000002fffffffe0000000400000005fffffffeffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
24ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff0000004c00002957000007570000000000000000000000000000000000000000000000000000004c0000000000000000000000010057d0e011cf3573000869ae62122e2b00000008000000000000004c0002140100000000000000c0460000000000008000000000000000000000000000000000000000000000000000000000000000000000000000000001000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000004c00002957000007570000000000000000000000000000000000000000000000000000004c0000000000000000000000010057d0e011cf3573000869ae62122e2b00000008000000000000004c0002140100000000000000c0460000000000008000000000000000000000000000000000000000000000000000000000000000000000000000000001000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
1Dw_aifmb_myproductcode.bin 
End of PowerBuilder Binary Data Section : No Source Expected After This Point