<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
|
<%Session.CodePage=65001%>
|
<!--#include virtual="/inc/chkadmin.gds"-->
|
<!--#include virtual="/inc/function.gds"-->
|
<%
|
if isDepartment("070116")=0 then
|
Response.Redirect "/"
|
Response.End()
|
end If
|
|
searchTXT=SafeRequest(Request("searchTXT"))
|
orderby=SafeRequest(Request("orderby"))
|
UnitNameID=SafeRequest(Request("UnitNameID"))
|
CoopUnitID=SafeRequest(Request("CoopUnitID"))
|
|
Set rs = Server.CreateObject("ADODB.Recordset")
|
'默认显示字段
|
If OrdState="" Then OrdState=0
|
If OrdClassList="" Then OrdClassList="0"
|
If OrdClassList="0" Then
|
OrdClassName="未审核"
|
ElseIf OrdClassList="1" Then
|
OrdClassName="已审核"
|
Else
|
OrdClassName="全部"
|
End if
|
|
'各种返回信息
|
SystemMessageType=trim(Request("SystemMessageType"))
|
SMT=trim(Request("SMT"))
|
if SystemMessageType<>"" then
|
if SMT="1" then
|
SystemMessageTXT="请选择日期"
|
ElseIf SMT="2" then
|
SystemMessageTXT="锁定完成"
|
end if
|
end if
|
|
|
If OrdState<>"0" then
|
OrdListName = ServiceOrdStateA(OrdState)&"记录"
|
Else
|
OrdListName = "业务量统计表(按业务类型)"
|
End If
|
|
OrdDateType=SafeRequest(Request("OrdDateType"))
|
OrdDateStart=SafeRequest(Request("OrdDateStart"))
|
OrdDateEnd=SafeRequest(Request("OrdDateEnd"))
|
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 vtitle='OrdDateType2' and vID="&OrdDateType
|
rs.open Sql,objConn,1,1
|
If not rs.Eof Then
|
OrdDateTypeName = DateName_A(rs("vtext"))
|
OrdDateTypeName1=OrdDateTypeName
|
SqlOrdDateType = rs("vOrder2")
|
Else
|
OrdDateType=4
|
OrdDateTypeName=DateName_A("本月")
|
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
|
'时间段列表
|
sql="select vID,vtext from dictionary where vtitle='OrdDateType2' order by vOrder"
|
rs.open Sql,objConn,1,1
|
do while not rs.Eof
|
OrdDateTypes = OrdDateTypes & rs("vID") &","& DateName_A(rs("vtext")) & "|"
|
rs.movenext
|
Loop
|
rs.close()
|
OrdDateTypes = left(OrdDateTypes,len(OrdDateTypes)-1)
|
OrdDateTypesPS = SPLIT(OrdDateTypes,"|")
|
|
'公司列表
|
If UnitNameID<>"" Then
|
Response.Cookies("CAME")("UnitNameID")=UnitNameID
|
ElseIf UnitNameID="" And Request.Cookies("CAME")("UnitNameID")<>"" Then
|
UnitNameID=Request.Cookies("CAME")("UnitNameID")
|
End If
|
UnitNameName="全部"
|
UnitNames = "0,全部|"
|
sql="select vID,vtext,vType from dictionary where vType>=0 and vtitle='UnitName' order by vType desc,vOrder"
|
rs.open Sql,objConn,1,1
|
do while not rs.Eof
|
UnitName=rs("vtext")
|
If rs("vType")=0 Then UnitName=UnitName&"(停用)"
|
UnitNames = UnitNames & rs("vID") &","& UnitName & "|"
|
If UnitNameID=CStr(rs("vID")) Then UnitNameName = UnitName
|
rs.movenext
|
Loop
|
rs.close()
|
UnitNames = left(UnitNames,len(UnitNames)-1)
|
UnitNamesPS = SPLIT(UnitNames,"|")
|
|
'合作公司列表
|
CoopUnitName="未选择"
|
CoopUnits = "0,未选择|"
|
If CoopUnitID<>"" And CoopUnitID<>"0" Then CoopUnitName="多选"
|
If Left(CoopUnitID,2)="0," Then CoopUnitID=Mid(CoopUnitID,3)
|
sql="select UnitID,UnitShort from IntroducerUnitData where UnitState=1 and (ServiceBranch='' or ServiceBranch is null) order by UnitID desc"
|
rs.open Sql,objConn,1,1
|
do while not rs.Eof
|
CoopUnits = CoopUnits & rs("UnitID") &","& rs("UnitShort") & "|"
|
If CoopUnitID=CStr(rs("UnitID")) Then CoopUnitName = rs("UnitShort")
|
rs.movenext
|
Loop
|
rs.close()
|
CoopUnits = left(CoopUnits,len(CoopUnits)-1)
|
CoopUnitsPS = SPLIT(CoopUnits,"|")
|
|
'任务单锁定列表
|
OrdLockingList = ""
|
sql="select vID,vtext,vType,vMono from dictionary where vType>=0 and vtitle='OrdLockingList' and vMono='"&OrdDateTypeName1&"' order by vType desc,vOrder"
|
rs.open Sql,objConn,1,1
|
do while not rs.Eof
|
OrdLockingID=rs("vID")
|
OrdLockingUnitShort=rs("vtext")
|
OrdLockingData=rs("vMono")
|
OrdLockingList = OrdLockingList & OrdLockingID &","& OrdLockingUnitShort &","& OrdLockingData & "|"
|
rs.movenext
|
Loop
|
rs.close()
|
If OrdLockingList<>"" Then OrdLockingList = left(OrdLockingList,len(OrdLockingList)-1)
|
OrdLockingListPS = SPLIT(OrdLockingList,"|")
|
|
|
page_URL="&OrdDateType="&OrdDateType&"&OrdDateStart="&OrdDateStart&"&OrdDateEnd="&OrdDateEnd&"&searchTXT="&searchTXT&"&orderby="&orderby&"&h_menu1_1=1&UnitNameID="&UnitNameID&"&CoopUnitID="&CoopUnitID
|
|
%>
|
<!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"-->
|
</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">
|
<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">
|
<%If OrdDateTypeName1<>"时间段" And isDepartment("030211")=1 Then%>
|
<li><a onClick="form1_OrdLocking_JS()">财务锁定提交</a></li>
|
<script LANGUAGE="javascript">
|
//财务锁定提交
|
function form1_OrdLocking_JS(){
|
if(confirm("确定锁定相关服务单和调度单?"))
|
{
|
document.form1.action = "admin_save.gds";
|
document.form1.admin_save.value="148"
|
form1.submit();
|
}
|
}
|
</script>
|
<%End If%>
|
<li><a href="Report_DispatchUnitSum_csv.gds?1=1<%=page_URL%>">导出csv</a></li>
|
<%if isDepartment("070109")=1 then%>
|
<li>
|
<%
|
'下拉菜单设定
|
DownMenuName="公司" '菜单名称
|
DownMenuNameID="UnitNameID" '菜单ID
|
DownMenuOldName=UnitNameName '默认值名称
|
DownMenuOldID=UnitNameID '默认值ID
|
%>
|
<div class="search">
|
<div name="DownMenu_container" id="<%=DownMenuNameID%>_container" class="select-container" style="overflow: hidden;cursor:pointer" onclick="JS_DownMenu('<%=DownMenuNameID%>')">
|
<span class="select-content" style="width: 46px;" id="<%=DownMenuNameID%>_span"><%=DownMenuName%>:<%=DownMenuOldName%></span><span class="arrow" id="<%=DownMenuNameID%>_arrow" name="DownMenu_arrow"></span>
|
</div>
|
<div name="DownMenu_list" id="<%=DownMenuNameID%>_list" class="select-list scroll-pane" style="overflow: hidden; position: absolute; background-color: white; width: 105px; display: none;background-position: initial initial; background-repeat: initial initial;margin-left: 69px;">
|
<div class="jspContainer" style="width: 105px;">
|
<div style="padding: 0px; top: 0px; width: 105px;">
|
<%for z = 0 to UBOUND(UnitNamesPS)
|
UnitNamesPS1=SPLIT(UnitNamesPS(z),",")
|
vID=UnitNamesPS1(0)
|
vtext=UnitNamesPS1(1)
|
%>
|
<span title="<%=vtext%>" name="DownMenu_<%=DownMenuNameID%>" onmouseover="JS_DownMenuMouseover('<%=DownMenuNameID%>',<%=z%>)" onclick="JS_DownMenuJump2('<%=DownMenuNameID%>','<%=vID%>','<%=DownMenuName&":"&vtext%>')" class="list-option<%if vID=DownMenuOldID then Response.Write " option"%>"><%=vtext%></span>
|
<%next%>
|
</div>
|
</div>
|
</div>
|
</div>
|
</li>
|
<%End If%>
|
|
<li>
|
<%
|
'多选下拉菜单设定
|
DownMenuName="合作单位" '菜单名称
|
DownMenuNameID="CoopUnitID" '菜单ID
|
DownMenuOldName=CoopUnitName '默认值名称
|
DownMenuOldID=CoopUnitID '默认值ID
|
%>
|
<div class="search">
|
<div name="DownMenu_container" id="<%=DownMenuNameID%>_container" class="select-container" style="overflow: hidden;cursor:pointer" onclick="JS_DownMenu('<%=DownMenuNameID%>')">
|
<span class="select-content" style="width: 46px;" id="<%=DownMenuNameID%>_span"><%=DownMenuName%>:<%=DownMenuOldName%></span><span class="arrow" id="<%=DownMenuNameID%>_arrow" name="DownMenu_arrow"></span>
|
</div>
|
<div name="DownMenu_list" id="<%=DownMenuNameID%>_list" class="select-list scroll-pane" style="overflow: hidden; position: absolute; background-color: white; width: 420px; display: none;background-position: initial initial; background-repeat: initial initial;margin-left: 69px;">
|
<div class="jspContainer">
|
<div style="padding: 0px; top: 0px;">
|
<%for z = 0 to UBOUND(CoopUnitsPS)
|
CoopUnitsPS1=SPLIT(CoopUnitsPS(z),",")
|
vID=CoopUnitsPS1(0)
|
vtext=CoopUnitsPS1(1)
|
%>
|
<span title="<%=vtext%>" name="DownMenu_<%=DownMenuNameID%>" onmouseover="JS_DownMenuMouseover('<%=DownMenuNameID%>',<%=z%>)" class="list-option<%if vID=DownMenuOldID then Response.Write " option"%>"><input type="checkbox" name="MultiMenu_<%=DownMenuNameID%>" value="<%=vID%>"> <span onclick="JS_DownMenuJump2('<%=DownMenuNameID%>','<%=vID%>','<%=DownMenuName&":"&vtext%>')"><%=vtext%></span></span>
|
<%If InStr(","&DownMenuOldID&",",","&vID&",")>0 And z>0 Then%><script type="text/javascript">document.getElementsByName("MultiMenu_<%=DownMenuNameID%>")[<%=z%>].checked=true;</script><%End If%>
|
<%next%>
|
<input type="button" value="提交" style="margin-left: 12PX;margin-top: 5px;" onclick="JS_DownMultiMenuJump2('<%=DownMenuNameID%>','<%=DownMenuName%>')"/>
|
</div>
|
</div>
|
</div>
|
</div>
|
</li>
|
<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;" id="OrdDateType_span">期间:<%=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_OrdDateTypeJump2('<%=vID%>','期间:<%=vtext%>')" 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>
|
<div class="search">
|
<form action="?" method="post">
|
<div class="input">
|
<input name="orderby" id="Menu_orderby" type="hidden" value="<%=orderby%>">
|
<input name="UnitNameID" id="Menu_UnitNameID" type="hidden" value="<%=UnitNameID%>">
|
<input name="CoopUnitID" id="Menu_CoopUnitID" type="hidden" value="<%=CoopUnitID%>">
|
|
<input name="OrdDateType" id="Menu_OrdDateType" type="hidden" value="<%=OrdDateType%>">
|
<input name="OrdDateStart" id="Menu_OrdDateStart" type="hidden" value="<%=OrdDateStart%>">
|
<input name="OrdDateEnd" id="Menu_OrdDateEnd" type="hidden" value="<%=OrdDateEnd%>">
|
<input type="text" id="searchTXT" name="searchTXT" value="<%=searchTXT%>" />
|
</div>
|
<div class="button">
|
<input type="submit" name="submit" value="搜索" />
|
</div>
|
</form>
|
</div>
|
</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%>">
|
</div>
|
<div class="input" style="float:left;margin-top: 5px;margin-left: 5px;"><input type="button" class="dialogJbtn first-child" onclick="JS_OrdDateJump2()" 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);
|
}
|
|
});
|
});
|
$(document).ready(function(){
|
$('#checkAll').click(function(){
|
if ($('#checkAll').text()=="全选")
|
{
|
$('input[type="checkbox"]').prop('checked', true);
|
$('#checkAll').text("取消");
|
}else if ($('#checkAll').text()=="取消")
|
{
|
$('input[type="checkbox"]').removeAttr('checked');
|
$('#checkAll').text("全选");
|
}
|
});
|
});
|
</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;
|
var searchTXT=document.getElementById("searchTXT").value;
|
window.location.href='Report_DispatchUnitSum.gds?h_menu1_1=1&OrdState=<%=OrdState%>&OrdClassList=<%=OrdClassList%>&UnitNameID=<%=UnitNameID%>&CoopUnitID=<%=CoopUnitID%>&OrdDateType=0&searchTXT='+searchTXT+'&OrdDateStart='+OrdDateStart+'&OrdDateEnd='+OrdDateEnd;
|
}
|
//自定义时间转跳
|
function JS_OrdDateTypeJump(id){
|
var searchTXT=document.getElementById("searchTXT").value;
|
window.location.href='Report_DispatchUnitSum.gds?h_menu1_1=1&OrdState=<%=OrdState%>&OrdClassList=<%=OrdClassList%>&UnitNameID=<%=UnitNameID%>&CoopUnitID=<%=CoopUnitID%>&searchTXT='+searchTXT+'&OrdDateType='+id;
|
}
|
|
//时间表列转跳
|
function JS_OrdClassTypeJump(id){
|
var searchTXT=document.getElementById("searchTXT").value;
|
window.location.href='Report_DispatchUnitSum.gds?h_menu1_1=1&OrdState=<%=OrdState%>&OrdDateType=<%=OrdDateType%>&UnitNameID=<%=UnitNameID%>&CoopUnitID=<%=CoopUnitID%>&searchTXT='+searchTXT+'&OrdClassList='+id;
|
}
|
|
</script>
|
<!-- end box / title -->
|
<%'数据读取
|
is_CSV=0%>
|
<!--#include virtual="Report_DispatchUnitSum_Data.gds" -->
|
|
<!--#include virtual="/inc/SystemMessages.gds" -->
|
<div class="table" style="overflow:auto">
|
<table>
|
<%If SystemMessageType<>"2" then%>
|
<thead>
|
<tr style="white-space: nowrap;">
|
<%
|
For X=Lbound(FormArray)+1 to Ubound(FormArray)
|
If X=Ubound(FormArray) Then
|
classHtml=" class=""last"""
|
ElseIf X=1 Then
|
classHtml=" class=""selected"""
|
Else
|
classHtml=""
|
End If
|
If FormArray(X,0)="全选" Then
|
Response.Write "<th id='checkAll'>全选</th>"
|
Else
|
Response.Write "<th"&classHtml&">"&FormArray(X,0)&"</th>"
|
End If
|
Next%>
|
</tr>
|
</thead>
|
<tbody>
|
<form id="form1" name="form1" action="admin_save.gds" method="post">
|
<input name="admin_save" type="hidden" value="">
|
<input name="UnitNameID" type="hidden" value="<%=UnitNameID%>">
|
<input name="CoopUnitID" type="hidden" value="<%=CoopUnitID%>">
|
<input name="OrdDateType" type="hidden" value="<%=OrdDateType%>">
|
<input name="OrdDateStart" type="hidden" value="<%=OrdDateStart%>">
|
<input name="OrdDateEnd" type="hidden" value="<%=OrdDateEnd%>">
|
<input name="OrdDateTypeName" type="hidden" value="<%=OrdDateTypeName1%>">
|
<%
|
i=0
|
For Y=Lbound(FormArray,2)+2 to Ubound(FormArray,2)
|
If FormArray(1,Y)<>"" Then%>
|
<tr style="white-space: nowrap;">
|
<%If OrdDateTypeName1<>"时间段" And isDepartment("030211")=1 Then%>
|
<td class="selected" style="width: 1%;">
|
<%
|
IsLocking=""
|
for z = 0 to UBOUND(OrdLockingListPS)
|
OrdLockingListPS1=SPLIT(OrdLockingListPS(z),",")
|
OrdLockingID=OrdLockingListPS1(0)
|
OrdLockingUnitShort=OrdLockingListPS1(1)
|
OrdLockingData=OrdLockingListPS1(2)
|
If OrdLockingUnitShort=FormArray(1,Y) Then
|
IsLocking="1"
|
End If
|
Next
|
%>
|
<input type="checkbox" name="OrdLocking"<%If IsLocking="1" Then Response.Write " checked=""checked"""%> value="<%=FormArray(1,Y)%>"/>
|
</td>
|
<%End If%>
|
<%For X=Lbound(FormArray)+1 to Ubound(FormArray)
|
If X=Ubound(FormArray) Then
|
classHtml=" class=""category category2 last"""
|
ElseIf X=1 Then
|
classHtml=" class=""selected"""
|
Else
|
classHtml=" class=""category category2"""
|
End If
|
Response.Write "<td"&classHtml&">"&FormArray(X,Y)&"</th>"
|
Next%>
|
</tr>
|
<%End If
|
Next%>
|
</form>
|
<%End If%>
|
<%for j=Y to 20%>
|
<tr>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<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>
|
</div>
|
</div>
|
<!-- end table -->
|
|
|
|
</div>
|
<!-- end content / right -->
|
</div>
|
<!-- end content -->
|
<!--#include FILE="vicgame.asp"-->
|
<IFRAME id="HiddenFrame" name="HiddenFrame" WIDTH=0 HEIGHT=0 MARGINWIDTH=0 MARGINHEIGHT=0 HSPACE=0 VSPACE=0 FRAMEBORDER=0 SCROLLING=no BORDERCOLOR=#ffffff></IFRAME>
|
</body>
|
</html>
|