; ; @temp = ShowSearchBox("BillSearch","NODEPOT", "txtBillNo1",txtBillNo1.CValue); if(@temp == "" ) return; txtBillNo1.CValue = @temp; txtBillNo2.CValue = txtBillNo1.CValue; @temp = ShowSearchBox("BillSearch","NODEPOT", "txtBillNo2",txtBillNo2.CValue); if(@temp == "" ) return; txtBillNo2.CValue = @temp; @temp = ShowSearchBox("ProductSearch","INFOMATION",tbProduct1.CValue); if( @temp == "" ) return; tbProduct1.CValue = @temp; tbProduct2.CValue = tbProduct1.CValue; @temp = ShowSearchBox("ProductSearch","INFOMATION",tbProduct2.CValue); if( @temp == "" ) return; tbProduct2.CValue = @temp; @temp = ShowSearchBox("CustomerSearch","INFOMATION",tbCustomerNo1.CValue); if( @temp == "" ) return; tbCustomerNo1.CValue = @temp; tbCustomerNo2.CValue = tbCustomerNo1.CValue; @temp = ShowSearchBox("CustomerSearch","INFOMATION",tbCustomerNo2.CValue); if( @temp == "" ) return; tbCustomerNo2.CValue = @temp; dtEnd.Checked = dtStart.Checked; dtEnd.CValue = dtStart.CValue; UpdateForm(false, "cbMaterial"); Search("SearchMaterial"); UpdateForm(true, "cbMaterial"); UpdateForm(false, "cbManuMethod"); Search("SearchManuMethod"); UpdateForm(true, "cbManuMethod"); UpdateForm(false, "cbProcess"); Search("SearchProcess"); UpdateForm(true, "cbProcess"); PrintReport(dgProduct.CurrentView); ; ; Empty(); if(RowCount("#Total") == 0) MessageBox("不存在符合查询条件的记录!"); Empty(); NewInstance(); txtBillNo1.CValue=""; txtBillNo2.CValue=""; tbCustomerNo1.CValue=""; tbCustomerNo2.CValue=""; tbProduct1.CValue=""; tbProduct2.CValue=""; dtStart.Checked=False; dtEnd.Checked=False; cbMaterial.Text = ""; cbManuMethod.Text = ""; cbProcess.Text = ""; Empty(); @StartNo_CustomerReqInfo =DBNull(); @EndNo_CustomerReqInfo =DBNull(); @StartDate =DBNull(); @EndDate =DBNull(); @StartNo_Customer =DBNull(); @EndNo_Customer =DBNull(); @StartNo_Product =DBNull(); @EndNo_Product =DBNull(); @Material_CustomerReqProduct = DBNull(); @ManuMethod_CustomerReqProduct =DBNull(); @Process_CustomerReqProduct =DBNull(); if(txtBillNo1.CValue!="") @StartNo_CustomerReqInfo=txtBillNo1.CValue; if(txtBillNo2.CValue!="") @EndNo_CustomerReqInfo=txtBillNo2.CValue; if(tbProduct1.CValue!="") @StartNo_Product=tbProduct1.CValue; if(tbProduct2.CValue!="") @EndNo_Product=tbProduct2.CValue; if(tbCustomerNo1.CValue!="") @StartNo_Customer=tbCustomerNo1.CValue; if(tbCustomerNo2.CValue!="") @StartNo_Customer=tbCustomerNo2.CValue; if(cbMaterial.Text !="") @Material_CustomerReqProduct = cbMaterial.Text; if(cbManuMethod.Text!="") @ManuMethod_CustomerReqProduct=cbManuMethod.Text; if(cbProcess.Text !="") @Process_CustomerReqProduct = cbProcess.Text; if(dtStart.Checked) @StartDate=dtStart.Value; if(dtEnd.Checked) @EndDate=dtEnd.Value; Search("SearchTotal",@StartNo_CustomerReqInfo,@EndNo_CustomerReqInfo,@StartDate,@EndDate,@StartNo_Customer,@EndNo_Customer,@StartNo_Product,@EndNo_Product,@Material_CustomerReqProduct,@ManuMethod_CustomerReqProduct,@Process_CustomerReqProduct);