1、订单状态说明（兼容老系统） · 翼通系统开发

# 老系统作废本单 ~~~ if request("cmd")="fei" then set fei=server.CreateObject("adodb.recordset") set fei=conn.execute("update ks_order set status=status + ',4' where orderid='"&request("orderid")&"'") response.Redirect "hzb.asp?khmc="&request("khmc")&"" 'set stat=server.CreateObject("adodb.recordset") 'set stat=conn.execute("update ks_order set status=status + ',3' where orderid='"&request("myorderid")&"' ") end if ~~~ # 老系统订单状态定义 ~~~ if request("status")="0" then st="接件单" if request("status")="1" then st="生产流程单" if request("status")="2" then st="送货签收单" if request("status")="4" then st="作废单" ~~~ # 老系统mystatus定义 ~~~ <%if j("mystatus")=3 or ddjex<=xxje then response.Write("全单收款") 'response.Write("状态是"&j("mystatus")) 'response.Write("ddjex"&ddjex) 'response.Write("xxje"&xxje) else %> <%if j("mystatus")=0 then response.Write("未走上流程")%> <%if j("mystatus")=1 then response.Write("正在生产中")%> <%'if j("status")=0 then response.Write("<a href=Print1.asp?orderid="&j("orderid")&" target=_blank>重打接件单</a>")%> <%if j("mystatus")=2 then response.Write("已送货签单")%> <%end if%> ~~~ # 老系统后台判断作废单依据 ``` <%if instr(rs("status"),"4")=0 then '如果不包含4则说明是正常单' if session("zuofei")=1 then response.Write("<a href=""?cmd=fei&orderid="&rs("orderid")&"&khmc="&request("khmc")&""" onClick=""return window.confirm('您确定要作废本单吗？');"" >作废本单</a>") end if else %> <% response.Write("已作废") end if %> </td> <%end if%> ```