昆仑会员此打印方式只针对用会员卡结账的消费，放开限制解决方案
在这个function里面
代码语言：javascript复制function PrintDialog()
{
var print_card_fee = "<%=print_card_fee %>"
//alert(print_card_fee)
var balance=JStrToMoney(form1.net.value);
var last_balance=parseFloat(balance) parseFloat(print_card_fee);
this.ReturnValue = "0";
this.card_no = "<%=rs_his("card_no")%>" ;
this.member_name = form1.chname.value;
this.card_type = form1.card_type.value ;
this.expirydate=form1.expiry_date.value ;
this.trade_type = "<%=f_glo("SH01135")%>";
this.fee = JStrToMoney(form1.total_rev.value);
this.last_balance = JStrToMoney(last_balance);
this.balance = JStrToMoney(balance);
this.check_Date = new Date(<%=year(dt)%>,<%=month(dt)-1%>,<%=day(dt)%>,<%=hour(dt)%>,<%=minute(dt)%>) ;
this.operator = "<%=session("user_code")%>";
this.user_code = "<%=session("user_code")%>";
this.print_time = form1.print_time.value;
this.place_code = "<%=place_name %>";
this.room_number="<%=room_number %>";
if (form1.payment.value=="<%=pay_svc%>")
{
var url = "../m_fee/print.asp?type_flag=R";
showModalDialog(url,this,"dialogWidth:320px;dialogHeight:500px;help:no;scroll:yes;status:no;");
}
else
{
alert("<%=f_glo("SH01134")%>");
}
}把下面这段修改一下
代码语言：javascript复制if (form1.payment.value=="<%=pay_svc%>")
{
var url = "../m_fee/print.asp?type_flag=R";
showModalDialog(url,this,"dialogWidth:320px;dialogHeight:500px;help:no;scroll:yes;status:no;");
}
else
{
alert("<%=f_glo("SH01134")%>");
}修改结果如下，别问我为毛在else里面又写一次，这个锅是IE的，哈哈哈哈。
代码语言：javascript复制if (form1.payment.value=="<%=pay_svc%>")
{
var url = "../m_fee/print.asp?type_flag=R";
showModalDialog(url,this,"dialogWidth:320px;dialogHeight:500px;help:no;scroll:yes;status:no;");
}
else
{
var url = "../m_fee/print.asp?type_flag=R";
showModalDialog(url,this,"dialogWidth:320px;dialogHeight:500px;help:no;scroll:yes;status:no;");
}
svcm_historyhis_room_detail.asp
代码语言：javascript复制<%Option Explicit%>
<!--#include file = '../../include/conn.asp'-->
<%
dim whether_bucket '是否决定用子账单结帐
whether_bucket=trim(fn_get_param_value("WHETHER_BUCKET",""))'子账单结帐标志(Y:是,N:否)
dim user_code
dim continue_do
dim templet_id '打印模板
templet_id=trim(request("templet_id"))
continue_do= trim(request("continue_do"))
dim detail_id,sql_del_detail
detail_id=trim(request("detail_id"))
if detail_id<>"" then
sql_del_detail="delete member_history_svc_pms_detail where id='" & detail_id & "'"
conn.execute(sql_del_detail)
end if
user_code=session("user_code")
dim rs,rs_his,sql,sqlstr1,rs1
dim id,show
id=trim(request("id"))
show=trim(request("show"))
dim overdraft_mod
'透支额度按照主持卡人还是使用者有效
overdraft_mod=fn_get_param_value("OVERDRAFT_MOD","")
if overdraft_mod="" or overdraft_mod="null" then
overdraft_mod="MAIN"
end if
dim gh_no,membership,sub_name,balance,deposit,overdraft_spend,payment_name,dt,card_points,his_points,net
dim arrival,departure,room_type,room_number,rate_code,room_rate,booker_no,booker_name,special
dim room_rev,fb_rev,other_rev,total_rev,payment,discount,discount_real
dim old_total_rev,from,operator_no,operator,check_no,check_no_spend,sweep_flag,sweep_code,entry,points,credit_no,place_name
dim card_password,expiry_date,card_type,sql_temp,rs_temp,total_tax
dim channel_code,market_code,source_code
dim fee_id '此笔消费记录的卡值ID
dim remark
dim main_card_no '主账单的卡号
dim is_complete '子账单是否结完
dim promotion_code '促销代码
dim trace_code '客人得知促销的渠道
dim guests
sql_temp="select code,name from dic_card_membership order by sort_id"
set rs_temp=conn.execute(sql_temp)
sql="select h.guests,s.id as fee_id,isnull(m.card_no,x.card_no) as card_no,isnull(m.card_password,x.card_password) as card_password,dp.name as place_name,"
sql=sql &" h.gh_no,h.points as his_points,isnull(h.dt,getdate()) as dt,h.points,"
sql=sql &" convert(varchar(10),h.arrival,120) as arrival,isnull(m.expiry_date,x.expiry_date) as expiry_date,"
sql=sql &" convert(varchar(10),h.departure,120) as departure,"
sql=sql &" h.nights,h.room_number,h.room_rate,h.room_type,h.rate_code,"
sql=sql &" h.channel_code,h.market_code,h.source_code,"
sql=sql &" h.total_rev,h.room_rev,h.fb_rev,h.other_rev,h.total_tax,h.special,h.payment,isnull(d.name,'') as payment_name,"
sql=sql &" isnull(m.points,x.points) as card_points,isnull(m.balance,x.balance) as balance,isnull(m.deposit,x.deposit) as deposit,"
sql=sql &" h.discount,isnull(m.membership_type,x.membership_type) as membership,isnull(m.sub_type,x.sub_type) as entry ,"
sql=sql &" h.booker_card_no as booker_no,isnull(m1.chname,'') as booker_name,"
sql=sql &" h.sub_name,h.remark,h.is_complete,"
if overdraft_mod="MAIN" then
sql= sql & " isnull(e.overdraft_spend,0) as overdraft_spend ,"
else
sql= sql & " isnull(sub.overdraft_spend,0) as overdraft_spend ,"
end if
sql=sql &" h.operator_id,isnull(a.name,'') as username, "
sql=sql &" h.check_no,h.check_no_spend,(case h.sweep_flag when '1' then '" & f_glo("SH00142") & "' else '" & f_glo("SH00143") & "'"
sql=sql &" end) as sweep_flag,h.sweep_flag as sweep_code,h.credit_no as credit_no,"
sql=sql &" isnull(s.last_balance,isnull(m.balance,x.balance)) as last_balance,"
sql=sql &" isnull(s.this_balance,isnull(m.balance,x.balance)) as this_balance,h.promotion_code,dm.private_info,h.trace_code "
sql=sql &" from member_history_svc h left join member_Card_fee s on cast(h.id as varchar)=s.from_id and h.his_type=s.from_type and h.card_no=s.card_no"
sql=sql &" left join member_info_sub sub on h.gh_no=sub.parent_gh_no and h.sub_name=sub.sub_name"
sql=sql &" left join member_info_svc m1 on h.booker_card_no=m1.card_no left join dic_payment d on h.payment=d.code,"
sql=sql &" member_info_svc x left join member_info_svc m on x.main_gh_no=m.gh_no,users a,dic_card_membership dm,dic_place dp,"
sql=sql &" (select parent_gh_no,overdraft_spend from member_info_sub where main_flag='1') e "
sql=sql &" where h.gh_no=isnull(m.gh_no,x.gh_no) and h.card_no=x.card_no and a.code=h.operator_id and dp.code=h.place_code "
sql=sql &" and x.gh_no=e.parent_gh_no and dm.code=x.membership_type"
sql=sql &" and h.id=" & id
set rs_his=conn.execute(sql)
if rs_his.recordcount>0 then
rs_his.movefirst
fee_id=trim(rs_his("fee_id"))
membership=trim(rs_his("membership"))
entry=trim(rs_his("entry"))
gh_no=trim(rs_his("gh_no"))
sub_name=trim(rs_his("sub_name"))
balance=trim(rs_his("balance"))
deposit=trim(rs_his("deposit"))
overdraft_spend=trim(rs_his("overdraft_spend"))
dt=trim(rs_his("dt"))
payment=trim(rs_his("payment"))
payment_name=trim(rs_his("payment_name"))
card_points=trim(rs_his("card_points"))
his_points=trim(rs_his("his_points"))
old_total_rev=trim(rs_his("total_rev"))
main_card_no=trim(rs_his("card_no"))
operator_no=trim(rs_his("operator_id"))
operator=trim(rs_his("username"))
check_no=trim(rs_his("check_no"))
check_no_spend=trim(rs_his("check_no_spend"))
sweep_flag=trim(rs_his("sweep_flag"))
sweep_code=trim(rs_his("sweep_code"))
points=trim(rs_his("points"))
credit_no = trim(rs_his("credit_no"))
is_complete = trim(rs_his("is_complete"))
if check_no_spend = null then
check_no_spend = 0
end if
booker_no=trim(rs_his("booker_no"))
card_password=trim(rs_his("card_password"))
expiry_date=rs_his("expiry_date")
remark=trim(rs_his("remark"))
place_name=trim(rs_his("place_name"))
if rs_temp.recordcount>0 then
do while not rs_temp.EOF
if trim(rs_his("membership"))=trim(rs_temp("code")) then
card_type=rs_temp("name")
end if
rs_temp.movenext
loop
end if
arrival=trim(rs_his("arrival"))
departure=trim(rs_his("departure"))
room_type=trim(rs_his("room_type"))
room_number=trim(rs_his("room_number"))
rate_code=trim(rs_his("rate_code"))
if isnull(rate_code) then
rate_code=""
end if
room_rate=trim(rs_his("room_rate"))
special=trim(rs_his("special"))
room_rev=trim(rs_his("room_rev"))
fb_rev=trim(rs_his("fb_rev"))
other_rev=trim(rs_his("other_rev"))
total_tax=trim(rs_his("total_tax"))
total_rev=trim(rs_his("total_rev"))
booker_no=trim(rs_his("booker_no"))
booker_name=trim(rs_his("booker_name"))
discount_real=trim(rs_his("discount"))
channel_code=trim(rs_his("channel_code"))
market_code=trim(rs_his("market_code"))
source_code=trim(rs_his("source_code"))
promotion_code=trim(rs_his("promotion_code"))
trace_code=trim(rs_his("trace_code"))
guests=trim(rs_his("guests"))
else
%>
<script type="text/javascript">
alert("未查询到相关记录,请联系管理员");
window.history.go(-1);
</script>
<%
response.End
end if
'response.Write is_complete
from = trim(request("from"))
if from="discount" then'由计算折扣,刷新界面迩来
arrival=trim(request("arrival"))
departure=trim(request("departure"))
room_type=trim(request("room_type"))
room_number=trim(request("room_number"))
rate_code=trim(request("rate_code"))
room_rate=trim(request("room_rate"))
special=trim(request("special"))
room_rev=trim(request("room_rev"))
fb_rev=trim(request("fb_rev"))
other_rev=trim(request("other_rev"))
total_tax=trim(request("total_tax"))
total_rev=trim(request("total_rev"))
booker_no=trim(request("booker_no"))
booker_name=trim(request("booker_name"))
discount_real=trim(request("discount_real"))
channel_code=trim(request("channel_code"))
market_code=trim(request("market_code"))
source_code=trim(request("source_code"))
promotion_code=trim(request("promotion_code"))
trace_code=trim(request("trace_code"))
'得到扣率
if discount_real=0 then
'得到扣率
sql="exec sp_get_discount_by_rule '11','" & membership & "','','',0"
set rs=conn.execute(sql)
if not rs.eof then
discount=cdbl(rs("discount"))
else
discount =0
end if
if discount=0 then
discount_real=0
else
discount_real=Round((discount)*cdbl(room_rev),2)
room_rev=Round((1-discount)*cdbl(room_rev),2)
end if
total_rev=cdbl(room_rev) cdbl(fb_rev) cdbl(other_rev) cdbl(total_tax)
end if
end if
if room_rate="" then
room_rate=0
end if
if room_rev="" then
room_rev=0
end if
if fb_rev="" then
fb_rev=0
end if
if other_rev="" then
other_rev=0
end if
if total_tax="" then
total_tax=0
end if
if total_rev="" then
total_rev=0
end if
if discount_real="" then
discount_real=0
end if
dim sql_merge,rs_merge
sql_merge="select promotion_trace_code from [dbo].[fn_promotion_trace_merge]('"&promotion_code&"','"&trace_code&"')"
set rs_merge=conn.execute(sql_merge)
'从sysparam取得CASH所对应的付款方式
dim sql_sys,rs_sys,pay_svc,pay_cash,v_param,n
pay_svc=fn_get_param_value("PAY_SVC","")
pay_cash=fn_get_param_value("PAY_CASH","")
dim prt_type
prt_type=fn_get_param_value("PRT_TYPE",session("hotel_code")) '打印单据的选择方式
'补打用的fee
dim rs_fee,print_card_fee
sql= " select distinct f.fee from member_card_fee f "
sql=sql & " inner join member_history_svc h on f.gh_no=h.gh_no "
sql=sql & " left join member_history_svc_pms_detail d on h.id= d.his_id "
sql=sql & " left join member_info_svc m on m.card_no=d.card_no and m.gh_no=f.gh_no "
sql=sql & " where f.from_id=cast(h.id as varchar) and f.gh_no='"&gh_no&"' "
sql=sql & " and h.id='"&id&"' "
'response.Write sql
set rs_fee = conn.execute(sql)
if rs_fee.recordcount>0 then
print_card_fee = 0-cdbl(rs_fee("fee"))
end if
if print_card_fee="" then
print_card_fee=0
end if
%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<link rel="stylesheet" type="text/css" href="../../include/main.css" />
<script language="javascript">
var vRoot='<%=Application("vroot")%>';
</script>
<script type="text/javascript" src="../../include/cele_date.js"></script>
<script type="text/javascript" src="../../include/checkinfo.js"></script>
<script type="text/javascript" src="../../include/prototype/prototype.js"></script>
<%include_jquery() ' 引入jquery.js%>
<script type="text/javascript">
init();
function get_s_date(t1,t2)
{
show_cele_date (t1,"1900-1-1","<%=calendar_end_year%>-12-31",t2,'',0, 15) ;
}
function fn_valid()
{
var ok_flag=true;
if (form1.arrival.value=="")
{
ok_flag=false;
alert("<%=f_glo("SH00128")%>");
return false;
}
if (form1.departure.value=="")
{
ok_flag=false;
alert("<%=f_glo("SH00129")%>");
return false;
}
if (form1.room_rate.value=="")
{
ok_flag=false;
alert("<%=f_glo("SH00130")%>");
return false;
}
if (form1.total_rev.value=="" ||form1.total_rev.value==0)
{
ok_flag=false;
alert("<%=f_glo("SH00131")%>");
return false;
}
if (form1.payment.value=="<%=pay_svc%>") //结帐方式=卡,查询余额是否够。若不够，则跳到查询余额页进行续费操作
{
var v_net=parseFloat(form1.net.value);//帐户余额
var v_rev=parseFloat(form1.total_rev.value);//总消费
var v_overdraft_spend=parseFloat(form1.overdraft_spend.value);//透支额度
var v_used_sum=parseFloat(form1.used_sum.value);//可用款=帐户余额 透支额度
var old_total_rev=parseFloat(form1.old_total_rev.value);//原总消费
var v_old_net=v_net old_total_rev;
var v_old_used_sum=v_used_sum old_total_rev;
if ((v_old_net<v_rev) && (v_old_used_sum<v_rev))
{
ok_flag=false;
alert("<%=f_glo("SH00133")%>" v_rev "<%=f_glo("SH00134")%>" v_old_used_sum "<%=f_glo("SH00135")%>")
form1.action="../m_fee/fee_topup_input.asp";
form1.submit();
}
else
{
if (v_old_net<v_rev)
{
if(window.confirm("<%=f_glo("SH00133")%>" v_rev.toString(10) "<%=f_glo("SH00136")%>" v_old_net.toString(10) "<%=f_glo("SH00139")%>" v_old_used_sum.toString(10) "<%=f_glo("SH00137")%>"))
{
form1.action="his_detail_save.asp";
form1.submit();
}
else
{
ok_flag=false;
return false;
}
}
}
}
fn_get_totalrev(form1.room_rev);
if (ok_flag==true)
{
form1.action="his_detail_save.asp";
form1.submit();
}
}
function fn_get_totalrev(obj)
{
var room_rev=form1.room_rev.value;
var fb_rev=form1.fb_rev.value;
var other_rev=form1.other_rev.value;
var total_tax=form1.total_tax.value;
var total_rev=0;
if (room_rev=="")
{
room_rev=0;
form1.room_rev.value=0;
}
if (fb_rev=="")
{
fb_rev=0;
form1.fb_rev.value=0;
}
if (other_rev=="")
{
other_rev=0;
form1.other_rev.value=0;
}
if (total_tax=="")
{
total_tax=0;
form1.total_tax.value=0;
}
if(obj.value!="")
fn_toMoney(obj);
total_rev=parseFloat(room_rev) parseFloat(fb_rev) parseFloat(other_rev) parseFloat(total_tax);
form1.total_rev.value =JStrToMoney(total_rev.toString());
}
function fn_zero(txt)
{
var obj=eval(txt);
var v=obj.value;
if (v=="")
obj.value="0.00";
else
fn_toMoney(obj);
fn_count_room_rev();
fn_get_totalrev(obj);
}
function fn_get_discount()
{
if (form1.gh_no.value=="")
{
alert("<%=f_glo("SH00138")%>");
return false;
}
if (form1.total_rev.value=="" || form1.total_rev.value==0)
{
return false;
}
form1.action="his_room_detail.asp?from=discount";
form1.submit();
}
function fn_sweep()
{
if(window.confirm("<%=f_glo("SH00150")%>"))
{
form1.action ="his_sweep_save.asp";
form1.submit();
}
else
{
return false;
}
}
function fn_goto_consumable()
{
form1.action ="../m_info/card_history_consumable.asp";
form1.submit();
}
function fn_print_new()
{
var print_ret=0;
<%if prt_type="H" then%>
form1.form_action.value="../m_history/his_room_detail.asp";
if (form1.payment.value=="<%=pay_svc%>")
{
form1.action="../m_fee/print_com_interface.asp";
form1.submit();
}
else
{
alert("<%=f_glo("SH01134")%>");
}
//fn_print();
<%elseif prt_type="D" then %>
PrintDialog();
<%end if %>
}
function PrintDialog()
{
var print_card_fee = "<%=print_card_fee %>"
//alert(print_card_fee)
var balance=JStrToMoney(form1.net.value);
var last_balance=parseFloat(balance) parseFloat(print_card_fee);
this.ReturnValue = "0";
this.card_no = "<%=rs_his("card_no")%>" ;
this.member_name = form1.chname.value;
this.card_type = form1.card_type.value ;
this.expirydate=form1.expiry_date.value ;
this.trade_type = "<%=f_glo("SH01135")%>";
this.fee = JStrToMoney(form1.total_rev.value);
this.last_balance = JStrToMoney(last_balance);
this.balance = JStrToMoney(balance);
this.check_Date = new Date(<%=year(dt)%>,<%=month(dt)-1%>,<%=day(dt)%>,<%=hour(dt)%>,<%=minute(dt)%>) ;
this.operator = "<%=session("user_code")%>";
this.user_code = "<%=session("user_code")%>";
this.print_time = form1.print_time.value;
this.place_code = "<%=place_name %>";
this.room_number="<%=room_number %>";
if (form1.payment.value=="<%=pay_svc%>")
{
var url = "../m_fee/print.asp?type_flag=R";
showModalDialog(url,this,"dialogWidth:320px;dialogHeight:500px;help:no;scroll:yes;status:no;");
}
else
{
alert("<%=f_glo("SH01134")%>");
}
}
function fn_return()
{
window.history.back(-1);
}
function fn_save_remark()
{
form1.action="his_detail_remark_save.asp";
form1.submit();
}
function fn_get_amount()
{
var price_per_unit=form1.price_per_unit_detail.value;
var quantity=form1.quantity_detail.value;
var total_rev=0;
var total_rev_str;
if (price_per_unit=="")
{
price_per_unit=0;
}
if (quantity=="")
{
quantity=1;
form1.quantity_detail.value=1;
}
total_rev=parseFloat(price_per_unit)*parseFloat(quantity);
total_rev_str = total_rev.toString();
form1.price_per_unit_detail.value=JStrToMoney(price_per_unit);
form1.amount_detail.value = JStrToMoney(total_rev_str);
}
//动态添加表格行
function fn_add_his_trans()
{
if (form1.trans_code_detail.value=="")
{
alert("<%=f_glo("SH01139")%>")
return false;
}
if (form1.rate_code_detail.value=="")
{
alert("<%=f_glo("SH01140")%>")
return false;
}
if (form1.post_date_detail.value=="")
{
alert("<%=f_glo("SH01141")%>")
return false;
}
if (form1.price_per_unit_detail.value=="" || form1.price_per_unit_detail.value=="0.00")
{
alert("<%=f_glo("SH01142")%>")
return false;
}
if (fn_valide_amount_card_value()==false)
{
return false;
}
//对于balance transfer，把正值当作消费品，把负值当作支付方式。
if (form1.trans_item.value=="FC")
{
form1.trans_payment_total.value=(parseFloat(form1.trans_payment_total.value) parseFloat(form1.amount_detail.value)).toFixed(2);
}else if(form1.trans_item.value=="BT" && parseFloat(form1.amount_detail.value)<0){
form1.trans_payment_total.value=(parseFloat(form1.trans_payment_total.value)-parseFloat(form1.amount_detail.value)).toFixed(2);
}else if(form1.trans_item.value=="BT" && parseFloat(form1.amount_detail.value)>=0){
form1.trans_item_total.value=(parseFloat(form1.trans_item_total.value) parseFloat(form1.amount_detail.value)).toFixed(2);
}
else
{
form1.trans_item_total.value=(parseFloat(form1.trans_item_total.value) parseFloat(form1.amount_detail.value)).toFixed(2);
}
var txtTRLastIndex = fn_findObj("tr_lastIndex",document);
var rowID = parseInt(txtTRLastIndex.value);
var signFrame = fn_findObj("table_his_detail",document);
//添加行
var newTR = signFrame.insertRow(signFrame.rows.length);
newTR.id = "SignItem" rowID;
//添加列:交易代码
var newTransNoTD=newTR.insertCell(0);
var trans_item_name;
if(form1.trans_item.value=="FC")
{
trans_item_name="支付方式";
newTransNoTD.innerHTML = "<input name='txtTransNo" rowID "' style='border:0;background-color:#f3f3f3' readonly id='txtTransNo" rowID "' value='" form1.trans_name_detail.value "' style='width:100%'/> <input type='hidden' class='classpayment' name='hidTransNo" rowID "' value='" form1.trans_code_detail.value "'/>";
}
else if(form1.trans_item.value=="PK"){
trans_item_name="Package";
newTransNoTD.innerHTML = "<input name='txtTransNo" rowID "' style='border:0;background-color:#f3f3f3' readonly id='txtTransNo" rowID "' value='" form1.trans_name_detail.value "' style='width:100%'/> <input type='hidden' name='hidTransNo" rowID "' value='" form1.trans_code_detail.value "'/>";
}
else if(form1.trans_item.value=="BT"){
trans_item_name="Balance Transfer";
newTransNoTD.innerHTML = "<input name='txtTransNo" rowID "' style='border:0;background-color:#f3f3f3' readonly id='txtTransNo" rowID "' value='" form1.trans_name_detail.value "' style='width:100%'/> <input type='hidden' name='hidTransNo" rowID "' value='" form1.trans_code_detail.value "'/>";
}
else
{
trans_item_name="消费品";
newTransNoTD.innerHTML = "<input name='txtTransNo" rowID "' style='border:0;background-color:#f3f3f3' readonly id='txtTransNo" rowID "' value='" form1.trans_name_detail.value "' style='width:100%'/> <input type='hidden' name='hidTransNo" rowID "' value='" form1.trans_code_detail.value "'/>";
}
//添加列：交易类型
var newTransTypeTD=newTR.insertCell(1);
newTransTypeTD.innerHTML = "<input name='txtTransType" rowID "' style='border:0;background-color:#f3f3f3' readonly id='txtTransType" rowID "' value='" trans_item_name "' style='width:100%'/><input type='hidden' name='hidTransType" rowID "' value='" form1.trans_item.value "'/>";
//添加列:交易时间
var newPostDateTD=newTR.insertCell(2);
newPostDateTD.innerHTML = "<input name='txtPostDate" rowID "' style='border:0;background-color:#f3f3f3' readonly id='txtPostDate" rowID "' value='" form1.post_date_detail.value "' style='width:100%'/>";
//添加列:房价代码
var newRateCodeTD=newTR.insertCell(3);
newRateCodeTD.innerHTML = "<input name='txtRateCode" rowID "' style='border:0;background-color:#f3f3f3' readonly id='txtRateCode" rowID "' value='" form1.rate_name_detail.value "' style='width:100%'/> <input type='hidden' name='hidRateCode" rowID "' value='" form1.rate_code_detail.value "'/>";
//添加列:房间号
var newRoomNoTD=newTR.insertCell(4);
newRoomNoTD.innerHTML = "<input name='txtRoomNo" rowID "' style='border:0;background-color:#f3f3f3' readonly id='txtRoomNo" rowID "' value='" form1.room_no_detail.value "' style='width:100%'/> <input type='hidden' name='hidPayment" rowID "' value='" document.getElementById('payment_detail').value "' />";
//添加列:支付方式
// var newPaymentTD=newTR.insertCell(4);
// newPaymentTD.innerHTML = "<input type='hidden' name='hidPayment" rowID "' value='" document.getElementById('payment_detail').value "' />";
//添加列:卡号
//var newCardnoTD=newTR.insertCell(4);
//newCardnoTD.innerHTML = "<input name='txtCardNo" rowID "' style='border:0;background-color:#f3f3f3' readonly id='txtCardNo" rowID "' value='" form1.cardno_detail.value "' size='8'/>";
//添加列:单价
var newPricePerUnitTD=newTR.insertCell(5);
newPricePerUnitTD.innerHTML = "<input name='txtPricePerUnit" rowID "' style='border:0;background-color:#f3f3f3' style='border:0;background-color:#f3f3f3' readonly id='txtPricePerUnit" rowID "' value='" form1.price_per_unit_detail.value "' style='width:100%'/> <input type='hidden' name='hidSource" rowID "' id='hidSource" rowID "' value='" form1.source_detail.value "' />";
//添加列:消费数量
var newQuantityTD=newTR.insertCell(6);
newQuantityTD.innerHTML = "<input name='txtQuantity" rowID "' style='border:0;background-color:#f3f3f3' id='txtQuantity" rowID "' value='" form1.quantity_detail.value "' style='width:100%'/> <input type='hidden' name='hidMarket" rowID "' id='hidMarket" rowID "' value='" form1.market_detail.value "' />";
//添加列:总收入
var newAmountTD=newTR.insertCell(7);
newAmountTD.innerHTML = "<input name='txtAmount" rowID "' style='border:0;background-color:#f3f3f3' readonly id='txtAmount" rowID "' value='" form1.amount_detail.value "' style='width:100%'/>";
//添加列:市场
// var newMarketTD=newTR.insertCell(7);
// newMarketTD.innerHTML = "<input name='hidMarket" rowID "' id='hidMarket" rowID "' value='" form1.market_detail.value "' />";
//添加列:来源
// var newSourceTD=newTR.insertCell(8);
// newSourceTD.innerHTML = "<input name='hidSource" rowID "' id='hidSource" rowID "' value='" form1.source_detail.value "' />";
//添加列:删除按钮
var newDeleteTD=newTR.insertCell(8);
newDeleteTD.innerHTML = "<div align='center' style='width:40px'><a href='javascript:;' onclick="fn_deleteRow('SignItem" rowID "'," rowID ")">删除</a></div>";
//alert("test");
//将行号推进下一行
txtTRLastIndex.value = (rowID 1).toString();
}
function fn_findObj(theObj,theDoc)
{
var p,i,foundObj;
if(!theDoc) theDoc = document;
if( (p = theObj.indexOf("?")) > 0 && parent.frames.length)
{
theDoc = parent.frames[theObj.substring(p 1)].document;
theObj = theObj.substring(0,p);
}
if(!(foundObj = theDoc[theObj]) && theDoc.all)
foundObj = theDoc.all[theObj];
for (i=0; !foundObj && i < theDoc.forms.length; i )
foundObj = theDoc.forms[i][theObj];
for(i=0; !foundObj && theDoc.layers && i<theDoc.layers.length;i )
foundObj = fn_findObj(theObj,theDoc.layers[i].document);
if(!foundObj && document.getElementById)
foundObj = document.getElementById(theObj);
return foundObj;
}
function o(obj)
{
return document.getElementById(obj);
}
//删除指定行
function fn_deleteRow(signItem,rowid){
var signFrame = fn_findObj("table_his_detail",document);
var signItem = fn_findObj(signItem,document);
//alert(form1.payment_detail.value)
//获取将要删除的行的Index
var rowIndex = signItem.rowIndex;
//删除指定Index的行
var paymentRowId;
paymentRowId=o("hidPayment" rowid).value;
//将总限制金额减去此笔子账单的消费金额
if (paymentRowId=="<%=pay_svc%>")
{
var v_limit=parseFloat(form1.pay_svc_limit.value);
var v_limit_total=v_limit-v_rev;
if (v_limit>0)
{
form1.pay_svc_limit.value=v_limit_total;
}
}
//form1.tr_lastIndex.value = (form1.tr_lastIndex.value - 1).toString();
var TransType=o("hidTransType" rowid).value;
var v_rev=o("txtAmount" rowid).value;
//对于balance transfer，把正值当作消费品，把负值当作支付方式。
if (TransType=="C" || TransType=="BT" && parseFloat(v_rev)>=0)
{
form1.trans_item_total.value=(parseFloat(form1.trans_item_total.value)-parseFloat(v_rev)).toFixed(2);
}else if(TransType=="BT" && parseFloat(v_rev)<0){
form1.trans_payment_total.value=(parseFloat(form1.trans_payment_total.value) parseFloat(v_rev)).toFixed(2);
}
else
{
form1.trans_payment_total.value=(parseFloat(form1.trans_payment_total.value)-parseFloat(v_rev)).toFixed(2);
}
signFrame.deleteRow(rowIndex);
}
function fn_save_trans()
{
// 判断支付方式
var isPaymentRepeat = false;
var arrPaymentValue = new Array();
$(".classpayment").each(function (index, item) {
// 判断重复
if ($.inArray($(item).val(), arrPaymentValue) != -1) {
isPaymentRepeat = true;
}
arrPaymentValue.push($(item).val());
})
if (isPaymentRepeat) {
alert("支付方式重复，请重新选择");
return false;
}
if (form1.tr_lastIndex.value==1)
{
alert("<%=f_glo("SH01143")%>");
return false;
}
if (parseFloat(form1.trans_item_total.value)!=parseFloat(form1.trans_payment_total.value))
{
alert("<%=f_glo("SH01167")%>");
return false;
}
if(parseFloat(form1.trans_payment_total.value)<0)
{
alert("支付总金额不能为负值");
return false;
}
form1.action="his_room_detail_save.asp";
form1.submit();
}
function fn_display_card_no_detail(v)
{
//暂时注释掉用多卡结帐的功能
//if (v=="<%=pay_svc %>")
//{
// document.getElementById("cardno_detail").style.display="block";
// document.getElementById("img_0").style.display="block";
// document.getElementById("card_no_text").style.display="block";
//}else
//{
document.getElementById("cardno_detail").style.display="none";
document.getElementById("img_0").style.display="none";
document.getElementById("card_no_text").style.display="none";
//}
form1.cardno_detail.value="";
}
function fn_valide_amount_card_value()
{
//var card_balance_detail=from1.card_balance_detail.value;
//var card_overdraft_detail=from1.card_overdraft_detail.value;
var card_used_sum_detail=form1.card_used_sum_detail.value;
var amount_detail= form1.amount_detail.value;
if (form1.cardno_detail.value != "")
{
if (parseFloat(amount_detail)>parseFloat(card_used_sum_detail))
{
alert("<%=f_glo("SH00133")%>" amount_detail "<%=f_glo("SH00134")%>" card_used_sum_detail "<%=f_glo("SH00135")%>")
return false;
}
}else if (form1.cardno_detail.value == "" && document.getElementById("cardno_detail").style.display=="block")
{
alert("<%=f_glo("SH01168")%>");
return false;
}
return true;
}
function fn_select_card(a,b,c,d,e)
{}
function fn_save_trans_complete()
{
// 判断支付方式
var isPaymentRepeat = false;
var arrPaymentValue = new Array();
$(".classpayment").each(function (index, item) {
// 判断重复
if ($.inArray($(item).val(), arrPaymentValue) != -1) {
isPaymentRepeat = true;
}
arrPaymentValue.push($(item).val());
})
if (isPaymentRepeat) {
alert("支付方式重复，请重新选择");
return false;
}
if (form1.trans_item_total.value!=form1.trans_payment_total.value)
{
alert("<%=f_glo("SH01167")%>");
return false;
}
form1.is_complete.value="Y";
form1.action="his_room_detail_save.asp";
form1.submit();
}
function fn_deleteHistoryRow(detail_id)
{
if (window.confirm("确认要删除？"))
{
form1.action="his_room_detail.asp?detail_id=" detail_id;
form1.submit();
}
}
</script>
</head>
<body onclick="h_cele_date();">
<center>
<h2><%=f_glo("SH00100")%></h2>
<form name="form1" method="post" action="his_detail_save.asp" class="input-9-frm">
<table border="0" cellPadding="1" cellSpacing="1" width="100%" class="input-9-tb" align="center">
<tr>
<td width="20%"><%=f_glo("SH00101")%></td>
<td width="30%">
<%if gh_no<>"" then '姓名屏蔽%>
<%if fn_check_private_value(rs_his("private_info"),"NAME") then %>
******
<%else%>
<b><font size="2" color="#0000ff"><a class="link1" title="<%=f_glo("SH00140")%>" href="../m_info/memberinfo_sub_detail.asp?gh_no=<%=gh_no%>&sub_name=<%=sub_name%>"><%=sub_name%></a></font></b>
<%end if%>
<%end if %>
</td>
<td><%=f_glo("SH00141")%></td>
<td><font color="#00ccff"><b><%=sweep_flag%></b></font></td>
</tr>
<tr>
<td width="20%"><font color="#808080"><%=f_glo("SH00102")%></font></td>
<td width="30%">
<input name="net" style="width:100%" readonly="readonly"
<%if gh_no<>"" then '余额屏蔽%>
<%if fn_check_private_value(rs_his("private_info"),"FEE") then %>
value="******"
<%else%>
value="<%=StrToMoney(CStr(cDbl(balance)-cDbl(deposit)))%>"
<%end if%>
<%end if %>
/>
</td>
<td width="20%"><font color="#808080"><%=f_glo("SH00103")%></font></td>
<td width="30%"><input name="deposit" style="width :100%" value="<%=StrToMoney(deposit)%>" readonly></td>
</tr>
<tr>
<td width="20%"><font color="#808080"><%=f_glo("SH00104")%></font></td>
<td width="30%"><input name="overdraft_spend" style="width :100%" value="<%=StrToMoney(overdraft_spend)%>" readonly></td>
<td width="20%"><font color="#808080"><%=f_glo("SH00105")%> = <br><%=f_glo("SH00102")%> <%=f_glo("SH00104")%></font></td>
<td width="30%">
<input name="used_sum" style="width :100%" readonly="readonly"
<%if gh_no<>"" then '余额屏蔽%>
<%if fn_check_private_value(rs_his("private_info"),"FEE") then %>
value="******"
<%else%>
value="<%=StrToMoney(CStr(cDbl(balance)-cDbl(deposit) cDbl(overdraft_spend)))%>"
<%end if%>
<%end if %>
/>
</td>
</tr>
<tr>
<td width="20%"><font color="#808080"><%=f_glo("SH00144")%></font></td>
<td width="30%"><input name="his_points" style="width :100%" value="<%=his_points%>" readonly></td>
<td width="20%"><font color="#808080"><%=f_glo("SH00145")%></font></td>
<td width="30%">
<input name="card_points" style="width :100%" readonly="readonly"
<%if gh_no<>"" then '积分屏蔽%>
<%if fn_check_private_value(rs_his("private_info"),"POINT") then %>
value="******"
<%else%>
value="<%=card_points%>"
<%end if%>
<%end if %>
/>
</td>
</tr>
<tr>
<td colspan="4" background="../../images/login_line5.gif" height="10"></td>
</tr>
<tr>
<td width="20%"><%=f_glo("SH00106")%><font color="red">*</font></td>
<td width="30%"><input style="width:100%" name="arrival" value="<%=arrival%>" onClick="get_s_date(form1.arrival,form1.arrival );" language="javascript"></td>
<td width="20%"><%=f_glo("SH00107")%><font color="red">*</font></td>
<td width="30%"><input style="width:100%" name="departure" value="<%=departure%>" onClick="get_s_date(form1.departure,form1.departure );" language="javascript"></td>
</tr>
<tr>
<td width="20%"><%=f_glo("SH00108")%></td>
<td width="30%">
<%
dim room_type_name
sql="select code,name from dic_roomtype where code='"& room_type &"' order by code"
set rs=conn.execute(sql)
if rs.recordcount>0 then
room_type_name=rs("name")
else
room_type_name=""
end if
%>
<input name="room_type" id="room_type" type="hidden" value="<%=room_type%>" />
<input name="room_type_name" id="room_type_name" style="width:100%" value="[<%=room_type%>]<%=room_type_name%>" readonly="readonly"/>
</td>
<td width="20%"><%=f_glo("SH00109")%></td>
<td width="30%"><input style="width :100%" name="room_number" value="<%=room_number%>" readonly="readonly"/></td>
</tr>
<tr>
<td width="20%"><%=f_glo("SH00110")%></td>
<td width="30%">
<%
dim rate_name
sql="select code,name from V_dic_rate where code='"& rate_code &"' order by code"
set rs=conn.execute(sql)
if rs.recordcount>0 then
rate_name=f_spl_name(rs("name"))
else
rate_name=""
end if
%>
<input name="rate_code" id="rate_code" type="hidden" value="<%=rate_code%>">
<input name="rate_name" id="rate_name" style="width:100%" value="[<%=rate_code%>]<%=rate_name%>" readonly>
</td>
<td width="20%"><%=f_glo("SH00111")%></td>
<td width="30%"><input style="width :100%" name="room_rate" value="<%=StrToMoney(room_rate)%>" onKeyPress="checkMoney(this.value,this.Tabindex)" readonly></td>
</tr>
<tr>
<td width="20%"><%=f_glo("SH00112")%></td>
<td width="30%"><input style="width :100%" name="booker_name" readonly value="<%=booker_name%>"></td>
<td width="20%"><%=f_glo("SH00113")%></td>
<td width="30%"><input style="width :100%" name="special" value="<%=special%>" readonly></td>
</tr>
<tr>
<td width="20%"><%=f_glo("SH00114")%></td>
<td width="30%"><input name="room_rev" style="width:100%" value="<%=StrToMoney(room_rev)%>" onKeyPress="checkMoney(this.value,this.Tabindex)" readonly></td>
<td width="20%"><%=f_glo("SH00115")%></td>
<td width="30%"><input style="width :100%" name="fb_rev" value="<%=StrToMoney(fb_rev)%>" onKeyPress="checkMoney(this.value,this.Tabindex)" readonly></td>
</tr>
<tr>
<td width="20%"><%=f_glo("SH00116")%></td>
<td width="30%"><input name="other_rev" style="width:100%" value="<%=StrToMoney(other_rev)%>" onKeyPress="checkMoney(this.value,this.Tabindex)" readonly></td>
<td width="20%">总税费金额</td>
<td width="30%"><input name="total_tax" style="width:100%" value="<%=StrToMoney(total_tax)%>" onKeyPress="checkMoney(this.value,this.Tabindex)" readonly></td>
</tr>
<tr>
<td width="20%"><font color="#808080"><%=f_glo("SH00117")%></font></td>
<td width="30%"><input name="total_rev" style="width:100%" value="<%=StrToMoney(total_rev)%>" readonly></td>
</tr>
<tr>
<td width="20%"><font color="#808080"><%=f_glo("SH00118")%></font></td>
<td width="30%"><input name="discount_real" style="width:100%" onKeyPress="checkMoney(this.value,this.Tabindex)" value="<%=discount_real%>" readonly></td>
<td width="20%"><%=f_glo("SH00120")%></td>
<td width="30%"><input name="check_no" style="width:100%" value="<%=check_no%>" readonly></td>
</tr>
<tr>
<td width="20%"><%=f_glo("SH00146")%></td>
<td width="30%"><%=dt%></td>
<td width="20%"><%=f_glo("SH00122")%></td>
<td width="30%"><%=payment_name%></td>
</tr>
<tr>
<td width="20%" style="display:none"><%=f_glo("SH00123")%></td>
<% if payment <> pay_cash then %>
<td width="30%" style="display:none"><input style="width :100%" name="credit_no" value="<%=credit_no%>" readonly></td>
<%else%>
<td width="30%"></td>
<%end if %>
<td width="20%"><%=f_glo("SH00151")%></td>
<%
sqlstr1="select * from dic_channel where code='"& channel_code &"'"
set rs1 = conn.execute(sqlstr1)
if rs1.recordcount>0 then%>
<td width="30%">[<%=trim(rs1("code"))%>]...<%=trim(rs1("name"))%></td>
<%else%>
<td width="30%"></td>
<%end if %>
</tr>
<tr>
<td width="20%"><%=f_glo("SH00152")%></td>
<%
sqlstr1="select * from dic_segment where code='"& market_code &"'"
set rs1 = conn.execute(sqlstr1)
if rs1.recordcount>0 then%>
<td width="30%">[<%=trim(rs1("code"))%>]...<%=trim(rs1("name"))%></td>
<%else%>
<td width="30%"></td>
<%end if %>
<td width="20%"><%=f_glo("SH00153")%></td>
<%
sqlstr1="select * from dic_source where code='"& source_code &"'"
set rs1 = conn.execute(sqlstr1)
if rs1.recordcount>0 then%>
<td width="30%">[<%=trim(rs1("code"))%>]...<%=trim(rs1("name"))%></td>
<%else%>
<td width="30%"></td>
<%end if %>
</tr>
<tr>
<td><%=f_glo("SH00124")%></td>
<td><input style="width :100%" name="operator" value="<%=operator%>" readonly="readonly" /></td>
<%
dim prt_chit,prt_right
'打印单据的选择方式
prt_chit=fn_get_param_value("PRT_CHIT",session("hotel_code"))
prt_right=fn_check_right(user_code,"S311")
if prt_chit="" or prt_chit="null" then
prt_chit="N"
end if
if prt_chit="Y" and prt_right=true then
if prt_type="H" then
%>
<td style="width:20%"><%=f_glo("SF00735")%></td>
<td style="width:30%">
<select id="print_templet" name="print_templet" style="width:100%">
<%dim sql_templet,rs_templet
sql_templet=" select id,name from email_templet where templet_type='G' and valid='1' "
set rs_templet=conn.execute(sql_templet)
if rs_templet.recordcount>0 then
do while not rs_templet.eof
%>
<option value="<%=rs_templet("id") %>" <%if templet_id=trim(rs_templet("id")) then %> selected <%end if %> ><%=rs_templet("name") %></option>
<%
rs_templet.movenext
loop
else %>
<option value=""></option>
<%end if %>
</select>
</td>
<% else
%>
<td ></td>
<td ></td>
<% end if
else%>
<td ></td>
<td ></td>
<% end if%>
</tr>
<tr>
<td width="20%">促销代码</td>
<td width="30%"><input style="width :100%" name="promotion_code" value="<%=rs_merge("promotion_trace_code")%>" readonly="readonly" /></td>
<td width="20%">入住总人数（成人 小孩）</td>
<td width="30%"><input name="guests" style="width :100%" value="<%=guests%>" readonly="readonly"></td>
</tr>
<tr>
<td style="width:20%"><%=f_glo("SF00024")%></td>
<td colspan="3">
<textarea rows="3" cols="20" id="m_history_remark" name="m_history_remark" style="width:100%;"><%=remark%></textarea>
</td>
</tr>
</table>
<br>
<p>
<input type="hidden" name="operator_id" value="<%=operator_no%>"/>
<input type="hidden" name="points" value="<%=points%>"/>
<input type="hidden" name="id" value="<%=id%>"/>
<input type="hidden" name="booker_no" value="<%=booker_no%>"/>
<input type="hidden" name="gh_no" value="<%=gh_no%>"/>
<input type="hidden" name="old_total_rev" value="<%=old_total_rev%>"/>
<input type="hidden" name="payment" value="<%=payment%>"/>
<input type="hidden" name="membership" value="<%=membership%>"/>
<input type="hidden" name="entry" value="<%=entry%>"/>
<input type="hidden" name="chname" value="<%=sub_name%>"/>
<input type="hidden" name="last_net" value="<%=balance-deposit%>"/>
<input type="hidden" name="last_deposit" value="<%=deposit%>"/>
<input type="hidden" name="card_type" value="<%=card_type%>" />
<input type="hidden" name="expiry_date" value="<%=expiry_date %>"/>
<input type="hidden" name="channel_code" value="<%=channel_code%>"/>
<input type="hidden" name="market_code" value="<%=market_code %>"/>
<input type="hidden" name="source_code" value="<%=source_code %>"/>
<input type="hidden" name="b_balance"/>
<input type="hidden" name="b_points"/>
<input type="hidden" name="his_type" value="R"/>
<input type="hidden" name="his_id" value="<%=id%>"/>
<input type="hidden" name="print_time" value="<%=date & chr(32) & FormatDateTime(time,vbShortTime)%>" />
<input type="hidden" id="fee_id" name="fee_id" value="<%=fee_id %>" />
<input type="hidden" id="form_action" name="form_action" />
</p>
<%if is_complete="Y" then %>
<%if fn_check_right(user_code,"S302") then '修改权限%>
<input type="button" name="button" value="<%=f_glo("SH00125")%>" class="buttonface" onclick="fn_save_remark()" />
<%end if %>
<%if fn_check_right(user_code,"S310") then '补打控制%>
<input type="button" name="print" value="<%=f_glo("SH01081")%>" onclick="fn_print_new()" class="buttonface" />
<%end if%>
<%end if %>
<input type="button" name="cancel" value="<%=f_glo("SH00126")%>" class="buttonface" onclick="fn_return()" />
<br />
<%if whether_bucket="Y" then %>
<h2><%=f_glo("SH01144")%></h2>
<%dim sql_dic_child,rs_dic_child
if is_complete="N" then
%>
<table width="100%" class="input-9-tb" cellpadding=1 cellspacing=1>
<tr>
<td style="width:20%"><%=f_glo("SH01145")%><font color="red">*</font></td>
<td style="width:30%">
<input type="hidden" name="source_detail" value="<%=source_code %>"/>
<input type="hidden" name="market_detail" value="<%=market_code %>"/>
<input type="text" name="post_date_detail" style="width:100%" value="<%=date() %>" onClick="get_s_date(form1.post_date_detail,form1.post_date_detail);" />
</td>
<td style="width:2%"><%=f_glo("SH01147")%><font color="red">*</font></td>
<td style="width:30%">
<input type="hidden" name="trans_item" id="trans_item" />
<input type="hidden" name="payment_detail" id="payment_detail" />
<input name="trans_code_detail" id="trans_code_detail" type="hidden">
<input name="trans_name_detail" id="trans_name_detail" style="width:85%" onClick="ShowFinder_trans_code('form1.trans_code_detail','form1.trans_name_detail','form1.trans_item','form1.payment_detail');">
<a href="javascript:ShowFinder_trans_code('form1.trans_code_detail','form1.trans_name_detail','form1.trans_item','form1.payment_detail');">
<img src="../../images/imgbtn_Date.jpg" align="absMiddle" border="0"></a>
</td>
</tr>
<tr>
<td style="width:20%"><%=f_glo("SH01148")%></td>
<td style="width:30%">
<input type="text" name="room_no_detail" value="<%=room_number %>" style="width:100%" />
</td>
<td style="width:20%"><%=f_glo("SH01150")%><font color="red">*</font></td>
<td style="width:30%">
<input name="rate_code_detail" id="rate_code_detail" type="hidden" value="<%=rate_code %>" >
<input name="rate_name_detail" id="rate_name_detail" style="width:85%" value="<%=rate_name %>" onClick="ShowFinder_rate('form1.rate_code_detail','form1.rate_name_detail');">
<a href="javascript:ShowFinder_rate('form1.rate_code_detail','form1.rate_name_detail');">
<img src="../../images/imgbtn_Date.jpg" align="absMiddle" border="0"></a>
</td>
</tr>
<tr>
<td style="width:20%"><%=f_glo("SH01151")%><font color="red">*</font></td>
<td style="width:30%">
<input type="text" name="price_per_unit_detail" style="width:100%" onKeyPress="checkMoneyNew(this.value,this.Tabindex)" onBlur="fn_get_amount()" />
</td>
<td style="width:20%"><%=f_glo("SH01152")%></td>
<td style="width:30%">
<input type="text" name="quantity_detail" style="width:100%" onBlur="fn_get_amount()"/>
</td>
</tr>
<tr>
<td style="width:20%"><%=f_glo("SH01154")%><font color="red">*</font></td>
<td style="width:30%">
<input type="text" name="amount_detail" style="width:100%" readonly />
</td>
<td style="width:20%"><p id="card_no_text" style="display:none;float: left;"><%=f_glo("SH00805") %><font color="red">*</font></p></td>
<td style="width:30%">
<input style="width :85%;display:none;float: left;" name="cardno_detail" id="cardno_detail"
readonly
onclick="javascript:ShowFinder_card_more_his('form1.cardno_detail','form1.card_balance_detail','form1.card_overdraft_detail','form1.card_used_sum_detail','');"/>
<a href="javascript:ShowFinder_card_more_his('form1.cardno_detail','form1.card_balance_detail','form1.card_overdraft_detail','form1.card_used_sum_detail','');">
<img src="../../images/imgbtn_Date.jpg" align="absMiddle" border="0" id="img_0" style="display:none;float: left;"/></a>
<input type="hidden" name="card_balance_detail" id="card_balance_detail" />
<input type="hidden" name="card_overdraft_detail" id="card_overdraft_detail" />
<input type="hidden" name="card_used_sum_detail" id="card_used_sum_detail" />
</td>
</tr>
<tr>
<td colspan="3"></td>
<td align="right">
<input style="width:30%" type="button" name="new_his_trans" value="<%=f_glo("SH01155")%>" class="buttonface" onclick="fn_add_his_trans()" />
</td>
</tr>
</table>
<%end if %>
<br />
<table class="input-9-tb" align="center" cellpadding=2 cellspacing=1 width="100%" id="table_his_detail">
<tr>
<th><%=f_glo("SH01156")%></th>
<th><%=f_glo("Z0000874")%></th>
<th><%=f_glo("SH01157")%></th>
<th><%=f_glo("SH01158")%></th>
<th><%=f_glo("SH01159")%></th>
<th><%=f_glo("SH01151")%></th>
<th><%=f_glo("SH01152")%></th>
<th><%=f_glo("SH01163")%></th>
</tr>
<%
dim sql_his_detail,rs_his_detail
sql_his_detail = " select tc.code as transaction_code,tc.name transaction_name,s.name as source,m.name as market, " & _
" isnull(p.name,'') as payment,r.name as rate_name," & _
" case when hpd.transaction_type='FC' then '支付方式' when hpd.transaction_type='C'" & _
" then '消费品' when hpd.transaction_type='BT' then 'Balance Transfer' else 'package' end as transaction_type," & _
" hpd.id,hpd.post_date,hpd.amount,hpd.room_no,hpd.quantity,hpd.price_per_unit,hpd.card_no " & _
" from member_history_svc_pms_detail hpd" & _
" inner join dic_transaction_code tc on hpd.transaction_code=tc.code " & _
" left join dic_source s on hpd.source=s.code " & _
" left join dic_segment m on hpd.market=m.code" & _
" left join dic_payment p on hpd.payment=p.code" & _
" left join V_dic_rate r on hpd.rate_code=r.code and r.hotel_code=hpd.hotel_code" & _
" where hpd.his_id='"&id&"' " & _
" order by hpd.post_date"
set rs_his_detail = conn.execute(sql_his_detail)
dim trans_payment_total,trans_item_total
trans_payment_total=0
trans_item_total=0
if rs_his_detail.recordcount>0 then
do while not rs_his_detail.eof
%>
<tr>
<td><%=rs_his_detail("transaction_name") %>[<%=rs_his_detail("transaction_code")%>]
<%if rs_his_detail("transaction_type")="支付方式" then %>
<input type="hidden" class='classpayment' value="<%=rs_his_detail("transaction_code") %>" />
<%end if %>
</td>
<td><%=rs_his_detail("transaction_type") %></td>
<td><%=rs_his_detail("post_date") %></td>
<td><%=rs_his_detail("rate_name") %></td>
<td><%=rs_his_detail("room_no") %></td>
<td><%=StrToMoney(rs_his_detail("price_per_unit")) %></td>
<td><%=rs_his_detail("quantity") %></td>
<td><%=StrToMoney(rs_his_detail("amount")) %></td>
<td align='center' style='width:40px'><a href='javascript:;' onclick="fn_deleteHistoryRow(<%=rs_his_detail("id") %>)">删除</a></td>
</tr>
<%
if rs_his_detail("transaction_type")="支付方式" then
trans_payment_total=trans_payment_total StrToMoney(cdbl(rs_his_detail("amount")))
else
trans_item_total=trans_item_total StrToMoney(cdbl(rs_his_detail("amount")))
end if
rs_his_detail.movenext
loop
end if
%>
</table>
<br />
<%if is_complete="N" then %>
<input type=button name="btnSaveTrans" value="<%=f_glo("SH01166")%>" class="buttonface" onclick="fn_save_trans()" />
<%end if %>
<%if rs_his_detail.recordcount>0 and is_complete="N" then %>
<input type=button name="btnSaveTrans" value="<%=f_glo("S00267")%>" class="buttonface" onclick="fn_save_trans_complete()" />
<%end if %>
<%end if %>
<input type="hidden" name="tr_lastIndex" value="1" id="tr_lastIndex" />
<input type="hidden" name="pay_svc_limit" value="0" id="pay_svc_limit" />
<input type="hidden" name="trans_item_total" value="<%=trans_item_total %>" id="trans_item_total" />
<input type="hidden" name="trans_payment_total" value="<%=trans_payment_total %>" id="trans_payment_total" />
<input type="hidden" name="main_card_no" value="<%=main_card_no %>" />
<input type="hidden" name="templet_id" value="<%=templet_id %>" />
<input type="hidden" name="is_complete" value="<%=is_complete %>" />
<input type="hidden" name="trace_code" value="<%=trace_code %>" />
</form>
</center>
</body>
</html>
<script type="text/javascript" language="javascript">
<%if is_complete="N" then %>
fn_get_amount();
<%end if %>
</script>
<!--#include file = '../../include/close.asp'-->
