【调度系统】广东民航医疗快线调度系统源代码
wanglizhong
2025-06-24 a51d070d364b0da8e5f8ea9203a6e50c8b4c0af3
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
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%Session.CodePage=65001%>
<!--#include virtual="/inc/chkadmin.gds"-->
<!--include virtual="/inc/odbc.asp"-->
<!--#include virtual="/inc/function.gds"-->
<%
ImageID=trim(Request("ImageID"))
ImageDeg_New=trim(Request("ImageDeg"))
If IsNumeric(ImageDeg_New) Then
    If ImageDeg_New>=360 Or ImageDeg_New="-360" Then
        ImageDeg_New=0
    End If
End If
if ImageID="" then
  Response.Redirect "/"
end if
 
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from ImageData where id="&ImageID
rs.open sql,objConn,1,1
If not rs.Eof Then
    ImageID        = rs("id")
    ImageType    = rs("ImageType")
    ImageUrl    = rs("ImageUrl")
    ImageUrls    = rs("ImageUrls")
    ImageDeg    = rs("ImageDeg")
    UpImageTime    = rs("UpImageTime")
    UpImageOAid    = rs("UpImageOAid")
    isAP        = rs("isAP")
    isAP_ID        = rs("isAP_ID")
    isAP_Time    = rs("isAP_Time")
    DOrdIDDt    = rs("DOrdIDDt")
    SOrdIDDt    = rs("SOrdIDDt")
    If ImageDeg_New<>"" And ImageDeg_New<>ImageDeg Then
        ImageDeg=ImageDeg_New
        sql="update ImageData set ImageDeg="&ImageDeg&" where id="&ImageID
        objConn.Execute sql
    End If
Else
    Response.Redirect "/"
End If
rs.close()
If DOrdIDDt<>"" Then
    sql="select DispatchOrdClass,DispatchOrd_NS_Time,DispatchOrdNo from DispatchOrd where DispatchOrdID="&DOrdIDDt
    rs.open sql,objConn,1,1
    If not rs.Eof Then
        DispatchOrdNo            = rs("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)
    End If
    rs.close()
End If
%>
<!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" -->
<style type="text/css">
/* reset */
body,div,dl,dt,dd,ul,ol,li,h1,h2,h3,h4,h5,h6,pre,code,form,fieldset,legend,input,button,textarea,p,blockquote,th,td{margin:0;padding:0}
fieldset,img{border:0;}
:focus{outline:0;}
ol,ul{list-style:none;list-style-position:outside;}
table{border-collapse:collapse;border-spacing:0;}
address,caption,cite,code,dfn,em,i,strong,th,var,optgroup{font-style:normal;font-weight:normal;}
body,button,input,select,textarea{font:12px/1.5 微软雅黑,arial,sans-serif;}
button,input,select,textarea,h1,h2,h3,h4,h5,h6{font-size:100%;}
body{color:#333;min-width: 1120px;}
a{color:#333;text-decoration:none;}
a:hover{color:#f60;text-decoration:underline;}
a:hover em,a:hover i,a:hover span{cursor:pointer;}
.cf:after{content:".";display:block;height:0;clear:both;visibility:hidden;}
.cf{*zoom:1;}
 
/*** guide ***/
.guide{width:60px;margin-left:570px;position:fixed;right:2%;bottom:134px;_position:absolute;_top:expression(documentElement.scrollTop+documentElement.clientHeight - this.clientHeight - 134+'px');display:block;}
.guide a{display:block;width:60px;height:50px;background:url(/resources/images/IMG_0820.PNG) no-repeat;margin-top:10px;text-decoration:none;font:16px/50px "Microsoft YaHei";text-align:center;color:#fff;border-radius:2px;}
.guide a span{display:none;text-align:center;}
.guide a:hover{text-decoration:none;background-color:#39F;color:#fff;}
.guide a:hover span{display:block;width:60px;background:#39F}
.guide .find{background-position:-84px -236px;}
.guide .report{background-position:-146px -236px;}
.guide .edit{background-position:-83px -185px;}
.guide .top{background-position:-145px -185px;}
</style>
        
                    <div style="width: 100%;font-size: 20px;background-color: #f6f6f6;padding: 10px 60px 0 60px;"><%If DOrdIDDt<>"" Then%>调度单:<a href="/DispatchOrder.gds?DispatchOrdID=<%=DOrdIDDt%>"><%=DispatchOrdNo%></a>&nbsp;&nbsp;<%End If%>上传:<%=OAUser(UpImageOAid,"UserName")%>&nbsp;<%=UpImageTime%><%If isAP_ID<>"" Then Response.Write "&nbsp;&nbsp;&nbsp;&nbsp;审核:"&OAUser(isAP_ID,"UserName")&"&nbsp;"&isAP_Time%></div>
 
        <div id="content" style="margin: 0px 0 10px 0;">
            <div id="imgbox" style="background-color: #f6f6f6;padding: 0px 60px 0 60px;transform: rotate(<%=ImageDeg%>deg);-ms-transform:rotate(<%=ImageDeg%>deg);-moz-transform:rotate(<%=ImageDeg%>deg);-webkit-transform:rotate(<%=ImageDeg%>deg);-o-transform:rotate(<%=ImageDeg%>deg);">
                <img src="<%=ImageUrl%>" border="0" class="closeimg" style="width: 100%">
            </div>
            <div class="guide">
            <form id="form1" name="form1" action="admin_save.gds">
                <div class="guide-wrap">
                    <a href="<%=ImageUrl%>" class="find" title="放大"><span>放大</span></a>
                    <a href="?ImageID=<%=ImageID%>&ImageDeg=<%=ImageDeg+90%>" class="edit" title="右转"><span>右转</span></a>
                    <a href="?ImageID=<%=ImageID%>&ImageDeg=<%=ImageDeg-90%>" class="report" title="左转"><span>左转</span></a>
                    <%If DOrdIDDt<>"0" And DOrdIDDt<>"" And isAP=0 then%>
                    <a class="report" title="审核" style="background: url(/resources/images/IMG_08201.png) no-repeat;" onclick="if(confirm('是否确认审核?')) {window.location.replace( '/admin_save.gds?admin_save=106&ImageID=<%=ImageID%>') } else {return false;}"><span>审核</span></a>
                    <a class="report" title="重新上传" onclick="JS_WorkWXTosend('<%=UpImageOAid%>','<%=OAUser(UpImageOAid,"UserName")%>','请重新上传<%=ImageTypeA(ImageType)%>','/m_DispatchOrder_Update.gds?DispatchOrdID=<%=DOrdIDDt%>&order_type=8')" style="background: url(/resources/images/IMG_08202.png) no-repeat;"><span>重传</span></a>
                    <%End If%>
                    <a href="javascript:window.scrollTo(0,0)" class="top" title="回顶部"><span>回顶部</span></a>
                </div>
            </form>
            </div>
        </div>
        
<%If Abs(ImageDeg)=90 Or Abs(ImageDeg)=270 Then%>
<script LANGUAGE="javascript">
    var w = document.getElementsByClassName("closeimg")[0].width;
    var h = document.getElementsByClassName("closeimg")[0].height;
    var move = (w - h) / 2;
    <%If ImageDeg="270" or ImageDeg="-90" Then%>
    move = -move;
    <%End If%>
    document.getElementById("imgbox").style.transform = "rotate(<%=ImageDeg%>deg) translate(" + move + "px,0)";
    document.getElementById("content").style.height=w+'px';
</script>
<%End If%>
        <!-- end content -->
        
                    <div class="dialogJ  dialogJfix dialogJshadow" id="window_Entourage" style="z-index: 50007; width: 350px; left: 0px; top: 0px;display:none;">
                    <div class="dialogJtitle">
                        <a href="javascript:JS_EntourageClose();" class="dialogJclose" title="关闭本窗口">&nbsp;</a>
                        <span class="dialogJtxt">选择人员</span>&nbsp;&nbsp;&nbsp;&nbsp;<input type="text" id="EntourageSearchTXT" name="EntourageSearchTXT" value="<%=EntourageSearchTXT%>" style="width: 100px;" onkeyup="JS_EntourageSearch();"/>&nbsp;<input type="button" name="button3" value="查询" onclick="JS_EntourageSearch();">&nbsp;<input type="button" name="button3" value="清空" onclick="JS_EntourageDel();">
                    </div>
                    <div class="dialogJcontent">
                        <div class="box">
                                <div class="table" style="padding: 0px;">
                                    <input name="window_EntourageID" type="hidden" value="">
                                    <input name="window_OA_CompetencyID" type="hidden" value="">
                                    <table>
                                        <thead>
                                            <tr>
                                                <th class="selected left">&nbsp;</th>
                                                <th class="category" style="text-align: center;width: 15%;">姓名</th>
                                                <th class="category last" style="text-align: center;">手机</th>
                                            </tr>
                                        </thead>
                                        <tbody id="EntourageList">
                                            <%for j=0 to 6%>
                                                <tr>
                                                    <td class="selected">&nbsp;</td>
                                                    <td class="category" style="width: 15%;">&nbsp;</td>
                                                    <td class="category last">&nbsp;</td>
                                                </tr>
                                            <%next%>
                                        </tbody>
                                    </table>
                            </div>
                    </div>
                    </div>
                </div>
                </div>
                <script LANGUAGE="javascript">
                //打开选择人员窗口
                function JS_EntourageOpen(id,OA_CompetencyID)
                {
                var sTop=document.documentElement.scrollTop;
                    if (sTop==0) {sTop=document.body.scrollTop;}
                var sLeft= document.documentElement.scrollLeft;
                    if (sLeft==0) {sLeft=document.body.scrollLeft;}
 
                var dTop = document.getElementById("EntourageName_"+id).getBoundingClientRect().top;
                if (dTop<200) {dTop=110;}
                var dLeft = document.getElementById("EntourageName_"+id).getBoundingClientRect().left;
                if (dLeft<200) {dLeft=200;}
                window_Entourage.style.display="block";
                window_Entourage.style.left=(dLeft-100)+"px";
                window_Entourage.style.top=(sTop+dTop+30)+"px";
                document.all.window_EntourageID.value=id;
                document.all.window_OA_CompetencyID.value=OA_CompetencyID;
                if (OA_CompetencyID=="ServiceOrdIntroducer")
                    {var OrdClass="<%=ServiceOrdClass%>";}
                else
                    {var OrdClass="<%=DispatchOrdClass%>";}
                var DateDay = "<%=now()%>"
                if (OA_CompetencyID!=0){window.HiddenFrame.location.replace('AdminUserSearch.gds?OA_CompetencyID='+OA_CompetencyID+'&DateDay='+DateDay+'&OrdClass='+OrdClass);}
                document.getElementById('EntourageSearchTXT').focus();
                EntourageSearchTXT.focus();
                }
                //关闭选择人员窗口
                function JS_EntourageClose()
                {
                document.all.EntourageSearchTXT.value='';
                window_Entourage.style.display="none";
                }
                //选择人员查询
                function JS_EntourageSearch()
                {
                EntourageSearchTXT=document.all.EntourageSearchTXT.value;
                OA_CompetencyID=document.all.window_OA_CompetencyID.value;
                if (OA_CompetencyID=="ServiceOrdIntroducer")
                    {var OrdClass="<%=ServiceOrdClass%>";}
                else
                    {var OrdClass="<%=DispatchOrdClass%>";}
                window.HiddenFrame.location.replace('AdminUserSearch.gds?OA_CompetencyID='+OA_CompetencyID+'&EntourageSearchTXT='+EntourageSearchTXT+'&OrdClass='+OrdClass);
                }
                function EnterPress(e){ //传入 event 
                var e = e || window.event; 
                if(e.keyCode == 13){JS_EntourageSearch();} 
                } 
                //选择人员
                function JS_EntourageSave(OA_UserID,OA_UserName)
                {
                    id=document.all.window_EntourageID.value;
                    document.getElementById("Entourage_"+id).value=OA_UserID;
                    document.getElementById("EntourageName_"+id).value=OA_UserName;
                    document.getElementById("EntourageName_"+id).className='small';
                    document.all.window_EntourageID.value="";
                    JS_EntourageClose();
                }
                //选择人员清空
                function JS_EntourageDel()
                {
                    id=document.all.window_EntourageID.value;
                    document.getElementById("Entourage_"+id).value='';
                    document.getElementById("EntourageName_"+id).value='';
                    document.getElementById("EntourageName_"+id).className='small';
                    document.all.window_EntourageID.value="";
                    JS_EntourageClose();
                }
                //显示人员列表窗口
                function JS_EntourageList(EntourageListArray,acc1,acc2,EntourageSearchTXT,OA_CompetencyID,OA_CompetencyName)
                {
                    var EntourageListHTML = "";
                    var i = 0;
                    var DateDay = "<%=now()%>"
                    if (OA_CompetencyID=="ServiceOrdIntroducer")
                        {var OrdClass="<%=ServiceOrdClass%>";}
                    else
                        {var OrdClass="<%=DispatchOrdClass%>";}
                    if (EntourageListArray.length>0)
                    {
                        for (var i=0;i<EntourageListArray.length;i++)
                        {    
                            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+"<tr onclick='JS_EntourageSave("+EntourageListArray[i][0]+",\""+OAname+"\")' style='cursor:pointer'><td class='selected'><img src='"+EntourageListArray[i][3]+"' style='max-width:29px;max-height: 29px;'></td><td class='category' style='width: 15%;'>"+EntourageListArray[i][1]+"</td><td class='price last1'>"+EntourageListArray[i][2]+"</td></tr>";
                        }
                    }
                    if (acc2>1)
                    {
                        i=i+1;
                        EntourageListHTML = EntourageListHTML+"<tr><td class='selected'>&nbsp;</td><td colspan='2' style='text-align:center;'>";
                        if (acc1>1){EntourageListHTML = EntourageListHTML+"<a href='javascript:window.HiddenFrame.location.replace(\"AdminUserSearch.gds?OA_CompetencyID="+OA_CompetencyID+"&EntourageSearchTXT="+EntourageSearchTXT+"&OrdClass="+OrdClass+"&page="+(acc1-1)+"&DateDay="+DateDay+"\");'>上一页</a>";}else{EntourageListHTML = EntourageListHTML+"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;";}
                        if (acc1<acc2){EntourageListHTML = EntourageListHTML+"&nbsp;&nbsp;&nbsp;&nbsp;<a href='javascript:window.HiddenFrame.location.replace(\"AdminUserSearch.gds?OA_CompetencyID="+OA_CompetencyID+"&EntourageSearchTXT="+EntourageSearchTXT+"&OrdClass="+OrdClass+"&page="+(acc1+1)+"&DateDay="+DateDay+"\");'>下一页</a></td></tr>";}
                    }
                    
                    for (var j=i;j<=6;j++)
                    {
                        EntourageListHTML = EntourageListHTML+"<tr><td class='selected'>&nbsp;</td><td class='price'>&nbsp;</td><td class='price last1'>&nbsp;</td></tr>";
                    }
                    document.getElementById("EntourageList").innerHTML=EntourageListHTML;
                    
                }
                </script>
        <!--#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>