【调度系统】广东民航医疗快线调度系统源代码
hzj
2025-08-14 1ce68427c1d414c39261a26bca710fbf4fd9a6e5
admin_save.gds
@@ -1053,6 +1053,11 @@
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
@@ -3301,7 +3306,7 @@
      </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%>"