$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