; ; @temp = ShowSearchBox("CustomerSearch","INFOMATION",tbCustomerNo.CValue); if( @temp == "" ) return; tbCustomerNo.CValue = @temp; UpdateForm(false, "cbGood"); Search("SearchRespiteForSaleBill"); UpdateForm(true, "cbGood"); Search("SearchTransBackForSaleBill"); SetDataGridColumnDataSource(6,"dgSaleBillUpdate"); Search("SearchRespiteForDG"); SetDataGridColumnDataSource(10,"dgSaleBillUpdate"); PrintReport(); ChangeMode("Search"); Update(); ChangeMode("View"); if(#SaleBill.TransBack=="是") { if(Equals(#SaleBill.TransBackDate_SaleBill,DBNull()) || Equals(#SaleBill.TransBackDate_SaleBill,"")) { SetCurrentColoumn("#SaleBill.TransBackDate_SaleBill",DateTimeNow()); } dgSaleBillUpdate.SetDefaultSelectedColoumn("TransBack", "是", false); dgSaleBillUpdate.SetDefaultSelectedColoumn("TransBack_SaleBill", 1, false); dgSaleBillUpdate.SetDefaultSelectedColoumn("TransBackDate_SaleBill", DateTimeNow(), true); } else { SetCurrentColoumn("#SaleBill.TransBackDate_SaleBill",DBNull()); dgSaleBillUpdate.SetDefaultSelectedColoumn("TransBack", "否", false); dgSaleBillUpdate.SetDefaultSelectedColoumn("TransBack_SaleBill", 0, false); dgSaleBillUpdate.SetDefaultSelectedColoumn("TransBackDate_SaleBill", DBNull(), false); } if(GetRight("客户基本资料","全权查看")) { FormatString(""); } else { FormatString(" Customer.ID_Creator='{0}' ",GetLoginUserID()); } Empty(); NewInstance("#SaleBillUpdate"); tbCustomerNo.ReadOnly = false; txtShortName.ReadOnly = false; tbCustomerNo.CValue = StringEmpty(); txtShortName.CValue = StringEmpty(); dtStart.Enabled = true; dtEnd.Enabled = true; cbAssess.Enabled = true; cbGood.Enabled = true; cbCheck.Enabled = true; cbTransBack.Enabled = true; dgSaleBillUpdate.ReadOnly = true; tbCustomerNo.ReadOnly = true; txtShortName.ReadOnly = true; dgSaleBillUpdate.ReadOnly = true; cbAssess.Enabled = false; cbGood.Enabled = false; cbCheck.Enabled = false; cbTransBack.Enabled = false; dtStart.Enabled = false; dtEnd.Enabled = false; dgSaleBillUpdate.ReadOnly = false; cbAssess.Enabled = true; cbGood.Enabled = true; cbCheck.Enabled = true; cbTransBack.Enabled = true; dtStart.Enabled = true; dtEnd.Enabled = true; tbCustomerNo.ReadOnly = false; txtShortName.ReadOnly = false; dgSaleBillUpdate.AllowNew(false); dgSaleBillUpdate.AllowDelete(false);