<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
|
<%Session.CodePage=65001%>
|
<%
|
'Response.Cookies("OA")("adminID")=""
|
'Response.end
|
ServiceOrdID=request("ServiceOrdID")
|
NEWOrder=request("NEWOrder")
|
DispatchOrdID=request("DispatchOrdID")
|
closeWindow=SafeRequest(Request("closeWindow"))
|
OrdEdit=SafeRequest(Request("OrdEdit"))
|
OldOrder=request("OldOrder")
|
state=request("state")
|
If state<>"" Then
|
stateSP=split(state,"|")
|
for i = 0 to UBOUND(stateSP)
|
If InStr(stateSP(i),"DispatchOrdID=")=1 Then
|
DispatchOrdID=Replace(stateSP(i),"DispatchOrdID=","")
|
ElseIf InStr(stateSP(i),"closeWindow=")=1 Then
|
closeWindow=Replace(stateSP(i),"closeWindow=","")
|
ElseIf InStr(stateSP(i),"ServiceOrdID=")=1 Then
|
ServiceOrdID=Replace(stateSP(i),"ServiceOrdID=","")
|
ElseIf InStr(stateSP(i),"NEWOrder=")=1 Then
|
NEWOrder=Replace(stateSP(i),"NEWOrder=","")
|
ElseIf InStr(stateSP(i),"OrdEdit=")=1 Then
|
NEWOrder=Replace(stateSP(i),"OrdEdit=","")
|
ElseIf InStr(stateSP(i),"OldOrder=")=1 Then
|
OldOrder=Replace(stateSP(i),"OldOrder=","")
|
End If
|
Next
|
End If
|
if DispatchOrdID="" And ServiceOrdID="" then Response.Redirect "/"
|
If DispatchOrdID<>"" Then
|
state=DispatchOrdID
|
Else
|
state=ServiceOrdID
|
End If
|
%>
|
<!--#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>
|
|
<%
|
Set rs = Server.CreateObject("ADODB.Recordset")
|
If DispatchOrdID<>"" Then
|
If OldOrder<>"Yes" and 1=2 Then '检查之前执行的订单状态
|
sql="select top 1 DispatchOrdID,DispatchOrdClass,DispatchOrd_NS_Time,DispatchOrdNo,EntourageLead from DispatchOrd_Entourage,DispatchOrd where DispatchOrdID=DispatchOrdIDDt and EntourageState<>4 and EntourageEnd_Time is null and DispatchOrdState<8 and DispatchOrd_NS_Time>='2021-1-1' and DispatchOrdIDDt<>"&DispatchOrdID&" and EntourageOAid="&session("adminID")&" order by DispatchOrdStartDate desc"
|
rs.open sql,objConn,1,1
|
If not rs.Eof Then
|
Old_DispatchOrdID = rs("DispatchOrdID")
|
Old_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)
|
If rs("EntourageLead")=1 Then
|
alertTXT="您之前执行的订单："&Old_DispatchOrdNo&"未返回，请先处理。"
|
Else
|
alertTXT="您之前执行的订单："&Old_DispatchOrdNo&"未返回，请先通知领队处理。"
|
End If
|
%>
|
<script LANGUAGE="javascript">
|
alert('<%=alertTXT%>');
|
window.location.replace('/m_DispatchOrder.gds?DispatchOrdID=<%=Old_DispatchOrdID%>&OldOrder=Yes');
|
</script>
|
<%Response.End()
|
End If
|
rs.close()
|
End If
|
|
sql="select * from DispatchOrd where DispatchOrdState>0 and 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是)
|
DispatchOrd_AP_Reason = rs("DispatchOrd_AP_Reason") '审核原因
|
DispatchOrdCarID = rs("DispatchOrdCarID") '派遣车辆ID
|
DispatchOrdTraSDTime = rs("DispatchOrdTraSDTime") '拟出发时间
|
If year(DispatchOrdTraSDTime)<2010 then DispatchOrdTraSDTime=""
|
DispatchOrdActualDate = rs("DispatchOrdActualDate") '实际出车时间
|
DispatchOrdArriveDate = rs("DispatchOrdArriveDate") '实际到达时间
|
DispatchOrdReturnDate = rs("DispatchOrdReturnDate") '实际返回时间
|
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") '行驶备注记录
|
EntourageName_aid1 = rs("EntourageName_aid1") '外援人员1
|
EntourageName_aid2 = rs("EntourageName_aid2") '外援人员2
|
DispatchOrdPerfomance = rs("DispatchOrdPerfomance")
|
RecommendedCar = rs("RecommendedCar") '指定车型
|
CarStItm_OAId = rs("CarStItm_OAId") '物品清单检查人ID
|
CarSeatBelt_OAId = rs("CarSeatBelt_OAId") '系安全带检查人ID
|
StretcherMoney = rs("StretcherMoney") '担架费
|
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) '调度单编号
|
Call OA_Running("手机端打开调度单:"&DispatchOrdNo&" ID:"&DispatchOrdID)
|
|
Else
|
Response.Redirect "/m_DispatchOrder_List.gds?DispatchOrdID="&DispatchOrdID&"&SystemMessageType=4&SMT=9"
|
End If
|
rs.close()
|
|
'查看权限验证
|
sql="select EntourageOAid,EntourageID from DispatchOrd_Entourage where EntourageState<>4 and DispatchOrdIDDt="&DispatchOrdID&" and EntourageOAid="&session("adminID")
|
rs.open sql,objConn,1,1
|
If rs.Eof Then
|
rs.close()
|
sql="select * from OA_User where OA_User_ID="&session("adminID")
|
rs.open sql,objConn,1,1
|
If not rs.Eof then
|
OA_weixinUserID = rs("OA_weixinUserID")
|
OA_Name = rs("OA_Name")
|
OA_weixinAvatar = rs("OA_weixinAvatar")
|
OA_DepartmentID = rs("OA_DepartmentID")
|
session("admin_Power")=rs("OA_Power")
|
admin_Power=session("admin_Power")
|
End If
|
If isDepartment("0702")=0 And isDepartment("020112")=0 And CInt(DispatchOrd_NS_ID)<>CInt(session("adminID")) Then Response.Redirect "/m_logout.html"
|
PowerOrderLevel=0
|
OAEntourageID=0
|
Else
|
PowerOrderLevel=1
|
OAEntourageID=rs("EntourageID")
|
End If
|
rs.close()
|
|
'领队情况
|
isCarUpdate="0"
|
sql="select DispatchOrd_Entourage.id,EntourageOAid,EntourageLead,OA_weixinUserID,EntourageState,EntourageState_Time,OA_Name,OA_weixinAvatar,vtext from DispatchOrd_Entourage,OA_User,dictionary where vtitle='DispatchOrdEntourage' and EntourageID=vID and OA_User_ID=EntourageOAid and EntourageState<>4 and DispatchOrdIDDt="&DispatchOrdID
|
rs.open sql,objConn,1,1
|
do while not rs.Eof
|
If rs("EntourageLead")="1" Then
|
EntourageLeadID=rs("EntourageOAid")
|
End If
|
If (rs("vtext")="司机") And DispatchOrdState<4 And CInt(session("adminID"))=CInt(rs("EntourageOAid")) Then
|
isCarUpdate="1"
|
End If
|
rs.movenext
|
loop
|
rs.close()
|
ElseIf ServiceOrdID<>"" Then
|
|
Else
|
Response.Redirect "/m_DispatchOrder_List.gds?DispatchOrdID="&DispatchOrdID&"&SystemMessageType=4&SMT=9"
|
End If
|
|
'相关受理单
|
OrderLevel=0
|
If ServiceOrdID<>"" then
|
sql="select * from ServiceOrder where ServiceOrdID="&ServiceOrdID
|
rs.open sql,objConn,1,1
|
If not rs.Eof then
|
ServiceOrdID = rs("ServiceOrdID") '服务单号
|
ServiceOrdClass = rs("ServiceOrdClass") '单据类型
|
ServiceOrdType = rs("ServiceOrdType") '服务单类型
|
ServiceOrdState = rs("ServiceOrdState") '服务单状态
|
ServiceOrdStartDate = rs("ServiceOrdStartDate") '开单日期
|
ServiceOrdApptDate = rs("ServiceOrdApptDate") '预约日期
|
If year(ServiceOrdApptDate)<2010 then ServiceOrdApptDate=""
|
ServiceOrdCoName = rs("ServiceOrdCoName") '联系人姓名
|
ServiceOrdCoPhone = rs("ServiceOrdCoPhone") '联系人电话
|
ServiceOrdCoTies = rs("ServiceOrdCoTies") '联系人与患者关系
|
ServiceOrdPtName = rs("ServiceOrdPtName") '患者姓名
|
ServiceOrdPtAge = rs("ServiceOrdPtAge") '患者年龄
|
ServiceOrdPtSex = rs("ServiceOrdPtSex") '患者性别
|
ServiceOrdPtNat = rs("ServiceOrdPtNat") '患者国籍
|
ServiceOrdPtOutHosp = rs("ServiceOrdPtOutHosp") '转出医院
|
ServiceOrdPtOutHospID = rs("ServiceOrdPtOutHospID") '转出医院ID
|
ServiceOrdPtInHosp = rs("ServiceOrdPtInHosp") '转入医院
|
ServiceOrdPtInHospID = rs("ServiceOrdPtInHospID") '转入医院ID
|
ServiceOrdPtServices = rs("ServiceOrdPtServices") '转出科室
|
ServiceOrdPtServicesID= rs("ServiceOrdPtServicesID") '转出科室ID
|
ServiceOrdPtInServices = rs("ServiceOrdPtInServices") '转入科室
|
ServiceOrdPtInServicesID= rs("ServiceOrdPtInServicesID") '转入科室ID
|
ServiceOrdPtDiagnosis = rs("ServiceOrdPtDiagnosis") '诊断
|
ServiceOrdPtCondition = rs("ServiceOrdPtCondition") '备注
|
ServiceOrdPtDoctor = rs("ServiceOrdPtDoctor") '患者医生
|
ServiceOrdPtDoctorPhone=rs("ServiceOrdPtDoctorPhone") '患者医生电话
|
ServiceOrdTraProvince = rs("ServiceOrdTraProvince") '出发地省份
|
ServiceOrdTraCity = rs("ServiceOrdTraCity") '出发地城市
|
ServiceOrdTraStreet = rs("ServiceOrdTraStreet") '出发地
|
ServiceOrdTraStreetCoo= rs("ServiceOrdTraStreetCoo") '出发地坐标
|
ServiceOrdTraVia = rs("ServiceOrdTraVia") '途经
|
ServiceOrdTraEnd = rs("ServiceOrdTraEnd") '目的地
|
ServiceOrdTraEndCoo = rs("ServiceOrdTraEndCoo") '目的地坐标
|
ServiceOrdTraDistance = rs("ServiceOrdTraDistance") '距离(公里)
|
ServiceOrdTraDuration = rs("ServiceOrdTraDuration") '预计行程时间
|
ServiceOrdTraUnitPrice= rs("ServiceOrdTraUnitPrice") '单价/公里
|
ServiceOrdTraOfferPrice=rs("ServiceOrdTraOfferPrice") '标准报价
|
ServiceOrdTraTxnPrice = rs("ServiceOrdTraTxnPrice") '成交价
|
ServiceOrdTraPaidPrice= rs("ServiceOrdTraPaidPrice") '已支付金额
|
ServiceOrdTraPriceReason=rs("ServiceOrdTraPriceReason")'差价原因
|
ServiceOrd_CC_ID = rs("ServiceOrd_CC_ID") '第一次接单人员ID
|
ServiceOrd_CC_Time = rs("ServiceOrd_CC_Time") '第一次接单时间
|
ServiceOrd_NS_ID = rs("ServiceOrd_NS_ID") '确认服务单人员ID
|
ServiceOrd_NS_Time = rs("ServiceOrd_NS_Time") '确认服务单时间
|
ServiceOrd_AP_Check = rs("ServiceOrd_AP_Check") '服务单审核状态(0未审核,1已审核)
|
ServiceOrd_AP_ID = rs("ServiceOrd_AP_ID") '服务单审核人员ID
|
ServiceOrd_AP_Time = rs("ServiceOrd_AP_Time") '服务单审核时间
|
ServiceOrdIntroducer = rs("ServiceOrdIntroducer") '介绍人
|
ServiceOrd_Sale_ID = rs("ServiceOrd_Sale_ID") '销售人员ID
|
ServiceOrdUnitID = rs("ServiceOrdUnitID") '第三方ID
|
ServiceOrdUnitRemarks = rs("ServiceOrdUnitRemarks") '第三方订单备注
|
OrderLevel = rs("OrderLevel") '查看等级
|
ServiceOrdVisit = rs("ServiceOrdVisit") '回访记录
|
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)
|
If IsNumeric(ServiceOrdTraDistance) Then ServiceOrdTraDistance=ServiceOrdTraDistance&"公里"
|
If NEWOrder<>"" Then DispatchOrdPerfomance=ServiceOrdTraTxnPrice
|
End If
|
rs.close()
|
sql="select id from ServiceOrd_TransferMode where ServiceOrdTMID="&ServiceOrdID&" and TransferModeID=1"
|
rs.open sql,objConn,1,1
|
If not rs.Eof Then
|
TransferMode=1
|
TransferModeTXT="3 确认出车 （先选择司机、车辆）"
|
Else
|
TransferMode=0
|
TransferModeTXT="1 确认出车"
|
End If
|
rs.close()
|
If ServiceOrdClass<>"" And DispatchOrdClass="" Then
|
sql="select top 1 vID,vtext,vOrder2 from dictionary where vtext in (select top 1 replace(vtext,'服务单','调度单') from dictionary where vtitle='OrderClass' and vOrder2='"&ServiceOrdClass&"') and vtitle='OrderClass' and vType=2"
|
rs.open sql,objConn,1,1
|
If not rs.Eof Then
|
DispatchOrdClass=rs("vOrder2")
|
End If
|
rs.close()
|
End If
|
End If
|
|
'操作人员是否相关人员
|
is_AdminOrd=0
|
If ServiceOrd_CC_ID<>"" And is_AdminOrd=0 Then
|
If CInt(session("adminID"))=CInt(ServiceOrd_CC_ID) Then
|
is_AdminOrd=1
|
End If
|
End If
|
If ServiceOrd_NS_ID<>"" And is_AdminOrd=0 Then
|
If CInt(session("adminID"))=CInt(ServiceOrd_NS_ID) Then
|
is_AdminOrd=1
|
End If
|
End If
|
If ServiceOrd_AP_ID<>"" And is_AdminOrd=0 Then
|
If CInt(session("adminID"))=CInt(ServiceOrd_AP_ID) Then
|
is_AdminOrd=1
|
End If
|
End If
|
If DispatchOrd_NS_ID<>"" And is_AdminOrd=0 Then
|
If CInt(session("adminID"))=CInt(DispatchOrd_NS_ID) Then
|
is_AdminOrd=1
|
End If
|
End If
|
If DispatchOrd_AP_ID<>"" And is_AdminOrd=0 Then
|
If CInt(session("adminID"))=CInt(DispatchOrd_AP_ID) Then
|
is_AdminOrd=1
|
End If
|
End If
|
If isDepartment("020112")=1 And is_AdminOrd=0 Then
|
is_AdminOrd=1
|
End If
|
|
'行程默认信息
|
If DispatchOrdTraStreet="" Then DispatchOrdTraStreet=ServiceOrdTraStreet
|
If DispatchOrdTraVia="" Then DispatchOrdTraVia=ServiceOrdTraVia
|
If DispatchOrdTraEnd="" Then DispatchOrdTraEnd=ServiceOrdTraEnd
|
If DispatchOrdCoName="" Then DispatchOrdCoName=ServiceOrdCoName
|
If DispatchOrdCoPhone="" Then DispatchOrdCoPhone=ServiceOrdCoPhone
|
|
'行驶里程
|
If DispatchOrdMileage=0 And DispatchOrdTraStreetMileage<>0 And DispatchOrdTraEndMileage<>0 Then
|
DispatchOrdMileage1=DispatchOrdTraEndMileage-DispatchOrdTraStreetMileage
|
DispatchOrdGasoline1=""
|
Else
|
DispatchOrdMileage1=DispatchOrdMileage
|
DispatchOrdGasoline1=DispatchOrdGasoline
|
End If
|
|
'审核状态
|
If DispatchOrdState="8" Or DispatchOrdState="9" Then
|
If DispatchOrd_AP_Check="1" then
|
DispatchOrd_CheckTXT = DispatchOrdStateA(12)
|
ElseIf DispatchOrd_AP_Check="0" And DispatchOrdMileage>0 then
|
DispatchOrd_CheckTXT = "等待审核"
|
ElseIf DispatchOrd_AP_Check="0" And DispatchOrdMileage=0 then
|
DispatchOrd_CheckTXT = "未提交"
|
End If
|
If DispatchOrd_AP_Reason<>"" Then DispatchOrd_CheckTXT=DispatchOrd_CheckTXT&" "&DispatchOrd_AP_Reason
|
If DispatchOrd_CheckTXT<>"" Then DispatchOrd_CheckTXT="（"&DispatchOrd_CheckTXT&" ）"
|
End If
|
|
'第三方相关信息
|
CPicInt=0
|
If ServiceOrdUnitRemarks<>"" And not isnull(ServiceOrdUnitRemarks) Then
|
s=0
|
do While InStr(ServiceOrdUnitRemarks,"http")>0 And s<=500
|
cpic=Mid(ServiceOrdUnitRemarks,InStr(ServiceOrdUnitRemarks,"http"))
|
If InStr(cpic,".jpg")>0 Then
|
cc=InStr(cpic,".jpg")+3
|
ElseIf InStr(cpic,".jpga")>0 Then
|
cc=InStr(cpic,".jpga")+4
|
ElseIf InStr(cpic,".png")>0 Then
|
cc=InStr(cpic,".png")+3
|
ElseIf InStr(cpic,".bmp")>0 Then
|
cc=InStr(cpic,".bmp")+3
|
End If
|
cpic=Left(cpic,cc)
|
ConditionPic=ConditionPic&","&cpic
|
ServiceOrdUnitRemarks=Replace(ServiceOrdUnitRemarks,cpic,"")
|
s=s+1
|
Loop
|
If ConditionPic<>"" Then
|
'ConditionPic=Mid(ConditionPic,2)
|
ConditionPic=SPLIT(ConditionPic,",")
|
CPicInt=UBOUND(ConditionPic)
|
End If
|
End If
|
|
If DispatchOrdCarID<>"" And DispatchOrdCarID<>"0" Then
|
DispatchOrdCarLicense=CarDataA(DispatchOrdCarID,"","CarLicense")
|
ElseIf (DispatchOrdState=3 Or DispatchOrdState=2) And CInt(session("adminID"))=CInt(EntourageLeadID) Then
|
DispatchOrdCarLicense="点击选择车辆"
|
Else
|
DispatchOrdCarLicense="未指派"
|
End If
|
%>
|
<body>
|
<div id="m_Orer"<%If isDepartment("0702")=1 Then Response.Write "style=""display:none"""%>>
|
<!--#include virtual="/m_DispatchOrder_header.gds"-->
|
<!--<div class="order_head"><a href="order_List.asp"><font></font></a>调度详情</div>-->
|
<!--<div class="os_status"><span class="os_statusfirst">订单状态：等待卖家发货</span><span class="os_refresh">刷新</span></div>-->
|
|
<!--<div class="os_line"></div>-->
|
|
<form id="form1" name="form1" action="admin_save.gds" method="post" onsubmit="return check()">
|
<input name="admin_save" type="hidden" value="">
|
<input name="ServiceOrdID" type="hidden" value="<%=ServiceOrdID%>">
|
<input name="DispatchOrdID" type="hidden" value="<%=DispatchOrdID%>">
|
<input name="EntourageLeadID" type="hidden" value="<%=EntourageLeadID%>">
|
<input name="OA_latitude" type="hidden" value="">
|
<input name="OA_longitude" type="hidden" value="">
|
<input name="OA_address" type="hidden" value="<%=OA_address%>">
|
<input name="DispatchOrdCarID" id="DispatchOrdCarID" type="hidden" value="<%=DispatchOrdCarID%>">
|
<%If NEWOrder<>"" then%>
|
<input name="DispatchOrd_Check" type="hidden" value="<%=NEWOrder%>">
|
<input name="DispatchOrdClass" type="hidden" value="<%=DispatchOrdClass%>">
|
<input name="DispatchOrdState" type="hidden" value="<%=DispatchOrdState%>">
|
<input name="DispatchOrdCoName" type="hidden" value="<%=DispatchOrdCoName%>">
|
<input name="DispatchOrdCoPhone" type="hidden" value="<%=DispatchOrdCoPhone%>">
|
<input name="DispatchOrdTraStreet" type="hidden" value="<%=DispatchOrdTraStreet%>">
|
<input name="DispatchOrdTraEnd" type="hidden" value="<%=DispatchOrdTraEnd%>">
|
<input name="DispatchOrdTraVia" type="hidden" value="<%=DispatchOrdTraVia%>">
|
<input name="DispatchOrdPerfomance" type="hidden" value="<%=DispatchOrdPerfomance%>">
|
<%End If%>
|
<input name="PaidMoneyTimestamp" id="PaidMoneyTimestamp" type="hidden" value="<%=ToUnixTime(now(),+8)%>">
|
<%If DispatchOrdID<>"" Then%>
|
<header id="pageletIndexHeader">
|
<div class="top_menu_bar">
|
<div class="top_menu_more"><div class="list_shadow"></div><a href="/channels/" class="more_btn" ga_category="channel" ga_label="" ga_event="channel_more"></a></div>
|
<div id="top_menu" class="top_menu">
|
<div class="top_menu_list">
|
<%
|
'If DispatchOrdStateR="" Then DispatchOrdStateR=1
|
scrollLeft=0
|
sql="select vID,vtext from dictionary where vtitle='DispatchOrdState' and vID>=1 and vID<=8 order by vOrder"
|
rs.open sql,objConn,1,1
|
do while not rs.Eof
|
OrdStateID = rs("vID")
|
OrdStateName= replace(rs("vtext"),"全部确定：","")
|
|
|
If CInt(OrdStateID)<=CInt(DispatchOrdState) Then
|
OrdStateStyle=" cur"
|
If CInt(OrdStateID)<CInt(DispatchOrdState) Then scrollLeft=scrollLeft+Len(OrdStateName)*14+14
|
Else
|
OrdStateStyle=""
|
End If
|
%>
|
<a href="#" class="btn<%=OrdStateStyle%>" name="<%=OrdStateID%>"><%=OrdStateName%></a>
|
<%
|
rs.movenext
|
If not rs.Eof Then Response.Write "<img src=""/resources/images/342231.gif"" style=""width: 12px;"">"
|
loop
|
rs.close()
|
%>
|
</div>
|
</div>
|
</div>
|
</header>
|
<script>document.getElementById("top_menu").scrollLeft=<%=scrollLeft%>;</script>
|
<%End If%>
|
<%If DispatchOrdID<>"" Then%>
|
<div class="os_shopname"><%=replace(DispatchOrdStateA(DispatchOrdState),"全部确定：","")&DispatchOrd_CheckTXT%></div>
|
<%If DispatchOrdState<=3 then%>
|
<%If DispatchOrdTraSDTime<>"" And DispatchOrdClass<>"SP" Then%><div class="os_shopname">计划出发时间：<%=DispatchOrdTraSDTime%></div><%End if%>
|
<%If DispatchOrdTraSDTime<>"" And DispatchOrdClass="SP" Then%><div class="os_shopname">驻点日期：<%=DispatchOrdTraSDTime%></div><%End if%>
|
<%else%>
|
<div class="os_shopname">出发时间：<%=DispatchOrdActualDate%></div>
|
<%End If%>
|
<%End If%>
|
|
<%If DispatchOrdClass="SP" then%>
|
<input name="DispatchOrdTraStreetMileage" type="hidden" value="0">
|
<div class="os_shopname" style="color: #2196F3;">驻点地：<%=DispatchOrdTraEnd%></div>
|
<div class="os_shopname"<%If (DispatchOrdState=3 Or DispatchOrdState=2) And CInt(session("adminID"))=CInt(EntourageLeadID) Then%> onclick="showCarLicense()" id="DispatchOrdCarLicense"<%End if%> style="color: #ff0000;">登记出车车牌号码：<%=DispatchOrdCarLicense%></div>.
|
<%If (DispatchOrd_AP_Check="0" And DispatchOrdMileage="0") And CInt(session("adminID"))=CInt(EntourageLeadID) Then%>
|
<div class="os_shopname" style="color: #ff0000;">物品检查：<a href="/m_CarStItm.gds?DispatchOrdID=<%=DispatchOrdID%>" style="color: #ff0000;"><%If Not isnull(CarStItm_OAId) then%>已检查<%else%>未检查<%End If%></a></div>
|
<%Else%>
|
<div class="os_shopname" style="color: #ff0000;">物品检查：<%If Not isnull(CarStItm_OAId) then%>已检查<%else%>未检查<%End If%></div>
|
<%End if%>
|
<%else%>
|
<%If DispatchOrdID<>"" Then%><div class="os_shopname"></div><%End If%>
|
|
<div class="os_shopname" style="color: #2196F3;">出发地：<a onclick="lbs_distance('<%=DispatchOrdTraStreet%>','<%=DispatchOrdTraStreet%>')" style="color: #2196F3;"><%=DispatchOrdTraStreet%></a></div>
|
<div class="os_shopname"></div>
|
<%'途经地
|
If DispatchOrdTraVia<>"" then%>
|
<%OrdTraVia = SPLIT(DispatchOrdTraVia,"=>")
|
If UBOUND(OrdTraVia)>=1 Then
|
for j = 0 to UBOUND(OrdTraVia)
|
%>
|
<div class="os_shopname" style="color: #F13F11;">途经：<a onclick="lbs_distance('<%=Trim(OrdTraVia(j))%>','<%=Trim(OrdTraVia(j))%>')" style="color: #F13F11;"><%=DispatchOrdTraEnd%></a></div>
|
<%Next
|
ElseIf UBOUND(OrdTraVia)=0 Then
|
DispatchOrdTraViaTXT=Trim(OrdTraVia(0))
|
End If%>
|
<%End if%>
|
<%'转出医院
|
If ServiceOrdID<>"" then%>
|
<%If ServiceOrdPtOutHospID<>"" And ServiceOrdPtOutHospID<>"0" And ServiceOrdPtOutHospID<>"153" Then
|
sql="select HospName,HospLevel,HopsProvince,HopsCity,HopsArea,HospAddress from HospData where HospID="&ServiceOrdPtOutHospID
|
rs.open sql,objConn,1,1
|
If not rs.Eof Then
|
PtOutHospName=rs("HospName")
|
PtOutHopsProvince=rs("HopsProvince")
|
PtOutHopsCity=rs("HopsCity")
|
PtOutHopsArea=rs("HopsArea")
|
PtOutHospAddress=rs("HospAddress")
|
%>
|
<div class="os_shopname" style="line-height: 25px;color: #F13F11;">转出医院：<%=PtOutHospName%><br> (<%=PtOutHopsProvince&PtOutHopsCity&PtOutHopsArea&PtOutHospAddress%>)</div>
|
<%
|
End If
|
rs.close()
|
%>
|
<%End if%>
|
<%
|
If PtOutHospAddress<>"" Then
|
address=PtOutHopsProvince&PtOutHopsCity&PtOutHopsArea&PtOutHospAddress
|
else
|
address=DispatchOrdTraViaTXT
|
If InStr(address,"市")<=0 And PtOutHopsCity<>"" Then
|
address=PtOutHopsCity&address
|
End If
|
If InStr(address,"省")<=0 And PtOutHopsProvince<>"" Then
|
address=PtOutHopsProvince&address
|
End If
|
End If
|
|
%>
|
<div class="os_shopname" style="color: #F13F11;" onclick="lbs_distance('<%=PtOutHospName%>','<%=address%>')"><%If PtOutHospName="" Then%>途经<%else%>转出地址<%End If%>：<%=DispatchOrdTraViaTXT%>
|
<div class="os_weight" style="right: 15px;transform: translateY(35%);"><img src="/resources/images/lbs-red.png" width="20" height="20" border="0"></div>
|
</div>
|
<%If (ServiceOrdPtServices<>"" Or (ServiceOrdPtServicesID<>0 And ServiceOrdPtServicesID<>22)) And CInt(session("adminID"))=CInt(EntourageLeadID) Then %><div class="os_shopname" style="color: #F13F11;">转出床位：<%=HospitalDepartment(ServiceOrdPtServicesID)%> <%=ServiceOrdPtServices%></div><%End if%>
|
<div class="os_shopname"></div>
|
<%End if%>
|
|
<%'转入医院
|
If ServiceOrdID<>"" then%>
|
<%If ServiceOrdPtInHospID<>"" And ServiceOrdPtInHospID<>"0" And ServiceOrdPtInHospID<>"153" Then
|
sql="select HospName,HospLevel,HopsProvince,HopsCity,HopsArea,HospAddress from HospData where HospID="&ServiceOrdPtInHospID
|
rs.open sql,objConn,1,1
|
If not rs.Eof Then
|
PtInHospName=rs("HospName")
|
PtInHospProvince=rs("HopsProvince")
|
PtInHospCity=rs("HopsCity")
|
PtInHospArea=rs("HopsArea")
|
PtInHospAddress=rs("HospAddress")
|
%>
|
<div class="os_shopname" style="line-height: 25px;color: #009900;">转入医院：<%=PtInHospName%><br> (<%=PtInHospProvince&PtInHospCity&PtInHospArea&PtInHospAddress%>)</div>
|
<%
|
End If
|
rs.close()
|
%>
|
<%End if%>
|
<%
|
If PtInHospAddress<>"" Then
|
address=PtInHospProvince&PtInHospCity&PtInHospArea&PtInHospAddress
|
else
|
address=DispatchOrdTraEnd
|
If InStr(address,"市")<=0 And PtInHospCity<>"" Then
|
address=PtInHospCity&address
|
End If
|
If InStr(address,"省")<=0 And PtInHospProvince<>"" Then
|
address=PtInHospProvince&address
|
End If
|
End If
|
%>
|
<div class="os_shopname" style="color: #009900;" onclick="lbs_distance('<%=DispatchOrdTraEnd%>','<%=address%>')"><%If PtInHospName="" Then%>目的地<%else%>转入地址<%End If%>：<%=DispatchOrdTraEnd%>
|
<div class="os_weight" style="right: 15px;transform: translateY(35%);"><img src="/resources/images/lbs-green.png" width="20" height="20" border="0"></div>
|
</div>
|
<%If (ServiceOrdPtInServices<>"" Or (ServiceOrdPtInServicesID<>0 And ServiceOrdPtInServicesID<>22)) And CInt(session("adminID"))=CInt(EntourageLeadID) Then %><div class="os_shopname" style="color: #009900;">转入床位：<%=HospitalDepartment(ServiceOrdPtInServicesID)%> <%=ServiceOrdPtInServices%></div><%End if%>
|
<div class="os_shopname"></div>
|
<%Else%>
|
<div class="os_shopname" style="color: #009900;">目的地：<a onclick="lbs_distance('<%=DispatchOrdTraEnd%>','<%=DispatchOrdTraEnd%>')" style="color: #009900;"><%=DispatchOrdTraEnd%></a></div>
|
<div class="os_shopname"></div>
|
<%End if%>
|
|
<%If DispatchOrdState<>9 and DispatchOrdState<>8 then%>
|
<%If ServiceOrdTraDistance<>"" And ServiceOrdTraDistance<>"0" And ServiceOrdTraDistance<>"0公里" Then%><div class="os_shopname">预估距离：<%=ServiceOrdTraDistance%></div><%If ServiceOrdTraDuration<>"" Then%><div class="os_shopname">预计时间：<%=ServiceOrdTraDuration%></div><%End if%><%End if%>
|
<%If ServiceOrdApptDate<>"1900-1-1" And ServiceOrdApptDate<>"" Then%><div class="os_shopname">预约时间：<%=ServiceOrdApptDate%></div><%End If%>
|
<%End if%>
|
<%If Not Isnull(DispatchOrdArriveDate) And DispatchOrdArriveDate<>"" then%><div class="os_shopname">到达时间：<%=DispatchOrdArriveDate%></div><%End if%>
|
|
<%'沿途天气情况
|
If PtOutHopsCity<>"" And PtInHospCity<>"" And PtOutHopsCity<>PtInHospCity Then
|
'If ServiceOrdApptDate<>"1900-1-1" And ServiceOrdApptDate<>"" Then
|
' ApptDate=Year(ServiceOrdApptDate)&"."&Right("0"&Month(ServiceOrdApptDate),2)&"."&Right("0"&Day(ServiceOrdApptDate),2)&" "&Right("0"&Hour(ServiceOrdApptDate),2)&":"&Right("0"&Minute(ServiceOrdApptDate),2)
|
'Else
|
' ApptDate=Year(now())&"."&Right("0"&Month(now()),2)&"."&Right("0"&Day(now()),2)&" "&Right("0"&Hour(now()),2)&":"&Right("0"&Minute(now()),2)
|
'End If
|
ApptDate=Year(now())&"."&Right("0"&Month(now()),2)&"."&Right("0"&Day(now()),2)&" "&Right("0"&Hour(now()),2)&":"&Right("0"&Minute(now()),2)
|
%>
|
<div class="os_shopname" style="color: #009900;"><a href="http://e.weather.com.cn/chunyun/weather.html?starts=<%=PtOutHopsCity%>&ends=<%=PtInHospCity%>&start=<%=PtOutHopsCity%>&end=<%=PtInHospCity%>&date=<%=ApptDate%>&_cmpt=">查看沿途天气情况</a></div>
|
<%End If%>
|
<%'支付情况
|
If (DispatchOrdState>=5 And DispatchOrdState<=9) And ServiceOrdTraTxnPrice<>"" And CInt(session("adminID"))=CInt(EntourageLeadID) then%>
|
<div class="os_shopname"></div>
|
<div class="os_shopname">转运费用：<%=FormatCurrency(ServiceOrdTraTxnPrice,-1,-1)%><%If StretcherMoney<>"" And StretcherMoney>0 Then%> 附加费：<%=FormatCurrency(StretcherMoney,-1,-1)%><%End if%><%If ServiceOrdTraPaidPrice<>"" Then%> 已支付：<%=FormatCurrency(ServiceOrdTraPaidPrice,-1,-1)%><%End if%>
|
<%If (ServiceOrdTraTxnPrice+StretcherMoney)-ServiceOrdTraPaidPrice>0 And 1=2 Then%><br>现支付：
|
<select name="PaidMoneyType" id="PaidMoneyType" style="-webkit-appearance: none;outline: none;border: none;font-size: 14px;" >
|
<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>
|
<input type="text" id="PaidMoney" name="PaidMoney" style="width:40px;border: none;font-size: 14px;text-align:center;" value="<%=(ServiceOrdTraTxnPrice+StretcherMoney)-ServiceOrdTraPaidPrice%>" placeholder="<%=(ServiceOrdTraTxnPrice+StretcherMoney)-ServiceOrdTraPaidPrice%>">元
|
<%else%>
|
<input name="PaidMoneyType" id="PaidMoneyType" type="hidden" value="">
|
<input name="PaidMoney" id="PaidMoney" type="hidden" value="0">
|
<%End if%>
|
</div>
|
<%ElseIf ServiceOrdTraTxnPrice<>"" And ServiceOrdTraTxnPrice<>"0" Then%>
|
<div class="os_shopname"></div>
|
<div class="os_shopname">成交价：<%=FormatCurrency(ServiceOrdTraTxnPrice,-1,-1)%><%If ServiceOrdTraPaidPrice<>"" Then%><%If StretcherMoney<>"" And StretcherMoney>0 Then%> 附加费：<%=FormatCurrency(StretcherMoney,-1,-1)%><%End if%> 已支付：<%=FormatCurrency(ServiceOrdTraPaidPrice,-1,-1)%><%End if%><%If ServiceOrdTraTxnPrice+StretcherMoney-ServiceOrdTraPaidPrice>0 Then%><br>未支付：<%=FormatCurrency(ServiceOrdTraTxnPrice+StretcherMoney-ServiceOrdTraPaidPrice,-1,-1)%><%End if%></div>
|
<%End if%>
|
<%If ServiceOrdTraDistance<>"" And ServiceOrdTraDistance<>"0" And ServiceOrdTraDistance<>"0公里" then%><div class="os_shopname">预估距离：<%=ServiceOrdTraDistance%></div><%End if%>
|
|
<%If OrderLevel<>1 Or isDepartment("020111")=1 Or PowerOrderLevel=1 Or (DispatchOrdID="" And NEWOrder<>"") Then%>
|
<%
|
'敏感信息处理
|
If isDepartment("020109")=0 And session("Power_"&ServiceOrdID)<>"1" And (DispatchOrdID<>"" or ServiceOrdID<>"") And (ServiceOrdClass="BF") And (PowerOrderLevel=0 Or DispatchOrdState>=8) Then
|
sql="select MID from ServiceOrd_Message where ServiceOrdIDDt="&ServiceOrdID&" and MessageState>0 and MessageToOAid="&session("adminID")
|
rs.open sql,objConn,1,1
|
if not rs.eof And DispatchOrdState<8 Then
|
is_Privacy="YES"
|
Else
|
is_Privacy="NO"
|
If ServiceOrdCoName<>"" Then ServiceOrdCoName="【隐】"
|
If ServiceOrdCoPhone<>"" Then ServiceOrdCoPhone="【隐】"
|
If ServiceOrdPtAge<>"" Then ServiceOrdPtAge="【隐】"
|
If ServiceOrdPtName<>"" Then ServiceOrdPtName="【隐】"
|
If ServiceOrdPtServicesID<>"" And ServiceOrdPtServicesID<>"0" Then ServiceOrdPtServicesID="-2"
|
If ServiceOrdPtServices<>"" Then ServiceOrdPtServices="【隐】"
|
If ServiceOrdPtInServicesID<>"" And ServiceOrdPtInServicesID<>"0" Then ServiceOrdPtInServicesID="-2"
|
If ServiceOrdPtInServices<>"" Then ServiceOrdPtInServices="【隐】"
|
If DispatchOrdCoName<>"" Then DispatchOrdCoName="【隐】"
|
If DispatchOrdCoPhone<>"" Then DispatchOrdCoPhone="【隐】"
|
End If
|
rs.close()
|
|
End If
|
%>
|
<%'销售&介绍人信息--隐藏
|
If not isnull(ServiceOrd_Sale_ID) And 1=2 Then
|
ServiceOrd_Sale_Phone=OAUser(ServiceOrd_Sale_ID,"UserPhone")%>
|
<div class="os_shopname"></div>
|
<div class="os_shopname">销售：<%=OAUser(ServiceOrd_Sale_ID,"UserName")%> <a href="tel://<%=ServiceOrd_Sale_Phone%>"><%=ServiceOrd_Sale_Phone%></a></div>
|
<%End if%>
|
<%If ServiceOrdIntroducer<>"" And 1=2 then%>
|
<div class="os_shopname">介绍人：<%=UnitIntroducer(ServiceOrdIntroducer,"UnitName")%></div>
|
<%End If%>
|
|
<%'联系人方式
|
If CInt(session("adminID"))=CInt(EntourageLeadID) Or (DispatchOrdID="" And NEWOrder<>"") then%>
|
<%If DispatchOrdID<>"" Then%><div class="os_shopname"></div><%End If%>
|
<div class="os_shopname">联系人：<%=DispatchOrdCoName%><%If ServiceOrdCoTies<>"" Then%> 与患者关系：<%=ServiceOrdCoTies%><%End if%></div>
|
<div class="os_shopname">联系电话：<a href="tel://<%=DispatchOrdCoPhone%>"><%=DispatchOrdCoPhone%></a></div>
|
<%End if%>
|
|
<%'相关受理单详情
|
If ServiceOrdID<>"" then%>
|
<%If ServiceOrdPtName<>"" Then%><div class="os_shopname">患者姓名：<%=ServiceOrdPtName%></div><%End if%>
|
<%If ServiceOrdPtAge<>"" Or ServiceOrdPtSex<>"" Or ServiceOrdPtNat<>"" Then%><div class="os_shopname"><%If ServiceOrdPtAge<>"" then%>年龄：<%=ServiceOrdPtAge%> <%End if%><%If ServiceOrdPtSex<>"" then%>性别：<%=ServiceOrdPtSex%> <%End if%><%If ServiceOrdPtNat<>"" then%>国籍：<%=ServiceOrdPtNat%><%End if%></div><%End if%>
|
<%If DispatchOrdID<>"" Then%><div class="os_shopname"></div><%End If%>
|
<%
|
sql="select icd_id,icd_name from ServiceOrder_ICD,ICD10 where icd_id=id and ServiceOrdIDDt="&ServiceOrdID&" order by idDt"
|
rs.open sql,objConn,1,1
|
EntourageIDs=""
|
do while not rs.Eof
|
icd_id = rs("icd_id")
|
icd_name= rs("icd_name")
|
OrdICD_ID=OrdICD_ID&","&icd_id
|
OrdICD_name=OrdICD_name&icd_name&" , "
|
rs.movenext
|
loop
|
rs.close()
|
%>
|
<%If ServiceOrdPtDiagnosis<>"" Or OrdICD_name<>"" Then%><div class="os_shopname">诊断：<%=OrdICD_name%><%=ServiceOrdPtDiagnosis%></div><%End if%>
|
<div class="os_shopname" style="float: left;">
|
<%
|
sql="select ConditionID,vOrder2,vtext from ServiceOrd_Condition,dictionary where vtitle='Condition' and ConditionID=vID and ServiceOrdCoID="&ServiceOrdID&" order by vOrder,vID"
|
rs.open sql,objConn,1,1
|
do while not rs.Eof
|
ConditionName= rs("vOrder2")
|
Condition = rs("vtext")
|
Response.Write "<li class=""m_condition""><span style=""font-weight: 700;"">"&ConditionName&"：</span>"&Condition&" </li>"
|
rs.movenext
|
loop
|
rs.close()
|
%>
|
</div>
|
|
<%If ServiceOrdPtCondition<>"" Then%><div class="os_shopname">备注：<%=ServiceOrdPtCondition%></div><%End if%>
|
<%If ServiceOrdPtDoctor<>"" Or ServiceOrdPtDoctorPhone<>"" Then%><div class="os_shopname">主诊医生：<%=ServiceOrdPtDoctor%><%If ServiceOrdPtDoctorPhone<>"" Then%> 电话：<a href="tel://<%=ServiceOrdPtDoctorPhone%>"><%=ServiceOrdPtDoctorPhone%></a><%End if%></div><%End if%>
|
|
<%If ServiceOrdTraPriceReason<>"" Then%><div class="os_shopname">报价备注：<%=ServiceOrdTraPriceReason%></div><%End if%>
|
<%If ServiceOrdVisit<>"" Then%><div class="os_shopname">回访记录：<%=ServiceOrdVisit%></div><%End if%>
|
|
|
<%'病情图片显示
|
If CPicInt>0 Then
|
%>
|
<div class="field">
|
<%for c = 1 to CPicInt%>
|
<a href="<%=ConditionPic(c)%>" target="_blank"><img src="<%=ConditionPic(c)%>" width="350" border="0"></a>
|
<%Next%>
|
</div>
|
<%End If%>
|
<%End if%>
|
<!--liang-->
|
<div class="os_shopname"></div>
|
<%End If%>
|
<!--liang-->
|
<%If (DispatchOrd_AP_Check="0" And DispatchOrdMileage="0") And CInt(session("adminID"))=CInt(EntourageLeadID) And NEWOrder="" Then%>
|
<div class="os_shopname" style="color: #ff0000;">物品检查：<a href="/m_CarStItm.gds?DispatchOrdID=<%=DispatchOrdID%>" style="color: #ff0000;"><%If Not isnull(CarStItm_OAId) then%>已检查<%else%>未检查<%End If%></a></div>
|
<%ElseIf DispatchOrdID<>"" And NEWOrder="" Then%>
|
<div class="os_shopname" style="color: #ff0000;">物品检查：<%If Not isnull(CarStItm_OAId) then%>已检查<%else%>未检查<%End If%></div>
|
<%End if%>
|
<%If RecommendedCar<>"" Then%><div class="os_shopname" style="color: #ff0000;">要求车型：<%=RecommendedCar%></div><%End If%>
|
<div class="os_shopname"<%If ((DispatchOrdState=3 Or DispatchOrdState=2 Or DispatchOrdCarLicense="未指派") And (CInt(session("adminID"))=CInt(EntourageLeadID) Or isCarUpdate="1")) Or NEWOrder<>"" Then%> onclick="showCarLicense()" id="DispatchOrdCarLicense"<%End if%> style="color: #ff0000;">请选择车牌号：<%=DispatchOrdCarLicense%></div>
|
<%'车辆里程数
|
If (DispatchOrdState=3 or DispatchOrdState=2) And (CInt(session("adminID"))=CInt(EntourageLeadID) Or OAEntourageID=1 Or OAEntourageID=2) And NEWOrder="" then%>
|
<div class="os_shopname" style="color: #ff0000;">出车时公里数：<input type="number" id="DispatchOrdTraStreetMileage" name="DispatchOrdTraStreetMileage" style="width:60px;border: none;font-size: 14px;text-align:center;" value="<%=DispatchOrdTraStreetMileage%>" placeholder="______">公里 <span id="DispatchOrdTraStreetMileageUP"><a href="javascript:getchooseImage_JS('DispatchOrdTraStreetMileage')" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;margin: 0px 2px;">保存并拍照</a></span></div>
|
<%elseIf DispatchOrdTraStreetMileage>0 And NEWOrder="" Then%>
|
<div class="os_shopname">出车时公里数：<%=DispatchOrdTraStreetMileage%>公里</div>
|
<%End if%>
|
|
<%If DispatchOrdState=7 And (CInt(session("adminID"))=CInt(EntourageLeadID) Or OAEntourageID=1 Or OAEntourageID=2) And NEWOrder="" then%>
|
<div class="os_shopname" style="color: #ff0000;">收车时公里数：<input type="number" id="DispatchOrdTraEndMileage" name="DispatchOrdTraEndMileage" style="width:60px;border: none;font-size: 14px;text-align:center;" value="" placeholder="______">公里 <span id="DispatchOrdTraEndMileageUP"><a href="javascript:getchooseImage_JS('DispatchOrdTraEndMileage')" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;margin: 0px 2px;">保存并拍照</a></span></div>
|
<%ElseIf DispatchOrdTraEndMileage>0 And NEWOrder="" Then%>
|
<div class="os_shopname">收车时公里数：<%=DispatchOrdTraEndMileage%>公里</div>
|
<%End if%>
|
|
<%If DispatchOrdID="" or NEWOrder<>"" Then%>
|
<div class="os_shopname" style="color: #ff0000;">出车时公里数：<input type="number" id="DispatchOrdTraStreetMileage" name="DispatchOrdTraStreetMileage" style="width:60px;border: none;font-size: 14px;text-align:center;" value="<%=DispatchOrdTraStreetMileage%>" placeholder="______">公里</div>
|
<div class="os_shopname" style="color: #ff0000;">收车时公里数：<input type="number" id="DispatchOrdTraEndMileage" name="DispatchOrdTraEndMileage" style="width:60px;border: none;font-size: 14px;text-align:center;" value="<%=DispatchOrdTraEndMileage%>" placeholder="______">公里</div>
|
<%End If%>
|
|
<%If DispatchOrdMileage>0 Then%><div class="os_shopname">实际运行：<%=DispatchOrdMileage%>公里</div><%End if%>
|
<%End if%>
|
|
<!--<div class="os_oedernumber">派单时间：<%=DispatchOrd_NS_Time%></div>-->
|
<div class="os_img">
|
<%
|
If DispatchOrdID<>"" And (DispatchOrdState=3 Or DispatchOrdState=2 Or NEWOrder<>"") And (CInt(session("adminID"))=CInt(EntourageLeadID) Or is_AdminOrd=1) Then
|
sql="select vID,vOrder2,DispatchOrd_Entourage.id,EntourageOAid=isnull(EntourageOAid,0),EntourageLead=isnull(EntourageLead,0),EntourageLong_is=isnull(EntourageLong_is,0),OA_weixinUserID,EntourageState,EntourageState_Time,OA_Name,OA_weixinAvatar,vtext from dictionary LEFT JOIN DispatchOrd_Entourage on DispatchOrdIDDt="&DispatchOrdID&" and EntourageID=vID and (EntourageState<>4 or EntourageState is null) LEFT JOIN OA_User on OA_User_ID=EntourageOAid where vType=1 and vtitle='DispatchOrdEntourage' order by EntourageLead desc,OA_weixinUserID desc,vtext"
|
ElseIf DispatchOrdID<>"" Then
|
sql="select vID,vOrder2,DispatchOrd_Entourage.id,EntourageOAid,EntourageLead,EntourageLong_is,OA_weixinUserID,EntourageState,EntourageState_Time,OA_Name,OA_weixinAvatar,vtext from DispatchOrd_Entourage,OA_User,dictionary where vtitle='DispatchOrdEntourage' and EntourageID=vID and OA_User_ID=EntourageOAid and EntourageState<>4 and DispatchOrdIDDt="&DispatchOrdID
|
ElseIf ServiceOrdID<>"" And NEWOrder<>"" Then
|
sql="select vID,vOrder2,id=0,EntourageOAid=0,EntourageLead=0,EntourageLong_is=0,OA_weixinUserID='',EntourageState=null,EntourageState_Time='',OA_Name='',OA_weixinAvatar='',vtext from dictionary where vType=1 and vtitle='DispatchOrdEntourage' order by vOrder2"
|
Else
|
Response.Redirect "/m_DispatchOrder_List.gds?DispatchOrdID="&DispatchOrdID&"&SystemMessageType=4&SMT=9"
|
End if
|
rs.open sql,objConn,1,1
|
do while not rs.Eof
|
EntourageID = rs("vID")
|
OA_CompetencyID = rs("vOrder2")
|
EId = rs("id")
|
EntourageOAid = rs("EntourageOAid")
|
EntourageLead = rs("EntourageLead")
|
EntourageLong_is= rs("EntourageLong_is")
|
OA_weixinUserID = rs("OA_weixinUserID")
|
OA_Name = rs("OA_Name")
|
OA_weixinAvatar = rs("OA_weixinAvatar")
|
EntourageName = rs("vtext")
|
EntourageState = rs("EntourageState")
|
EntourageState_Time= rs("EntourageState_Time")
|
|
If EntourageState=1 Or EntourageState=0 then
|
EntourageStateTXT="等待确认"
|
ElseIf EntourageState=2 Then
|
EntourageStateTXT="不接受"
|
ElseIf EntourageState=3 Then
|
EntourageStateTXT="已确认"
|
Else
|
EntourageStateTXT="未指派"
|
OA_weixinAvatar="/resources/images/add_user.png"
|
End If
|
If OA_weixinAvatar="" Then
|
OA_weixinAvatar="/resources/images/icon_avatar_default.png"
|
Else
|
If OA_weixinAvatar<>"/resources/images/add_user.png" Then
|
If Right(OA_weixinAvatar,2)="/0" Then
|
OA_weixinAvatar = Mid(OA_weixinAvatar,1,Len(OA_weixinAvatar)-2)&"/100"
|
End If
|
ElseIf isnull(OA_weixinAvatar) Then
|
OA_weixinAvatar="/resources/images/icon_avatar_default.png"
|
End if
|
End If
|
If CInt(session("adminID"))=CInt(EntourageOAid) And EntourageState<>2 And EntourageState<>3 Then
|
UserEId=EId
|
If EntourageState=0 Then UserEState=EntourageState
|
End If
|
If EntourageLead=1 Then EntourageLeadID=EntourageOAid
|
'If CInt(session("adminID"))<>CInt(EntourageLeadID) Then EntourageLeadID=8
|
|
%>
|
<input name="Entourage_<%=EntourageID%>" id="EntourageOAid_<%=EntourageID%>" type="hidden" value="<%=EntourageOAid%>">
|
<div id="Entourage_<%=EntourageID%>" style=" margin:5px 10px;height: 65px;"<%If (((DispatchOrdState=3 Or DispatchOrdState=2) And CInt(session("adminID"))=CInt(EntourageLeadID)) Or (is_AdminOrd=1 And NEWOrder<>"")) And EntourageLead="0" Then%> onclick="showEntourage('<%=EntourageID%>','<%=OA_CompetencyID%>')"<%End if%>>
|
|
<img src="<%=OA_weixinAvatar%>">
|
<div class="os_name"><%=OA_Name%><%If EntourageLead="1" then%><img src='/resources/images/2016020401.png' style="height: 10px;width: 10px;float: none;"><%End if%><br><%If EntourageLong_is="1" Then Response.Write "跟车"%><%=EntourageName%></div>
|
<div class="os_price"><%=EntourageStateTXT%></span></div>
|
<div class="os_weight"><%=EntourageState_Time%></div>
|
</div>
|
<%rs.movenext
|
loop
|
rs.close()%>
|
|
|
<%'外援人员
|
If EntourageName_aid1<>"" then%>
|
<div style=" margin:5px 10px;height: 65px;">
|
<img src="/resources/images/icon_avatar_default.png">
|
<div class="os_name"><%=EntourageName_aid1%><br>外援人员</div>
|
<div class="os_price">已确认</span></div>
|
<div class="os_weight"><%=DispatchOrd_NS_Time%></div>
|
</div>
|
<%End If%>
|
<%'外援人员
|
If EntourageName_aid2<>"" then%>
|
<div style=" margin:5px 10px;height: 65px;">
|
<img src="/resources/images/icon_avatar_default.png">
|
<div class="os_name"><%=EntourageName_aid2%><br>外援人员</div>
|
<div class="os_price">已确认</span></div>
|
<div class="os_weight"><%=DispatchOrd_NS_Time%></div>
|
</div>
|
<%End If%>
|
</div>
|
<%If DispatchOrdID<>"" Then%>
|
<div class="os_img">
|
<%
|
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")
|
DispatchOrdStateR = rs("DispatchOrdState")
|
DispatchOrdStartDateR= rs("DispatchOrdStartDate")
|
DispatchOrdStartOAR = rs("DispatchOrdStartOA")
|
|
%>
|
<div style=" margin: 0px 10px;height: 35px;line-height: 35px;">
|
<div class="os_name"><%=replace(DispatchOrdStateA(DispatchOrdStateR),"全部确定：","")%></div>
|
<div class="os_weight"><%=DispatchOrdStartDateR%></div>
|
</div>
|
<%rs.movenext
|
loop
|
rs.close()%>
|
</div>
|
<%End If%>
|
</form>
|
<div class="os_shopname xqP2" style="display:none;">正在获取位置...</div>
|
<div style="height:50px;"></div>
|
<div class="posi" id="posi1">
|
<div class="ljgm"><a class="bttt" id="posi1TXT">正在加载...</a></div>
|
</div>
|
<%
|
If session("admin_execLevel")>=1 Then
|
'新建调度单
|
If DispatchOrdID="" And ServiceOrdID<>"" And NEWOrder<>"" Then
|
%>
|
<div class="posi" id="posi" style="display:none;">
|
<div class="ljgm"><a href="javascript:form1_submit24()" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;">确认新建</a></div>
|
<div class="ljgm" style="width: 20%;"><a href="/m_ServiceOrder.gds?ServiceOrdID=<%=ServiceOrdID%>" class="bttt">返回</a></div>
|
</div>
|
<script LANGUAGE="javascript">
|
//生成调度单(新增并完成)
|
function form1_submit24(){
|
if(document.form1.DispatchOrdCarID.value=='' || document.form1.DispatchOrdCarID.value=='0') {
|
alert('请选择派遣车辆!!');
|
return false;
|
}
|
document.form1.action = "admin_save.gds";
|
document.form1.admin_save.value = "24";
|
document.form1.DispatchOrdState.value = "8";
|
form1.submit();
|
}
|
</script>
|
<%
|
'修改调度单
|
ElseIf DispatchOrdID<>"" And ServiceOrdID<>"" And NEWOrder<>"" And DispatchOrdMileage="0" And is_AdminOrd=1 then%>
|
<div class="posi" id="posi" style="display:none;">
|
<div class="ljgm"><a href="javascript:form1_submit113()" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;">确认修改</a></div>
|
<div class="ljgm" style="width: 20%;"><a href="/m_DispatchOrder.gds?ServiceOrdID=<%=ServiceOrdID%>&DispatchOrdID=<%=DispatchOrdID%>" class="bttt">返回</a></div>
|
</div>
|
<script LANGUAGE="javascript">
|
//生成调度单(新增并完成)
|
function form1_submit113(){
|
document.form1.action = "admin_save.gds";
|
document.form1.admin_save.value = "113";
|
form1.submit();
|
}
|
</script>
|
<%
|
'等待确认
|
ElseIf UserEId<>"" And (DispatchOrdState<=8 Or UserEState="0") Then
|
sql="update DispatchOrd_Entourage set EntourageRead_Time=GETDATE() where EntourageRead_Time is null and id="&UserEId
|
objConn.Execute sql
|
%>
|
<div class="posi" id="posi" style="display:none;">
|
<div class="ljgm"><a href="/admin_save.gds?admin_save=30&DispatchOrdID=<%=DispatchOrdID%>&EId=<%=UserEId%>" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;">1 确认</a></div>
|
<div class="ljgm"><a href="/admin_save.gds?admin_save=31&DispatchOrdID=<%=DispatchOrdID%>&EId=<%=UserEId%>" class="bttt">取消</a></div>
|
</div>
|
|
<%'驻点等待出车
|
ElseIf (DispatchOrdState=3 or DispatchOrdState=2 or DispatchOrdState=1) And CInt(session("adminID"))=CInt(EntourageLeadID) And DispatchOrdClass="SP" then%>
|
<div class="posi" id="posi" style="display:none;">
|
<div class="ljgm"><a href="javascript:form1_submit32_1()" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;">确认驻点 （先选择司机、车辆）</a></div>
|
</div>
|
<script LANGUAGE="javascript">
|
function form1_submit32_1()
|
{
|
var OA_latitude=document.form1.OA_latitude.value;
|
var OA_longitude=document.form1.OA_longitude.value;
|
//if (OA_latitude=='' || OA_longitude==''){alert("正在获取地理位置...");return false;}
|
|
if(confirm("确定驻点？")){window.location.replace('/admin_save.gds?admin_save=32&DispatchOrdState=14&DispatchOrdID=<%=DispatchOrdID%>&EntourageLeadID=<%=EntourageLeadID%>&OA_latitude='+OA_latitude+'&OA_longitude='+OA_longitude);}
|
}
|
</script>
|
|
<%'司机上传车况照片
|
ElseIf (DispatchOrdState=3 or DispatchOrdState=2 or DispatchOrdState=1) And isCarUpdate="1" And 1=2 then%>
|
<div class="posi" id="posi" style="display:none;">
|
<div class="ljgm"><a href="/m_DispatchOrder_Update.gds?DispatchOrdID=<%=DispatchOrdID%>&order_type=8&isSeatBeltUpdate=1" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;">检查车况</a></div>
|
</div>
|
<%'物品检查/安全带
|
ElseIf (DispatchOrdState=3 or DispatchOrdState=2 or DispatchOrdState=1) And isnull(CarSeatBelt_OAId) Then%>
|
<div class="posi" id="posi" style="display:none;">
|
<div class="ljgm">请选择司机,车辆并检查</div>
|
<div class="ljgm" style="width: 25%;"><a href="/m_CarStItm.gds?DispatchOrdID=<%=DispatchOrdID%>" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;"><%If Not isnull(CarStItm_OAId) then%>已检查物品<%else%>物品检查<%End If%></a></div>
|
<div class="ljgm" style="width: 25%;"><a href="/m_DispatchOrder_Update.gds?DispatchOrdID=<%=DispatchOrdID%>&order_type=8&isSeatBeltUpdate=1" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;"><%If Not isnull(CarSeatBelt_OAId) then%>已系安全带<%else%>系安全带<%End If%></a></div>
|
</div>
|
<%'等待出车 (注:DispatchOrdState=7为直接可返回,4为详细流程)
|
ElseIf (DispatchOrdState=3 or DispatchOrdState=2 or DispatchOrdState=1) And CInt(session("adminID"))=CInt(EntourageLeadID) Then
|
sql="select count(id) from ImageData where DOrdIDDt="&DispatchOrdID&" and ImageType=4 and ImageDel=0"
|
rs.open sql,objConn,1,1
|
isCarImage=rs(0)
|
rs.close()
|
If DispatchOrdID="3016013654" Then
|
'详细流程
|
DispatchOrdStateNext=4
|
Else
|
'直接可返回
|
DispatchOrdStateNext=7
|
End If
|
|
'详细流程
|
DispatchOrdStateNext=4
|
%>
|
<div class="posi" id="posi" style="display:none;">
|
<div class="ljgm"><a href="javascript:check()" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;"><%=TransferModeTXT%></a></div>
|
<div class="ljgm" style="width: 25%;"><a href="/m_CarStItm.gds?DispatchOrdID=<%=DispatchOrdID%>" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;"><%If Not isnull(CarStItm_OAId) then%>已检查<%else%>物品检查<%End If%></a></div>
|
</div>
|
<%if Not isnull(CarStItm_OAId) then%>
|
<script LANGUAGE="javascript">
|
function check(){form1_submit32_<%=TransferMode%>();return false;}
|
function form1_submit32_0()
|
{
|
var OA_latitude=document.form1.OA_latitude.value;
|
var OA_longitude=document.form1.OA_longitude.value;
|
//if (OA_latitude=='' || OA_longitude==''){alert("正在获取地理位置...");return false;}
|
|
var iNumber=document.form1.DispatchOrdTraStreetMileage.value;
|
if(confirm("确定出车？")){window.location.replace('/admin_save.gds?admin_save=32&DispatchOrdState=<%=DispatchOrdStateNext%>&DispatchOrdID=<%=DispatchOrdID%>&EntourageLeadID=<%=EntourageLeadID%>&StreetMileage='+iNumber+'&OA_latitude='+OA_latitude+'&OA_longitude='+OA_longitude);}
|
}
|
function form1_submit32_1()
|
{
|
var OA_latitude=document.form1.OA_latitude.value;
|
var OA_longitude=document.form1.OA_longitude.value;
|
//if (OA_latitude=='' || OA_longitude==''){alert("正在获取地理位置...");return false;}
|
|
var iNumber=document.form1.DispatchOrdTraStreetMileage.value;
|
//var iNumber = Number(prompt("请输入目前里程数", ""));
|
var iDriver='"os_name"><br>司机</div>'
|
if (document.getElementById("DispatchOrdCarLicense").innerHTML=='请选择车牌号：点击选择车辆' || document.getElementById("DispatchOrdCarLicense").innerHTML=='请选择车牌号：未指派')
|
{alert("请选择车辆");return false;}
|
else if (document.getElementById("Entourage_1").innerHTML.indexOf(iDriver)>0 && document.getElementById("Entourage_2").innerHTML.indexOf(iDriver)>0)
|
{alert("请选择司机");return false;}
|
else if (<%=isCarImage%>==0 && <%=DispatchOrdID%>==3016012319)
|
{if(confirm("请通知司机上传车辆情况")){window.location.replace('/weixin/message_send_CarImage.gds?DispatchOrdID=<%=DispatchOrdID%>');}return false;}
|
else if(isNaN(iNumber) || iNumber==''|| iNumber=='0')
|
{alert("输入目前里程数");return false;}
|
else if (iNumber>0)
|
{if(confirm("目前里程数:"+iNumber+"公里,确定出车？")){window.location.replace('/admin_save.gds?admin_save=32&DispatchOrdState=<%=DispatchOrdStateNext%>&DispatchOrdID=<%=DispatchOrdID%>&EntourageLeadID=<%=EntourageLeadID%>&StreetMileage='+iNumber+'&OA_latitude='+OA_latitude+'&OA_longitude='+OA_longitude);}}
|
}
|
|
</script>
|
<%else%>
|
<script LANGUAGE="javascript">
|
function check(){alert("请先检查物品!!");return false;}
|
</script>
|
<%End If%>
|
|
<%'已出车
|
ElseIf DispatchOrdState=4 And CInt(session("adminID"))=CInt(EntourageLeadID) then%>
|
<div class="posi" id="posi" style="display:none;">
|
<div class="ljgm"><a href="javascript:form1_submit32_1()" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;">4 已到达出发地</a></div>
|
<div class="ljgm" style="width: 20%;"><a href="m_DispatchOrder_PaidMoney.gds?DispatchOrdID=<%=DispatchOrdID%>&order_type=6" class="bttt">支付</a></div>
|
<div class="ljgm" style="width: 20%;"><a href="javascript:form1_submit32_2()" class="bttt">跑空单</a></div>
|
</div>
|
<script LANGUAGE="javascript">
|
function form1_submit32_1(){
|
var OA_latitude=document.form1.OA_latitude.value;
|
var OA_longitude=document.form1.OA_longitude.value;
|
//if (OA_latitude=='' || OA_longitude==''){alert("正在获取地理位置...");return false;}
|
|
if(confirm("请确定已到达出发地，并开始统计等待时长")){window.location.replace('/admin_save.gds?admin_save=32&DispatchOrdState=5&DispatchOrdID=<%=DispatchOrdID%>&EntourageLeadID=<%=EntourageLeadID%>&OA_latitude='+OA_latitude+'&OA_longitude='+OA_longitude);}
|
}
|
function form1_submit32_2()
|
{
|
var OA_latitude=document.form1.OA_latitude.value;
|
var OA_longitude=document.form1.OA_longitude.value;
|
//if (OA_latitude=='' || OA_longitude==''){alert("正在获取地理位置...");return false;}
|
|
var iNumber = Number(prompt("请输入目前里程数", ""));
|
if(isNaN(iNumber))
|
{alert("输入数字");}
|
else if (iNumber>0)
|
{if(confirm("目前里程数:"+iNumber+"公里,确定跑空单已返回？")){window.location.replace('/admin_save.gds?admin_save=32&DispatchOrdState=9&DispatchOrdID=<%=DispatchOrdID%>&EntourageLeadID=<%=EntourageLeadID%>&EndMileage='+iNumber+'&OA_latitude='+OA_latitude+'&OA_longitude='+OA_longitude);}}
|
}
|
</script>
|
|
<%'已到达
|
ElseIf DispatchOrdState=5 And CInt(session("adminID"))=CInt(EntourageLeadID) then%>
|
<div class="posi" id="posi" style="display:none;">
|
<div class="ljgm"><a href="javascript:form1_submit32_1()" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;">5 已接到病人</a></div>
|
<div class="ljgm" style="width: 20%;"><a href="m_DispatchOrder_PaidMoney.gds?DispatchOrdID=<%=DispatchOrdID%>&order_type=6" class="bttt">支付</a></div>
|
<div class="ljgm" style="width: 20%;"><a href="javascript:form1_submit32_2()" class="bttt">跑空单</a></div>
|
</div>
|
<script LANGUAGE="javascript">
|
function form1_submit32_1(){
|
var OA_latitude=document.form1.OA_latitude.value;
|
var OA_longitude=document.form1.OA_longitude.value;
|
//if (OA_latitude=='' || OA_longitude==''){alert("正在获取地理位置...");return false;}
|
|
PaidMoney=document.getElementById('PaidMoney').value
|
PaidMoneyType=document.getElementById('PaidMoneyType').value
|
PaidMoneyTimestamp=document.getElementById('PaidMoneyTimestamp').value
|
if (PaidMoney==''){PaidMoney=0}
|
if (isNaN(PaidMoney)){alert("收款金额请输入数字");return false;}
|
if (PaidMoneyType!='')
|
{if(confirm("现收款:"+PaidMoney+"元\n确定已接到病人？"))
|
{
|
document.form1.action = "admin_save.gds?DispatchOrdState=6";
|
document.form1.admin_save.value = "32";
|
form1.submit();
|
}
|
}
|
else
|
{if(confirm("确定已接到病人？")){window.location.replace('/admin_save.gds?admin_save=32&DispatchOrdState=6&EntourageLeadID=<%=EntourageLeadID%>&DispatchOrdID=<%=DispatchOrdID%>&OA_latitude='+OA_latitude+'&OA_longitude='+OA_longitude);}}
|
}
|
function form1_submit32_2()
|
{
|
var OA_latitude=document.form1.OA_latitude.value;
|
var OA_longitude=document.form1.OA_longitude.value;
|
//if (OA_latitude=='' || OA_longitude==''){alert("正在获取地理位置...");return false;}
|
|
var iNumber = Number(prompt("请输入目前里程数", ""));
|
if(isNaN(iNumber))
|
{alert("输入数字");}
|
else if (iNumber>0)
|
{if(confirm("目前里程数:"+iNumber+"公里,确定跑空单已返回？")){window.location.replace('/admin_save.gds?admin_save=32&DispatchOrdState=9&DispatchOrdID=<%=DispatchOrdID%>&EntourageLeadID=<%=EntourageLeadID%>&EndMileage='+iNumber+'&OA_latitude='+OA_latitude+'&OA_longitude='+OA_longitude);}}
|
}
|
</script>
|
|
<%'已接到病人
|
ElseIf DispatchOrdState=6 And CInt(session("adminID"))=CInt(EntourageLeadID) Then%>
|
<div class="posi" id="posi" style="display:none;">
|
<div class="ljgm"><a href="javascript:check()" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;">6 已送达目的地</a></div>
|
<div class="ljgm" style="width: 20%;"><a href="m_DispatchOrder_PaidMoney.gds?DispatchOrdID=<%=DispatchOrdID%>&order_type=6" class="bttt">支付</a></div>
|
<div class="ljgm" style="width: 20%;"><a href="javascript:form1_submit32_2()" class="bttt">跑空单</a></div>
|
</div>
|
<script LANGUAGE="javascript">
|
function check(){form1_submit32_1();return false;}
|
function form1_submit32_1(){
|
var OA_latitude=document.form1.OA_latitude.value;
|
var OA_longitude=document.form1.OA_longitude.value;
|
//if (OA_latitude=='' || OA_longitude==''){alert("正在获取地理位置...");return false;}
|
|
PaidMoney=document.getElementById('PaidMoney').value
|
PaidMoneyType=document.getElementById('PaidMoneyType').value
|
PaidMoneyTimestamp=document.getElementById('PaidMoneyTimestamp').value
|
if (PaidMoney==''){PaidMoney=0}
|
if (isNaN(PaidMoney)){alert("收款金额请输入数字");return false;}
|
if (PaidMoneyType!='')
|
{if(confirm("现收款:"+PaidMoney+"元\n确定送达成功？"))
|
{
|
document.form1.action = "admin_save.gds?DispatchOrdState=7";
|
document.form1.admin_save.value = "32";
|
form1.submit();
|
}
|
}
|
else
|
{if(confirm("确定送达成功？")){window.location.replace('/admin_save.gds?admin_save=32&DispatchOrdState=7&DispatchOrdID=<%=DispatchOrdID%>&EntourageLeadID=<%=EntourageLeadID%>&OA_latitude='+OA_latitude+'&OA_longitude='+OA_longitude);}}
|
}
|
function form1_submit32_2()
|
{
|
var OA_latitude=document.form1.OA_latitude.value;
|
var OA_longitude=document.form1.OA_longitude.value;
|
//if (OA_latitude=='' || OA_longitude==''){alert("正在获取地理位置...");return false;}
|
|
var iNumber = Number(prompt("请输入目前里程数", ""));
|
if(isNaN(iNumber))
|
{alert("输入数字");}
|
else if (iNumber>0)
|
{if(confirm("目前里程数:"+iNumber+"公里,确定跑空单已返回？")){window.location.replace('/admin_save.gds?admin_save=32&DispatchOrdState=9&DispatchOrdID=<%=DispatchOrdID%>&EntourageLeadID=<%=EntourageLeadID%>&EndMileage='+iNumber+'&OA_latitude='+OA_latitude+'&OA_longitude='+OA_longitude);}}
|
}
|
</script>
|
|
<%'病人送达成功
|
ElseIf DispatchOrdState=7 And CInt(session("adminID"))=CInt(EntourageLeadID) Then%>
|
<div class="posi" id="posi" style="display:none;">
|
<div class="ljgm"><a href="javascript:check()" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;">7 已返回</a></div>
|
<div class="ljgm" style="width: 20%;"><a href="m_DispatchOrder_PaidMoney.gds?DispatchOrdID=<%=DispatchOrdID%>&order_type=6" class="bttt">支付</a></div>
|
<div class="ljgm" style="width: 20%;"><a href="javascript:form1_submit32_2()" class="bttt">跑空单</a></div>
|
</div>
|
<script LANGUAGE="javascript">
|
<%sql="select count(id) from ImageData where DOrdIDDt="&DispatchOrdID&" and ImageDel=0 and ImageType=1"
|
rs.open sql,objConn,1,1
|
If rs(0)>=1 Then%>
|
function check(){form1_submit32_1();return false;}
|
function form1_submit32_1(){
|
var OA_latitude=document.form1.OA_latitude.value;
|
var OA_longitude=document.form1.OA_longitude.value;
|
//if (OA_latitude=='' || OA_longitude==''){alert("正在获取地理位置...");return false;}
|
|
//var iNumber = Number(prompt("请输入目前里程数", ""));
|
var iNumber=document.form1.DispatchOrdTraEndMileage.value;
|
<%if TransferMode=0 then%>
|
if(isNaN(iNumber) || iNumber=='') {iNumber=1}
|
<%end if%>
|
if(isNaN(iNumber) || iNumber=='')
|
{alert("请输入目前里程数"+iNumber);}
|
else if (iNumber>0)
|
{
|
PaidMoney=document.getElementById('PaidMoney').value
|
PaidMoneyType=document.getElementById('PaidMoneyType').value
|
PaidMoneyTimestamp=document.getElementById('PaidMoneyTimestamp').value
|
if (PaidMoney==''){PaidMoney=0}
|
if (isNaN(PaidMoney)){alert("收款金额请输入数字");return false;}
|
if (PaidMoneyType!='')
|
{if(confirm("现收款:"+PaidMoney+"元\n目前里程数:"+iNumber+"公里\n确定已返回？"))
|
{
|
document.form1.action = "admin_save.gds?DispatchOrdState=8&EndMileage="+iNumber;
|
document.form1.admin_save.value = "32";
|
form1.submit();
|
}
|
}
|
else
|
{if(confirm("目前里程数:"+iNumber+"公里,确定已返回？")){window.location.replace('/admin_save.gds?admin_save=32&DispatchOrdState=8&DispatchOrdID=<%=DispatchOrdID%>&EntourageLeadID=<%=EntourageLeadID%>&EndMileage='+iNumber+'&OA_latitude='+OA_latitude+'&OA_longitude='+OA_longitude);}}
|
}
|
}
|
<%else%>
|
function check(){if(confirm("请先上传知情同意书!")){window.location.replace('m_DispatchOrder_Update.gds?DispatchOrdID=<%=DispatchOrdID%>&order_type=8');}}
|
<%end if
|
rs.close()%>
|
function form1_submit32_2()
|
{
|
var OA_latitude=document.form1.OA_latitude.value;
|
var OA_longitude=document.form1.OA_longitude.value;
|
//if (OA_latitude=='' || OA_longitude==''){alert("正在获取地理位置...");return false;}
|
|
//var iNumber = Number(prompt("请输入目前里程数", ""));
|
var iNumber=document.form1.DispatchOrdTraEndMileage.value;
|
if(isNaN(iNumber) || iNumber=='')
|
{alert("请输入目前里程数");}
|
else if (iNumber>0)
|
{if(confirm("目前里程数:"+iNumber+"公里,确定跑空单已返回？")){window.location.replace('/admin_save.gds?admin_save=32&DispatchOrdState=9&DispatchOrdID=<%=DispatchOrdID%>&EntourageLeadID=<%=EntourageLeadID%>&EndMileage='+iNumber+'&OA_latitude='+OA_latitude+'&OA_longitude='+OA_longitude);}}
|
}
|
</script>
|
|
<%'已返回,准备提交审核
|
ElseIf (DispatchOrdState=8 Or DispatchOrdState=9) And DispatchOrdMileage=0 And (CInt(session("adminID"))=CInt(EntourageLeadID) Or is_AdminOrd=1) then%>
|
<div class="posi" id="posi" style="display:none;">
|
|
<%If is_AdminOrd=1 Then%>
|
<%'If CInt(session("adminID"))=CInt(EntourageLeadID) Then%>
|
<div class="ljgm" style="width: 20%;"><a href="m_DispatchOrder_End.gds?DispatchOrdID=<%=DispatchOrdID%>&order_type=5" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;margin: 0 5px;">填写完成报告单</a></div>
|
<%'End If%>
|
<div class="ljgm" style="width: 20%;"><a href="/m_DispatchOrder.gds?ServiceOrdID=<%=ServiceOrdID%>&DispatchOrdID=<%=DispatchOrdID%>&NEWOrder=3" class="bttt" style="margin: 0 5px;">修改人员</a></div>
|
<div class="ljgm" style="width: 20%;"><a href="/m_ServiceOrder.gds?ServiceOrdID=<%=ServiceOrdID%>" class="bttt" style="margin: 0 5px;">服务信息</a></div>
|
<div class="ljgm" style="width: 20%;"><a href="/m_ServiceOrder_List.gds?OrdState=0" class="bttt" style="margin: 0 5px;">返回列表</a></div>
|
<%else%>
|
<div class="ljgm"><a href="m_DispatchOrder_End.gds?DispatchOrdID=<%=DispatchOrdID%>&order_type=5" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;">填写转运完成报告单</a></div>
|
<%End If%>
|
</div>
|
|
<%ElseIf DispatchOrdState=7 And DispatchOrdCarID<>"" And DispatchOrdCarID<>"0" Then%>
|
<div class="posi" id="posi" style="display:none;">
|
<div class="ljgm"><a href="/goocar/GPS.gds?CarID=<%=DispatchOrdCarID%>" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;"><%=DispatchOrdCarLicense%> 实时位置</a></div>
|
</div>
|
|
<%
|
'已返回订单
|
ElseIf DispatchOrdID<>"" And ServiceOrdID<>"" And is_AdminOrd=1 And DispatchOrd_AP_Check=0 Then
|
%>
|
<div class="posi" id="posi" style="display:none;">
|
<div class="ljgm" style="width: 20%;"><a href="/m_ServiceOrder.gds?ServiceOrdID=<%=ServiceOrdID%>" class="bttt">服务信息</a></div>
|
<div class="ljgm" style="width: 20%;"><a href="/m_ServiceOrder_List.gds?OrdState=0" class="bttt">返回列表</a></div>
|
</div>
|
<%
|
'已返回订单
|
ElseIf DispatchOrdID<>"" And is_AdminOrd=1 Then
|
%>
|
<div class="posi" id="posi" style="display:none;">
|
<div class="ljgm"><a href="/m_ServiceOrder_List.gds?OrdState=0" class="bttt">返回列表</a></div>
|
</div>
|
<%else%>
|
<div class="posi" id="posi" style="display:none;"></div>
|
<%End if%>
|
<%End if%>
|
</div>
|
|
<!--车辆选择-->
|
<div id="m_CarLicense" style="display:none;">
|
|
<div class="search-box fixed">
|
<div class="inner-search-box">
|
<div class="search-box-o flexbox">
|
<div class="flexItem">
|
<div class="search-input-box flexbox">
|
<div class="flexItem">
|
<input type="text" class="tosearch-input" id="CarSearchTXT" name="CarSearchTXT" placeholder="输入【车牌号】搜索" value="<%=CarSearchTXT%>" onkeypress="EnterPress_Car(event)" onkeydown="EnterPress_Car()"/>
|
</div>
|
</div>
|
</div>
|
<div class="search_more">
|
<a id="toletter_search" class="search_letter_btn" onclick="closeCarLicense()"> </a>
|
</div>
|
</div>
|
</div>
|
</div>
|
<div id="tomain" class="wrap_inner">
|
<div class="search-box-height search-box-height-to" style="height: 50px;"></div>
|
<div class="address_list">
|
<div class="tolist" id="CarList">
|
|
<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>
|
<script>
|
function showCarLicense(){
|
document.getElementById('m_Orer').style.display='none';
|
document.getElementById('m_CarLicense').style.display='';
|
window.HiddenFrame.location.replace('CarSearch.gds?OrdClass=<%=DispatchOrdClass%>');
|
}
|
function closeCarLicense(){
|
document.getElementById('m_Orer').style.display='';
|
document.getElementById('m_CarLicense').style.display='none';
|
//alert(document.getElementById("DispatchOrdCarLicense").scrolltop);
|
document.body.scrollTop=1000;
|
}
|
//选择车辆查询
|
function JS_CarSearch()
|
{
|
CarSearchTXT=document.all.CarSearchTXT.value;
|
window.HiddenFrame.location.replace('CarSearch.gds?OrdClass=<%=DispatchOrdClass%>&CarSearchTXT='+CarSearchTXT);
|
}
|
function EnterPress_Car(e){ //传入 event
|
var e = e || window.event;
|
if(e.keyCode == 13){JS_CarSearch();}
|
}
|
//选择车辆
|
function JS_CarSave(CarID,CarLicense)
|
{
|
if(confirm("确定["+CarLicense+"]为本次任务使用的车辆？")){
|
|
document.getElementById("DispatchOrdCarLicense").innerHTML='请选择车牌号：'+CarLicense;
|
document.getElementById("DispatchOrdCarID").value=CarID;
|
<%if DispatchOrdID<>"" then%>
|
document.getElementById('posi1').style.display='';
|
document.getElementById('posi').style.display='none';
|
document.getElementById("posi1TXT").innerHTML='正在保存..'
|
$.ajax({
|
type:'post',
|
data: {
|
admin_save:'36_json',
|
DispatchOrdID:'<%=DispatchOrdID%>',
|
DispatchOrdCarID:CarID
|
},
|
dataType:'json',
|
url:'/admin_save.gds',
|
success:function(data){
|
console.log(data);
|
if (data!='')
|
{
|
if (data.result==1)
|
{
|
<%If (DispatchOrdState=3 or DispatchOrdState=2) And (CInt(session("adminID"))=CInt(EntourageLeadID) Or OAEntourageID=1 Or OAEntourageID=2) And NEWOrder="" then%>
|
document.getElementById("DispatchOrdTraStreetMileage").value=data.EndMileage;
|
<%end if%>
|
document.getElementById('posi1').style.display='none';
|
document.getElementById('posi').style.display='';
|
}else{
|
document.getElementById("posi1TXT").innerHTML='保存失败,请刷新后重试';
|
return false;
|
}
|
}else{
|
document.getElementById("posi1TXT").innerHTML='保存失败,请刷新后重试';
|
}
|
}
|
});
|
<%end if%>
|
closeCarLicense();
|
}
|
}
|
//显示车辆列表窗口
|
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+"<div class='settings-item' onclick='JS_CarSave("+CarListArray[i][0]+",\""+CarListArray[i][1]+"\")'><div class='inner-settings-item flexbox to'><div class='title flexItem'><p class='name'>"+CarListArray[i][1]+" "+CarListArray[i][2]+"</p></div></div></div>";
|
}
|
}
|
if (acc2>1)
|
{
|
i=i+1;
|
CarListHTML = CarListHTML+"<div class='settings-item'><div class='inner-settings-item flexbox to'><div class='title flexItem'><p class='name'>";
|
if (acc1>1){CarListHTML = CarListHTML+"<a href='javascript:window.HiddenFrame.location.replace(\"CarSearch.gds?OrdClass=<%=DispatchOrdClass%>&CarSearchTXT="+CarSearchTXT+"&page="+(acc1-1)+"\");'>上一页</a>";}else{CarListHTML = CarListHTML+" ";}
|
if (acc1<acc2){CarListHTML = CarListHTML+" <a href='javascript:window.HiddenFrame.location.replace(\"CarSearch.gds?OrdClass=<%=DispatchOrdClass%>&CarSearchTXT="+CarSearchTXT+"&page="+(acc1+1)+"\");'>下一页</a></p></div></div></div>";}else{CarListHTML = CarListHTML+"</p></div></div></div>";}
|
}
|
document.getElementById("CarList").innerHTML=CarListHTML;
|
|
}
|
</script>
|
<!--车辆选择 end-->
|
|
<!--人员选择-->
|
<div id="m_Entourage" style="display:none;">
|
<input name="window_EntourageID" type="hidden" value="">
|
<input name="window_OA_CompetencyID" type="hidden" value="">
|
<div class="search-box fixed">
|
<div class="inner-search-box">
|
<div class="search-box-o flexbox">
|
<div class="flexItem">
|
<div class="search-input-box flexbox">
|
<div class="flexItem">
|
<input type="text" class="tosearch-input" id="EntourageSearchTXT" name="EntourageSearchTXT" placeholder="输入【姓名\手机号】搜索" value="<%=EntourageSearchTXT%>" onkeypress="EnterPress(event)" onkeydown="EnterPress()"/>
|
</div>
|
</div>
|
</div>
|
<div class="search_more">
|
<a id="toletter_search" class="search_letter_btn" onclick="closeEntourage()"> </a>
|
</div>
|
</div>
|
</div>
|
</div>
|
<div id="tomain" class="wrap_inner">
|
<div class="search-box-height search-box-height-to" style="height: 50px;"></div>
|
<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>
|
<script>
|
function showEntourage(EntourageID,OA_CompetencyID){
|
|
//alert(event.clientX+document.documentElement.scrollTop);
|
document.getElementById('m_Orer').style.display='none';
|
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?OrdClass=<%=DispatchOrdClass%>&OA_CompetencyID='+OA_CompetencyID);
|
}
|
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()
|
{
|
EntourageSearchTXT=document.all.EntourageSearchTXT.value;
|
OA_CompetencyID=document.all.window_OA_CompetencyID.value;
|
window.HiddenFrame.location.replace('AdminUserSearch.gds?OrdClass=<%=DispatchOrdClass%>&OA_CompetencyID='+OA_CompetencyID+'&EntourageSearchTXT='+EntourageSearchTXT);
|
}
|
//选择人员
|
function JS_EntourageSave(OACompetencyID,OAID,OAname,OAavator,OACompetencyName)
|
{
|
if (OAID!='')
|
{
|
EntourageLong_is = document.getElementById('EntourageLong_is_'+OAID);
|
}else{
|
EntourageLong_is = 0;
|
}
|
//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("EntourageOAid_"+EntourageID).value=OAID;
|
<%if DispatchOrdID<>"" then%>
|
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);
|
<%else%>
|
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>";
|
<%end if%>
|
closeEntourage();
|
}
|
}
|
//显示人员列表窗口
|
function JS_EntourageList(EntourageListArray,acc1,acc2,EntourageSearchTXT,OA_CompetencyID,OA_CompetencyName)
|
{
|
var EntourageListHTML = "";
|
var EntourageID=document.all.window_EntourageID.value
|
var i = 0;
|
EntourageListHTML = EntourageListHTML+"<div class='settings-item' onclick='JS_EntourageSave(\""+EntourageID+"\",\"\",\"\",\"/resources/images/add_user.png\",\""+OA_CompetencyName+"\")'><div class='title flexItem'><p class='name'> 删除人员</p></div></div>";
|
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' onclick='JS_EntourageSave(\""+EntourageID+"\","+EntourageListArray[i][0]+",\""+OAname+"\",\""+OAavator+"\",\""+OA_CompetencyName+"\")'><p class='name'>"+EntourageListArray[i][1]+" "+EntourageListArray[i][2]+"</p></div><div><p> <input type='checkbox' id='EntourageLong_is_"+EntourageListArray[i][0]+"' value='1'><label for='EntourageLong_is_"+EntourageListArray[i][0]+"'>跟车</label></p></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?OrdClass=<%=DispatchOrdClass%>&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?OrdClass=<%=DispatchOrdClass%>&OA_CompetencyID="+OA_CompetencyID+"&EntourageSearchTXT="+EntourageSearchTXT+"&page="+(acc1+1)+"\");'>下一页</a></p></div></div></div>";}else{EntourageListHTML = EntourageListHTML+"</p></div></div></div>";}
|
}
|
|
document.getElementById("EntourageList").innerHTML=EntourageListHTML;
|
|
}
|
</script>
|
<!--人员选择 end-->
|
|
<%
|
'微信JS-SDK
|
timestamp = ToUnixTime(now(),+8)
|
wxnonceStr = "5P1QYH5OEW6BCXTo"
|
wxticket = Getjsapi_ticket()
|
wxurl = WEBURL&Request.ServerVariables("URL")
|
if Request.ServerVariables("QUERY_STRING")<>"" then wxurl=wxurl&"?"&Request.ServerVariables("QUERY_STRING")
|
wxOri = "jsapi_ticket="&wxticket&"&noncestr="&wxnonceStr&"×tamp="×tamp&"&url="&wxurl
|
wxSha1 = hex_sha1(wxOri)
|
%>
|
<script src="https://res.wx.qq.com/open/js/jweixin-1.2.0.js"></script>
|
<script>
|
wx.config({
|
debug: false,
|
appId: '<%=corpid%>',
|
timestamp: <%=timestamp%>,
|
nonceStr: '<%=wxnonceStr%>',
|
signature: '<%=wxSha1%>',
|
jsApiList: [
|
'checkJsApi',
|
'openLocation',
|
'getLocation',
|
'closeWindow',
|
'chooseImage',
|
'uploadImage'
|
]
|
});
|
|
</script>
|
<script src="/js/zepto.min.js"></script>
|
|
|
<script>
|
wx.ready(function () {
|
wx.getLocation({
|
success: function (res) {
|
document.form1.OA_latitude.value = JSON.stringify(res.latitude);
|
document.form1.OA_longitude.value = JSON.stringify(res.longitude);
|
document.getElementById('posi1').style.display='none';
|
document.getElementById('posi').style.display='';
|
},
|
cancel: function (res) {
|
alert('用户拒绝授权获取地理位置');
|
return false;
|
}
|
});
|
})
|
wx.ready(function () {
|
var add_url;
|
var formatted_address;
|
var cuan;
|
wx.getLocation({
|
type: 'wgs84', // 默认为wgs84的gps坐标，如果要返回直接给openLocation用的火星坐标，可传入'gcj02'
|
success: function (res) {
|
document.getElementById('m_Orer').style.display='';
|
var latitude = res.latitude; // 纬度，浮点数，范围为90 ~ -90
|
var longitude = res.longitude; // 经度，浮点数，范围为180 ~ -180。
|
var speed = res.speed; // 速度，以米/每秒计
|
var accuracy = res.accuracy; // 位置精度
|
var point_url = "http://restapi.amap.com/v3/geocode/regeo?output=JSON&location="+longitude+","+latitude+"&key=fc226a9479cdd12eed4ab6acbc692fca&coordsys=gps";
|
|
$.get(point_url, function(result){
|
cuan = result.regeocode.addressComponent.township+result.regeocode.addressComponent.streetNumber.street+result.regeocode.addressComponent.streetNumber.number+result.regeocode.addressComponent.neighborhood.name;
|
formatted_address = "实时定位："+result.regeocode.formatted_address;
|
$('.xqP2').html(formatted_address);
|
document.form1.OA_address.value = result.regeocode.formatted_address;
|
document.form1.OA_latitude.value = JSON.stringify(res.latitude);
|
document.form1.OA_longitude.value = JSON.stringify(res.longitude);
|
document.getElementById('posi1').style.display='none';
|
document.getElementById('posi').style.display='';
|
Running_address(JSON.stringify(res.latitude),JSON.stringify(res.longitude),result.regeocode.formatted_address);
|
});
|
|
},
|
fail: function (res) {
|
//alert('获取地理位置失败');
|
$('.xqP2').html('获取地理位置失败');
|
return false;
|
},
|
cancel: function (res) {
|
alert('用户拒绝授权获取地理位置');
|
$('.xqP2').html('用户拒绝授权获取地理位置');
|
return false;
|
}
|
});
|
function lbs_GPS(addressname,address,lat,lng) {
|
wx.openLocation({
|
latitude: lat,
|
longitude: lng,
|
name: addressname,
|
address: address,
|
scale: 14,
|
infoUrl: 'http://weixin.qq.com'
|
});
|
};
|
|
})
|
function getLocation1_JS(){
|
document.getElementById('posi1').style.display='none';
|
document.getElementById('posi').style.display='';
|
}
|
function closeWindow_JS(){
|
alert('数据保存完成');
|
wx.closeWindow();
|
}
|
function lbs_distance(addressname,address) {
|
//alert(address);
|
$.ajax({
|
type: "POST",
|
url: "/weixin/lbs_distance.asp",//需要跳转到的界面 the page you want to post data
|
data: {
|
address: address//要传给后台的数据 the data you should send to background
|
},
|
beforeSend: function() {},//在发送之前你可以进行相关操作 what you want to do before send
|
success: function(data) {
|
lbs=data.split("|");
|
if (lbs[0]!='0')
|
{
|
alert("导航只作参考，目的地未必准确，请仔细确认目的地是否正确！！！");
|
var lat=lbs[0];
|
var lng=lbs[1];
|
wx.ready(function () {
|
wx.openLocation({
|
latitude: parseFloat(lat),
|
longitude: parseFloat(lng),
|
name:addressname,
|
address: address,
|
scale: 14,
|
infoUrl: ''
|
});
|
})
|
}else{
|
alert("地址查询失败");
|
}
|
}
|
})
|
};
|
function Running_address(latitude,longitude,address) {
|
//alert(address);
|
$.ajax({
|
type: "POST",
|
url: "/Running_address.gds",//需要跳转到的界面 the page you want to post data
|
data: {
|
address: address//要传给后台的数据 the data you should send to background
|
}
|
})
|
};
|
|
function getchooseImage_JS(ImageValue){
|
//document.getElementById('ImageValue').value=ImageValue;
|
//拍照或从手机相册中选图接口
|
TraMileage=document.getElementById(ImageValue).value;
|
if (TraMileage=='' || TraMileage=='0' || document.getElementById("DispatchOrdCarLicense").innerHTML=='请选择车牌号：点击选择车辆' || document.getElementById("DispatchOrdCarLicense").innerHTML=='请选择车牌号：未指派')
|
{
|
alert("请先填写当前里程和选择车辆");
|
}else{
|
OrdTraMileageSeva_JS(TraMileage,ImageValue);
|
wx.chooseImage({
|
count: 1, // 默认9
|
sizeType: ['compressed'], // 可以指定是原图还是压缩图，默认二者都有
|
sourceType: ['album', 'camera'], // 可以指定来源是相册还是相机，默认二者都有
|
success: function (res) {
|
var localIds = res.localIds; // 返回选定照片的本地ID列表，localId可以作为img标签的src属性显示图片
|
document.getElementById(ImageValue+"UP").innerHTML='上传中..';
|
getuploadImage_JS(localIds,ImageValue);
|
}
|
});
|
}
|
}
|
|
function getuploadImage_JS(localIds,ImageValue){
|
//上传图片接口
|
//document.getElementById('form1bt0').style.display='none';
|
wx.uploadImage({
|
localId: ''+localIds+'', // 需要上传的图片的本地ID，由chooseImage接口获得
|
isShowProgressTips: 1, // 默认为1，显示进度提示
|
success: function (res) {
|
var serverId = res.serverId; // 返回图片的服务器端ID
|
uploadImage_JS(serverId,ImageValue);
|
},
|
error: function(){
|
document.getElementById(ImageValue+"UP").innerHTML='上传失败';
|
}
|
});
|
}
|
/*请求函数的ajax*/
|
function uploadImage_JS(media_id,ImageValue) {
|
//document.getElementById('media_id').value=media_id;
|
$.ajax({
|
type: "POST",
|
url: "/weixin/wx_uploadImage.php",//需要跳转到的界面 the page you want to post data
|
data: {
|
access_token:'<%=access_token%>',
|
DispatchOrdID:'<%=DispatchOrdID%>',
|
media_id:media_id
|
},
|
beforeSend: function() {},//在发送之前你可以进行相关操作 what you want to do before send
|
success: function(data) {
|
//alert(data);
|
//;
|
if (data!='')
|
{
|
uploadImage2_JS(media_id,ImageValue);
|
//BaiduAI_JS(data,ImageValue);
|
}
|
},
|
error: function(){
|
document.getElementById(ImageValue+"UP").innerHTML='上传失败';
|
}
|
})
|
};
|
function uploadImage2_JS(media_id,ImageValue) {
|
if (ImageValue=='DispatchOrdTraStreetMileage'){ImageType=4;}
|
if (ImageValue=='DispatchOrdTraEndMileage'){ImageType=5;}
|
$.ajax({
|
type: "POST",
|
url: "/weixin/wx_uploadImage.gds",
|
data: {
|
DispatchOrdID:'<%=DispatchOrdID%>',
|
ServiceOrdID:'<%=ServiceOrdID%>',
|
ImageType:ImageType,
|
media_id:media_id
|
|
},
|
success: function(data) {
|
//alert('上传完成');
|
document.getElementById(ImageValue+"UP").innerHTML='已上传'
|
},
|
error: function(){
|
document.getElementById(ImageValue+"UP").innerHTML='上传失败';
|
}
|
})
|
};
|
function BaiduAI_JS(image,ImageValue) {
|
$.ajax({
|
type: "POST",
|
url: "BaiduAI.php",//需要跳转到的界面 the page you want to post data
|
data: {
|
method:'meter',
|
image:image
|
},
|
beforeSend: function() {},//在发送之前你可以进行相关操作 what you want to do before send
|
success: function(data) {
|
//alert('上传完成');
|
//alert(data);
|
if (data==-2){
|
alert('上传失败');
|
//document.getElementById(ImageValue).value=0;
|
}else if (data==-1 || data==0){
|
//alert('识别失败,请重新拍摄');
|
//document.getElementById(ImageValue).value=0;
|
}else{
|
document.getElementById(ImageValue).value=data;
|
OrdTraMileageSeva_JS(data,ImageValue);
|
}
|
}
|
})
|
};
|
function OrdTraMileageSeva_JS(TraMileage,ImageValue) {
|
$.ajax({
|
type: "POST",
|
url: "admin_save.gds",//需要跳转到的界面 the page you want to post data
|
data: {
|
admin_save:'124',
|
DispatchOrdID:'<%=DispatchOrdID%>',
|
TraMileage:TraMileage,
|
ImageValue:ImageValue
|
},
|
success: function(data) {
|
//alert('保存完成');
|
}
|
})
|
};
|
|
<%'返回时关闭页面
|
if closeWindow="YES" then%>
|
//window.setTimeout(closeWindow_JS,500);
|
//window.setTimeout(closeWindow_JS,2000);
|
<%'新建调度单
|
'elseif NEWOrder<>"" then%>
|
//document.body.scrollTop=1000;
|
<%else
|
'获取地理位置
|
%>
|
//window.setTimeout(getLocation_JS,1000);
|
window.setTimeout(getLocation1_JS,100);
|
<%end if%>
|
|
</script>
|
<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>
|
