| | |
|---|
| | |
|
|---|
| | | 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
|
|---|
