| | |
|---|
| | | rs.close()
|
|---|
| | | ServiceOrdNo = ServiceOrdClass& year(now())&Right("0"&month(now()),2)&Right("0"&day(now()),2) & "-"&Right("00"&ServiceOrdNo,3)
|
|---|
| | |
|
|---|
| | | '保存开单人及提成比例的函数
|
|---|
| | |
|
|---|
| | | SaveOpenerCommission ServiceOrdID
|
|---|
| | | SaveFollowers ServiceOrdID
|
|---|
| | | ' 新增条件更新语句
|
|---|
| | | sql = "UPDATE ServiceOrder SET Old_ServiceOrdID_TXT = '" & Replace(ServiceOrdNo, "'", "''") & "' " & _
|
|---|
| | | "WHERE ServiceOrdID = " & ServiceOrdID & " AND (Old_ServiceOrdID_TXT IS NULL OR Old_ServiceOrdID_TXT = '[未关联]')"
|
|---|
| | | objConn.Execute sql
|
|---|
| | |
|
|---|
| | | '咨询单转为服务单('自动审核)
|
|---|
| | | If ServiceOrdState="2" then
|
|---|
| | | sql="update ServiceOrder set ServiceOrd_NS_ID="&session("adminID")&",ServiceOrd_NS_Time=getdate(),ServiceOrd_AP_Check=1,ServiceOrd_AP_Time=getdate(),ServiceOrd_AP_ID="&session("adminID")&" where ServiceOrdID="&ServiceOrdID
|
|---|
| | |
|---|
| | |
|
|---|
| | | ServiceOrd_Check = SafeRequest(Request.form("ServiceOrd_Check")) '当前审核操作
|
|---|
| | | EditDataForm = SafeRequest(Request.form("EditDataForm")) '当前修改项目
|
|---|
| | | '保存开单人及提成比例的函数
|
|---|
| | |
|
|---|
| | | SaveOpenerCommission ServiceOrdID
|
|---|
| | | SaveFollowers ServiceOrdID
|
|---|
| | |
|
|---|
| | |
|---|
| | | </script><%
|
|---|
| | | Response.End
|
|---|
| | | End If
|
|---|
| | | If DispatchOrdClass="SA" And CInt(old_TraTxnPrice)>CInt(TraPaidPrice) And (DispatchOrdState="8") Then
|
|---|
| | | If DispatchOrdClass="SA" And CLng(old_TraTxnPrice)>CLng(TraPaidPrice) And (DispatchOrdState="8") Then
|
|---|
| | | %><script language=javascript>
|
|---|
| | | alert('返回前，请确认收款流水和成交价一致');
|
|---|
| | | window.location.href="/m_DispatchOrder.gds?DispatchOrdID=<%=DispatchOrdID%>&EndMileage=<%=EndMileage%>"
|
|---|
| | |
|---|
| | | End If
|
|---|
| | | rs.close()
|
|---|
| | | End If
|
|---|
| | | 'Call Get_UnitOrd(ServiceOrdUnitID,ServiceOrdID,ServiceOrdState,DispatchOrdState)
|
|---|
| | | Call Get_UnitOrd(ServiceOrdUnitID,ServiceOrdID,ServiceOrdState,DispatchOrdState)
|
|---|
| | |
|
|---|
| | | '更新提成数据
|
|---|
| | | Call EntourageDKP_Money_C2(DispatchOrdID)
|
|---|
