From 1ce68427c1d414c39261a26bca710fbf4fd9a6e5 Mon Sep 17 00:00:00 2001
From: hzj <1831054011@qq.com>
Date: 星期四, 14 八月 2025 09:56:11 +0800
Subject: [PATCH] feat:新增旧单据编号搜索单据和修改福祉车价格计算

---
 admin_save.gds |   13 +++++++++----
 1 files changed, 9 insertions(+), 4 deletions(-)

diff --git a/admin_save.gds b/admin_save.gds
index d88bfc6..cf5812d 100644
--- a/admin_save.gds
+++ b/admin_save.gds
@@ -1050,9 +1050,14 @@
 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
@@ -1315,7 +1320,7 @@
 
 ServiceOrd_Check		= SafeRequest(Request.form("ServiceOrd_Check"))		'褰撳墠瀹℃牳鎿嶄綔
 EditDataForm			= SafeRequest(Request.form("EditDataForm"))			'褰撳墠淇敼椤圭洰
-'淇濆瓨寮�鍗曚汉鍙婃彁鎴愭瘮渚嬬殑鍑芥暟
+
 SaveOpenerCommission ServiceOrdID
 SaveFollowers 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%>"
@@ -3493,7 +3498,7 @@
 	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)

--
Gitblit v1.9.1