| | |
| | | objConn.Execute sql
|
| | | End If
|
| | |
|
| | | '小程序入口生成订单自动备注(没联系人姓名)
|
| | | '小程序入口生成订单自动备注(没联系人姓名),submitOrdValue="1" 表示自动报价的
|
| | | If ServiceOrdCoName="" And submitOrdValue="1" Then
|
| | | sql="update ServiceOrder set ServiceOrdOperationRemarks='[客户未正式提交需求,可不联系]' where ServiceOrdID="&ServiceOrdID
|
| | | objConn.Execute sql
|
| | | Elseif ServiceOrdCoName="" Then
|
| | | sql="update ServiceOrder set ServiceOrdOperationRemarks='[客户未正式提交需求,可不联系]' where ServiceOrdID="&ServiceOrdID
|
| | | sql="update ServiceOrder set ServiceOrdOperationRemarks='[客户未正式提交需求]' where ServiceOrdID="&ServiceOrdID
|
| | | objConn.Execute sql
|
| | | End If
|
| | |
|
| | |
| | | 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)
|