w_print_saletask_fx.srw 7.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261
  1. $PBExportHeader$w_print_saletask_fx.srw
  2. $PBExportComments$打印销售订单(协同)
  3. forward
  4. global type w_print_saletask_fx from w_publ_easyq
  5. end type
  6. end forward
  7. global type w_print_saletask_fx from w_publ_easyq
  8. integer width = 2761
  9. integer height = 2568
  10. string title = "打印销售订单"
  11. windowstate windowstate = normal!
  12. long backcolor = 16777215
  13. string icon = "graphics\chain_link_128px.ico"
  14. boolean if_ue_sentdataout = true
  15. end type
  16. global w_print_saletask_fx w_print_saletask_fx
  17. type variables
  18. s_fx_saletask ins_s
  19. end variables
  20. forward prototypes
  21. public subroutine wf_retrieve ()
  22. end prototypes
  23. public subroutine wf_retrieve ();//
  24. dw_1.Reset()
  25. dw_1.SetRedraw(false)
  26. //dw_1.Modify('tid_top.Text = "订单编号:' + ins_s.tid + '" ~r~n')
  27. //dw_1.Modify('cus_rep_top.Text = "收货人 ' + ins_s.cus_rep + '"~r~n')
  28. //dw_1.Modify('cus_tele_top.Text = "联系电话 ' + ins_s.cus_tele + '"~r~n')
  29. //dw_1.Modify('cus_address_top.Text = "收货地址 ' + ins_s.cus_address + '"~r~n')
  30. //dw_1.Modify('freight_top.Text = "货运部:' + ins_s.freight + '"~r~n')
  31. //dw_1.Modify('freight_tele_top.Text = "货运部电话:' + ins_s.freight_tele + '"~r~n')
  32. //dw_1.Modify('buyer_name_top.Text = "客户名称:' + ins_s.buyer_name + '"~r~n')
  33. //dw_1.Modify('buyer_tele_top.Text = "客户电话:' + ins_s.buyer_tele + '"~r~n')
  34. //dw_1.Modify('requiredate_top.Text = "要求交期 ' + string(ins_s.requiredate, 'yyyy/MM/dd') + '"~r~n')
  35. //dw_1.Modify('temp1_top.Text = "备注:' + ins_s.temp1 + '"~r~n')
  36. //dw_1.Modify('temp2_top.Text = "生产备注:' + ins_s.temp2 + '"~r~n')
  37. //dw_1.Modify('temp3_top.Text = "辅助备注:' + ins_s.temp3 + '"~r~n')
  38. //dw_1.Modify('temp4_top.Text = "订单编号 ' + ins_s.temp4 + '"')
  39. //dw_1.Modify('temp5_top.Text = "订单编号 ' + ins_s.temp5 + '"')
  40. //dw_1.Modify('temp6_top.Text = "订单编号 ' + ins_s.temp6 + '"')
  41. //dw_1.Modify('price_emp_top.Text = "订单编号 ' + ins_s.price_emp + '"')
  42. //dw_1.Modify('replyrqdate_top.Text = "订单编号 ' + ins_s.replyrqdate + '"')
  43. //dw_1.Modify('replydscrp_top.Text = "订单编号 ' + ins_s.replydscrp + '"')
  44. //dw_1.Modify('replydate_top.Text = "订单编号 ' + ins_s.replydate + '"')
  45. //dw_1.Modify('confirmemp_top.Text = "订单编号 ' + ins_s.confirmemp + '"')
  46. //dw_1.Modify('confirmdate_top.Text = "订单编号 ' + ins_s.confirmdate + '"')
  47. //dw_1.Modify('status_top.Text = "订单编号 ' + ins_s.status + '"')
  48. //dw_1.Modify('taskcode_top.Text = "订单编号 ' + ins_s.taskcode + '"')
  49. //dw_1.Modify('outwarecode_top.Text = "订单编号 ' + ins_s.outwarecode + '"')
  50. //dw_1.Modify('fstatus_top.Text = "订单编号 ' + ins_s.fstatus + '"')
  51. //dw_1.Modify('taskdate_top.Text = "订单编号 ' + ins_s.taskdate + '"')
  52. //dw_1.Modify('sptcomid_top.Text = "订单编号 ' + ins_s.sptcomid + '"')
  53. //dw_1.Modify('cuscomid_top.Text = "订单编号 ' + ins_s.cuscomid + '"')
  54. //dw_1.Modify('opemp_top.Text = "订单编号 ' + ins_s.opemp + '"')
  55. //dw_1.Modify('opdate_top.Text = "订单编号 ' + ins_s.opdate + '"')
  56. //dw_1.Modify('modemp_top.Text = "订单编号 ' + ins_s.modemp + '"')
  57. //dw_1.Modify('moddate_top.Text = "订单编号 ' + ins_s.moddate + '"')
  58. long i, row
  59. for i = 1 to UpperBound(ins_s.mx)
  60. row = dw_1.InsertRow(0)
  61. dw_1.Object.taskcode[row] = ins_s.taskcode
  62. // dw_1.Object.printid[row] = ins_s.mx[i].printid
  63. dw_1.Object.mtrlcode[row] = ins_s.mx[i].mtrlcode
  64. dw_1.Object.mtrlname[row] = ins_s.mx[i].mtrlname
  65. dw_1.Object.mtrlmode[row] = ins_s.mx[i].mtrlmode
  66. dw_1.Object.status[row] = ins_s.mx[i].status
  67. // dw_1.Object.woodcode[row] = ins_s.mx[i].woodcode
  68. // dw_1.Object.pcode[row] = ins_s.mx[i].pcode
  69. dw_1.Object.qty[row] = ins_s.mx[i].qty
  70. // dw_1.Object.price[row] = ins_s.mx[i].price
  71. // dw_1.Object.mxdscrp[row] = ins_s.mx[i].mxdscrp
  72. // dw_1.Object.mxdscrp2[row] = ins_s.mx[i].mxdscrp2
  73. // dw_1.Object.mtrlcuscode[row] = ins_s.mx[i].mtrlcuscode
  74. dw_1.Object.requiredate[row] = ins_s.mx[i].requiredate
  75. next
  76. dw_1.SetSort('printid')
  77. dw_1.Sort()
  78. dw_1.SetRedraw(true)
  79. string arg_msg
  80. if (f_find_fx_user_power(31, ref arg_msg) <> 1) then // 31-采购订单查看(单价)
  81. dw_1.Modify('destroy price_t ~r~n destroy price ~r~n')
  82. end if
  83. end subroutine
  84. on w_print_saletask_fx.create
  85. call super::create
  86. end on
  87. on w_print_saletask_fx.destroy
  88. call super::destroy
  89. end on
  90. event open;wf_movetocenter()
  91. s_fx_saletask s_temp
  92. s_temp = Message.PowerObjectParm
  93. if (not IsValid(s_temp)) then
  94. Close(this)
  95. return
  96. end if
  97. if IsNull(s_temp) then
  98. Close(this)
  99. return
  100. end if
  101. string arg_msg
  102. if (f_find_fx_user_power(36, ref arg_msg) <> 1) then // 36-采购订单数据发送
  103. MessageBox('权限提示', arg_msg)
  104. Close(this)
  105. return
  106. end if
  107. ins_s = s_temp
  108. wf_retrieve()
  109. end event
  110. event resize;call super::resize;cb_exit.X = this.workspacewidth( ) - cb_exit.Width
  111. end event
  112. type cb_func from w_publ_easyq`cb_func within w_print_saletask_fx
  113. end type
  114. type cb_exit from w_publ_easyq`cb_exit within w_print_saletask_fx
  115. integer x = 3374
  116. end type
  117. type cb_2 from w_publ_easyq`cb_2 within w_print_saletask_fx
  118. integer x = 302
  119. end type
  120. type cb_psetup from w_publ_easyq`cb_psetup within w_print_saletask_fx
  121. integer x = 453
  122. end type
  123. type cb_1 from w_publ_easyq`cb_1 within w_print_saletask_fx
  124. end type
  125. event cb_1::clicked;call super::clicked;wf_retrieve()
  126. end event
  127. type st_3 from w_publ_easyq`st_3 within w_print_saletask_fx
  128. boolean visible = false
  129. end type
  130. type st_4 from w_publ_easyq`st_4 within w_print_saletask_fx
  131. boolean visible = false
  132. end type
  133. type em_1 from w_publ_easyq`em_1 within w_print_saletask_fx
  134. boolean visible = false
  135. boolean enabled = false
  136. end type
  137. type em_2 from w_publ_easyq`em_2 within w_print_saletask_fx
  138. boolean visible = false
  139. boolean enabled = false
  140. end type
  141. type ddlb_yl from w_publ_easyq`ddlb_yl within w_print_saletask_fx
  142. integer x = 933
  143. integer y = 44
  144. end type
  145. type cbx_yl from w_publ_easyq`cbx_yl within w_print_saletask_fx
  146. integer x = 713
  147. integer y = 48
  148. end type
  149. type dw_1 from w_publ_easyq`dw_1 within w_print_saletask_fx
  150. integer y = 180
  151. integer width = 2642
  152. integer height = 1248
  153. string dataobject = "dw_fx_print_saletask_qc"
  154. end type
  155. type sle_mtrl from w_publ_easyq`sle_mtrl within w_print_saletask_fx
  156. boolean enabled = false
  157. end type
  158. type sle_cust from w_publ_easyq`sle_cust within w_print_saletask_fx
  159. boolean enabled = false
  160. end type
  161. type st_mtrl from w_publ_easyq`st_mtrl within w_print_saletask_fx
  162. boolean enabled = false
  163. end type
  164. type st_cust from w_publ_easyq`st_cust within w_print_saletask_fx
  165. boolean enabled = false
  166. end type
  167. type cbx_loginretr from w_publ_easyq`cbx_loginretr within w_print_saletask_fx
  168. integer x = 1554
  169. boolean enabled = false
  170. end type
  171. type pb_em1 from w_publ_easyq`pb_em1 within w_print_saletask_fx
  172. boolean visible = false
  173. boolean enabled = false
  174. end type
  175. type pb_em2 from w_publ_easyq`pb_em2 within w_print_saletask_fx
  176. boolean visible = false
  177. boolean enabled = false
  178. end type
  179. type pb_2 from w_publ_easyq`pb_2 within w_print_saletask_fx
  180. boolean visible = false
  181. boolean enabled = false
  182. end type
  183. type cb_help from w_publ_easyq`cb_help within w_print_saletask_fx
  184. boolean visible = false
  185. integer x = 3127
  186. boolean enabled = false
  187. end type
  188. type cb_copyself from w_publ_easyq`cb_copyself within w_print_saletask_fx
  189. boolean visible = false
  190. integer x = 2606
  191. boolean enabled = false
  192. end type
  193. type gb_1 from w_publ_easyq`gb_1 within w_print_saletask_fx
  194. end type
  195. type ln_bar from w_publ_easyq`ln_bar within w_print_saletask_fx
  196. end type
  197. type ln_bar2 from w_publ_easyq`ln_bar2 within w_print_saletask_fx
  198. end type
  199. type r_bar from w_publ_easyq`r_bar within w_print_saletask_fx
  200. end type
  201. type ln_1 from w_publ_easyq`ln_1 within w_print_saletask_fx
  202. end type
  203. type ln_2 from w_publ_easyq`ln_2 within w_print_saletask_fx
  204. end type
  205. type ln_3 from w_publ_easyq`ln_3 within w_print_saletask_fx
  206. end type
  207. type ln_4 from w_publ_easyq`ln_4 within w_print_saletask_fx
  208. end type