From d08ed14d6a4589c034140fdc8ac04a277c8e4b36 Mon Sep 17 00:00:00 2001
From: hzj <1831054011@qq.com>
Date: 星期一, 13 十月 2025 11:24:07 +0800
Subject: [PATCH] 添加福祉车爬楼机费和向转运隐藏成交价格

---
 admin_save.gds |   10 ++++++++--
 1 files changed, 8 insertions(+), 2 deletions(-)

diff --git a/admin_save.gds b/admin_save.gds
index cf5812d..2a2eb16 100644
--- a/admin_save.gds
+++ b/admin_save.gds
@@ -808,6 +808,7 @@
 ServiceOrdTraOfferPrice	= SafeRequest(Request.form("ServiceOrdTraOfferPrice"))	'鏍囧噯鎶ヤ环
 ServiceOrdTraTxnPrice	= SafeRequest(Request.form("ServiceOrdTraTxnPrice"))	'鎴愪氦浠�
 ServiceOrdTraPrePayment	= SafeRequest(Request.form("ServiceOrdTraPrePayment"))	'闇�棰勪粯娆�
+ServiceOrdStairClimberPrice	= SafeRequest(Request.form("ServiceOrdStairClimberPrice"))	'鐖ゼ鏈轰环鏍�
 SettlementPrice			= SafeRequest(Request.form("SettlementPrice"))			'缁撶畻浠�
 ServiceOrdTraPriceReason= SafeRequest(Request.form("ServiceOrdTraPriceReason"))	'宸环鍘熷洜
 TEL_Phone				= SafeRequest(Request.form("Phone"))					'鏉ョ數鐢佃瘽
@@ -844,10 +845,12 @@
 If ServiceOrdTraOfferPrice="" Then ServiceOrdTraOfferPrice=0
 If ServiceOrdTraTxnPrice="" Then ServiceOrdTraTxnPrice=0
 If ServiceOrdTraPrePayment="" Then ServiceOrdTraPrePayment=0
+If ServiceOrdStairClimberPrice="" Then ServiceOrdStairClimberPrice=0
 If SettlementPrice="" Then SettlementPrice=0
 If InStr(ServiceOrdTraTxnPrice,",")>0 Then ServiceOrdTraTxnPrice=Replace(ServiceOrdTraTxnPrice,",","")
 If InStr(ServiceOrdTraOfferPrice,",")>0 Then ServiceOrdTraOfferPrice=Replace(ServiceOrdTraOfferPrice,",","")
 If InStr(ServiceOrdTraPrePayment,",")>0 Then ServiceOrdTraPrePayment=Replace(ServiceOrdTraPrePayment,",","")
+If InStr(ServiceOrdStairClimberPrice,",")>0 Then ServiceOrdStairClimberPrice=Replace(ServiceOrdStairClimberPrice,",","")
 If InStr(SettlementPrice,",")>0 Then SettlementPrice=Replace(SettlementPrice,",","")
 If ServiceOrdState="" Then ServiceOrdState=1
 'If InStr(ServiceOrdTraDistance,"鍏噷")>0 Then ServiceOrdTraDistance=Replace(ServiceOrdTraDistance,"鍏噷","")
@@ -1041,7 +1044,7 @@
 rs.close()
 
 '鍐欏叆鏂版湇鍔″崟
-sql="insert into ServiceOrder (ServiceOrdUserID,ServiceOrdClass,ServiceOrdAreaType,ServiceOrdType,ServiceOrdState,ServiceOrdStartDate,ServiceOrdApptDate,ServiceOrdCoName,ServiceOrdCoPhone,ServiceOrdCoTies,ServiceOrdPtName,ServiceOrdPtAge,ServiceOrdPtKG,ServiceOrdPtSex,ServiceOrdPtNat,ServiceOrdPtIDCard,ServiceOrdPtOutHospID,ServiceOrdPtOutHosp,ServiceOrdPtInHospID,ServiceOrdPtInHosp,ServiceOrdPtServices,ServiceOrdPtServicesID,ServiceOrdPtInServices,ServiceOrdPtInServicesID,ServiceOrdPtDiagnosis,ServiceOrdPtCondition,ServiceOrdTaskRemarks,ServiceOrdPtDoctor,ServiceOrdPtDoctorPhone,ServiceOrdTraProvince,ServiceOrdTraCity,ServiceOrdTraStreet,ServiceOrdTraStreetCoo,ServiceOrdTraEnd,ServiceOrdTraEndCoo,ServiceOrdTraVia,ServiceOrdViaDistance,ServiceOrdTraDistance,ServiceOrdTraDuration,ServiceOrdTraUnitPrice,ServiceOrdTraOfferPrice,ServiceOrdTraTxnPrice,ServiceOrdTraPrePayment,SettlementPrice,ServiceOrdTraPriceReason,ServiceOrd_CC_ID,ServiceOrd_CC_Time,ServiceOrdNo,ServiceOrd_Sale_ID,ServiceOrd_work_ID,ServiceOrd_work_IDs,ServiceOrd_work_is,CommissionScenarioID,ServiceOrdIntroducer,ServiceOrdUnitID,ServiceOrdVIP,ServiceOrdOperationRemarks,ServiceOrdEstimatedOrderDate,ServiceOrdSource,OrderLevel,ServiceOrdDepartureType,ConditionLevel,DirectionType,FromHQ2_is,OrderPrice_Auto) values ("&UserID&",'"&ServiceOrdClass&"',"&ServiceOrdAreaType&","&ServiceOrdType&","&ServiceOrdState&",'"&ServiceOrdStartDate&"','"&ServiceOrdApptDate&"','"&ServiceOrdCoName&"','"&ServiceOrdCoPhone&"','"&ServiceOrdCoTies&"','"&ServiceOrdPtName&"','"&ServiceOrdPtAge&"','"&ServiceOrdPtKG&"','"&ServiceOrdPtSex&"','"&ServiceOrdPtNat&"','"&ServiceOrdPtIDCard&"',"&ServiceOrdPtOutHospID_New&","&ServiceOrdPtOutHospID&","&ServiceOrdPtInHospID_New&","&ServiceOrdPtInHospID&",'"&ServiceOrdPtServices&"',"&ServiceOrdPtServicesID&",'"&ServiceOrdPtInServices&"',"&ServiceOrdPtInServicesID&",'"&ServiceOrdPtDiagnosis&"','"&ServiceOrdPtCondition&"','"&ServiceOrdTaskRemarks&"','"&ServiceOrdPtDoctor&"','"&ServiceOrdPtDoctorPhone&"','"&ServiceOrdTraProvince&"','"&ServiceOrdTraCity&"','"&ServiceOrdTraStreet&"','"&ServiceOrdTraStreetCoo&"','"&ServiceOrdTraEnd&"','"&ServiceOrdTraEndCoo&"','"&ServiceOrdTraVia&"','"&ServiceOrdViaDistance&"','"&ServiceOrdTraDistance&"','"&ServiceOrdTraDuration&"',"&ServiceOrdTraUnitPrice&","&ServiceOrdTraOfferPrice&","&ServiceOrdTraTxnPrice&","&ServiceOrdTraPrePayment&","&SettlementPrice&",'"&ServiceOrdTraPriceReason&"',"&ServiceOrd_CC_ID&",getdate(),"&ServiceOrdNo&","&ServiceOrd_Sale_ID&","&ServiceOrd_work_ID&",'"&ServiceOrd_work_IDs&"',"&ServiceOrd_work_is&","&CommissionScenarioID&",'"&ServiceOrdIntroducer&"',"&ServiceOrdUnitID&","&ServiceOrdVIP&",'"&ServiceOrdOperationRemarks&"','"&ServiceOrdEstimatedOrderDate&"',"&ServiceOrdSource&","&OrderLevel&","&ServiceOrdDepartureType&","&ConditionLevel&","&DirectionType&","&FromHQ2_is&","&OrderPrice_Auto&")"
+sql="insert into ServiceOrder (ServiceOrdUserID,ServiceOrdClass,ServiceOrdAreaType,ServiceOrdType,ServiceOrdState,ServiceOrdStartDate,ServiceOrdApptDate,ServiceOrdCoName,ServiceOrdCoPhone,ServiceOrdCoTies,ServiceOrdPtName,ServiceOrdPtAge,ServiceOrdPtKG,ServiceOrdPtSex,ServiceOrdPtNat,ServiceOrdPtIDCard,ServiceOrdPtOutHospID,ServiceOrdPtOutHosp,ServiceOrdPtInHospID,ServiceOrdPtInHosp,ServiceOrdPtServices,ServiceOrdPtServicesID,ServiceOrdPtInServices,ServiceOrdPtInServicesID,ServiceOrdPtDiagnosis,ServiceOrdPtCondition,ServiceOrdTaskRemarks,ServiceOrdPtDoctor,ServiceOrdPtDoctorPhone,ServiceOrdTraProvince,ServiceOrdTraCity,ServiceOrdTraStreet,ServiceOrdTraStreetCoo,ServiceOrdTraEnd,ServiceOrdTraEndCoo,ServiceOrdTraVia,ServiceOrdViaDistance,ServiceOrdTraDistance,ServiceOrdTraDuration,ServiceOrdTraUnitPrice,ServiceOrdTraOfferPrice,ServiceOrdTraTxnPrice,ServiceOrdTraPrePayment,ServiceOrdStairClimberPrice,SettlementPrice,ServiceOrdTraPriceReason,ServiceOrd_CC_ID,ServiceOrd_CC_Time,ServiceOrdNo,ServiceOrd_Sale_ID,ServiceOrd_work_ID,ServiceOrd_work_IDs,ServiceOrd_work_is,CommissionScenarioID,ServiceOrdIntroducer,ServiceOrdUnitID,ServiceOrdVIP,ServiceOrdOperationRemarks,ServiceOrdEstimatedOrderDate,ServiceOrdSource,OrderLevel,ServiceOrdDepartureType,ConditionLevel,DirectionType,FromHQ2_is,OrderPrice_Auto) values ("&UserID&",'"&ServiceOrdClass&"',"&ServiceOrdAreaType&","&ServiceOrdType&","&ServiceOrdState&",'"&ServiceOrdStartDate&"','"&ServiceOrdApptDate&"','"&ServiceOrdCoName&"','"&ServiceOrdCoPhone&"','"&ServiceOrdCoTies&"','"&ServiceOrdPtName&"','"&ServiceOrdPtAge&"','"&ServiceOrdPtKG&"','"&ServiceOrdPtSex&"','"&ServiceOrdPtNat&"','"&ServiceOrdPtIDCard&"',"&ServiceOrdPtOutHospID_New&","&ServiceOrdPtOutHospID&","&ServiceOrdPtInHospID_New&","&ServiceOrdPtInHospID&",'"&ServiceOrdPtServices&"',"&ServiceOrdPtServicesID&",'"&ServiceOrdPtInServices&"',"&ServiceOrdPtInServicesID&",'"&ServiceOrdPtDiagnosis&"','"&ServiceOrdPtCondition&"','"&ServiceOrdTaskRemarks&"','"&ServiceOrdPtDoctor&"','"&ServiceOrdPtDoctorPhone&"','"&ServiceOrdTraProvince&"','"&ServiceOrdTraCity&"','"&ServiceOrdTraStreet&"','"&ServiceOrdTraStreetCoo&"','"&ServiceOrdTraEnd&"','"&ServiceOrdTraEndCoo&"','"&ServiceOrdTraVia&"','"&ServiceOrdViaDistance&"','"&ServiceOrdTraDistance&"','"&ServiceOrdTraDuration&"',"&ServiceOrdTraUnitPrice&","&ServiceOrdTraOfferPrice&","&ServiceOrdTraTxnPrice&","&ServiceOrdTraPrePayment&","&ServiceOrdStairClimberPrice&","&SettlementPrice&",'"&ServiceOrdTraPriceReason&"',"&ServiceOrd_CC_ID&",getdate(),"&ServiceOrdNo&","&ServiceOrd_Sale_ID&","&ServiceOrd_work_ID&",'"&ServiceOrd_work_IDs&"',"&ServiceOrd_work_is&","&CommissionScenarioID&",'"&ServiceOrdIntroducer&"',"&ServiceOrdUnitID&","&ServiceOrdVIP&",'"&ServiceOrdOperationRemarks&"','"&ServiceOrdEstimatedOrderDate&"',"&ServiceOrdSource&","&OrderLevel&","&ServiceOrdDepartureType&","&ConditionLevel&","&DirectionType&","&FromHQ2_is&","&OrderPrice_Auto&")"
 'Response.write sql&"<BR>"
 objConn.Execute sql
 sql="select top 1 ServiceOrdID from ServiceOrder where ServiceOrdCoPhone='"&ServiceOrdCoPhone&"' order by ServiceOrdID desc"
@@ -1287,6 +1290,7 @@
 ServiceOrdTraOfferPrice	= SafeRequest(Request.form("ServiceOrdTraOfferPrice"))	'鏍囧噯鎶ヤ环
 ServiceOrdTraTxnPrice	= SafeRequest(Request.form("ServiceOrdTraTxnPrice"))	'鎴愪氦浠�
 ServiceOrdTraPrePayment	= SafeRequest(Request.form("ServiceOrdTraPrePayment"))	'闇�棰勪粯娆�
+ServiceOrdStairClimberPrice	= SafeRequest(Request.form("ServiceOrdStairClimberPrice"))	'鐖ゼ鏈轰环鏍�
 SettlementPrice			= SafeRequest(Request.form("SettlementPrice"))			'缁撶畻浠�
 ServiceOrdTraPriceReason= SafeRequest(Request.form("ServiceOrdTraPriceReason"))	'宸环鍘熷洜
 TEL_Phone				= SafeRequest(Request.form("Phone"))					'鏉ョ數鐢佃瘽
@@ -1332,6 +1336,7 @@
 If ServiceOrdTraOfferPrice="" Then ServiceOrdTraOfferPrice=0
 If ServiceOrdTraTxnPrice="" Then ServiceOrdTraTxnPrice=0
 If ServiceOrdTraPrePayment="" Then ServiceOrdTraPrePayment=0
+If ServiceOrdStairClimberPrice="" Then ServiceOrdStairClimberPrice=0
 If SettlementPrice="" Then SettlementPrice=0
 If ServiceOrdState="" Then ServiceOrdState=1
 If ServiceOrd_Sale_ID="" Then ServiceOrd_Sale_ID="null"
@@ -1383,6 +1388,7 @@
 
 SMT=3
 ServiceOrdTraPrePayment=Replace(ServiceOrdTraPrePayment,",","")
+If InStr(ServiceOrdStairClimberPrice,",")>0 Then ServiceOrdStairClimberPrice=Replace(ServiceOrdStairClimberPrice,",","")
 SettlementPrice=Replace(SettlementPrice,",","")
 ServiceOrdTraOfferPrice=Replace(ServiceOrdTraOfferPrice,",","")
 ServiceOrdTraTxnPrice=Replace(ServiceOrdTraTxnPrice,",","")
@@ -1652,7 +1658,7 @@
 If ServiceOrdPtInServices<>"銆愰殣銆�" Then CoSql=CoSql&",ServiceOrdPtInServices='"&ServiceOrdPtInServices&"'"
 
 '淇敼鏈嶅姟鍗�(鑷姩瀹℃牳)
-sql="update ServiceOrder set ServiceOrdClass='"&ServiceOrdClass&"',ServiceOrdAreaType="&ServiceOrdAreaType&",ServiceOrdType="&ServiceOrdType&",ServiceOrdApptDate='"&ServiceOrdApptDate&"',ServiceOrdEstimatedOrderDate='"&ServiceOrdEstimatedOrderDate&"',ServiceOrdCoTies='"&ServiceOrdCoTies&"',ServiceOrdPtSex='"&ServiceOrdPtSex&"',ServiceOrdPtNat='"&ServiceOrdPtNat&"',ServiceOrdPtIDCard='"&ServiceOrdPtIDCard&"',ServiceOrdPtOutHospID="&ServiceOrdPtOutHospID_New&",ServiceOrdPtOutHosp="&ServiceOrdPtOutHospID&",ServiceOrdPtInHospID="&ServiceOrdPtInHospID_New&",ServiceOrdPtInHosp="&ServiceOrdPtInHospID&",ServiceOrdPtDiagnosis='"&ServiceOrdPtDiagnosis&"',ServiceOrdPtCondition='"&ServiceOrdPtCondition&"',ServiceOrdTaskRemarks='"&ServiceOrdTaskRemarks&"',ServiceOrdPtDoctor='"&ServiceOrdPtDoctor&"',ServiceOrdPtDoctorPhone='"&ServiceOrdPtDoctorPhone&"',ServiceOrdTraProvince='"&ServiceOrdTraProvince&"',ServiceOrdTraCity='"&ServiceOrdTraCity&"',ServiceOrdTraStreet='"&ServiceOrdTraStreet&"',ServiceOrdTraStreetCoo='"&ServiceOrdTraStreetCoo&"',ServiceOrdTraEnd='"&ServiceOrdTraEnd&"',ServiceOrdTraEndCoo='"&ServiceOrdTraEndCoo&"',ServiceOrdTraVia='"&ServiceOrdTraVia&"',ServiceOrdViaDistance='"&ServiceOrdViaDistance&"',ServiceOrdTraDistance='"&ServiceOrdTraDistance&"',ServiceOrdTraDuration='"&ServiceOrdTraDuration&"',ServiceOrdTraUnitPrice="&ServiceOrdTraUnitPrice&",ServiceOrdTraOfferPrice="&ServiceOrdTraOfferPrice&",ServiceOrdTraTxnPrice="&ServiceOrdTraTxnPrice&",ServiceOrdTraPrePayment="&ServiceOrdTraPrePayment&",SettlementPrice="&SettlementPrice&",ServiceOrdTraPriceReason='"&ServiceOrdTraPriceReason&"',ServiceOrd_CC_ID="&ServiceOrd_CC_ID&",ServiceOrd_Sale_ID="&ServiceOrd_Sale_ID&",ServiceOrdIntroducer='"&ServiceOrdIntroducer&"',ServiceOrd_work_ID="&ServiceOrd_work_ID&",ServiceOrd_work_IDs='"&ServiceOrd_work_IDs&"',ServiceOrd_work_is="&ServiceOrd_work_is&",CommissionScenarioID="&CommissionScenarioID&",ServiceOrdUnitID="&ServiceOrdUnitID&""&ServiceOrdSql&",ServiceOrdVIP="&ServiceOrdVIP&SqlVisit&",ServiceOrdOperationRemarks='"&ServiceOrdOperationRemarks&"',ServiceOrdSource="&ServiceOrdSource&",OrderLevel="&OrderLevel&",ServiceOrdDepartureType="&ServiceOrdDepartureType&",ConditionLevel="&ConditionLevel&",DirectionType="&DirectionType&",ServiceOrdPtKG='"&ServiceOrdPtKG&"',FromHQ2_is="&FromHQ2_is&CoSql&ServiceOrdNo_UPSql&" where ServiceOrdID="&ServiceOrdID
+sql="update ServiceOrder set ServiceOrdClass='"&ServiceOrdClass&"',ServiceOrdAreaType="&ServiceOrdAreaType&",ServiceOrdType="&ServiceOrdType&",ServiceOrdApptDate='"&ServiceOrdApptDate&"',ServiceOrdEstimatedOrderDate='"&ServiceOrdEstimatedOrderDate&"',ServiceOrdCoTies='"&ServiceOrdCoTies&"',ServiceOrdPtSex='"&ServiceOrdPtSex&"',ServiceOrdPtNat='"&ServiceOrdPtNat&"',ServiceOrdPtIDCard='"&ServiceOrdPtIDCard&"',ServiceOrdPtOutHospID="&ServiceOrdPtOutHospID_New&",ServiceOrdPtOutHosp="&ServiceOrdPtOutHospID&",ServiceOrdPtInHospID="&ServiceOrdPtInHospID_New&",ServiceOrdPtInHosp="&ServiceOrdPtInHospID&",ServiceOrdPtDiagnosis='"&ServiceOrdPtDiagnosis&"',ServiceOrdPtCondition='"&ServiceOrdPtCondition&"',ServiceOrdTaskRemarks='"&ServiceOrdTaskRemarks&"',ServiceOrdPtDoctor='"&ServiceOrdPtDoctor&"',ServiceOrdPtDoctorPhone='"&ServiceOrdPtDoctorPhone&"',ServiceOrdTraProvince='"&ServiceOrdTraProvince&"',ServiceOrdTraCity='"&ServiceOrdTraCity&"',ServiceOrdTraStreet='"&ServiceOrdTraStreet&"',ServiceOrdTraStreetCoo='"&ServiceOrdTraStreetCoo&"',ServiceOrdTraEnd='"&ServiceOrdTraEnd&"',ServiceOrdTraEndCoo='"&ServiceOrdTraEndCoo&"',ServiceOrdTraVia='"&ServiceOrdTraVia&"',ServiceOrdViaDistance='"&ServiceOrdViaDistance&"',ServiceOrdTraDistance='"&ServiceOrdTraDistance&"',ServiceOrdTraDuration='"&ServiceOrdTraDuration&"',ServiceOrdTraUnitPrice="&ServiceOrdTraUnitPrice&",ServiceOrdTraOfferPrice="&ServiceOrdTraOfferPrice&",ServiceOrdTraTxnPrice="&ServiceOrdTraTxnPrice&",ServiceOrdTraPrePayment="&ServiceOrdTraPrePayment&",ServiceOrdStairClimberPrice="&ServiceOrdStairClimberPrice&",SettlementPrice="&SettlementPrice&",ServiceOrdTraPriceReason='"&ServiceOrdTraPriceReason&"',ServiceOrd_CC_ID="&ServiceOrd_CC_ID&",ServiceOrd_Sale_ID="&ServiceOrd_Sale_ID&",ServiceOrdIntroducer='"&ServiceOrdIntroducer&"',ServiceOrd_work_ID="&ServiceOrd_work_ID&",ServiceOrd_work_IDs='"&ServiceOrd_work_IDs&"',ServiceOrd_work_is="&ServiceOrd_work_is&",CommissionScenarioID="&CommissionScenarioID&",ServiceOrdUnitID="&ServiceOrdUnitID&""&ServiceOrdSql&",ServiceOrdVIP="&ServiceOrdVIP&SqlVisit&",ServiceOrdOperationRemarks='"&ServiceOrdOperationRemarks&"',ServiceOrdSource="&ServiceOrdSource&",OrderLevel="&OrderLevel&",ServiceOrdDepartureType="&ServiceOrdDepartureType&",ConditionLevel="&ConditionLevel&",DirectionType="&DirectionType&",ServiceOrdPtKG='"&ServiceOrdPtKG&"',FromHQ2_is="&FromHQ2_is&CoSql&ServiceOrdNo_UPSql&" where ServiceOrdID="&ServiceOrdID
 '&",ServiceOrd_AP_Check=1,ServiceOrd_AP_Time=getdate(),ServiceOrd_AP_ID="&session("adminID")
 'Response.Write sql
 objConn.Execute sql

--
Gitblit v1.9.1