feat: 新增获取状态写入库，供广交集团的接口使用

wzp

2025-05-06 18c7a44d2e9db3f4a5322389c3ee94468cce4de1

 API/v1/index.gds

@@ -19,7 +19,8 @@
UnixTime=trim(Request("UnixTime"))

Call MD5_UnixTime(UnixTime)

'时间戳验证---end



GlobalSign=""

GlobalOriginSign=""

'签名验证----------

ApiSign=trim(Request("Sign"))

if ApiSign="" Then

@@ -77,10 +78,12 @@
         Case Else BuildRequestMysign = ""

       End Select

   End Function

   GlobalOriginSign = sParaSort

   sParaSort=BuildRequestMysign(sParaSort)

   GlobalSign = sParaSort

   If CStr(ApiSign)<>CStr(sParaSort) Then

      errcode=40006

      errmsg="invalid Sign"

      errmsg="invalid Sign，ApiSign:"&ApiSign&",Sign:"&GlobalSign&",OriginSign:"&GlobalOriginSign

      '签名调试

      If is_test="1" And ApiSign="vicgame" Then errmsg="invalid stringA:"&stringA&",Sign:"&sParaSort

   End If

@@ -1237,7 +1240,7 @@
            End If

            ServiceOrdNo         = ServiceOrdClass& year(ServiceOrd_CC_Time)&Right("0"&month(ServiceOrd_CC_Time),2)&Right("0"&day(ServiceOrd_CC_Time),2) & "-"&Right("00"&ServiceOrdNo,3)



            webJson="{""method"":""ServiceOrder_APP"",""result"":1,""UserID"":"&UserID&",""UserPhone"":"""&UserPhone&""",""ServiceOrdID"":"""&ServiceOrdID&""",""ServiceOrdNo"":"""&ServiceOrdNo&""",""OrdPrice"":"""&ServiceOrdTraTxnPrice&"""}"

            webJson="{""method"":""ServiceOrder_APP"",""result"":1,""UserID"":"&UserID&",""UserPhone"":"""&UserPhone&""",""ServiceOrdID"":"""&ServiceOrdID&""",""ServiceOrdNo"":"""&ServiceOrdNo&""",""OrdPrice"":"""&ServiceOrdTraTxnPrice&""",""Sign"":"""&GlobalSign&"""}"



            '营销小程序数据更新(48小时内有效)

            sql="select top 1 id,iuid,uuid from UserUUID where ToUserID="&UserID&" and DATEDIFF(hh,LoginTime,getdate())<=48 order by LoginTime desc"

@@ -1251,7 +1254,7 @@
            End If

            rs.close()

            

            If (ServiceOrdCoName<>"" Or  submitOrdValue<>"1") And 1=2 Then '新订单第一步不提示(2024.8.5)

            If (ServiceOrdCoName<>"" Or  submitOrdValue<>"1") Then

               If NC_OAIDs<>"" Then

                  If Mid(NC_OAIDs,1,1)="," Then NC_OAIDs=Mid(NC_OAIDs,2)

                  If Right(NC_OAIDs,1)="," Then NC_OAIDs=Mid(NC_OAIDs,1,Len(NC_OAIDs)-1)

@@ -1558,7 +1561,7 @@
            errcode=40503

            errmsg="服务单已取消"

         ElseIf Left(errcode,1)<>"4" Then

            sql="update ServiceOrder set ServiceOrdState=4,ServiceOrdPoints=0,ServiceOrd_AP_ID=0,ServiceOrd_AP_Time=getdate(),ServiceOrdCancelReason=9,ServiceOrdCancelReasonTXT='"&DELRemarks&"' where ServiceOrdID="&ServiceOrdID

            sql="update ServiceOrder set ServiceOrdState=4,ServiceOrdPoints=0,ServiceOrd_AP_ID=0,ServiceOrd_AP_Time=getdate(),ServiceOrdCancelReason=9,ServiceOrdOperationRemarks='',ServiceOrdCancelReasonTXT='"&DELRemarks&"' where ServiceOrdID="&ServiceOrdID

            objConn.Execute sql

            sql="delete from UserPoints where Points_Type=6 and ServiceOrdIDDt="&ServiceOrdID&" and ToUserID="&UserID

            objConn.Execute sql