w_aifmb_class_map_ch.srw 6.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294
  1. $PBExportHeader$w_aifmb_class_map_ch.srw
  2. forward
  3. global type w_aifmb_class_map_ch from window
  4. end type
  5. type cb_choise from uo_imflatbutton within w_aifmb_class_map_ch
  6. end type
  7. type cb_sync from uo_imflatbutton within w_aifmb_class_map_ch
  8. end type
  9. type tv_1 from uo_tv_aifmb_class within w_aifmb_class_map_ch
  10. end type
  11. type cb_exit from uo_imflatbutton within w_aifmb_class_map_ch
  12. end type
  13. type cb_reflash from uo_imflatbutton within w_aifmb_class_map_ch
  14. end type
  15. type ln_bar from line within w_aifmb_class_map_ch
  16. end type
  17. type ln_bar2 from line within w_aifmb_class_map_ch
  18. end type
  19. type r_bar from rectangle within w_aifmb_class_map_ch
  20. end type
  21. type ln_1 from line within w_aifmb_class_map_ch
  22. end type
  23. type ln_2 from line within w_aifmb_class_map_ch
  24. end type
  25. type ln_3 from line within w_aifmb_class_map_ch
  26. end type
  27. type ln_4 from line within w_aifmb_class_map_ch
  28. end type
  29. end forward
  30. global type w_aifmb_class_map_ch from window
  31. integer width = 1545
  32. integer height = 1576
  33. boolean titlebar = true
  34. string title = "亚洲国际电商物料类别映射"
  35. boolean controlmenu = true
  36. windowtype windowtype = response!
  37. long backcolor = 67108864
  38. string icon = "AppIcon!"
  39. boolean center = true
  40. event ue_sync_node ( )
  41. cb_choise cb_choise
  42. cb_sync cb_sync
  43. tv_1 tv_1
  44. cb_exit cb_exit
  45. cb_reflash cb_reflash
  46. ln_bar ln_bar
  47. ln_bar2 ln_bar2
  48. r_bar r_bar
  49. ln_1 ln_1
  50. ln_2 ln_2
  51. ln_3 ln_3
  52. ln_4 ln_4
  53. end type
  54. global w_aifmb_class_map_ch w_aifmb_class_map_ch
  55. type variables
  56. long ins_nodeid = 0
  57. end variables
  58. event ue_sync_node();uo_aifmb = Create uo_aifmb
  59. Int rslt = 1
  60. String arg_msg
  61. IF uo_aifmb.uf_sync_node(arg_msg) <> 1 THEN
  62. rslt = 0
  63. GOTO ext
  64. END IF
  65. ext:
  66. Destroy uo_aifmb
  67. IF rslt = 1 THEN
  68. MessageBox('提示', '同步成功')
  69. cb_reflash.TriggerEvent(Clicked!)
  70. ELSE
  71. MessageBox('ERROR', arg_msg)
  72. END IF
  73. end event
  74. on w_aifmb_class_map_ch.create
  75. this.cb_choise=create cb_choise
  76. this.cb_sync=create cb_sync
  77. this.tv_1=create tv_1
  78. this.cb_exit=create cb_exit
  79. this.cb_reflash=create cb_reflash
  80. this.ln_bar=create ln_bar
  81. this.ln_bar2=create ln_bar2
  82. this.r_bar=create r_bar
  83. this.ln_1=create ln_1
  84. this.ln_2=create ln_2
  85. this.ln_3=create ln_3
  86. this.ln_4=create ln_4
  87. this.Control[]={this.cb_choise,&
  88. this.cb_sync,&
  89. this.tv_1,&
  90. this.cb_exit,&
  91. this.cb_reflash,&
  92. this.ln_bar,&
  93. this.ln_bar2,&
  94. this.r_bar,&
  95. this.ln_1,&
  96. this.ln_2,&
  97. this.ln_3,&
  98. this.ln_4}
  99. end on
  100. on w_aifmb_class_map_ch.destroy
  101. destroy(this.cb_choise)
  102. destroy(this.cb_sync)
  103. destroy(this.tv_1)
  104. destroy(this.cb_exit)
  105. destroy(this.cb_reflash)
  106. destroy(this.ln_bar)
  107. destroy(this.ln_bar2)
  108. destroy(this.r_bar)
  109. destroy(this.ln_1)
  110. destroy(this.ln_2)
  111. destroy(this.ln_3)
  112. destroy(this.ln_4)
  113. end on
  114. event resize;ln_bar.EndX = This.Width
  115. ln_bar2.EndX = This.Width
  116. ln_1.EndX = This.Width
  117. ln_2.EndX = This.Width
  118. ln_3.EndX = This.Width
  119. ln_4.EndX = This.Width
  120. r_bar.Width = This.Width
  121. tv_1.Height = This.WorkSpaceHeight() - tv_1.Y
  122. tv_1.Width = This.WorkSpaceWidth() - tv_1.X
  123. end event
  124. event open;cb_reflash.triggerevent(clicked!)
  125. end event
  126. event close;closewithreturn(this, ins_nodeid)
  127. end event
  128. type cb_choise from uo_imflatbutton within w_aifmb_class_map_ch
  129. integer x = 425
  130. integer width = 151
  131. integer height = 164
  132. integer taborder = 90
  133. string text = "选中"
  134. string normalpicname = "ok.bmp"
  135. integer picsize = 16
  136. toolbaralignment pic_align = alignattop!
  137. boolean border = false
  138. end type
  139. event clicked;call super::clicked;if ins_nodeid <= 0 then
  140. MessageBox('提示', '请选择基类')
  141. return
  142. end if
  143. close(parent)
  144. end event
  145. type cb_sync from uo_imflatbutton within w_aifmb_class_map_ch
  146. integer x = 151
  147. integer width = 274
  148. integer height = 164
  149. integer taborder = 80
  150. string text = "同步基类"
  151. string normalpicname = "refresh.BMP"
  152. integer picsize = 16
  153. toolbaralignment pic_align = alignattop!
  154. boolean border = false
  155. end type
  156. event clicked;call super::clicked;parent.triggerevent('ue_sync_node')
  157. end event
  158. type tv_1 from uo_tv_aifmb_class within w_aifmb_class_map_ch
  159. integer y = 184
  160. integer width = 841
  161. integer taborder = 90
  162. end type
  163. event selectionchanged;call super::selectionchanged;s_aifmb_tvi s_data
  164. s_data = pf_getdata(newhandle)
  165. IF s_data.reltype = 2 THEN
  166. ins_nodeid = s_data.relid
  167. ELSE
  168. ins_nodeid = 0
  169. END IF
  170. end event
  171. event doubleclicked;call super::doubleclicked;cb_choise.triggerevent(clicked!)
  172. end event
  173. type cb_exit from uo_imflatbutton within w_aifmb_class_map_ch
  174. integer x = 576
  175. integer width = 151
  176. integer height = 164
  177. integer taborder = 70
  178. string text = "退出"
  179. boolean cancel = true
  180. string normalpicname = "exit.bmp"
  181. integer picsize = 16
  182. toolbaralignment pic_align = alignattop!
  183. boolean border = false
  184. end type
  185. event clicked;call super::clicked;Close(PARENT)
  186. end event
  187. type cb_reflash from uo_imflatbutton within w_aifmb_class_map_ch
  188. integer width = 151
  189. integer height = 164
  190. integer taborder = 10
  191. string text = "刷新"
  192. string normalpicname = "refresh.BMP"
  193. integer picsize = 16
  194. toolbaralignment pic_align = alignattop!
  195. boolean border = false
  196. end type
  197. event clicked;call super::clicked;tv_1.uf_build_tree()
  198. end event
  199. type ln_bar from line within w_aifmb_class_map_ch
  200. long linecolor = 268435456
  201. integer linethickness = 4
  202. integer beginy = 172
  203. integer endx = 2007
  204. integer endy = 172
  205. end type
  206. type ln_bar2 from line within w_aifmb_class_map_ch
  207. long linecolor = 16777215
  208. integer linethickness = 4
  209. integer beginy = 176
  210. integer endx = 2039
  211. integer endy = 176
  212. end type
  213. type r_bar from rectangle within w_aifmb_class_map_ch
  214. long linecolor = 16777215
  215. integer linethickness = 4
  216. long fillcolor = 1073741824
  217. integer x = 2139
  218. integer width = 146
  219. integer height = 68
  220. end type
  221. event constructor;this.fillcolor = 14215660
  222. this.linecolor = 14215660
  223. this.x = -1
  224. this.y = -1
  225. this.height = ln_bar.beginy - 5
  226. end event
  227. type ln_1 from line within w_aifmb_class_map_ch
  228. boolean visible = false
  229. long linecolor = 268435456
  230. integer linethickness = 4
  231. integer beginy = 292
  232. integer endx = 2016
  233. integer endy = 292
  234. end type
  235. type ln_2 from line within w_aifmb_class_map_ch
  236. boolean visible = false
  237. long linecolor = 16777215
  238. integer linethickness = 4
  239. integer beginy = 296
  240. integer endx = 2048
  241. integer endy = 296
  242. end type
  243. type ln_3 from line within w_aifmb_class_map_ch
  244. boolean visible = false
  245. long linecolor = 268435456
  246. integer linethickness = 4
  247. integer beginy = 412
  248. integer endx = 2016
  249. integer endy = 412
  250. end type
  251. type ln_4 from line within w_aifmb_class_map_ch
  252. boolean visible = false
  253. long linecolor = 16777215
  254. integer linethickness = 4
  255. integer beginy = 416
  256. integer endx = 2048
  257. integer endy = 416
  258. end type