123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261 |
- $PBExportHeader$w_print_saletask_fx.srw
- $PBExportComments$打印销售订单(协同)
- forward
- global type w_print_saletask_fx from w_publ_easyq
- end type
- end forward
- global type w_print_saletask_fx from w_publ_easyq
- integer width = 2761
- integer height = 2568
- string title = "打印销售订单"
- windowstate windowstate = normal!
- long backcolor = 16777215
- string icon = "graphics\chain_link_128px.ico"
- boolean if_ue_sentdataout = true
- end type
- global w_print_saletask_fx w_print_saletask_fx
- type variables
- s_fx_saletask ins_s
- end variables
- forward prototypes
- public subroutine wf_retrieve ()
- end prototypes
- public subroutine wf_retrieve ();//
- dw_1.Reset()
- dw_1.SetRedraw(false)
- //dw_1.Modify('tid_top.Text = "订单编号:' + ins_s.tid + '" ~r~n')
- //dw_1.Modify('cus_rep_top.Text = "收货人 ' + ins_s.cus_rep + '"~r~n')
- //dw_1.Modify('cus_tele_top.Text = "联系电话 ' + ins_s.cus_tele + '"~r~n')
- //dw_1.Modify('cus_address_top.Text = "收货地址 ' + ins_s.cus_address + '"~r~n')
- //dw_1.Modify('freight_top.Text = "货运部:' + ins_s.freight + '"~r~n')
- //dw_1.Modify('freight_tele_top.Text = "货运部电话:' + ins_s.freight_tele + '"~r~n')
- //dw_1.Modify('buyer_name_top.Text = "客户名称:' + ins_s.buyer_name + '"~r~n')
- //dw_1.Modify('buyer_tele_top.Text = "客户电话:' + ins_s.buyer_tele + '"~r~n')
- //dw_1.Modify('requiredate_top.Text = "要求交期 ' + string(ins_s.requiredate, 'yyyy/MM/dd') + '"~r~n')
- //dw_1.Modify('temp1_top.Text = "备注:' + ins_s.temp1 + '"~r~n')
- //dw_1.Modify('temp2_top.Text = "生产备注:' + ins_s.temp2 + '"~r~n')
- //dw_1.Modify('temp3_top.Text = "辅助备注:' + ins_s.temp3 + '"~r~n')
- //dw_1.Modify('temp4_top.Text = "订单编号 ' + ins_s.temp4 + '"')
- //dw_1.Modify('temp5_top.Text = "订单编号 ' + ins_s.temp5 + '"')
- //dw_1.Modify('temp6_top.Text = "订单编号 ' + ins_s.temp6 + '"')
- //dw_1.Modify('price_emp_top.Text = "订单编号 ' + ins_s.price_emp + '"')
- //dw_1.Modify('replyrqdate_top.Text = "订单编号 ' + ins_s.replyrqdate + '"')
- //dw_1.Modify('replydscrp_top.Text = "订单编号 ' + ins_s.replydscrp + '"')
- //dw_1.Modify('replydate_top.Text = "订单编号 ' + ins_s.replydate + '"')
- //dw_1.Modify('confirmemp_top.Text = "订单编号 ' + ins_s.confirmemp + '"')
- //dw_1.Modify('confirmdate_top.Text = "订单编号 ' + ins_s.confirmdate + '"')
- //dw_1.Modify('status_top.Text = "订单编号 ' + ins_s.status + '"')
- //dw_1.Modify('taskcode_top.Text = "订单编号 ' + ins_s.taskcode + '"')
- //dw_1.Modify('outwarecode_top.Text = "订单编号 ' + ins_s.outwarecode + '"')
- //dw_1.Modify('fstatus_top.Text = "订单编号 ' + ins_s.fstatus + '"')
- //dw_1.Modify('taskdate_top.Text = "订单编号 ' + ins_s.taskdate + '"')
- //dw_1.Modify('sptcomid_top.Text = "订单编号 ' + ins_s.sptcomid + '"')
- //dw_1.Modify('cuscomid_top.Text = "订单编号 ' + ins_s.cuscomid + '"')
- //dw_1.Modify('opemp_top.Text = "订单编号 ' + ins_s.opemp + '"')
- //dw_1.Modify('opdate_top.Text = "订单编号 ' + ins_s.opdate + '"')
- //dw_1.Modify('modemp_top.Text = "订单编号 ' + ins_s.modemp + '"')
- //dw_1.Modify('moddate_top.Text = "订单编号 ' + ins_s.moddate + '"')
- long i, row
- for i = 1 to UpperBound(ins_s.mx)
- row = dw_1.InsertRow(0)
-
- dw_1.Object.taskcode[row] = ins_s.taskcode
- // dw_1.Object.printid[row] = ins_s.mx[i].printid
- dw_1.Object.mtrlcode[row] = ins_s.mx[i].mtrlcode
- dw_1.Object.mtrlname[row] = ins_s.mx[i].mtrlname
- dw_1.Object.mtrlmode[row] = ins_s.mx[i].mtrlmode
- dw_1.Object.status[row] = ins_s.mx[i].status
- // dw_1.Object.woodcode[row] = ins_s.mx[i].woodcode
- // dw_1.Object.pcode[row] = ins_s.mx[i].pcode
- dw_1.Object.qty[row] = ins_s.mx[i].qty
- // dw_1.Object.price[row] = ins_s.mx[i].price
- // dw_1.Object.mxdscrp[row] = ins_s.mx[i].mxdscrp
- // dw_1.Object.mxdscrp2[row] = ins_s.mx[i].mxdscrp2
- // dw_1.Object.mtrlcuscode[row] = ins_s.mx[i].mtrlcuscode
- dw_1.Object.requiredate[row] = ins_s.mx[i].requiredate
- next
- dw_1.SetSort('printid')
- dw_1.Sort()
- dw_1.SetRedraw(true)
- string arg_msg
- if (f_find_fx_user_power(31, ref arg_msg) <> 1) then // 31-采购订单查看(单价)
- dw_1.Modify('destroy price_t ~r~n destroy price ~r~n')
- end if
- end subroutine
- on w_print_saletask_fx.create
- call super::create
- end on
- on w_print_saletask_fx.destroy
- call super::destroy
- end on
- event open;wf_movetocenter()
- s_fx_saletask s_temp
- s_temp = Message.PowerObjectParm
- if (not IsValid(s_temp)) then
- Close(this)
- return
- end if
- if IsNull(s_temp) then
- Close(this)
- return
- end if
- string arg_msg
- if (f_find_fx_user_power(36, ref arg_msg) <> 1) then // 36-采购订单数据发送
- MessageBox('权限提示', arg_msg)
- Close(this)
- return
- end if
- ins_s = s_temp
- wf_retrieve()
- end event
- event resize;call super::resize;cb_exit.X = this.workspacewidth( ) - cb_exit.Width
- end event
- type cb_func from w_publ_easyq`cb_func within w_print_saletask_fx
- end type
- type cb_exit from w_publ_easyq`cb_exit within w_print_saletask_fx
- integer x = 3374
- end type
- type cb_2 from w_publ_easyq`cb_2 within w_print_saletask_fx
- integer x = 302
- end type
- type cb_psetup from w_publ_easyq`cb_psetup within w_print_saletask_fx
- integer x = 453
- end type
- type cb_1 from w_publ_easyq`cb_1 within w_print_saletask_fx
- end type
- event cb_1::clicked;call super::clicked;wf_retrieve()
- end event
- type st_3 from w_publ_easyq`st_3 within w_print_saletask_fx
- boolean visible = false
- end type
- type st_4 from w_publ_easyq`st_4 within w_print_saletask_fx
- boolean visible = false
- end type
- type em_1 from w_publ_easyq`em_1 within w_print_saletask_fx
- boolean visible = false
- boolean enabled = false
- end type
- type em_2 from w_publ_easyq`em_2 within w_print_saletask_fx
- boolean visible = false
- boolean enabled = false
- end type
- type ddlb_yl from w_publ_easyq`ddlb_yl within w_print_saletask_fx
- integer x = 933
- integer y = 44
- end type
- type cbx_yl from w_publ_easyq`cbx_yl within w_print_saletask_fx
- integer x = 713
- integer y = 48
- end type
- type dw_1 from w_publ_easyq`dw_1 within w_print_saletask_fx
- integer y = 180
- integer width = 2642
- integer height = 1248
- string dataobject = "dw_fx_print_saletask_qc"
- end type
- type sle_mtrl from w_publ_easyq`sle_mtrl within w_print_saletask_fx
- boolean enabled = false
- end type
- type sle_cust from w_publ_easyq`sle_cust within w_print_saletask_fx
- boolean enabled = false
- end type
- type st_mtrl from w_publ_easyq`st_mtrl within w_print_saletask_fx
- boolean enabled = false
- end type
- type st_cust from w_publ_easyq`st_cust within w_print_saletask_fx
- boolean enabled = false
- end type
- type cbx_loginretr from w_publ_easyq`cbx_loginretr within w_print_saletask_fx
- integer x = 1554
- boolean enabled = false
- end type
- type pb_em1 from w_publ_easyq`pb_em1 within w_print_saletask_fx
- boolean visible = false
- boolean enabled = false
- end type
- type pb_em2 from w_publ_easyq`pb_em2 within w_print_saletask_fx
- boolean visible = false
- boolean enabled = false
- end type
- type pb_2 from w_publ_easyq`pb_2 within w_print_saletask_fx
- boolean visible = false
- boolean enabled = false
- end type
- type cb_help from w_publ_easyq`cb_help within w_print_saletask_fx
- boolean visible = false
- integer x = 3127
- boolean enabled = false
- end type
- type cb_copyself from w_publ_easyq`cb_copyself within w_print_saletask_fx
- boolean visible = false
- integer x = 2606
- boolean enabled = false
- end type
- type gb_1 from w_publ_easyq`gb_1 within w_print_saletask_fx
- end type
- type ln_bar from w_publ_easyq`ln_bar within w_print_saletask_fx
- end type
- type ln_bar2 from w_publ_easyq`ln_bar2 within w_print_saletask_fx
- end type
- type r_bar from w_publ_easyq`r_bar within w_print_saletask_fx
- end type
- type ln_1 from w_publ_easyq`ln_1 within w_print_saletask_fx
- end type
- type ln_2 from w_publ_easyq`ln_2 within w_print_saletask_fx
- end type
- type ln_3 from w_publ_easyq`ln_3 within w_print_saletask_fx
- end type
- type ln_4 from w_publ_easyq`ln_4 within w_print_saletask_fx
- end type
|