<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
|
<%Session.CodePage=65001%>
|
<!--#include virtual="/inc/chkadmin.gds"-->
|
<!--#include virtual="/inc/function.gds"-->
|
<%
|
searchTXT=SafeRequest(Request("searchTXT"))
|
OrdState=SafeRequest(Request("OrdState"))
|
OrdClassList=SafeRequest(Request("OrdClassList"))
|
OrdDateType=SafeRequest(Request("OrdDateType"))
|
OrdDateStart=SafeRequest(Request("OrdDateStart"))
|
OrdDateEnd=SafeRequest(Request("OrdDateEnd"))
|
OAid=SafeRequest(Request("OAid"))
|
Set rs = Server.CreateObject("ADODB.Recordset")
|
'默认显示字段
|
If OrdState="" Then OrdState=0
|
If OrdClassList="" Then OrdClassList="0"
|
If OrdClassList="0" Then
|
OrdClassName="全部"
|
Else
|
sql="select vID,vtext from dictionary where vType>=1 and vtitle='OrderClass' and vOrder2='"&OrdClassList&"'"
|
rs.open Sql,objConn,1,1
|
If not rs.Eof Then OrdClassName = rs("vtext")
|
rs.close()
|
End if
|
If OrdDateType="" Then
|
OrdDateType=4
|
OrdDateTop=" top 20 "
|
End If
|
If OrdDateType="0" then
|
If OrdDateStart="" And OrdDateEnd="" Then
|
OrdDateStart=Date()
|
OrdDateEnd=Date()&" 00:00"
|
ElseIf OrdDateStart<>"" And OrdDateEnd="" Then
|
OrdDateEnd=OrdDateStart
|
ElseIf OrdDateStart="" And OrdDateEnd<>"" Then
|
OrdDateStart=OrdDateEnd
|
End If
|
If Cdate(OrdDateStart)>Cdate(OrdDateEnd) Then
|
OrdDateStart1=OrdDateStart
|
OrdDateStart=OrdDateEnd
|
OrdDateEnd=OrdDateStart1
|
End if
|
If OrdDateStart=OrdDateEnd Then
|
OrdDateStart=FORMATDATETIME(OrdDateStart,vbShortDate)
|
OrdDateTypeName=OrdDateStart
|
OrdDateTypeName1=OrdDateTypeName
|
OrdDateEnd=FORMATDATETIME(OrdDateEnd,vbShortDate)
|
Else
|
OrdDateTypeName=OrdDateStart&" 至 "&OrdDateEnd
|
OrdDateTypeName1="时间段"
|
End If
|
SqlOrdDateType="between '"&OrdDateStart&"' and '"&OrdDateEnd&" 23:59:59'"
|
|
Else
|
sql="select vID,vtext,vOrder2 from dictionary where vType>=1 and vtitle='OrdDateType' and vID="&OrdDateType
|
rs.open Sql,objConn,1,1
|
If not rs.Eof Then
|
OrdDateTypeName = rs("vtext")
|
OrdDateTypeName1=OrdDateTypeName
|
SqlOrdDateType = rs("vOrder2")
|
Else
|
OrdDateType=4
|
OrdDateTypeName="本月"
|
OrdDateTypeName1=OrdDateTypeName
|
SqlOrdDateType="between DATEADD(mm,DATEDIFF(mm,0,getdate()),0) and dateadd(ms,-3,DATEADD(mm,DATEDIFF(m,0,getdate())+1,0))"
|
End If
|
rs.close()
|
End if
|
|
'各种返回信息
|
SystemMessageType=trim(Request("SystemMessageType"))
|
SMT=trim(Request("SMT"))
|
if SystemMessageType<>"" then
|
if SMT="1" then
|
SystemMessageTXT="数据不足!!"
|
elseif SMT="2" then
|
SystemMessageTXT="创建新员工完成,默认密码:000000.点击[<a href=""/weixin/user_inviteSend.gds?OA_weixinUserID="&trim(Request("NEW_weixinUserID"))&"&departmentID="&departmentID&""">发出关注邀请</a>]关注微信OA"
|
elseif SMT="3" then
|
SystemMessageTXT="微信OA同步失败,请联系IT部!!"
|
elseif SMT="4" then
|
SystemMessageTXT="发出关注邀请完成,新员工默认密码:000000.请首次登陆后尽快修改"
|
elseif SMT="5" then
|
SystemMessageTXT="发出关注邀请失败,请点击[<a href=""/weixin/user_list.gds?departmentID="&departmentID&""">刷新数据</a>]并修改微信相关联系方式后再次发送"
|
end if
|
end if
|
|
|
If OrdState<>"0" then
|
OrdListName = DispatchOrdStateA(OrdState)&"查询"
|
Else
|
OrdListName = "出车绩效明细"
|
End If
|
|
'时间段列表
|
sql="select vID,vtext from dictionary where vType>=1 and vtitle='OrdDateType' order by vOrder"
|
rs.open Sql,objConn,1,1
|
do while not rs.Eof
|
OrdDateTypes = OrdDateTypes & rs("vID") &","& rs("vtext") & "|"
|
rs.movenext
|
Loop
|
rs.close()
|
OrdDateTypes = left(OrdDateTypes,len(OrdDateTypes)-1)
|
OrdDateTypesPS = SPLIT(OrdDateTypes,"|")
|
|
'单据类型表列
|
OrdClassTypes = "0,全部|"
|
sql="select vID,vtext,vOrder2 from dictionary where vType=1 and vtitle='OrderClass' order by vOrder"
|
rs.open Sql,objConn,1,1
|
do while not rs.Eof
|
OrdClassTypes = OrdClassTypes & rs("vOrder2") &","& rs("vtext") & "|"
|
rs.movenext
|
Loop
|
rs.close()
|
OrdClassTypes = left(OrdClassTypes,len(OrdClassTypes)-1)
|
OrdClassTypesPS = SPLIT(OrdClassTypes,"|")
|
|
page_URL="&searchTXT="&searchTXT&"&OrdState="&OrdState&"&OrdClassList="&OrdClassList&"&OrdDateType="&OrdDateType&"&OrdDateStart="&OrdDateStart&"&OrdDateEnd="&OrdDateEnd&"&OAid="&OAid&"&h_menu1_1=1"
|
%>
|
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
|
<html xmlns="http://www.w3.org/1999/xhtml">
|
<head>
|
<title><%=LindemanAdmin%></title>
|
<!--#include virtual="/inc/ccs.gds"-->
|
<script src="/js/jquery-1.7.1.min.js" type="text/javascript"></script>
|
<script type="text/javascript">
|
$(function () {
|
$("#div2").css("overflow-x", "scroll").height(16).width($("#div1").width()+20); //设置一个高度10的DIV2层 长度与DIV1层一致
|
$("#div2").html($("#div1").html()); //并给DIV2层填充内容
|
|
$("#div2").scroll(function () {
|
$("#div1")[0].scrollLeft = $("#div2")[0].scrollLeft; //拉动DIV2层滚动条，DIV1层滚动条同步被改变
|
});
|
});
|
</script>
|
</head>
|
|
<body onkeydown="xKeyEvent(event)">
|
<!--#INCLUDE FILE="menu_header.gds" -->
|
<!-- content -->
|
<div id="content">
|
<!--#INCLUDE FILE="Report_menu_left.gds" -->
|
<!-- content / right -->
|
<div id="right">
|
<!-- table -->
|
<div class="box">
|
<!-- box / title -->
|
<div class="title" style="margin: 0 0 1px 0;">
|
<h5><span id="right_Menu" style="display: none;">[<a onclick="JavaScript:JS_left_Menu2('1');" style="color: #ffffff;">显示菜单</a>] </span><%If searchTXT<>"" then%>服务单查询 <%=searchTXT%><%else%><%=OrdDateTypeName1&" "&OrdListName%><%End if%></h5>
|
<ul class="links">
|
<li>
|
<div class="search">
|
<div id="Date_container" class="select-container" style="overflow: hidden;cursor:pointer" onclick="JS_OrdDateType()">
|
<span class="select-content" style="width: 46px;">期间：<%=OrdDateTypeName%></span><span class="arrow" id="Date_arrow"></span>
|
</div>
|
<div id="Date_list" class="select-list scroll-pane" style="overflow: hidden; position: absolute; background-color: white; width: 65px; display: none;background-position: initial initial; background-repeat: initial initial;margin-left: 35px;">
|
<div class="jspContainer" style="width: 63px;">
|
<div style="padding: 0px; top: 0px; width: 63px;">
|
<%for z = 0 to UBOUND(OrdDateTypesPS)
|
OrdDateTypesPS1=SPLIT(OrdDateTypesPS(z),",")
|
vID=OrdDateTypesPS1(0)
|
vtext=OrdDateTypesPS1(1)
|
%>
|
<span title="<%=vtext%>" onmouseover="JS_OrdDateTypeMouseover('OrdDateType_<%=vID%>')" onclick="JS_OrdDateTypeJump('<%=vID%>')" id="OrdDateType_<%=vID%>" class="list-option<%if vID=OrdDateType then Response.Write " option"%>"><%=vtext%></span>
|
<%next%>
|
<span title="自定义" onmouseover="JS_OrdDateTypeMouseover('OrdDateType_0')" onclick="JS_OrdDateTypeCreateOpen()" id="OrdDateType_0" name="OrdDateType" class="list-option">自定义</span>
|
</div>
|
</div>
|
</div>
|
</div>
|
</li>
|
</ul>
|
</div>
|
<div class="dialogJ dialogJfix dialogJshadow" id="OrdDateTypeCreate" style="width: 440px;right: 80px; top: 150px;height:80px ;display:none;">
|
<div class="dialogJtitle">
|
<a href="javascript:JS_OrdDateTypeCreateClose();" class="dialogJclose" title="关闭本窗口"> </a>
|
<span class="dialogJtxt" id="EditPhotoTXT">请选择时间段</span>
|
</div>
|
<div class="dialogJcontent" style="margin-left: 5px;margin-right:5px;">
|
<div class="input" style="float:left;margin-top: 10px;margin-left: 5px;" id="two-inputs">
|
期间：
|
<input type="text" id="OrdDateStart" name="OrdDateStart" class="date" style="width:138px;" value="<%=OrdDateStart%>">
|
至
|
<input type="text" id="OrdDateEnd" name="OrdDateEnd" class="date" style="width:138px;" value="<%=OrdDateEnd%>">
|
<input type="button" class="dialogJbtn first-child" onclick="JS_OrdDateJump()" value="查询">
|
</div>
|
</div>
|
</div>
|
<!--时间选择js liang------------->
|
<link rel="stylesheet" href="css/daterangepicker.css">
|
<script src="js/jquery-1.12.3.min.js"></script>
|
<script src="js/moment.min.js"></script>
|
<script src="js/jquery.daterangepicker.js"></script>
|
<script>
|
$(function()
|
{
|
$('#two-inputs').dateRangePicker(
|
{
|
separator : ' to ',
|
getValue: function()
|
{
|
if ($('#OrdDateStart').val() && $('#OrdDateEnd').val() )
|
return $('#OrdDateStart').val() + ' to ' + $('#OrdDateEnd').val();
|
else
|
return '';
|
},
|
setValue: function(s,s1,s2)
|
{
|
$('#OrdDateStart').val(s1);
|
$('#OrdDateEnd').val(s2);
|
}
|
|
});
|
});
|
</script>
|
<!--时间选择js liang------------->
|
<script type="text/javascript">
|
//时间表列显示下拉菜单
|
function JS_OrdDateType(){
|
if (Date_container.className!="select-container select-container-show-list"){
|
Date_container.className="select-container select-container-show-list";
|
Date_arrow.className="arrow arrow-up";
|
Date_list.style.display="block";
|
OrdClass_container.className="select-container";
|
OrdClass_arrow.className="arrow";
|
OrdClass_list.style.display="none";
|
OrdDateTypeCreate.style.display="none";
|
}
|
else {
|
Date_container.className="select-container";
|
Date_arrow.className="arrow";
|
Date_list.style.display="none";
|
}
|
}
|
//时间表列指针移动到下拉菜单
|
function JS_OrdDateTypeMouseover(id){
|
var d=document.getElementById(id);
|
<%for z = 0 to UBOUND(OrdDateTypesPS)
|
OrdDateTypesPS1=SPLIT(OrdDateTypesPS(z),",")
|
vID=OrdDateTypesPS1(0)
|
vtext=OrdDateTypesPS1(1)
|
%>
|
document.getElementById("OrdDateType_<%=vID%>").className="list-option";
|
<%next%>
|
document.getElementById("OrdDateType_0").className="list-option";
|
d.className="list-option option";
|
}
|
//自定义时间-打开窗口
|
function JS_OrdDateTypeCreateOpen()
|
{
|
JS_OrdDateType();
|
OrdDateTypeCreate.style.display="block";
|
}
|
//自定义时间-关闭窗口
|
function JS_OrdDateTypeCreateClose()
|
{
|
JS_OrdDateType();
|
OrdDateTypeCreate.style.display="none";
|
}
|
//自定义时间-确定时间
|
function JS_OrdDateTypeCreateSave()
|
{
|
document.getElementById('ServiceOrdTraStreet').value=document.getElementById('Duration').value;
|
document.getElementById('ServiceOrdTraEnd').value=document.getElementById('ServiceOrdTraEnd').value;
|
document.getElementById('ServiceOrdTraStreetCoo').value=results.sw.point.lng + ','+ results.sw.point.lat; //起点坐标
|
document.getElementById('ServiceOrdTraEndCoo').value=results.Lu.point.lng + ','+ results.Lu.point.lat; //起点坐标
|
}
|
//时间类表列转跳
|
function JS_OrdDateJump(id){
|
var OrdDateStart=document.getElementById("OrdDateStart").value;
|
var OrdDateEnd=document.getElementById("OrdDateEnd").value;
|
window.location.href='Report_DispatchPerfomance.gds?h_menu1_1=1&OrdState=<%=OrdState%>&OrdClassList=<%=OrdClassList%>&OrdDateType=0&OAid=<%=OAid%>&OrdDateStart='+OrdDateStart+'&OrdDateEnd='+OrdDateEnd;
|
}
|
//自定义时间转跳
|
function JS_OrdDateTypeJump(id){
|
window.location.href='Report_DispatchPerfomance.gds?h_menu1_1=1&OrdState=<%=OrdState%>&OrdClassList=<%=OrdClassList%>&OAid=<%=OAid%>&OrdDateType='+id;
|
}
|
|
//单据类型显示下拉菜单
|
function JS_OrdClassType(){
|
if (OrdClass_container.className!="select-container select-container-show-list"){
|
OrdClass_container.className="select-container select-container-show-list";
|
OrdClass_arrow.className="arrow arrow-up";
|
OrdClass_list.style.display="block";
|
Date_container.className="select-container";
|
Date_arrow.className="arrow";
|
Date_list.style.display="none";
|
OrdDateTypeCreate.style.display="none";
|
}
|
else {
|
OrdClass_container.className="select-container";
|
OrdClass_arrow.className="arrow";
|
OrdClass_list.style.display="none";
|
}
|
}
|
//单据类型指针移动到下拉菜单
|
function JS_OrdClassTypeMouseover(id){
|
var d=document.getElementById(id);
|
<%for z = 0 to UBOUND(OrdClassTypesPS)
|
OrdClassTypesPS1=SPLIT(OrdClassTypesPS(z),",")
|
vID=OrdClassTypesPS1(0)
|
vtext=OrdClassTypesPS1(1)
|
%>
|
document.getElementById("OrdClassType_<%=vID%>").className="list-option";
|
<%next%>
|
document.getElementById("OrdClassType_0").className="list-option";
|
d.className="list-option option";
|
}
|
//时间表列转跳
|
function JS_OrdClassTypeJump(id){
|
window.location.href='Report_DispatchPerfomance.gds?h_menu1_1=1&OrdState=<%=OrdState%>&OrdDateType=<%=OrdDateType%>&OAid=<%=OAid%>&OrdClassList='+id;
|
}
|
|
</script>
|
<!-- end box / title -->
|
<%
|
acc1=clng(request("page"))
|
if acc1=empty then acc1=clng(1)
|
QuantityInt = 20
|
acc2=0
|
acc3=0
|
|
|
%>
|
<!--#include virtual="/inc/SystemMessages.gds" -->
|
<!--<div style="padding: 10px;font-size: 13px;">当前查询统计 单据数量:(开发中) 费用合计:(开发中) </div>-->
|
<div id="div2"></div>
|
<div id="div1" class="table" style="overflow-x:scroll;padding: 0 0px 10px 0px;">
|
|
<form action="" method="post">
|
<table>
|
<thead>
|
<tr style="white-space: nowrap;">
|
<th>序号</th>
|
<th>单据编号</th>
|
<th>日期</th>
|
<th>出车时间</th>
|
<th>出发地</th>
|
<th>目的地</th>
|
<th>车辆</th>
|
<th>公里数</th>
|
<th>绩效计算</th>
|
<th class="last">出车人员名单</th>
|
|
</tr>
|
</thead>
|
<tbody>
|
|
<%
|
if searchTXT<>"" Then
|
searchSql=""
|
If Len(searchTXT)=14 And Not IsNumeric(Left(searchTXT,2)) And IsNumeric(Mid(searchTXT,3,8)) And IsNumeric(Right(searchTXT,3)) And Mid(searchTXT,11,1)="-" Then
|
searchSql=" DispatchOrdClass='"&Left(searchTXT,2)&"' and CONVERT(VARCHAR(10),DispatchOrd_NS_Time,120)=CONVERT(VARCHAR(10),'"&Mid(searchTXT,3,4)&"-"&Mid(searchTXT,7,2)&"-"&Mid(searchTXT,9,2)&"',120) and Right('00'+convert(varchar(3),DispatchOrdNo),3)='"&Right(searchTXT,3)&"' "
|
ElseIf Len(searchTXT)=10 And IsNumeric(searchTXT) Then
|
searchSql=" DispatchOrdID="&Right(searchTXT,10)&" "
|
Else
|
searchSql=" (ServiceOrdCoName like '%"&searchTXT&"%' or ServiceOrdCoPhone like '%"&searchTXT&"%' or ServiceOrdPtName like '%"&searchTXT&"%' or ServiceOrdTraStreet like '%"&searchTXT&"%' or ServiceOrdTraEnd like '%"&searchTXT&"%') "
|
End if
|
else
|
'按实际返回时间统计
|
'searchSql=" DispatchOrdReturnDate "&SqlOrdDateType&" "
|
'按订单生成时间统计
|
searchSql=" DispatchOrd_NS_Time "&SqlOrdDateType&" "
|
If OrdState="0" Then
|
searchSql=searchSql&" and DispatchOrdState<>10 "
|
ElseIf OrdState="1" Then
|
searchSql=searchSql&" and DispatchOrdState in (0) "
|
ElseIf OrdState="2" Then
|
searchSql=searchSql&" and DispatchOrdState in (1,2) "
|
ElseIf OrdState="4" Then
|
searchSql=" DispatchOrdState in (4,5,6,7) "
|
ElseIf OrdState="8_0" Then
|
searchSql=" DispatchOrdState in (8) and DispatchOrdMileage=0 "
|
ElseIf OrdState="8_1" Then
|
searchSql=" DispatchOrdState in (8) and DispatchOrdMileage>0 "
|
Else
|
searchSql=searchSql&" and DispatchOrdState in ("&OrdState&") "
|
End If
|
If OrdClassList<>"0" Then
|
searchSql=searchSql&" and ServiceOrdClass='"&OrdClassList&"' "
|
End if
|
end If
|
|
'单人查询
|
If OAid<>"" Then
|
searchSql=searchSql&" and DispatchOrdID in (select DispatchOrdIDDt from DispatchOrd_Entourage where EntourageOAid="&OAid&" and EntourageState<>4) " 'and DispatchOrd_AP_Check=1
|
End If
|
|
'人员列表
|
sql="select vID,vtext from dictionary where vType=1 and vtitle='DispatchOrdEntourage' order by vOrder"
|
rs.open sql,objConn,1,1
|
i=0
|
EntourageIDs=""
|
do while not rs.Eof
|
EntourageID = rs("vID")
|
EntourageName= rs("vtext")
|
EntourageNames=EntourageNames&","&EntourageName
|
EntourageIDs=EntourageIDs&","&EntourageID
|
i=i+1
|
rs.movenext
|
loop
|
rs.close()
|
EntourageNamePS = SPLIT(EntourageNames,",")
|
EntourageIDPS = SPLIT(EntourageIDs,",")
|
|
|
i=1
|
'sql="select * from DispatchOrd LEFT JOIN ServiceOrder on ServiceOrdIDDt=ServiceOrdID where "&searchSql&" order by DispatchOrdID desc"
|
sql="select DispatchOrdID,DispatchOrdClass,ServiceOrdIDDt,DispatchOrdNo,DispatchOrd_NS_Time,DispatchOrdActualDate,DispatchOrd_NS_Time,DispatchOrdReturnDate,DispatchOrdTraStreet,DispatchOrdTraVia,DispatchOrdTraEnd,DispatchOrdPerfomance,DispatchOrdMileage,DispatchOrdCarID,ServiceOrdVIP,DispatchOrd_AP_Check,TransferModeID=(select ','+CONVERT(varchar(2),TransferModeID) from ServiceOrd_TransferMode where ServiceOrdTMID=ServiceOrdID for xml path(''))+',' from DispatchOrd LEFT JOIN ServiceOrder on ServiceOrdIDDt=ServiceOrdID where "&searchSql&""
|
'Response.Write sql
|
rs.open sql,objConn,1,1
|
if not rs.eof then
|
rs.pagesize=QuantityInt
|
rs.absolutepage=acc1
|
acc2=rs.pagecount
|
acc3=rs.recordcount
|
else
|
SystemMessageType=2
|
SystemMessageTXT="数据库中相关无数据！"
|
end if
|
do while not rs.Eof and i<=QuantityInt
|
DispatchOrdID = rs("DispatchOrdID") '调度单号
|
DispatchOrdClass = rs("DispatchOrdClass") '调度单单据类型
|
ServiceOrdIDDt = rs("ServiceOrdIDDt") '受理单号
|
DispatchOrdActualDate = rs("DispatchOrdActualDate") '实际出车时间
|
DispatchOrdReturnDate = rs("DispatchOrdReturnDate") '实际返回时间
|
DispatchOrd_NS_Time = rs("DispatchOrd_NS_Time") '订单生成时间
|
DispatchOrdTraStreet = rs("DispatchOrdTraStreet") '出发地
|
DispatchOrdTraVia = rs("DispatchOrdTraVia")
|
DispatchOrdTraEnd = rs("DispatchOrdTraEnd") '目的地
|
DispatchOrdPerfomance = rs("DispatchOrdPerfomance") '绩效计算
|
DispatchOrdMileage = rs("DispatchOrdMileage") '实际里程数
|
DispatchOrdCarID = rs("DispatchOrdCarID") '车辆ID
|
ServiceOrdVIP = rs("ServiceOrdVIP")
|
TransferModeID = rs("TransferModeID") '运转方式ID
|
DispatchOrd_AP_Check = rs("DispatchOrd_AP_Check")
|
DispatchOrdNo = DispatchOrdClass& year(rs("DispatchOrd_NS_Time"))&Right("0"&month(rs("DispatchOrd_NS_Time")),2)&Right("0"&day(rs("DispatchOrd_NS_Time")),2) & "-"&Right("00"&rs("DispatchOrdNo"),3)
|
If DispatchOrdTraVia<>"" then
|
OrdTraVia=DispatchOrdTraVia
|
Else
|
OrdTraVia=DispatchOrdTraStreet
|
End If
|
|
i=i+1
|
|
If DispatchOrdClass="SP" Then DispatchOrdTraStreet="驻点单"
|
If DispatchOrdActualDate<>"" Then
|
ActualDate=FORMATDATETIME(DispatchOrdActualDate,vbShortDate)
|
End If
|
If DispatchOrdActualDate<>"" And DispatchOrdReturnDate<>"" Then
|
DispatchOrdTime=Right("0"&Hour(DispatchOrdActualDate),2) &":"& Right("0"&Minute(DispatchOrdActualDate),2) &"-"
|
If dateDiff("d",DispatchOrdActualDate,DispatchOrdReturnDate)=0 then
|
DispatchOrdTime = DispatchOrdTime & Right("0"&Hour(DispatchOrdReturnDate),2) &":"& Right("0"&Minute(DispatchOrdReturnDate),2)
|
ElseIf dateDiff("d",DispatchOrdActualDate,DispatchOrdReturnDate)=1 then
|
DispatchOrdTime = DispatchOrdTime & "次日"&Right("0"&Hour(DispatchOrdReturnDate),2) &":"& Right("0"&Minute(DispatchOrdReturnDate),2)
|
Else
|
DispatchOrdTime = DispatchOrdTime & day(DispatchOrdReturnDate)&"号"&Right("0"&Hour(DispatchOrdReturnDate),2) &":"& Right("0"&Minute(DispatchOrdReturnDate),2)
|
End if
|
End If
|
If DispatchOrdCarID<>"" And DispatchOrdCarID<>"0" Then DispatchOrdCarLicense=CarDataA(DispatchOrdCarID,"","CarLicense")
|
|
'特殊订单类型
|
If ServiceOrdVIP="1" Then
|
ServiceOrdVIPTXT="[<span style='color: #E91E63;font-weight: bold;'>VIP</span>]"
|
ElseIf InStr(TransferModeID,",4,")>0 Then
|
ServiceOrdVIPTXT="[<span style='color: #E91E63;font-weight: bold;'>特殊绩效</span>]"
|
Else
|
ServiceOrdVIPTXT=""
|
End If
|
%>
|
<tr style="white-space: nowrap;">
|
<td class="selected"><%=i+((acc1-1)*QuantityInt)-1%></td>
|
<td class="category category2"><A HREF="DispatchOrder_End.gds?DispatchOrdID=<%=DispatchOrdID%>&OrdDateType=<%=OrdDateType%>&OrdClassList=<%=OrdClassList%>&h_menu1_1=1"<%If DispatchOrd_AP_Check=0 Then Response.Write "style=""color: #f00;"""%>><%=DispatchOrdNo&ServiceOrdVIPTXT%></A></td>
|
<td class="category1 category2"><%=ActualDate%></td>
|
<td class="category category2"><%=DispatchOrdTime%></td>
|
<td class="category category2"><%=OrdTraVia%></td>
|
<td class="category category2"><%=DispatchOrdTraEnd%></td>
|
<td class="category category2"><%=CarDataA(DispatchOrdCarID,"","CarLicense")%></td>
|
<td class="category category2"><%=DispatchOrdMileage%></td>
|
<td class="category category2" style="text-align: right;"><%=FormatCurrency(DispatchOrdPerfomance,0)%></td>
|
<td class="category category2 last" style="text-align: left;line-height: 13px;<%If DispatchOrd_AP_Check=0 Then Response.Write "color: #f00;"%>">
|
<%
|
for j = 1 to UBOUND(EntourageIDPS)
|
EntourageID = EntourageIDPS(j)
|
EntourageName = EntourageNamePS(j)
|
EntourageOAName=EntourageOANameA(EntourageID,DispatchOrdID,"UserNameReport")
|
If DispatchOrdClass="SP" Then EntourageOAName=Replace(EntourageOAName,"未填写完成报告单","已派单")
|
If EntourageOAName<>"" Then Response.Write "（"&EntourageName&"）"&EntourageOAName&"<br>"
|
Next
|
If EntourageName_aid1<>"" Then Response.Write EntourageName_aid1&"（外援人员）<br>"
|
If EntourageName_aid2<>"" Then Response.Write EntourageName_aid2&"（外援人员）<br>"
|
%>
|
</td>
|
<%If DispatchOrdActualDate<>"" Then DispatchOrdActualDate=FORMATDATETIME(DispatchOrdActualDate,vbShortDate)&" "&Right("0"&hour(DispatchOrdActualDate),2)&":"&Right("0"&Minute(DispatchOrdActualDate),2)%>
|
</tr>
|
<%rs.movenext
|
loop
|
rs.close()
|
%>
|
<%for j=i to 20%>
|
<tr>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td class="last"> </td>
|
</tr>
|
<%next%>
|
</tbody>
|
</table>
|
|
</form>
|
</div>
|
<!-- pagination -->
|
<div class="pagination pagination-left" style="padding-left: 20px;padding-right:20px;">
|
<div class="results">
|
<%
|
ShowingLeast = (acc1-1)*QuantityInt+1
|
ShowingMax = QuantityInt*acc1
|
if ShowingMax>acc3 then ShowingMax=acc3
|
%>
|
<span><%="显示 "& ShowingLeast &"-"& ShowingMax &" of "&acc3%></span>
|
</div>
|
<%if acc2>1 then%>
|
<ul class="pager">
|
<%if acc1=1 then%>
|
<li class="disabled">« 上页</li>
|
<%else%>
|
<li><a href="?page=<%=acc1-1%><%=page_URL%>">« 上页</a></li>
|
<%end if%>
|
<%
|
acc4=""
|
for i=1 to acc2
|
if acc2<=9 then
|
acc4=acc4&","&i
|
else
|
if i=1 then
|
acc4=acc4&","&i
|
elseif acc1<=5 and i<=7 then
|
acc4=acc4&","&i
|
elseif acc1>=acc2-4 and i>=acc2-6 then
|
acc4=acc4&","&i
|
elseif i>=acc1-2 and i<=acc1+2 then
|
acc4=acc4&","&i
|
elseif i=acc2 then
|
acc4=acc4&","&i
|
elseif i=2 or i=acc2-1 then
|
acc4=acc4&",0"
|
end if
|
end if
|
next
|
acc4SP=SPLIT(acc4,",")
|
for i = 1 to UBOUND(acc4SP)%>
|
<%if acc4SP(i)="0" then%>
|
<li class="separator">...</li>
|
<%elseif acc1=cint(acc4SP(i)) then%>
|
<li class="current"><%=acc4SP(i)%></li>
|
<%else%>
|
<li><a href="?page=<%=acc4SP(i)%><%=page_URL%>"><%=acc4SP(i)%></a></li>
|
<%end if%>
|
<%next%>
|
<%if acc1>=acc2 then%>
|
<li class="disabled">下页 »</li>
|
<%else%>
|
<li><a href="?page=<%=acc1+1%><%=page_URL%>">下页 »</a></li>
|
<%end if%>
|
</ul>
|
<%end if%>
|
</div>
|
<!-- end pagination -->
|
</div>
|
<!-- end table -->
|
|
|
|
</div>
|
<!-- end content / right -->
|
</div>
|
<!-- end content -->
|
<!--#include FILE="vicgame.asp"-->
|
</body>
|
</html>
|
