<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
|
<%Session.CodePage=65001%>
|
<%
|
'Response.Cookies("OA")("adminID")=""
|
'Response.end
|
DispatchOrdID=request("DispatchOrdID")
|
closeWindow=SafeRequest(Request("closeWindow"))
|
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=","")
|
End If
|
Next
|
End If
|
if DispatchOrdID="" then Response.Redirect "/"
|
state=DispatchOrdID%>
|
<!--#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">
|
<style>
|
.closeimg
|
{
|
position : absolute;
|
width : 20px;
|
height : 20px;
|
margin-left: -25px;
|
z-index: 100;
|
}
|
</style>
|
</head>
|
|
<%
|
Set rs = Server.CreateObject("ADODB.Recordset")
|
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是)
|
DispatchOrdCarID = rs("DispatchOrdCarID") '派遣车辆ID
|
DispatchOrdTraSDTime = rs("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
|
StretcherMoney = rs("StretcherMoney") '担架费
|
DispatchOrdPicUrl = rs("DispatchOrdPicUrl")
|
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) '调度单编号
|
|
Else
|
Response.Redirect "/m_DispatchOrder_List.gds?DispatchOrdID="&DispatchOrdID&"&SystemMessageType=4&SMT=9"
|
End If
|
rs.close()
|
|
'相关受理单
|
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") '预约日期
|
ServiceOrdCoName = rs("ServiceOrdCoName") '联系人姓名
|
ServiceOrdCoPhone = rs("ServiceOrdCoPhone") '联系人电话
|
ServiceOrdCoTies = rs("ServiceOrdCoTies") '联系人与患者关系
|
ServiceOrdPtName = rs("ServiceOrdPtName") '患者姓名
|
ServiceOrdPtAge = rs("ServiceOrdPtAge") '患者年龄
|
ServiceOrdPtSex = rs("ServiceOrdPtSex") '患者性别
|
ServiceOrdPtNat = rs("ServiceOrdPtNat") '患者国籍
|
ServiceOrdPtOutHosp = rs("ServiceOrdPtOutHosp") '转出医院
|
ServiceOrdPtServices = rs("ServiceOrdPtServices") '科室
|
ServiceOrdPtDiagnosis = rs("ServiceOrdPtDiagnosis") '诊断
|
ServiceOrdPtCondition = rs("ServiceOrdPtCondition") '病情描述
|
ServiceOrdPtDoctor = rs("ServiceOrdPtDoctor") '患者医生
|
ServiceOrdPtDoctorPhone=rs("ServiceOrdPtDoctorPhone") '患者医生电话
|
ServiceOrdTraProvince = rs("ServiceOrdTraProvince") '出发地省份
|
ServiceOrdTraCity = rs("ServiceOrdTraCity") '出发地城市
|
ServiceOrdTraStreet = rs("ServiceOrdTraStreet") '出发地
|
ServiceOrdTraStreetCoo= rs("ServiceOrdTraStreetCoo") '出发地坐标
|
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") '服务单审核时间
|
ServiceOrdUnitID = rs("ServiceOrdUnitID") '第三方ID
|
PayQRcodeURL = rs("PayQRcodeURL") '第三方支付链接
|
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&"公里"
|
End If
|
rs.close()
|
End If
|
|
'领队情况
|
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 EntourageLead=1 and DispatchOrdIDDt="&DispatchOrdID
|
rs.open sql,objConn,1,1
|
If not rs.Eof Then
|
EntourageLeadID=rs("EntourageOAid")
|
End If
|
rs.close()
|
|
'行驶里程
|
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_CheckTXT<>"" Then DispatchOrd_CheckTXT="（"&DispatchOrd_CheckTXT&" ）"
|
End If
|
|
If DispatchOrdCarID<>"" And DispatchOrdCarID<>"0" Then
|
DispatchOrdCarLicense=CarDataA(DispatchOrdCarID,"","CarLicense")
|
ElseIf DispatchOrdState=3 And CInt(session("adminID"))=CInt(EntourageLeadID) Then
|
DispatchOrdCarLicense="点击选择车辆"
|
Else
|
DispatchOrdCarLicense="未指派"
|
End If
|
|
AuthorizationPic=""
|
APicInt=0
|
If DispatchOrdPicUrl<>"0" And DispatchOrdPicUrl<>"" Then
|
AuthorizationPic=DispatchOrdPicUrl
|
If AuthorizationPic<>"" Then
|
AuthorizationPic=SPLIT(AuthorizationPic,",")
|
APicInt=UBOUND(AuthorizationPic)
|
End If
|
End If
|
%>
|
<body>
|
<div id="m_Orer">
|
<!--#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="##" method="post">
|
<input name="DispatchOrdID" type="hidden" value="<%=DispatchOrdID%>">
|
<input name="ServiceOrdID" type="hidden" value="<%=ServiceOrdID%>">
|
<input name="media_id" id="media_id" type="hidden" value="">
|
<input name="ImageType" id="ImageType" type="hidden" value="0">
|
<input name="access_token" type="hidden" value="<%=access_token%>">
|
</form>
|
<!--<div class="os_shopname">调度单状态：<%=replace(DispatchOrdStateA(DispatchOrdState),"全部确定：","")&DispatchOrd_CheckTXT%></div>-->
|
|
|
<%
|
sql="select * from ImageData where DOrdIDDt="&DispatchOrdID&" and ImageDel=0 order by ImageType,UpImageTime"
|
rs.open sql,objConn,1,1
|
ImageTypeOld=0
|
i=0
|
do while not rs.Eof
|
ImageID = rs("id")
|
ImageType = rs("ImageType")
|
ImageUrl = rs("ImageUrl")
|
ImageUrls = rs("ImageUrls")
|
UpImageTime = rs("UpImageTime")
|
UpImageOAid = rs("UpImageOAid")
|
If Len(ImageUrls)>0 Then
|
strPICUrl=ImageUrls
|
Else
|
strPICUrl=ImageUrl
|
End If
|
|
If ImageTypeOld<>ImageType Then
|
ImageTypeOld=ImageType
|
If i>0 Then Response.Write "</div>"%>
|
<div style=" margin:10px 10px;border-bottom: 1px solid #f1f1f1;"><%=ImageTypeA(ImageType)%><br>
|
<%End If%>
|
<a href="<%=ImageUrl%>" target="_blank"><img src="<%=strPICUrl%>" width="80" border="0" style="margin: 10px;"></a>
|
<a href="javascript:DelImage_JS('<%=ImageID%>')" ><img src="/resources/images/xx.png" class="closeimg" alt="删除文档" width="20px" height="20px" /></a>
|
<%i=i+1
|
rs.movenext
|
loop
|
rs.close()
|
If ImageID<>"" Then Response.Write "</div>"%>
|
|
<div style="height:50px;"></div>
|
<div class="posi" id="posi1">
|
<div class="ljgm"><a class="bttt" id="posi1TXT">正在获取位置...</a></div>
|
</div>
|
<div class="posi" id="posi" style="display:none;">
|
<a id="form1bt0" class="bttt" style="font-weight: 700;display:none" >上传中..</a>
|
<div id="form1bt1" class="ljgm" style="width: 33%;"><a href="javascript:getchooseImage_JS('1')" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;">知情同意书</a></div>
|
<div id="form1bt2" class="ljgm" style="width: 33%;"><a href="javascript:getchooseImage_JS('2')" class="bttt" style="color: #fff;background: #9a6d92;font-weight: 700;">病人资料</a></div>
|
<div id="form1bt3" class="ljgm" style="width: 33%;"><a href="javascript:getchooseImage_JS('3')" 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;}
|
|
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+"元？"))
|
{
|
document.form1.action = "admin_save.gds";
|
document.form1.admin_save.value = "32";
|
form1.submit();
|
}
|
}
|
else
|
{alert("请选择收款方式");}
|
}
|
function form1_submit_weixinPay(){
|
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!='')
|
{
|
window.location.replace('/weixin_pay_QR.asp?DispatchOrdID=<%=DispatchOrdID%>&ServiceOrdID=<%=ServiceOrdID%>&total_fee='+PaidMoney);
|
}
|
else
|
{alert("请选择收款方式");}
|
}
|
function myrefresh()
|
{
|
window.location.reload();
|
}
|
</script>
|
</div>
|
|
|
<%
|
'微信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>
|
function getLocation_JS(){
|
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;
|
}
|
});
|
}
|
function getLocation1_JS(){
|
document.getElementById('posi1').style.display='none';
|
document.getElementById('posi').style.display='';
|
}
|
function closeWindow_JS(){
|
alert('数据保存完成');
|
wx.closeWindow();
|
}
|
function getchooseImage_JS(ImageType){
|
document.getElementById('ImageType').value=ImageType;
|
//拍照或从手机相册中选图接口
|
wx.chooseImage({
|
count: 1, // 默认9
|
sizeType: ['original'], // 可以指定是原图还是压缩图，默认二者都有
|
sourceType: ['album', 'camera'], // 可以指定来源是相册还是相机，默认二者都有
|
success: function (res) {
|
var localIds = res.localIds; // 返回选定照片的本地ID列表，localId可以作为img标签的src属性显示图片
|
getuploadImage_JS(localIds);
|
}
|
});
|
}
|
|
function getuploadImage_JS(localIds){
|
//上传图片接口
|
document.getElementById('form1bt0').style.display='none';
|
document.getElementById('form1bt1').style.display='';
|
document.getElementById('form1bt2').style.display='';
|
document.getElementById('form1bt3').style.display='';
|
wx.uploadImage({
|
localId: ''+localIds+'', // 需要上传的图片的本地ID，由chooseImage接口获得
|
isShowProgressTips: 1, // 默认为1，显示进度提示
|
success: function (res) {
|
var serverId = res.serverId; // 返回图片的服务器端ID
|
uploadImage_JS(serverId);
|
}
|
});
|
}
|
/*请求函数的ajax*/
|
function uploadImage_JS(media_id) {
|
document.getElementById('media_id').value=media_id;
|
$.ajax({
|
type: "POST",
|
url: "/weixin/wx_uploadImage1.php",//需要跳转到的界面 the page you want to post data
|
data: $('#form1').serialize(),
|
beforeSend: function() {},//在发送之前你可以进行相关操作 what you want to do before send
|
success: function(data) {
|
//需要执行的操作 execute it
|
uploadImage2_JS();
|
//alert(data);
|
}
|
})
|
};
|
function uploadImage2_JS() {
|
$.ajax({
|
type: "POST",
|
url: "/weixin/wx_uploadImage1.gds",//需要跳转到的界面 the page you want to post data
|
data: $('#form1').serialize(),
|
beforeSend: function() {},//在发送之前你可以进行相关操作 what you want to do before send
|
success: function(data) {
|
//需要执行的操作 execute it
|
alert('上传完成');
|
window.location.replace('/m_DispatchOrder_Update1.gds?DispatchOrdID=<%=DispatchOrdID%>');
|
//alert(data);
|
}
|
})
|
};
|
function DelImage_JS(ImageID) {
|
if(confirm("确定删除文档？")){window.location.replace('/admin_save.gds?admin_save=104&m=1&DispatchOrdID=<%=DispatchOrdID%>&DelImageID='+ImageID);}
|
};
|
|
|
|
|
<%'返回时关闭页面
|
if closeWindow="YES" then%>
|
window.setTimeout(closeWindow_JS,500);
|
window.setTimeout(closeWindow_JS,2000);
|
<%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>
|
