【调度系统】广东民航医疗快线调度系统源代码
wanglizhong
2025-05-05 14553e97825d8c112ce2c40275e0c71b79fe3121
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%Session.CodePage=65001%>
<%
'Response.Cookies("OA")("adminID")=""
'Response.end
CompetencyID=request("CompetencyID")
state=request("state")
If state<>"" Then
    stateSP=split(state,"|")
    for i = 0 to UBOUND(stateSP)
        If InStr(stateSP(i),"CompetencyID=")=1 Then
            CompetencyID=Replace(stateSP(i),"CompetencyID=","")
        End If
    Next
End If
if CompetencyID="" Then
    CompetencyID=3
End If
state=CompetencyID%>
<!--#include virtual="/weixin/OAuth2.gds"-->
<!--#include virtual="/inc/function.gds"-->
<!--#include virtual="/weixin/sha1.gds"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<meta name="viewport" content="width=device-width, height=device-height, initial-scale=1, maximum-scale=1, user-scalable=no">  
<title>实时排班查询</title>
<link href="css/main.css" type="text/css" rel="stylesheet">
</head>
<body>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
%>
 
 
    <!--人员选择-->
    <div id="m_Entourage" style="display:none;">
            <input name="window_EntourageID" type="hidden" value="">
            <input name="window_OA_CompetencyID" type="hidden" value="">
            <div class="address_list">
                    <div class="tolist">
 
                        <div class="settings-item">
                            <div class="inner-settings-item flexbox to">
                                <div class="title flexItem"><p class="name">实时排班查询&nbsp;&nbsp;&nbsp;&nbsp;
                                    <a href="?CompetencyID=3" <%If CompetencyID="3" Then Response.Write " style=""color: #2196F3;"""%>>医生</a>&nbsp;&nbsp;
                                    <a href="?CompetencyID=4" <%If CompetencyID="4" Then Response.Write " style=""color: #2196F3;"""%>>护士</a>&nbsp;&nbsp;
                                    <a href="?CompetencyID=2" <%If CompetencyID="2" Then Response.Write " style=""color: #2196F3;"""%>>司机</a>
                                </p></div>
                            </div>
                        </div>
 
                    </div>
            </div>
            <p style="font-size: 14px;margin: 5px;color:#e91e63;">Tips:功能正在测试中,仅作参考。</p>
            <div id="tomain" class="wrap_inner">
                <div class="address_list">
                    <div class="tolist" id="EntourageList">
 
                        <div class="settings-item">
                            <div class="inner-settings-item flexbox to">
                                <div class="title flexItem"><p class="name">正在加载中...</p></div>
                            </div>
                        </div>
 
                    </div>
                </div>
            </div>
    </div>
    <IFRAME id="HiddenFrame" name="HiddenFrame" WIDTH=0 HEIGHT=0 MARGINWIDTH=0 MARGINHEIGHT=0 HSPACE=0 VSPACE=0 FRAMEBORDER=0 SCROLLING=no BORDERCOLOR=#ffffff></IFRAME>
 
    <script>
    function showEntourage(EntourageID,OA_CompetencyID){
            
            //alert(event.clientX+document.documentElement.scrollTop);
            document.getElementById('m_Entourage').style.display='';
            document.all.window_EntourageID.value=EntourageID;
            document.all.window_OA_CompetencyID.value=OA_CompetencyID;
            window.HiddenFrame.location.replace('AdminUserSearch.gds?OA_CompetencyID='+OA_CompetencyID+'&EntourageSearchTXT=Schedules');
    }
    function closeEntourage(){
                document.getElementById('m_Orer').style.display='';
                document.getElementById('m_Entourage').style.display='none';
                document.body.scrollTop=1000;
    }
    function EnterPress(e){ //传入 event 
    var e = e || window.event; 
    if(e.keyCode == 13){JS_EntourageSearch();} 
    } 
    //选择人员查询
    function JS_EntourageSearch()
    {
    OA_CompetencyID=document.all.window_OA_CompetencyID.value;
    window.HiddenFrame.location.replace('AdminUserSearch.gds?OA_CompetencyID='+OA_CompetencyID+'&EntourageSearchTXT=Schedules');
    }
    //选择人员
    function JS_EntourageSave(OACompetencyID,OAID,OAname,OAavator,OACompetencyName)
    {
        var EntourageLong_is = document.getElementById('EntourageLong_is_'+OAID);
        //alert('/admin_save.gds?admin_save=37&DispatchOrdID=<%=DispatchOrdID%>&OACompetencyID='+OACompetencyID+'&EntourageOAid='+OAID+'&EntourageLong_is='+EntourageLong_is.checked);
        if (EntourageLong_is.checked){OACompetencyName="跟车"+OACompetencyName;EntourageLong_is='1';}else{EntourageLong_is='0';}
        if (OAID!=""){confirmTXT="确定指派"+OAname+"为本次任务的["+OACompetencyName+"]?";}
        else {confirmTXT="确定删除["+OACompetencyName+"]?";}
        if(confirm(confirmTXT)){
            var EntourageID=document.all.window_EntourageID.value
            document.getElementById('posi1').style.display='';
            document.getElementById('posi').style.display='none';
            document.getElementById("posi1TXT").innerHTML='正在保存..'
            document.getElementById("Entourage_"+EntourageID).innerHTML="<img src='"+OAavator+"'><div class='os_name'>"+OAname+"<br>"+OACompetencyName+"</div><div class='os_price'>已保存</span></div><div class='os_weight'></div>";
            window.HiddenFrame.location.replace('/admin_save.gds?admin_save=37&DispatchOrdID=<%=DispatchOrdID%>&OACompetencyID='+OACompetencyID+'&EntourageOAid='+OAID+'&EntourageLong_is='+EntourageLong_is);
            closeEntourage();
        }
    }
    //显示人员列表窗口
    function JS_EntourageList(EntourageListArray,acc1,acc2,EntourageSearchTXT,OA_CompetencyID,OA_CompetencyName)
    {
        var EntourageListHTML = "";
        var EntourageID=document.all.window_EntourageID.value
        var i = 0;
        if (EntourageListArray.length>0)
        {
            for (var i=0;i<EntourageListArray.length;i++)
            {    
                OAavator=EntourageListArray[i][3].replace(/\\/g,"/"); 
                OAname=EntourageListArray[i][1];
                OAname=OAname.replace("<img src=/resources/images/2016090802.png>", "");
                OAname=OAname.replace("<img src=/resources/images/2016090803.png>", "");
                OAname=OAname.replace("[机动]", "");
                EntourageListHTML = EntourageListHTML+"<div class='settings-item'><div class='inner-settings-item flexbox to'><div class='avator'><img src='"+EntourageListArray[i][3]+"'></div><div class='title flexItem'><p class='name'>"+EntourageListArray[i][1]+"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"+EntourageListArray[i][2]+"</p></div><div></div></div></div>";
            }
        }
        else
        {
        EntourageListHTML = "<div class='settings-item'><div class='inner-settings-item flexbox to'><div class='title flexItem'><p class='name'>&nbsp;&nbsp;&nbsp;&nbsp;当前没排班</p></div><div></div></div></div>";
        }
        if (acc2>1)
        {
            i=i+1;
            EntourageListHTML = EntourageListHTML+"<div class='settings-item'><div class='inner-settings-item flexbox to'><div class='title flexItem'><p class='name'>";
            if (acc1>1){EntourageListHTML = EntourageListHTML+"<a href='javascript:window.HiddenFrame.location.replace(\"AdminUserSearch.gds?OA_CompetencyID="+OA_CompetencyID+"&EntourageSearchTXT=Schedules&page="+(acc1-1)+"\");'>上一页</a>";}else{EntourageListHTML = EntourageListHTML+"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;";}
            if (acc1<acc2){EntourageListHTML = EntourageListHTML+"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href='javascript:window.HiddenFrame.location.replace(\"AdminUserSearch.gds?OA_CompetencyID="+OA_CompetencyID+"&EntourageSearchTXT=Schedules&page="+(acc1+1)+"\");'>下一页</a></p></div></div></div>";}else{EntourageListHTML = EntourageListHTML+"</p></div></div></div>";}
        }
        
        document.getElementById("EntourageList").innerHTML=EntourageListHTML;
        
    }
    </script>
    <!--人员选择 end-->
 
    <script>showEntourage('0','<%=CompetencyID%>');</script>
</body>
</html>