<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
|
<%Session.CodePage=65001%>
|
<!--#include virtual="/inc/chkadmin.gds"-->
|
<!--#include virtual="/inc/function.gds"-->
|
<%
|
DispatchOrdID=SafeRequest(Request("DispatchOrdID"))
|
ServiceOrdID=SafeRequest(Request("ServiceOrdID"))
|
Phone=SafeRequest(Request("Phone"))
|
OrdClass=SafeRequest(Request("OrdClass"))
|
admin_save=SafeRequest(Request("admin_save"))
|
|
OrdClassList=SafeRequest(Request("OrdClassList"))
|
OrdDateType=SafeRequest(Request("OrdDateType"))
|
NEWOrder=SafeRequest(Request("NEWOrder"))
|
Perfomance=SafeRequest(Request("Perfomance"))
|
|
Set rs = Server.CreateObject("ADODB.Recordset")
|
'调度单
|
If DispatchOrdID<>"" then
|
sql="select * from DispatchOrd where DispatchOrdID="&DispatchOrdID
|
rs.open sql,objConn,1,1
|
If not rs.Eof then
|
DispatchOrdID = rs("DispatchOrdID") '调度单号
|
DispatchOrdClass = rs("DispatchOrdClass") '单据类型
|
ServiceOrdID = rs("ServiceOrdIDDt") '对应受理单号
|
DispatchOrdState = rs("DispatchOrdState") '调度单状态
|
DispatchOrdStartDate = rs("DispatchOrdStartDate") '调度单状态时间
|
DispatchOrd_NS_ID = rs("DispatchOrd_NS_ID") '开单人ID
|
DispatchOrd_NS_Time = rs("DispatchOrd_NS_Time") '开单时间
|
DispatchOrd_AP_ID = rs("DispatchOrd_AP_ID") '审核人ID
|
DispatchOrd_AP_Time = rs("DispatchOrd_AP_Time") '审核时间
|
DispatchOrd_AP_Check = rs("DispatchOrd_AP_Check") '是否审核(0否,1是)
|
DispatchOrdCarID = rs("DispatchOrdCarID") '派遣车辆ID
|
DispatchOrdTraSDTime = rs("DispatchOrdTraSDTime") '拟出发时间
|
DispatchOrdActualDate = rs("DispatchOrdActualDate") '实际出车时间
|
DispatchOrdTraDistance = rs("DispatchOrdTraDistance") '实际距离
|
DispatchOrdTraStreet = rs("DispatchOrdTraStreet") '实际出发地
|
DispatchOrdTraEnd = rs("DispatchOrdTraEnd") '实际目的地
|
DispatchOrdTraVia = rs("DispatchOrdTraVia") '实际途经地
|
DispatchOrdCoName = rs("DispatchOrdCoName") '调度联系人
|
DispatchOrdCoPhone = rs("DispatchOrdCoPhone") '调度联系电话
|
|
DispatchOrdTraStreetMileage= rs("DispatchOrdTraStreetMileage")'开始里程数
|
DispatchOrdTraEndMileage= rs("DispatchOrdTraEndMileage")'结束里程数
|
DispatchOrdMileage = rs("DispatchOrdMileage") '实际里程数
|
DispatchOrdGasoline = rs("DispatchOrdGasoline") '油耗
|
DispatchOrdRemarks = rs("DispatchOrdRemarks") '行驶备注记录
|
|
DispatchOrdIsEnd = rs("DispatchOrdIsEnd") '完成报告提交情况
|
DispatchOrdPerfomance = rs("DispatchOrdPerfomance")
|
|
EntourageName_aid1 = rs("EntourageName_aid1") '外援人员1
|
EntourageName_aid2 = rs("EntourageName_aid2") '外援人员2
|
|
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) '调度单编号
|
|
End If
|
rs.close()
|
End If
|
EntourageName_aid = SPLIT(EntourageName_aid1&"|"&EntourageName_aid2,"|")
|
|
'绩效承继
|
If Perfomance<>"" Then Perfomance=0
|
If Perfomance>DispatchOrdPerfomance Then DispatchOrdPerfomance=Perfomance
|
|
'受理单
|
If ServiceOrdID<>"" then
|
sql="select ServiceOrdID,ServiceOrdClass,ServiceOrdState,ServiceOrdType,ServiceOrdStartDate,ServiceOrdTraStreet,ServiceOrdTraEnd,ServiceOrdTraVia,ServiceOrdCoName,ServiceOrdCoPhone,ServiceOrd_CC_ID,ServiceOrd_CC_Time,ServiceOrdNo,ServiceOrd_Sale_ID,ServiceOrdIntroducer,ServiceOrdTraTxnPrice from ServiceOrder where ServiceOrdID="&ServiceOrdID
|
rs.open sql,objConn,1,1
|
If not rs.Eof then
|
ServiceOrdID = rs("ServiceOrdID")
|
ServiceOrdClass = rs("ServiceOrdClass")
|
ServiceOrdState = rs("ServiceOrdState")
|
ServiceOrdType = rs("ServiceOrdType")
|
ServiceOrdStartDate = rs("ServiceOrdStartDate")
|
ServiceOrdTraStreet = rs("ServiceOrdTraStreet")
|
ServiceOrdTraEnd = rs("ServiceOrdTraEnd")
|
ServiceOrdTraVia = rs("ServiceOrdTraVia")
|
ServiceOrdCoName = rs("ServiceOrdCoName") '受理单联系人
|
ServiceOrdCoPhone = rs("ServiceOrdCoPhone") '受理单联系电话
|
ServiceOrd_CC_ID = rs("ServiceOrd_CC_ID") '服务单客服人员ID
|
ServiceOrd_Sale_ID = rs("ServiceOrd_Sale_ID") '服务单销售人员ID
|
ServiceOrdIntroducer= rs("ServiceOrdIntroducer") '服务单介绍人
|
ServiceOrdTraTxnPrice=rs("ServiceOrdTraTxnPrice")
|
ServiceOrdNo = ServiceOrdClass& year(rs("ServiceOrd_CC_Time"))&Right("0"&month(rs("ServiceOrd_CC_Time")),2)&Right("0"&day(rs("ServiceOrd_CC_Time")),2) & "-"&Right("00"&rs("ServiceOrdNo"),3)
|
End If
|
rs.close()
|
End If
|
|
'各种返回信息
|
SystemMessageType=trim(Request("SystemMessageType"))
|
SMT=trim(Request("SMT"))
|
error=trim(Request("error"))
|
if SystemMessageType<>"" then
|
if SMT="1" then
|
SystemMessageTXT="数据不完整!!"
|
elseif SMT="2" then
|
SystemMessageTXT="单据已经保存完成,请不要重复提交单据!!"
|
elseif SMT="3" then
|
SystemMessageTXT="保存完成!!"
|
elseif SMT="4" then
|
SystemMessageTXT="单据保存完成,但有部分数据不足,请在下发前补全!!"
|
elseif SMT="5" then
|
SystemMessageTXT="调度单审核完成!!"
|
elseif SMT="6" then
|
SystemMessageTXT="调度单反审核完成!!"
|
elseif SMT="7" then
|
SystemMessageTXT="调度单下发完成!!"
|
elseif SMT="8" then
|
SystemMessageTXT="取消调度单完成!!"
|
If ServiceOrdID<>"" Then SystemMessageTXT=SystemMessageTXT&",返回[<a href=""/ServiceOrder.gds?ServiceOrdID="&ServiceOrdID&"&h_menu1_1=1"">相关服务单</a>]"
|
elseif SMT="9" then
|
SystemMessageTXT="调度单下发失败,没可下发人员!!"
|
elseif SMT="10" then
|
SystemMessageTXT="调度单已出车,不可直接取消!!"
|
elseif SMT="11" then
|
SystemMessageTXT="调度单已审核,不可取消!!"
|
elseif SMT="12" then
|
SystemMessageTXT="数据保存完成,请继续填写调度单!!"
|
elseif SMT="22" then
|
SystemMessageTXT="请选择需要操作的单据"
|
elseif SMT="23" then
|
SystemMessageTXT="费用单审核完成!!"
|
elseif SMT="24" then
|
SystemMessageTXT="费用单反审核完成!!"
|
elseif SMT="25" then
|
SystemMessageTXT="费用单作废完成!!"
|
elseif SMT="35" then
|
SystemMessageTXT="费用单新建完成!!"
|
end if
|
end if
|
|
'行驶里程
|
If DispatchOrdMileage=0 And DispatchOrdTraStreetMileage<>0 And DispatchOrdTraEndMileage<>0 Then
|
DispatchOrdMileage1=DispatchOrdTraEndMileage-DispatchOrdTraStreetMileage
|
Else
|
DispatchOrdMileage1=DispatchOrdMileage
|
End if
|
|
|
'默认字段
|
If DispatchOrdClass="" Then DispatchOrdClass="SA"
|
If ServiceOrdID="" Then ServiceOrdClass="BF"
|
If OrdClass<>"" Then
|
DispatchOrdClass=OrdClass
|
OrdClassName=OrderClassA(OrdClass)
|
Else
|
OrdClass=DispatchOrdClass
|
OrdClassName=OrderClassA(OrdClass)
|
End If
|
If DispatchOrdID="" Then
|
DispatchOrdID_TXT="[系统自动生成]"
|
Else
|
DispatchOrdID_TXT=DispatchOrdNo
|
End If
|
If ServiceOrdID<>"" Then
|
ServiceOrdIDDt_TXT=ServiceOrdNo
|
End if
|
If DispatchOrdState="" Then DispatchOrdState=0
|
If DispatchOrdStartDate="" Then DispatchOrdStartDate=Now()
|
If DispatchOrd_NS_Time="" Then DispatchOrd_NS_Time=Now()
|
DispatchIs="1"
|
If isnull(DispatchOrdTraStreet) Or DispatchOrdTraStreet="" Then DispatchOrdTraStreet=ServiceOrdTraStreet
|
If isnull(DispatchOrdTraEnd) Or DispatchOrdTraEnd="" Then DispatchOrdTraEnd=ServiceOrdTraEnd
|
If isnull(DispatchOrdTraVia) Or DispatchOrdTraVia="" Then DispatchOrdTraVia=ServiceOrdTraVia
|
If DispatchOrdCarID<>"" And DispatchOrdCarID<>"0" Then DispatchOrdCarLicense=CarDataA(DispatchOrdCarID,"","CarLicense")
|
If DispatchOrd_AP_Check="" Then DispatchOrd_AP_Check=0
|
If DispatchOrdPerfomance="" Or isnull(DispatchOrdPerfomance) Then DispatchOrdPerfomance=ServiceOrdTraTxnPrice
|
|
|
'审核状态
|
If DispatchOrdState="8" Or DispatchOrdState="9" Then
|
If DispatchOrd_AP_Check="1" then
|
DispatchOrd_CheckTXT = DispatchOrdStateA(12)
|
ElseIf DispatchOrd_AP_Check="0" And DispatchOrdIsEnd>0 then
|
DispatchOrd_CheckTXT = DispatchOrdStateA(11)
|
ElseIf DispatchOrd_AP_Check="0" And DispatchOrdIsEnd=0 then
|
DispatchOrd_CheckTXT = "未提交审核申请"
|
End If
|
If DispatchOrd_CheckTXT<>"" Then DispatchOrd_CheckTXT="（"&DispatchOrd_CheckTXT&" ）"
|
'是否可审核
|
If DispatchOrdIsEnd=0 Then
|
DispatchOrd_AP_Check=-1
|
End If
|
End If
|
|
is_User=session("is_User")
|
%>
|
<!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">
|
<%If is_User="1" then%>
|
<!--#INCLUDE FILE="User_menu_left.gds" -->
|
<%else%>
|
<!--#INCLUDE FILE="Dispatch_menu_left.gds" -->
|
<%End if%>
|
<!-- content / right -->
|
<div id="right">
|
<!-- messages -->
|
|
<!-- forms -->
|
<div class="box">
|
<!-- box / title -->
|
<div class="title">
|
<h5><%=OrdClassName%></h5>
|
<ul class="links">
|
<%If ServiceOrdID="" And DispatchOrdID="" And isDepartment("030101")=1 then%><li><a href="ServiceOrder.gds?Phone=<%=Phone%>&NEWOrder=2">新建服务单</a></li><%End if%>
|
<%If DispatchOrdID<>"" And (DispatchOrdState=8 Or DispatchOrdState=9) And (isDepartment("030109")=1 Or EntourageOAidA(DispatchOrdID)>=1) then%><li><a href="DispatchOrder_End.gds?DispatchOrdID=<%=DispatchOrdID%>&h_menu1_1=1">转运完成报告单</a></li><%End if%>
|
<%
|
if PositionURLID="1" then PositionURLID=11
|
ReturnURL=session("PositionURL"&PositionURLID-1)
|
if InStr(ReturnURL,"?")<1 then
|
ReturnURL=ReturnURL&"?ReturnURLID="&(PositionURLID-1)
|
else
|
ReturnURL=ReturnURL&"&ReturnURLID="&(PositionURLID-1)
|
end if
|
%>
|
<li><a href="<%=ReturnURL%>">返回</a></li>
|
</ul>
|
</div>
|
<!-- end box / title -->
|
<!--#include virtual="/inc/SystemMessages.gds" -->
|
<form id="form1" name="form1" action="admin_save.gds" method="post" style="min-width: 1110px;">
|
<input name="admin_save" type="hidden" value="25">
|
<input name="DispatchOrdID" type="hidden" value="<%=DispatchOrdID%>">
|
<input name="ServiceOrdID" type="hidden" value="<%=ServiceOrdID%>">
|
<input name="DispatchOrdClass" type="hidden" value="<%=DispatchOrdClass%>">
|
<input name="Phone" type="hidden" value="<%=Phone%>">
|
<input name="DispatchOrdState" type="hidden" value="<%=DispatchOrdState%>">
|
<input name="DispatchOrd_Check" type="hidden" value="">
|
<div class="form">
|
<div class="fields">
|
<div class="field field-first">
|
<div class="label" style="float: left;margin-left: 0px;">
|
<label for="input-small">单据编号:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 70px;">
|
<input type="text" id="DispatchOrdID_TXT" name="DispatchOrdID_TXT" class="small <%If DispatchOrdState=10 then%>error<%else%>valid<%End if%>" style="width:138px;" value="<%=DispatchOrdID_TXT%>" readonly="true">
|
</div>
|
<div class="label" style="float: left;margin-left: 231px;">
|
<label for="input-small">受理单号:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 75px;">
|
<input type="text" id="ServiceOrdIDDt_TXT" name="ServiceOrdIDDt_TXT" class="small <%If ServiceOrdState=4 then%>error<%else%>valid<%End if%>" style="width:138px;" value="<%=ServiceOrdIDDt_TXT%>" readonly="true">
|
</div>
|
<div class="label" style="float: left;margin-left: 455px;">
|
<label for="input-small">调度状态:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 75px;">
|
<input type="text" id="ServiceOrdStateTXT" name="ServiceOrdStateTXT" class="small <%If DispatchOrdState=10 then%>error<%else%>valid<%End if%>" style="width:345px;" value="<%=DispatchOrdStateA(DispatchOrdState)&DispatchOrd_CheckTXT%>" readonly="true">
|
</div>
|
</div>
|
<div class="field">
|
<div class="label" style="float: left;margin-left: 0px;">
|
<label for="input-small">派遣车辆:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 70px;">
|
<input id="DispatchOrdCarID" name="DispatchOrdCarID" type="hidden" value="<%=DispatchOrdCarID%>">
|
<%If DispatchOrdState>3 Then%>
|
<input type="text" id="DispatchOrdCarLicense" name="DispatchOrdCarLicense" class="small valid" style="width:138px;" value="<%=DispatchOrdCarLicense%>" readonly="true">
|
<%else%>
|
<input type="text" id="DispatchOrdCarLicense" name="DispatchOrdCarLicense" class="small<%If InStr(error,",DispatchOrdCarLicense,")>0 Then Response.Write " error"%>" onclick="javascript:JS_CarOpen();" style="width:138px;" value="<%=DispatchOrdCarLicense%>" readonly="true">
|
<%End if%>
|
</div>
|
<div class="label" style="float: left;margin-left: 231px;">
|
<label for="input-small">派单时间:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 75px;">
|
<input type="text" id="DispatchOrd_NS_Time" name="DispatchOrd_NS_Time" class="small valid" style="width:138px;" value="<%=DispatchOrd_NS_Time%>" readonly="true">
|
</div>
|
<div class="label" style="float: left;margin-left: 455px;">
|
<label for="input-small">拟出发时间:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 75px;">
|
<%If DispatchOrdState>3 Then%>
|
<input type="text" id="DispatchOrdTraSDTime" name="DispatchOrdTraSDTime" class="small valid" style="width:122px;" value="<%=DispatchOrdTraSDTime%>" readonly="true">
|
<%else%>
|
<input type="text" id="DispatchOrdTraSDTime" name="DispatchOrdTraSDTime" class="date<%If InStr(error,",DispatchOrdTraSDTime,")>0 Or SMT="12" Then Response.Write " error"%>" style="width:122px;" value="<%=DispatchOrdTraSDTime%>">
|
<%End if%>
|
</div>
|
<div class="label" style="float: left;margin-left:673px;">
|
<label for="input-small">实出发时间:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 84px;">
|
<input type="text" id="DispatchOrdActualDate" name="DispatchOrdActualDate" class="small valid" style="width:122px;" value="<%=DispatchOrdActualDate%>" readonly="true">
|
</div>
|
</div>
|
|
<div class="field">
|
<%'客服人员
|
If ServiceOrd_CC_ID<>"" Then ServiceOrd_CC_Name=OAUser(ServiceOrd_CC_ID,"UserName")
|
EntourageID="-1"
|
departmentID="9"
|
%>
|
<div class="label" style="float: left;margin-left: 0px;"><label for="input-small">客服:</label></div>
|
<div class="input" style="float:left;margin-left: 84px;">
|
<input id="Entourage_<%=EntourageID%>" name="ServiceOrd_CC_ID" type="hidden" value="<%=ServiceOrd_CC_ID%>">
|
<input type="text" id="EntourageName_<%=EntourageID%>" name="ServiceOrd_CC_Name" class="small" onclick="javascript:JS_EntourageOpen('<%=EntourageID%>','-<%=departmentID%>');" style="width:122px;" value="<%=ServiceOrd_CC_Name%>" readonly="true">
|
</div>
|
|
<%'调度人员
|
If DispatchOrd_NS_ID<>"" Then DispatchOrd_NS_Name=OAUser(DispatchOrd_NS_ID,"UserName")
|
EntourageID="-2"
|
departmentID="9"
|
%>
|
<div class="label" style="float: left;margin-left: 226px;"><label for="input-small">调度:</label></div>
|
<div class="input" style="float:left;margin-left: 84px;">
|
<input id="Entourage_<%=EntourageID%>" name="DispatchOrd_NS_ID" type="hidden" value="<%=DispatchOrd_NS_ID%>">
|
<input type="text" id="EntourageName_<%=EntourageID%>" name="DispatchOrd_NS_Name" class="small" onclick="javascript:JS_EntourageOpen('<%=EntourageID%>','-<%=departmentID%>');" style="width:122px;" value="<%=DispatchOrd_NS_Name%>" readonly="true">
|
</div>
|
|
<%'销售人员
|
If ServiceOrd_Sale_ID<>"" Then ServiceOrd_Sale_Name=OAUser(ServiceOrd_Sale_ID,"UserName")
|
EntourageID="-3"
|
departmentID="10"
|
%>
|
<div class="label" style="float: left;margin-left: 452px;"><label for="input-small">销售:</label></div>
|
<div class="input" style="float:left;margin-left: 84px;">
|
<input id="Entourage_<%=EntourageID%>" name="ServiceOrd_Sale_ID" type="hidden" value="<%=ServiceOrd_Sale_ID%>">
|
<input type="text" id="EntourageName_<%=EntourageID%>" name="ServiceOrd_Sale_Name" class="small" onclick="javascript:JS_EntourageOpen('<%=EntourageID%>','-<%=departmentID%>');" style="width:122px;" value="<%=ServiceOrd_Sale_Name%>" readonly="true">
|
</div>
|
|
<div class="label" style="float: left;margin-left: 678px;"><label for="input-small">介绍人:</label></div>
|
<div class="input" style="float:left;margin-left: 84px;">
|
<select name="ServiceOrdIntroducer" id="ServiceOrdIntroducer" style="width:138px;margin-left: 150px;" class="select1">
|
<option value="">无指定 *</option>
|
<%
|
sql="select IntroducerID,IntroducerName,IntroducerUnitID from IntroducerData where IntroducerState=1"
|
rs.open sql,objConn,1,1
|
do while not rs.Eof
|
IntroducerID = rs("IntroducerID")
|
IntroducerName = rs("IntroducerName")
|
%>
|
<option value="<%=IntroducerID%>"<%if CStr(ServiceOrdIntroducer)=CStr(IntroducerID) then Response.Write " selected"%>><%=IntroducerName%></option>
|
<%
|
rs.movenext
|
Loop
|
rs.close()%>
|
</select>
|
</div>
|
</div>
|
|
<div class="field">
|
|
<%
|
If DispatchOrdID<>"" then
|
sql="select vID,vtext,vOrder2,EntourageOAid=isnull(EntourageOAid,0),EntourageLead=isnull(EntourageLead,0),EntourageState=isnull(EntourageState,0),EntourageOT_is=isnull(EntourageOT_is,0),EntourageBetimesHH=isnull(EntourageBetimesHH,0),EntourageState_Time,EntourageRead_Time from dictionary LEFT JOIN DispatchOrd_Entourage on DispatchOrdIDDt="&DispatchOrdID&" and EntourageID=vID and EntourageState<>4 where vType=1 and vtitle='DispatchOrdEntourage' order by vOrder"
|
else
|
sql="select vID,vtext,vOrder2,EntourageOAid=0,EntourageLead=0,EntourageState=0,EntourageOT_is=0,EntourageBetimesHH=0,EntourageState_Time=null,EntourageRead_Time=null from dictionary where vType=1 and vtitle='DispatchOrdEntourage' order by vOrder"
|
End If
|
|
rs.open sql,objConn,1,1
|
i=0
|
z=0
|
j=1
|
EntourageIDs=""
|
EntourageLeadID=0
|
EntourageLeadOAid=0
|
do while not rs.Eof
|
EntourageID = rs("vID")
|
EntourageName=rs("vtext")
|
OA_CompetencyID=rs("vOrder2")
|
EntourageOAid=rs("EntourageOAid")
|
EntourageLead=rs("EntourageLead")
|
EntourageState=rs("EntourageState")
|
EntourageOT_is=rs("EntourageOT_is")
|
EntourageBetimesHH=rs("EntourageBetimesHH")
|
EntourageState_Time=rs("EntourageState_Time")
|
EntourageRead_Time=rs("EntourageRead_Time")
|
EntourageRead_is=""
|
If EntourageBetimesHH=0 Then EntourageBetimesHH=""
|
If EntourageOAid<>"0" Then
|
EntourageOAName=OAUser(EntourageOAid,"UserName")
|
Else
|
EntourageOAid=""
|
EntourageOAName=""
|
End If
|
If EntourageState=1 then
|
EntourageStateTXT="等待确认"
|
If not isnull(EntourageRead_Time) Then
|
EntourageRead_is="1"
|
EntourageStateTXT=EntourageStateTXT & "(已阅"&EntourageRead_Time&")"
|
End if
|
ElseIf EntourageState=2 Then
|
EntourageStateTXT="不接受 "&EntourageState_Time
|
ElseIf EntourageState=3 Then
|
EntourageStateTXT="已确认 "&EntourageState_Time
|
Else
|
EntourageStateTXT="未下发"
|
End if
|
If EntourageLead="1" Or i=0 Then EntourageLeadID=EntourageID
|
If EntourageLead="1" And EntourageOAid<>"0" Then EntourageLeadOAid=EntourageOAid
|
EntourageIDs=EntourageIDs&","&EntourageID
|
|
%>
|
|
<div style="float: left; margin:5px 3px;height: 70px;width: 215px;border-right: 1px solid #DDDDDD;">
|
<input id="Entourage_<%=EntourageID%>" name="Entourage_<%=EntourageID%>" type="hidden" value="<%=EntourageOAid%>">
|
<div class="input" style="height: initial;line-height: 25px;margin: auto;">
|
<label for="input-small" onclick="JS_EntourageLeadChoice(<%=EntourageID%>)" style='cursor:pointer' title="<%=EntourageStateTXT%>"><img id="EntourageLead_<%=EntourageID%>" name="EntourageLead_<%=EntourageID%>" src='/resources/images/2016020401.png' style="display:none;"><%=EntourageName%>:</label><label style='font-weight: bold;'><input type="text" id="EntourageName_<%=EntourageID%>" name="EntourageName_<%=EntourageID%>" class="small <%If EntourageState="3" then%>valid1<%ElseIf EntourageState="2" Or SMT="12" then%>error<%ElseIf DispatchOrd_AP_Check=1 then%>valid<%End If%>" <%If DispatchOrd_AP_Check<=0 then%>onclick="javascript:JS_EntourageOpen('<%=EntourageID%>','<%=OA_CompetencyID%>');"<%End if%> style="width:122px;float: none;" value="<%=EntourageOAName%>" readonly="true"></label><br>
|
<input type="checkbox" style="float: none;" id="EntourageOT_is_<%=EntourageID%>" name="EntourageOT_is_<%=EntourageID%>" value="1"<%If EntourageOT_is="1" Then Response.Write " checked=""checked"""%>><label for="EntourageOT_is_<%=EntourageID%>">休息出车</label> <label>提前出车<input type="text" id="EntourageBetimesHH_<%=EntourageID%>" name="EntourageBetimesHH_<%=EntourageID%>" style="width:26px;text-align:center;float: none;padding:inherit;" class="small<%If DispatchOrd_AP_Check=1 Then Response.Write " valid"%>" value="<%=EntourageBetimesHH%>">小时
|
<br><%=EntourageDKP_TXT%>
|
</label>
|
</div>
|
</div>
|
<%i=i+1
|
z=z+1
|
If z=3 Then
|
|
z=0
|
j=j+1
|
Response.Write "<br><br><br><br><br><br><br>"
|
End If
|
rs.movenext
|
loop
|
rs.close()
|
|
%>
|
<input name="EntourageLeadID" id="EntourageLeadID" type="hidden" value="<%=EntourageLeadID%>">
|
<script LANGUAGE="javascript">
|
//领队设定
|
function JS_EntourageLeadChoice(id)
|
{
|
var EntourageLeadArray=[0<%=EntourageIDs%>];
|
for (var i=1;i<EntourageLeadArray.length;i++)
|
{
|
document.getElementById("EntourageLead_"+i).style.display="none";
|
}
|
if (id==0) {document.getElementById("EntourageLead_"+EntourageLeadArray[1]).style.display="";}
|
else {document.getElementById("EntourageLead_"+id).style.display="";}
|
document.getElementById('EntourageLeadID').value=id;
|
}
|
JS_EntourageLeadChoice(document.getElementById('EntourageLeadID').value);
|
</script>
|
</div>
|
<div class="field">
|
<div class="label" style="float: left;margin-left: 0px;">
|
<label for="input-small">实际行程:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 73px;">
|
<input type="text" id="DispatchOrdTraStreet" name="DispatchOrdTraStreet" class="small<%If InStr(error,",DispatchOrdTraStreet,")>0 Then Response.Write " error"%><%If DispatchOrdState>3 Then Response.Write " valid"%>" style="width:380px;" value="<%=DispatchOrdTraStreet%>"<%If DispatchOrdState>3 Then Response.Write " readonly=""true""" %>>
|
</div>
|
<div class="label" style="float: left;margin-left: 470px;">
|
<label for="input-small">至</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 24px;">
|
<input type="text" id="DispatchOrdTraEnd" name="DispatchOrdTraEnd" class="small<%If InStr(error,",DispatchOrdTraEnd,")>0 Then Response.Write " error"%><%If DispatchOrdState>3 Then Response.Write " valid"%>" style="width:380px;" value="<%=DispatchOrdTraEnd%>"<%If DispatchOrdState>3 Then Response.Write " readonly=""true""" %>>
|
</div>
|
</div>
|
<div class="field" id="OrdTraVia_D"<%If DispatchOrdTraVia="" then%> style="display:none;"<%End If%>>
|
<div class="label" style="float: left;margin-left: 0px;">
|
<label for="input-small">实际途经:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 70px;">
|
<input type="text" id="DispatchOrdTraVia" name="DispatchOrdTraVia" class="small<%If DispatchOrdState>3 Then Response.Write " valid"%>" style="width:800px;" value="<%=DispatchOrdTraVia%>"<%If DispatchOrdState>3 Then Response.Write " readonly=""true""" %>>
|
</div>
|
</div>
|
|
<%If DispatchOrdTraStreetMileage>0 Or DispatchOrdTraEndMileage>0 Or DispatchOrdMileage>0 Then
|
If DispatchOrdTraStreetMileage=0 Then DispatchOrdTraStreetMileage=" -- "
|
If DispatchOrdTraEndMileage=0 Then DispatchOrdTraEndMileage=" -- "
|
If DispatchOrdMileage=0 Then DispatchOrdMileage=" -- "
|
%>
|
<div class="field" style="height: 25px;">
|
<div class="label" style="float: left;margin-left: 0px;">
|
<label for="input-small">出车时行驶公里数为:<%=DispatchOrdTraStreetMileage%>公里</label>
|
</div>
|
<div class="label" style="float: left;margin-left: 215px;">
|
<label for="input-small">收车时行驶公里数为:<%=DispatchOrdTraEndMileage%>公里</label>
|
</div>
|
<div class="label" style="float: left;margin-left: 430px;">
|
<label for="input-small">实际运行:<%=DispatchOrdMileage%>公里</label>
|
</div>
|
</div>
|
<%End if%>
|
|
<%If ((DispatchOrdCoName<>ServiceOrdCoName And DispatchOrdCoName<>"") Or (DispatchOrdCoPhone<>ServiceOrdCoPhone And DispatchOrdCoPhone<>"")) or ServiceOrdID="" Then%>
|
<div class="field">
|
<div class="label" style="float: left;margin-left: 0px;">
|
<label for="input-small">调度联系人:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 70px;">
|
<input type="text" id="DispatchOrdCoName" name="DispatchOrdCoName" class="small<%If InStr(error,",DispatchOrdCoName,")>0 Then Response.Write " error"%><%If DispatchOrdState>=8 Then Response.Write " valid"%>" style="width:138px;" value="<%=DispatchOrdCoName%>"<%If DispatchOrdState>=8 Then Response.Write " readonly=""true""" %>>
|
</div>
|
<div class="label" style="float: left;margin-left: 231px;">
|
<label for="input-small">调度联系电话:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 89px;">
|
<input type="text" id="DispatchOrdCoPhone" name="DispatchOrdCoPhone" class="small<%If InStr(error,",DispatchOrdCoPhone,")>0 Then Response.Write " error"%><%If DispatchOrdState>=8 Then Response.Write " valid"%>" style="width:138px;" value="<%=DispatchOrdCoPhone%>"<%If DispatchOrdState>=8 Then Response.Write " readonly=""true""" %>>
|
</div>
|
</div>
|
<%End if%>
|
<!-- 服务单数据 -->
|
<%If ServiceOrdID<>"" Then%>
|
<!--#INCLUDE FILE="ServiceOrder_Data.gds" -->
|
<%End If%>
|
|
<%If DispatchOrdPerfomance<>"" Then%>
|
<div class="field" style="height: 25px;">
|
<div class="label" style="float: left;margin-left:0px;">
|
<label for="input-small">绩效计价:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 70px;">
|
<input type="text" id="DispatchOrdPerfomance" name="DispatchOrdPerfomance" class="small<%If DispatchOrd_AP_Check=1 Or isDepartment("030112")=0 Then Response.Write " valid"%>" style="width:138px;" value="<%=DispatchOrdPerfomance%>"<%If DispatchOrd_AP_Check=1 Or isDepartment("030112")=0 Then Response.Write " readonly=""true""" %>>
|
</div>
|
</div>
|
<%End if%>
|
<div class="field" style="height: 45px;border-bottom: initial;">
|
<div class="buttons">
|
<div class="highlight">
|
<%If ServiceOrdID="" And DispatchOrdID="" And isDepartment("030101")=1 then%><input type="button" name="submit48_2" value="新建服务单" class="ui-state-default" onclick="javascript:window.location.href='/ServiceOrder.gds?Phone=<%=Phone%>&NEWOrder=2';"> <%End if%>
|
<%If DispatchOrd_AP_Check<=0 And DispatchOrdState<>"10" And isDepartment("030102")=1 then%><input type="button" name="submit48_2" value="保存调度单" class="ui-state-default" onclick="<%If DispatchOrdID="" then%>form1_submit24_1();<%else%>form1_submit25_1();<%End if%>"> <%End if%>
|
<%If (DispatchOrdState="0" Or DispatchOrdState="1" Or DispatchOrdState="2") And isDepartment("030105")=1 then%><input type="button" name="submit48_1" value="下发调度单" class="ui-state-default" onclick="<%If DispatchOrdID="" then%>form1_submit24_2();<%else%>form1_submit25_2();<%End if%>"> <%End if%>
|
|
<%If DispatchOrd_AP_Check<=0 And DispatchOrdIsEnd=0 And DispatchOrdState<>"10" And (DispatchOrdState="8" Or DispatchOrdState="9") And EntourageOAidA(DispatchOrdID)=2 then%>
|
<input type="button" name="submit48_1" value="填写转运完成报告单" class="ui-state-default" onclick="form1_button33();"> <%End if%>
|
|
<%If DispatchOrdID<>"" And DispatchOrdState<10 And DispatchOrd_AP_Check="0" And isDepartment("030111")=1 then%><input type="button" name="ForceEndAdd" id="ForceEndAdd" value="强制完结" class="ui-state-default" onclick="form1_submit38_1();"> <%End if%>
|
<%If DispatchOrdID<>"" And DispatchOrdState<10 And DispatchOrd_AP_Check="0" And isnull(DispatchOrdActualDate) And isDepartment("030106")=1 then%><input type="button" name="submit48_1" value="取消调度单" class="ui-state-default" onclick="form1_submit27_1();"> <%End if%>
|
<%If DispatchOrdID<>"" And DispatchOrdState>=1 And isDepartment("030107")=1 then%><input type="button" name="submit48_2" value="打印调度单" class="ui-state-default" onclick="form1_submit48_2();"> <%End if%>
|
</div>
|
</div>
|
</div>
|
|
</div>
|
</div>
|
</form>
|
|
<script LANGUAGE="javascript">
|
//保存调度单(新增)
|
function form1_submit24_1(){
|
document.form1.action = "admin_save.gds";
|
document.form1.admin_save.value = "24";
|
document.form1.DispatchOrd_Check.value = "";
|
form1.submit();
|
}
|
//保存调度单(修改)
|
function form1_submit25_1(){
|
document.form1.action = "admin_save.gds";
|
document.form1.admin_save.value = "25";
|
document.form1.DispatchOrd_Check.value = "";
|
form1.submit();
|
}
|
//下发调度单(新增)
|
function form1_submit24_2(){
|
document.form1.action = "admin_save.gds";
|
document.form1.admin_save.value = "24";
|
document.form1.DispatchOrd_Check.value = "2";
|
form1.submit();
|
}
|
//下发调度单(修改)
|
function form1_submit25_2(){
|
document.form1.action = "admin_save.gds";
|
document.form1.admin_save.value = "25";
|
document.form1.DispatchOrd_Check.value = "2";
|
form1.submit();
|
}
|
//审核通过调度单(修改)
|
function form1_submit28_1(){
|
if(confirm("确定审核通过调度单?"))
|
{
|
document.form1.action = "admin_save.gds";
|
document.form1.admin_save.value = "25";
|
document.form1.DispatchOrd_Check.value = "1";
|
form1.submit();
|
}
|
}
|
//审核不通过调度单(修改)
|
function form1_submit28_2(){
|
if(confirm("确定审核不通过调度单?"))
|
{
|
document.form1.action = "admin_save.gds";
|
document.form1.admin_save.value = "25";
|
document.form1.DispatchOrd_Check.value = "4";
|
form1.submit();
|
}
|
}
|
//反审核调度单(修改)
|
function form1_submit28_3(){
|
if(confirm("确定反审核调度单?"))
|
{
|
document.form1.action = "admin_save.gds";
|
document.form1.admin_save.value = "25";
|
document.form1.DispatchOrd_Check.value = "0";
|
form1.submit();
|
}
|
}
|
//取消调度单
|
function form1_submit27_1(){
|
if(confirm("确定取消调度单吗?"))
|
{
|
if(confirm("是否同时取消服务单?"))
|
{
|
document.form1.action = "admin_save.gds?ServiceOrdDel=1";
|
document.form1.admin_save.value = "27";
|
form1.submit();
|
}
|
else
|
{
|
document.form1.action = "admin_save.gds?ServiceOrdDel=0";
|
document.form1.admin_save.value = "27";
|
form1.submit();
|
}
|
}
|
}
|
//强制完结调度单
|
function form1_submit38_1(){
|
JS_ForceEndCreateOpen();
|
}
|
//填写转运完成报告单
|
function form1_button33()
|
{
|
window.location.replace('DispatchOrder_End.gds?DispatchOrdID=<%=DispatchOrdID%>&h_menu1_1=1');
|
}
|
//修改单据类型
|
function form1_OrdClass(OrdClass){
|
document.form1.action = "ServiceOrder.gds?OrdClass="+OrdClass;
|
form1.submit();
|
}
|
//地图-关闭窗口
|
function JS_BaiduCalCreateClose()
|
{
|
BaiduCalCreate.style.display="none";
|
}
|
//地图-确定地址
|
function JS_BaiduCalCreateSave(sw,Lu,ret1,ret)
|
{
|
//服务单地址
|
document.getElementById('ServiceOrdTraStreet').value=document.getElementById('frm_street').value; //出发地
|
document.getElementById('ServiceOrdTraEnd').value=document.getElementById('frm_end').value; //目的地
|
document.getElementById('ServiceOrdTraStreetCoo').value=sw; //起点坐标
|
document.getElementById('ServiceOrdTraEndCoo').value=Lu; //起点坐标
|
document.getElementById('ServiceOrdTraDuration').value=ret1; //获取时间
|
document.getElementById('ServiceOrdTraDistance').value=ret; //获取距离
|
//调度单地址
|
document.getElementById('DispatchOrdTraStreet').value=document.getElementById('frm_street').value;
|
document.getElementById('DispatchOrdTraEnd').value=document.getElementById('frm_end').value;
|
|
//计算标准报价
|
var TraUnitPrice=document.getElementById('ServiceOrdTraUnitPrice').value;
|
var km="";
|
if (TraUnitPrice!='')
|
{
|
if (ret.indexOf("公里")>=1) {km=ret.replace(/公里/, "");}
|
else {km=ret.replace(/米/, "");km=parseFloat(km)/1000;}
|
km=parseFloat(km);
|
TraUnitPrice=parseFloat(TraUnitPrice);
|
document.getElementById('ServiceOrdTraOfferPrice').value=TraUnitPrice*km;
|
document.getElementById('ServiceOrdTraTxnPrice').value=TraUnitPrice*km;
|
}
|
|
}
|
</script>
|
<div class="dialogJ dialogJfix dialogJshadow" id="BaiduCalCreate" style="width: 1215px;left: 80px; top: 110px;height:670px ;display:none;">
|
<div class="dialogJtitle">
|
<a href="javascript:JS_BaiduCalCreateClose();" class="dialogJclose" title="关闭本窗口"> </a>
|
<span class="dialogJtxt" id="EditPhotoTXT">选择路线</span>
|
</div>
|
<div class="dialogJcontent" style="margin-left: 5px;margin-right:5px;">
|
<!--#include virtual="/inc/baidu_cal.gds" -->
|
</div>
|
</div>
|
|
|
|
<div class="dialogJ dialogJfix dialogJshadow" id="window_Car" style="z-index: 50007; width: 350px; left: 0px; top: 0px;display:none;">
|
<div class="dialogJtitle">
|
<a href="javascript:JS_CarClose();" class="dialogJclose" title="关闭本窗口"> </a>
|
<span class="dialogJtxt">选择车辆</span> <input type="text" id="CarSearchTXT" name="CarSearchTXT" value="<%=CarSearchTXT%>" style="width: 100px;" onkeypress="EnterPress_Car(event)" onkeydown="EnterPress_Car()"/> <input type="button" name="button3" value="查询" onclick="JS_CarSearch();"> <input type="button" name="button3" value="清空" onclick="JS_CarDel();">
|
</div>
|
<div class="dialogJcontent">
|
<div class="box">
|
<div class="table" style="padding: 0px;">
|
<input name="window_CarID" type="hidden" value="">
|
<table>
|
<thead>
|
<tr>
|
<th class="category left" style="text-align: center;">车牌</th>
|
<th class="category last" style="text-align: center;">车型</th>
|
</tr>
|
</thead>
|
<tbody id="CarList">
|
<%for j=0 to 6%>
|
<tr>
|
<td class="category"> </td>
|
<td class="category last"> </td>
|
</tr>
|
<%next%>
|
</tbody>
|
</table>
|
</div>
|
</div>
|
</div>
|
</div>
|
<script LANGUAGE="javascript">
|
//打开选择车辆窗口
|
function JS_CarOpen()
|
{
|
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("DispatchOrdCarLicense").getBoundingClientRect().top;
|
if (dTop<200) {dTop=110;}
|
var dLeft = document.getElementById("DispatchOrdCarLicense").getBoundingClientRect().left;
|
if (dLeft<200) {dLeft=200;}
|
window_Car.style.display="block";
|
window_Car.style.left=(dLeft-100)+"px";
|
window_Car.style.top=(sTop+dTop+30)+"px";
|
window.HiddenFrame.location.replace('CarSearch.gds');
|
}
|
//关闭选择车辆窗口
|
function JS_CarClose()
|
{
|
document.all.CarSearchTXT.value='';
|
window_Car.style.display="none";
|
}
|
//选择车辆查询
|
function JS_CarSearch()
|
{
|
CarSearchTXT=document.all.CarSearchTXT.value;
|
window.HiddenFrame.location.replace('CarSearch.gds?CarSearchTXT='+CarSearchTXT);
|
}
|
function EnterPress_Car(e){ //传入 event
|
var e = e || window.event;
|
if(e.keyCode == 13){JS_CarSearch();}
|
}
|
//选择车辆
|
function JS_CarSave(CarID,CarLicense)
|
{
|
document.getElementById("DispatchOrdCarID").value=CarID;
|
document.getElementById("DispatchOrdCarLicense").value=CarLicense;
|
<%if DispatchOrdID<>"" And DispatchOrdState<10 And DispatchOrd_AP_Check="0" And isDepartment("030111")=1 then%>document.getElementById("DispatchOrdCarLicenseR").value=CarLicense;<%end if%>
|
JS_CarClose();
|
}
|
//选择车辆清空
|
function JS_CarDel()
|
{
|
document.getElementById("DispatchOrdCarID").value='';
|
document.getElementById("DispatchOrdCarLicense").value='';
|
<%if DispatchOrdID<>"" And DispatchOrdState<10 And DispatchOrd_AP_Check="0" And isDepartment("030111")=1 then%>document.getElementById("DispatchOrdCarLicenseR").value='';<%end if%>
|
JS_CarClose();
|
}
|
//显示车辆列表窗口
|
function JS_CarList(CarListArray,acc1,acc2,CarSearchTXT)
|
{
|
var CarListHTML = "";
|
var i = 0;
|
if (CarListArray.length>0)
|
{
|
for (var i=0;i<CarListArray.length;i++)
|
{
|
CarListHTML = CarListHTML+"<tr onclick='JS_CarSave("+CarListArray[i][0]+",\""+CarListArray[i][1]+"\")' style='cursor:pointer'><td class='category'>"+CarListArray[i][1]+"</td><td class='category last1'>"+CarListArray[i][2]+"</td></tr>";
|
}
|
}
|
if (acc2>1)
|
{
|
i=i+1;
|
CarListHTML = CarListHTML+"<tr><td colspan='2' style='text-align:center;'>";
|
if (acc1>1){CarListHTML = CarListHTML+"<a href='javascript:window.HiddenFrame.location.replace(\"CarSearch.gds?CarSearchTXT="+CarSearchTXT+"&page="+(acc1-1)+"\");'>上一页</a>";}else{CarListHTML = CarListHTML+" ";}
|
if (acc1<acc2){CarListHTML = CarListHTML+" <a href='javascript:window.HiddenFrame.location.replace(\"CarSearch.gds?CarSearchTXT="+CarSearchTXT+"&page="+(acc1+1)+"\");'>下一页</a></td></tr>";}
|
}
|
|
for (var j=i;j<=6;j++)
|
{
|
CarListHTML = CarListHTML+"<tr><td class='category'> </td><td class='category last1'> </td></tr>";
|
}
|
document.getElementById("CarList").innerHTML=CarListHTML;
|
|
}
|
</script>
|
|
<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="关闭本窗口"> </a>
|
<span class="dialogJtxt">选择人员</span> <input type="text" id="EntourageSearchTXT" name="EntourageSearchTXT" value="<%=EntourageSearchTXT%>" style="width: 100px;" onkeypress="EnterPress(event)" onkeydown="EnterPress()"/> <input type="button" name="button3" value="查询" onclick="JS_EntourageSearch();"> <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"> </th>
|
<th class="category" style="text-align: center;">姓名</th>
|
<th class="category last" style="text-align: center;">手机</th>
|
</tr>
|
</thead>
|
<tbody id="EntourageList">
|
<%for j=0 to 6%>
|
<tr>
|
<td class="selected"> </td>
|
<td class="category"> </td>
|
<td class="category last"> </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!=0){window.HiddenFrame.location.replace('AdminUserSearch.gds?OA_CompetencyID='+OA_CompetencyID);}
|
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;
|
window.HiddenFrame.location.replace('AdminUserSearch.gds?OA_CompetencyID='+OA_CompetencyID+'&EntourageSearchTXT='+EntourageSearchTXT);
|
}
|
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;
|
if (EntourageListArray.length>0)
|
{
|
for (var i=0;i<EntourageListArray.length;i++)
|
{
|
EntourageListHTML = EntourageListHTML+"<tr onclick='JS_EntourageSave("+EntourageListArray[i][0]+",\""+EntourageListArray[i][1]+"\")' style='cursor:pointer'><td class='selected'><img src='"+EntourageListArray[i][3]+"' style='max-width:29px;max-height: 29px;'></td><td class='category'>"+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'> </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+"&page="+(acc1-1)+"\");'>上一页</a>";}else{EntourageListHTML = EntourageListHTML+" ";}
|
if (acc1<acc2){EntourageListHTML = EntourageListHTML+" <a href='javascript:window.HiddenFrame.location.replace(\"AdminUserSearch.gds?OA_CompetencyID="+OA_CompetencyID+"&EntourageSearchTXT="+EntourageSearchTXT+"&page="+(acc1+1)+"\");'>下一页</a></td></tr>";}
|
}
|
|
for (var j=i;j<=6;j++)
|
{
|
EntourageListHTML = EntourageListHTML+"<tr><td class='selected'> </td><td class='price'> </td><td class='price last1'> </td></tr>";
|
}
|
document.getElementById("EntourageList").innerHTML=EntourageListHTML;
|
|
}
|
</script>
|
<!-- end forms -->
|
|
<%If DispatchOrdState>3 And DispatchOrdID<>"" then%>
|
<!-- forms -->
|
<div class="box">
|
<!-- box / title -->
|
<div class="title">
|
<h5>运行情况</h5>
|
<ul class="links">
|
<%
|
'出车时间
|
sql="select DispatchOrdStartDate from DispatchOrd_Running where DispatchOrdIDDt="&DispatchOrdID&" and (DispatchOrdState=4 or DispatchOrdState=7) order by DispatchOrdState,DispatchOrdStartDate desc"
|
rs.open sql,objConn,1,1
|
if not rs.Eof Then
|
begin_time=rs(0)
|
End if
|
rs.close()
|
'返回时间
|
sql="select DispatchOrdStartDate from DispatchOrd_Running where DispatchOrdIDDt="&DispatchOrdID&" and DispatchOrdState in (8,9) order by DispatchOrdStartDate desc"
|
rs.open sql,objConn,1,1
|
if not rs.Eof Then
|
end_time=rs(0)
|
End if
|
rs.close()
|
'GPS设备IMEI
|
imei=CarDataA(DispatchOrdCarID,"","CarIMEI")%>
|
<%If imei<>"" And end_time="" then%>
|
<li><a href="https://sys.966120.com.cn/GPS_tracking.asp?imei=<%=imei%>" target="_blank">实时监控</a></li>
|
<%End if%>
|
<%If imei<>"" And begin_time<>"" then%>
|
<li><a href="https://sys.966120.com.cn/GPS_playback.asp?imei=<%=imei%>&begin_time=<%=begin_time%>&end_time=<%=end_time%>" target="_blank">行程回放</a></li>
|
<%End If%>
|
|
</ul>
|
|
</div>
|
<!-- end box / title -->
|
<!-- end box / title -->
|
<div class="table">
|
<table>
|
<thead>
|
<tr style="white-space: nowrap;">
|
<th>出车状态</th>
|
<th>操作人</th>
|
<th>操作时间</th>
|
<th class="last">坐标</th>
|
</tr>
|
</thead>
|
<tbody>
|
<%
|
SetOutDateR=DispatchOrdActualDate
|
sql="select * from DispatchOrd_Running where DispatchOrdIDDt="&DispatchOrdID&" order by DispatchOrdStartDate"
|
rs.open sql,objConn,1,1
|
do while not rs.Eof
|
Rid = rs("id") '操作ID
|
DispatchOrdStateR = rs("DispatchOrdState") '
|
DispatchOrdStartDateR= rs("DispatchOrdStartDate")
|
DispatchOrdStartOAR = rs("DispatchOrdStartOA")
|
OA_latitude = rs("OA_latitude")
|
OA_longitude = rs("OA_longitude")
|
If DispatchOrdStateR="4" Or DispatchOrdStateR="7" Then SetOutDateR=DispatchOrdStartDateR
|
If DispatchOrdStateR="8" Then ReturnDateR=DispatchOrdStartDateR
|
%>
|
|
<tr style="white-space: nowrap;">
|
<td class="category1"><%=replace(DispatchOrdStateA(DispatchOrdStateR),"全部确定：","")%></td>
|
<td class="category"><%=OAUser(DispatchOrdStartOAR,"UserName")%></td>
|
<td class="category"><%=DispatchOrdStartDateR%></td>
|
<td class="category last"><a href="DispatchOrder_map.gds?DispatchOrdID=<%=DispatchOrdID%>" target="_blank"><%=OA_latitude%>:<%=OA_longitude%></a></td>
|
</tr>
|
<%rs.movenext
|
loop
|
rs.close()
|
%>
|
</tbody>
|
</table>
|
</div>
|
</div>
|
<!-- end forms -->
|
<%End if%>
|
|
<%If ServiceOrdID<>"" Then%>
|
<!-- forms -->
|
<div class="box">
|
<!-- box / title -->
|
<div class="title">
|
<h5>收款记录</h5>
|
</div>
|
<!-- end box / title -->
|
<!-- end box / title -->
|
<div class="table">
|
<table>
|
<thead>
|
<tr style="white-space: nowrap;">
|
<th>收款编号</th>
|
<th>收款日期</th>
|
<th>收款方式</th>
|
<th>收款金额</th>
|
<th>收款人</th>
|
<th>状态</th>
|
<th class="selected last"><input type="checkbox" class="checkall" /></th>
|
</tr>
|
</thead>
|
<form id="form3" name="form3" action="" method="post">
|
<input name="admin_save" type="hidden" value="34">
|
<input name="PaidMoney_Check" type="hidden" value="">
|
<input name="DispatchOrdID" type="hidden" value="<%=DispatchOrdID%>">
|
<tbody>
|
<%
|
sql="select PaidMoney.id,vtext,PaidMoney,PaidMoneyType,PaidMoneyTime,PaidMoneyOaID,PaidMoney_AP_Check,PaidMoney_AP_ID,PaidMoney_AP_Time from PaidMoney,dictionary where vtitle='PaidMoneyType' and vType>=1 and vID=PaidMoneyType and PaidMoney<>0 and ServiceOrdIDDt="&ServiceOrdID&" order by PaidMoneyTime"
|
rs.open sql,objConn,1,1
|
i=0
|
PaidMoney_Check=0
|
sunPaidMoney=0
|
do while not rs.Eof
|
PaidMoneyID = rs("ID") '收款单号
|
PaidMoneyName = rs("vtext") '收款方式名称
|
PaidMoneyType = rs("PaidMoneyType") '收款方式ID
|
PaidMoney = rs("PaidMoney") '收款金额
|
PaidMoneyTime = rs("PaidMoneyTime") '收款时间
|
PaidMoneyOaID = rs("PaidMoneyOaID") '收款操作人员ID
|
PaidMoney_AP_Check= rs("PaidMoney_AP_Check") '审核状态(0未审核,1已审核)
|
PaidMoney_AP_ID = rs("PaidMoney_AP_ID") '审核人员ID
|
PaidMoney_AP_Time = rs("PaidMoney_AP_Time") '审核时间
|
|
sunPaidMoney=sunPaidMoney+PaidMoney
|
If PaidMoney_AP_Check=0 Then PaidMoney_Check=1
|
%>
|
<tr style="white-space: nowrap;">
|
<td class="category"><%=PaidMoneyID%></td>
|
<td class="category"><%=PaidMoneyTime%></td>
|
<td class="category"><%=PaidMoneyName%></td>
|
|
<td class="category"><%=FormatCurrency(PaidMoney,0,-1)%></td>
|
<td class="category"><%=OAUser(PaidMoneyOaID,"UserName")%></td>
|
<td class="category"><%=AP_Check_A(PaidMoney_AP_Check)%></td>
|
<td class="selected last"><%If PaidMoney_AP_Check=0 then%><input type="checkbox" id="PaidMoneyID_<%=PaidMoneyID%>" name="PaidMoneyID" value="<%=PaidMoneyID%>"/><%End if%></th>
|
</tr>
|
<%rs.movenext
|
loop
|
rs.close()
|
%>
|
<tr>
|
<td> </td>
|
<td> </td>
|
<td style="text-align: right;">总收款:</td>
|
<td style="text-align: center;"><%=FormatCurrency(sunPaidMoney,0,-1)%></td>
|
<td> </td>
|
<td> </td>
|
<td class="last"> </td>
|
</tr>
|
<%If ServiceOrdTraTxnPrice-sunPaidMoney>0 then%>
|
<tr>
|
<td> </td>
|
<td> </td>
|
<td style="text-align: right;">未支付:</td>
|
<td style="text-align: center;"><%=FormatCurrency(ServiceOrdTraTxnPrice-sunPaidMoney,0,-1)%></td>
|
<td> </td>
|
<td> </td>
|
<td class="last"> </td>
|
</tr>
|
<%End if%>
|
|
</tbody>
|
</form>
|
</table>
|
<%If (PaidMoney_Check=1 And isDepartment("030204")=1) Or isDepartment("030202")=1 then%>
|
<div class="action">
|
<div class="button">
|
|
<%If isDepartment("030202")=1 Then%><input type="button" name="submit51" id="PaidMoneyAdd" value="新建费用单" class="ui-button ui-widget ui-state-default ui-corner-all" role="button" aria-disabled="false" onclick="javascript:JS_PaidMoneyCreateOpen()"> <%End If%>
|
<%If PaidMoney_Check=1 And isDepartment("030204")=1 then%><input type="button" name="submit51" id="PaidMoneyAP_1" value="审核费用单" class="ui-button ui-widget ui-state-default ui-corner-all" role="button" aria-disabled="false" onclick="javascript:form1_AP_1();"> <%End If%>
|
|
</div>
|
<script LANGUAGE="javascript">
|
//审核
|
function form1_AP_1(){
|
if(confirm("确定审核所选费用单?"))
|
{
|
document.form3.action = "admin_save.gds";
|
document.form3.admin_save.value="34"
|
document.form3.PaidMoney_Check.value="1"
|
form3.submit();
|
}
|
}
|
//反审核
|
function form1_AP_0(){
|
if(confirm("确定反审核所选费用单?"))
|
{
|
document.form1.action = "admin_save.gds";
|
document.form1.admin_save.value="34"
|
document.form1.PaidMoney_Check.value="0"
|
form1.submit();
|
}
|
}
|
//作废
|
function form1_AP_2(){
|
if(confirm("确定作废所选费用单?"))
|
{
|
document.form1.action = "admin_save.gds";
|
document.form1.admin_save.value="34"
|
document.form1.PaidMoney_Check.value="-1"
|
form1.submit();
|
}
|
}
|
//打开窗口
|
function JS_PaidMoneyCreateOpen()
|
{
|
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("PaidMoneyAdd").getBoundingClientRect().top;
|
var dLeft = document.getElementById("PaidMoneyAdd").getBoundingClientRect().left;
|
if (dTop<200) {dTop=200;}
|
if (dLeft<120) {dLeft=120;}
|
PaidMoneyCreate.style.display="block";
|
PaidMoneyCreate.style.left=(dLeft-230)+"px";
|
PaidMoneyCreate.style.top=(sTop+dTop-350)+"px";
|
PaidMoneyCreate.style.display='block';
|
JS_PaidMoneySearch();
|
}
|
|
//新建字典-关闭上传窗口
|
function JS_PaidMoneyCreateClose()
|
{
|
PaidMoneyCreate.style.display="none";
|
}
|
//新建字典-保存
|
function JS_PaidMoneyCreateSave()
|
{
|
form2.submit();
|
}
|
//受理单调单查询
|
function JS_PaidMoneySearch()
|
{
|
ServiceOrdNo=document.form2.ServiceOrdNo.value;
|
window.HiddenFrame.location.replace('Search_ServiceOrd.gds?ServiceOrdNo='+ServiceOrdNo);
|
}
|
//显示受理单数据
|
function JS_PaidMoneyData(ServiceOrdID,ServiceOrdPtName,PaidMoney)
|
{
|
document.form2.ServiceOrdPtName.value=ServiceOrdPtName;
|
document.form2.PaidMoney.value=PaidMoney;
|
document.form2.ServiceOrdID.value=ServiceOrdID;
|
}
|
</script>
|
<!--新建费用单-->
|
<div class="dialogJ dialogJfix dialogJshadow" id="PaidMoneyCreate" style="width: 370px; right: 300px; top: 150px;display:none;">
|
|
<div class="dialogJtitle">
|
<a href="javascript:JS_PaidMoneyCreateClose();" class="dialogJclose" title="关闭本窗口"> </a>
|
<span class="dialogJtxt" id="EditPhotoTXT">新建费用单</span>
|
</div>
|
<form id="form2" name="form2" action="admin_save.gds" method="post">
|
<input name="admin_save" type="hidden" value="35">
|
<input name="searchTXT" type="hidden" value="<%=searchTXT%>">
|
<input name="ServiceOrdID" type="hidden" value="<%=ServiceOrdID%>">
|
<input name="DispatchOrdID" type="hidden" value="<%=DispatchOrdID%>">
|
<input name="page" type="hidden" value="<%=acc1%>">
|
<input name="OrdState" type="hidden" value="<%=OrdState%>">
|
<input name="OrdClassList" type="hidden" value="<%=OrdClassList%>">
|
<input name="OrdDateType" type="hidden" value="<%=OrdDateType%>">
|
<input name="PaidMoneyTimestamp" id="PaidMoneyTimestamp" type="hidden" value="<%=ToUnixTime(now(),+8)%>">
|
<input name="ReturnID" type="hidden" value="DispatchOrder">
|
<div class="dialogJcontent">
|
<div class="dialogJbody" id="dialogJbody" style="height: 210px;">
|
<div class="modify-album-name">
|
<span>受理单号：</span>
|
<input id="ServiceOrdNo" name="ServiceOrdNo" type="text" value="<%=DispatchOrdNo%>" style="width: 165px;" maxlength="99/"><input type="button" style="text-indent:initial;" class="dialogJbtn first-child" onclick="JS_PaidMoneySearch()" value="调单">
|
</div>
|
<div class="modify-album-name">
|
<span>患者姓名：</span>
|
<input id="ServiceOrdPtName" name="ServiceOrdPtName" class="valid" type="text" value="" maxlength="99/" readonly="true">
|
</div>
|
<div class="modify-album-name">
|
<span>结算方式：</span>
|
<select name="PaidMoneyType" id="PaidMoneyType" style="padding: 5px 0 5px 8px;">
|
<option value="">请选择</option>
|
<%sql="select vID,vtext from dictionary where vtitle='PaidMoneyType' and vType>=1 order by vOrder"
|
rs.open Sql,objConn,1,1
|
do while not rs.Eof%>
|
<option value="<%=rs("vID")%>"><%=rs("vtext")%></option>
|
<%rs.movenext
|
Loop
|
rs.close()%>
|
</select>
|
</div>
|
<div class="modify-album-name">
|
<span>结算金额：</span>
|
<input id="vMono" name="PaidMoney" type="text" value="" maxlength="99/">
|
</div>
|
<div class="modify-album-name">
|
<span>结算备注：</span>
|
<input id="vMono" name="PaidMoneyMono" type="text" value="" maxlength="99/">
|
</div>
|
</div>
|
</div>
|
</form>
|
<div class="dialogJanswers">
|
<input type="button" class="dialogJbtn first-child" onclick="JS_PaidMoneyCreateSave()" value="确定">
|
<input type="button" class="dialogJbtn" onclick="JS_PaidMoneyCreateClose()" value="取消">
|
</div>
|
</div>
|
<!--新建费用单 end-->
|
</div>
|
<%End if%>
|
</div>
|
</div>
|
<!-- end forms -->
|
<%End if%>
|
|
<%If DispatchOrdID<>"" And DispatchOrdState<10 And DispatchOrd_AP_Check="0" And isDepartment("030111")=1 then%>
|
<script LANGUAGE="javascript">
|
//打开窗口
|
function JS_ForceEndCreateOpen()
|
{
|
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("ForceEndAdd").getBoundingClientRect().top;
|
var dLeft = document.getElementById("ForceEndAdd").getBoundingClientRect().left;
|
if (dTop<200) {dTop=200;}
|
if (dLeft<120) {dLeft=120;}
|
ForceEndCreate.style.display="block";
|
ForceEndCreate.style.left=(dLeft-230)+"px";
|
ForceEndCreate.style.top=(sTop+dTop-350)+"px";
|
ForceEndCreate.style.display='block';
|
}
|
|
//强制完结调用单-关闭上传窗口
|
function JS_ForceEndCreateClose()
|
{
|
ForceEndCreate.style.display="none";
|
}
|
//强制完结调用单-保存
|
function JS_ForceEndCreateSave()
|
{
|
document.formForceEnd.DispatchOrdCarID.value=document.getElementById("DispatchOrdCarID").value;
|
var a = /^(\d{1,4})(-|\/)(\d{1,2})\2(\d{1,2}) (\d{1,2}):(\d{1,2}):(\d{1,2})$/
|
var b = /^(\d{1,4})(-|\/)(\d{1,2})\2(\d{1,2}) (\d{1,2}):(\d{1,2})$/
|
|
if(document.formForceEnd.DispatchOrdCarID.value=='' || document.formForceEnd.DispatchOrdCarID.value=='0') {
|
alert('请输入派遣车辆!!');
|
return false;
|
}
|
if (!a.test(document.getElementById("SetOutDateR").value) && !b.test(document.getElementById("SetOutDateR").value)) {
|
alert("请输入正确的出车时间!")
|
return false
|
}
|
if (!a.test(document.getElementById("ReturnDateR").value) && !b.test(document.getElementById("ReturnDateR").value)) {
|
alert("请输入正确的返回时间!")
|
return false
|
}
|
if(confirm("确定强制完结调用单?"))
|
{
|
formForceEnd.submit();
|
}
|
}
|
</script>
|
<!--强制完结调用单-->
|
<div class="dialogJ dialogJfix dialogJshadow" id="ForceEndCreate" style="width: 370px; right: 300px; top: 150px;display:none;">
|
<div class="dialogJtitle">
|
<a href="javascript:JS_ForceEndCreateClose();" class="dialogJclose" title="关闭本窗口"> </a>
|
<span class="dialogJtxt" id="EditPhotoTXT">强制完结调用单</span>
|
</div>
|
<form id="formForceEnd" name="formForceEnd" action="admin_save.gds" method="post">
|
<input name="admin_save" type="hidden" value="38">
|
<input name="DispatchOrdID" type="hidden" value="<%=DispatchOrdID%>">
|
<input name="DispatchOrdCarID" type="hidden" value="<%=DispatchOrdCarID%>">
|
<div class="dialogJcontent">
|
<div class="dialogJbody" id="dialogJbody" style="height: 210px;">
|
<div class="modify-album-name">
|
<span>派遣车辆：</span>
|
<input type="text" id="DispatchOrdCarLicenseR" name="DispatchOrdCarLicenseR" onclick="javascript:JS_CarOpen();" style="width:138px;" value="<%=DispatchOrdCarLicense%>" readonly="true" maxlength="99/">
|
</div>
|
<div class="modify-album-name">
|
<span>出车时间：</span>
|
<input id="SetOutDateR" name="SetOutDateR" class="date" type="text" value="<%=SetOutDateR%>" style="width: 165px;" maxlength="99/">
|
</div>
|
<div class="modify-album-name">
|
<span>返回时间：</span>
|
<input id="ReturnDateR" name="ReturnDateR" class="date" type="text" value="<%=ReturnDateR%>" maxlength="99/" style="width: 165px;">
|
</div>
|
|
</div>
|
</div>
|
</form>
|
<div class="dialogJanswers">
|
<input type="button" class="dialogJbtn first-child" onclick="JS_ForceEndCreateSave()" value="确定">
|
<input type="button" class="dialogJbtn" onclick="JS_ForceEndCreateClose()" value="取消">
|
</div>
|
</div>
|
<!--强制完结调用单 end-->
|
<%End if%>
|
|
</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>
|
