📄 jhuodandetail_add.asp
字号:
<!--#include file="../conn.asp"-->
<%'mingxi=replace(replace(replace(now(),":",""),"-","")," ","")
jindan=request("jindan")
if request("action")="add" then
conn.begintrans
set rs=server.CreateObject("adodb.recordset")
sql="select * from ht_Stockdetail"
rs.open sql,conn,1,3
rs.addnew()
if request("number")="" then
response.write "<script>alert('对不起，数量不为空');history.go(-1);</script>"
response.End()
else
rs("number")=int(request("number"))
end if
' rs("stockhousename")=stockhousename
' rs("type")=stocktype
rs("stock_id")=jindan
rs("stockdetail_number")=request("mingxi")
' rs("companyname")=companyname
rs("Goodstype")=request("pinzong")
rs("trademark")=split(request("pinpainame"),",")(1) '品牌
rs("marktype")=request("xinhao") '型号
rs("color")=trim(request("yanshe")) '颜色
rs("appendant")=trim(request("kuansi"))
rs("wheremake")=request("candi") '产地
rs("storehouseplace")=request("canghao")
rs("oldinprice")=request("jinjia")
rs("inprice")=request("jinjia") '进价
rs("saleprice")=request("kongjia") '空价
rs("netprice")=request("luwang") '入网
rs("specialprice")=request("houdong") '活动
rs("wholesaleprice")=request("pifa")
rs("intotalprice")=request("jinjia")*request("num") '总价
rs("quantity")=INT(request("num")) '数量
rs("detail_num")=int(request("detail_num"))
rs.update
rs.close
set rs=nothing
if request("selectcuan")<>"" then
cuanhao=split(request("selectcuan"),",")
j=UBound(cuanhao)
for i=0 to j
conn.execute("insert into ht_serial(serialnumber,stockdetail_number,inprice) values('"&trim(cuanhao(i))&"','"&trim(request("mingxi"))&"',"&int(request("jinjia"))&")")
next
end if
if conn.errors.count>0 then
conn.Errors.Clear
conn.RollbackTrans
else
conn.committrans
end if
if trim(request("ckok"))="保存退出" then
response.write "<script language='javascript'>window.close();</script>"
end if
if trim(request("ckok"))="保存新增" then
response.write "<script language='javascript'>window.location.href='jhuodandetail_add.asp?jindan="&request("jindan")&"';</script>"
end if
end if
set rs1=conn.execute("select max(number) from ht_Stockdetail")
num1=rs1(0)+1
%>
<%set rs=server.createobject("adodb.recordset")
sql = "select * from ht_marktype ma,ht_Trademark tr where tr.Trademark_id=ma.Marktype_tr_id order by ma.marktype_name asc "
rs.open sql,conn,1,1
%>
<script language = "JavaScript">
var onecount;
subcat = new Array();
<%
count = 0
do while not rs.eof
%>
subcat[<%=count%>] = new Array("<%= trim(rs("marktype_name"))%>","<%= trim(rs("Marktype_Tr_id"))&","&trim(rs("Trademark_name"))%>","<%= trim(rs("marktype_name"))%>");
<%
count = count + 1
rs.movenext
loop
rs.close
%>
onecount=<%=count%>;
function changelocation(locationid)
{
document.form1.xinhao.length = 1;
var locationid=locationid;
var i;
for (i=0;i < onecount; i++)
{
if (subcat[i][1] == locationid)
{
document.form1.xinhao.options[document.form1.xinhao.length] = new Option(subcat[i][0], subcat[i][2]);
}
}
}
function insertrows()
{
if (document.form1.num.value==0||document.form1.num.value=="")
{
alert('数量不为空');
document.form1.num.focus();
return false;
}
if (document.form1.jinjia.value==0||document.form1.jinjia.value=="")
{
alert('进价不为空');
document.form1.jinjia.focus();
return false;
}
if (document.all.form1.selectcuan.options.length!=document.form1.num.value)
{
alert('串号数与数量不相等');
document.form1.num.focus();
return false;
}
if(document.form1.selectcuan.length>0)
{
for(i=0;i<document.form1.selectcuan.options.length;i++)
{
document.form1.selectcuan.options(i).selected=true;
}
}
if (window.opener.document.ck.wanchen.disabled)
{
window.opener.document.ck.wanchen.disabled=false;
}
var theTable = window.opener.document.getElementById("table1");
var rowNumber = parseFloat(theTable.rows.length); //1
var a=new Array()
a[0]="";
a[1]=document.form1.mingxi.value;
a[2]=document.form1.pinzong.value;
a[3]=document.form1.pinpainame.value.split(",")[1]; //把它改成数组显示
a[4]=document.form1.xinhao.value;
a[5]=document.form1.yanshe.value;
a[6]=document.form1.jinjia.value;
a[7]=document.form1.num.value;
a[8]=document.form1.jinjia.value*document.form1.num.value;
if (window.opener.document.ck.r0c1.value=="")
{
window.opener.document.ck.r0c1.value=a[1];
window.opener.document.ck.r0c2.value=a[2];
window.opener.document.ck.r0c3.value=a[3];
window.opener.document.ck.r0c4.value=a[4];
window.opener.document.ck.r0c5.value=a[5];
window.opener.document.ck.r0c6.value=a[6];
window.opener.document.ck.r0c7.value=a[7];
window.opener.document.ck.r0c8.value=a[8];
window.opener.document.ck.rowcount.value=rowNumber;
}
else
{
window.opener.document.ck.rowcount.value=rowNumber+1;
theTable.insertRow(rowNumber);
for (var j=0;j<=theTable.rows[rowNumber-1].cells.length-1;j++)
{
var newValue="<input type='text' class='inputfield2' size='10' value='"+a[j]+"' name='r"+rowNumber+"c"+j+"' id=''r"+rowNumber+"c"+j+"' >r"+rowNumber+"c"+j;
theTable.rows[rowNumber].insertCell(j);
theTable.rows[rowNumber].cells[j].innerHTML = newValue;
theTable.rows[rowNumber].cells[0].innerHTML="<div align='center'></div>";
theTable.rows[rowNumber].cells[0].className="borderon2";
}
//theTable.rows[rowNumber].cells[8].innerHTML="<input type='text' class='inputfield2' size='10' name='r"+rowNumber+"c8' id='r"+rowNumber+"c8'>";
}
//form1.submit();
}
function checkcuanhao(){
var cuanhaoid=document.form1.cuanhao.value
//var mingxidan=document.form1.mingxi.value
if(cuanhaoid=="")
{
alert("写上串号！")
return false;
}
else
{
window.open("cuanhaoadd.asp?cuanhao="+cuanhaoid,"_blank","height=2,width=2,resizable=no,scrollbars=no,statue=no,toolbar=no,menubar=no,location=no,left=150,top=80");
}
}
</script>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<link href="../css/body.css" rel="stylesheet" type="text/css">
<title>进货单明细表</title>
</head>
<body><form name="form1" method="post" action="?action=add" >
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>进货单明细商品</td>
</tr>
</table>
<table width="518" border="1" align="center" cellpadding="0" cellspacing="2">
<tr>
<td width="78"><div align="right">进仓单号：</div></td>
<td width="168">
<input name="jindan" type="text" disabled="disabled" id="jindan" value="<%=jindan%>" size="20">
<input name="jindan" type="hidden" id="jindan" value="<%=jindan%>"></td>
<td width="73"><div align="right">明细编号：</div></td>
<td width="171">
<%
'mingxi=jindan
set rs1=conn.execute("select max(detail_num) from ht_Stockdetail where Stock_id='"&jindan&"'")
if rs1(0)>0 then
mingxi=jindan&"MX"&right("00"&rs1(0)+1,3)
detail_num=rs1(0)+1
else
mingxi=jindan&"MX001"
detail_num=1
end if
rs1.close
set rs1=nothing
%>
<input name="mingxi" type="text" id="mingxi" value="<%=mingxi%>">
<input name="detail_num" type="hidden" id="detail_num" value="<%=detail_num%>"></td>
</tr>
<tr>
<td><div align="right">品种：</div></td>
<td><select name="pinzong" id="pinzong">
<% set rs=conn.execute("select * from ht_goodstype")
if not rs.eof then
do while not rs.eof
response.write"<option value="&rs("Goodstype_name")&">"&rs("Goodstype_name")&"</option>"
rs.movenext
loop
end if
rs.close()
set rs=nothing
%>
</select>
<input name="number" type="hidden" id="number" value="<%=num1%>"></td>
<td><div align="right">产地：</div></td>
<td><input name="chandi" type="text" id="chandi"></td>
</tr>
<tr>
<td><div align="right">品牌：</div></td>
<td>
<%
dim seltrademark
seltrademark=""
set rs=conn.execute("select * from ht_Trademark order by Trademark_id desc")
if not rs.eof then
seltrademark=seltrademark&"<option value="&rs("Trademark_id")&","&rs("trademark_name")&">"&rs("Trademark_name")&"</option>"
selclass=rs("Trademark_id")&","&rs("trademark_name")
rs.movenext
do while not rs.eof
seltrademark=seltrademark&"<option value="&rs("Trademark_id")&","&rs("trademark_name")&">"&rs("Trademark_name")&" </option>"
rs.movenext
loop
end if %>
<span class="borderon">
<select name="pinpainame"onChange="changelocation(document.form1.pinpainame.options[document.form1.pinpainame.selectedIndex].value)">
<%=seltrademark%>
</select>
</span></td>
<td><div align="right">仓位：</div></td>
<td><input name="canghao" type="text" id="canghao"></td>
</tr>
<tr>
<td><div align="right">型号</div></td>
<td><span class="borderon">
<select name="xinhao" id="xinhao">
<%
selclass1=split(selclass,",")
set rs=server.createobject("adodb.recordset")
sql="select * from ht_marktype where Marktype_Tr_id="&selclass1(0)
rs.open sql,conn,1,1
if not(rs.eof and rs.bof) then
%>
<option value="<%=rs("marktype_name")%>" selected="selected"><%=rs("marktype_name")%> </option>
<%
rs.movenext
do while not rs.eof
%>
<option value="<%=rs("marktype_name")%>"><%=rs("marktype_name")%> </option>
<%
rs.movenext
loop
end if
rs.close
%>
</select>
</span></td>
<td><div align="right">串号：</div></td>
<td><input name="cuanhao" type="text" id="cuanhao" size="15">
<input type="button" name="Submit" value="串号" onClick="checkcuanhao()"></td>
</tr>
<tr>
<td><div align="right">颜色：</div></td>
<td><select name="yanshe" id="yanshe">
<option value=""> </option>
<% set rs=conn.execute("select * from ht_color ")
if not rs.eof then
do while not rs.eof
response.write "<option value="&rs("Color_name")&">"&rs("color_name")&"</option>"
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</select> </td>
<td> </td>
<td rowspan="6"><select name="selectcuan" size="10" multiple id="selectcuan" ondblclick="if(this.options.length>0) { this.remove(this.selectedIndex); }">
</select></td>
</tr>
<tr>
<td><div align="right">款式：</div></td>
<td><select name="kuansi" id="kuansi">
<% set rs=conn.execute("select * from ht_Appendant ")
if not rs.eof then
do while not rs.eof
response.write "<option value="&rs("Appendant_name")&">"&rs("Appendant_name")&"</option>"
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</select> </td>
<td> </td>
</tr>
<tr>
<td><div align="right">数量：</div></td>
<td><input name="num" type="text" id="num" size="8" onKeyUp="value=value.replace(/[^\d]/g,'') "onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\d]/g,''))"></td>
<td> </td>
</tr>
<tr>
<td><div align="right">进货价：</div></td>
<td><input name="jinjia" type="text" id="jinjia" size="15" onKeyUp="value=value.replace(/[^\d]/g,'') "onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\d]/g,''))"></td>
<td> </td>
</tr>
<tr>
<td><div align="right">空机销售价：</div></td>
<td><input name="kongjia" type="text" id="kongjia" value="0" size="15" onKeyUp="value=value.replace(/[^\d]/g,'') "onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\d]/g,''))"></td>
<td> </td>
</tr>
<tr>
<td><div align="right">入网销售价：</div></td>
<td><input name="luwang" type="text" id="luwang" value="0" size="15" onKeyUp="value=value.replace(/[^\d]/g,'') "onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\d]/g,''))"></td>
<td> </td>
</tr>
<tr>
<td><div align="right">活动销售价：</div></td>
<td><input name="houdong" type="text" id="houdong" value="0" size="15" onKeyUp="value=value.replace(/[^\d]/g,'') "onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\d]/g,''))"></td>
<td colspan="2"> </td>
</tr>
<tr>
<td><div align="right">批发销售价：</div></td>
<td><input name="pifa" type="text" id="pifa" value="0" size="15" onKeyUp="value=value.replace(/[^\d]/g,'') "onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\d]/g,''))"></td>
<td colspan="2"> </td>
</tr>
</table>
<table width="518" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><div align="center">
<input name="ckok" type="submit" id="ckok" onClick="javascript:return insertrows()" value="保存退出">
</div></td>
<td><div align="center">
<input name="ckok" type="submit" id="ckok" value="保存新增" onClick="javascript:return insertrows()" >
</div></td>
<td><div align="center">
<input type="button" name="Submit3" value="关 闭" onClick="javascript:window.close();">
</div></td>
</tr>
</table>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -