📄 k_stockedit.asp
字号:
<tr>
<td width="11%" height="23" align="right" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5">
<font size="2">进货部门
</font>
</td>
<td width="21%" height="23" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5">
<p align="left"><select name="jhbm" style="width: 126; height: 23" size="1" onchange="ywy()">
<%
'进货部门列表
set rsbm=server.createobject("adodb.recordset")
mysql="select DepartCode,Name from A_departInfo where delflag='0'"
rsbm.open mysql,pubconn,1,3
%>
<option value=""></option>
<%do while not rsbm.eof %>
<option value="<%=rsbm("DepartCode")%>"
<%if jhbm<>"" then
if jhbm=rsbm("departcode") then
response.write ("selected")
end if
end if
%>
><%=rsbm("Name")%></option>
<%rsbm.movenext%>
<%loop
rsbm.close
set rsbm=nothing
%>
</select>
<td width="13%" height="23" align="right" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5">
<font size="2">采购员</font>
</td>
<td width="15%" height="23" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5" >
<select name="cgy" style="width: 95; height: 23" size="1">
<%
'业务员列表
set rsywy=server.createobject("adodb.recordset")
mysql="select * from A_StuffInfo where delflag='0'"
rsywy.open mysql,pubconn,1,3
%>
<option value=""></option>
<%do while not rsywy.eof %>
<option value="<%=rsywy("StuffNum")%>"
<%if cgy<>"" then
if cgy=rsywy("stuffnum") then
response.write ("selected")
end if
end if
%>
><%=rsywy("Name")%></option>
<%rsywy.movenext%>
<%loop
rsywy.close
set rsywy=nothing
%>
</select>
</select>
</td>
<td width="10%" height="23" align="right" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5" >
<font size="2">进货方式
</font>
</td>
<td width="15%" height="23" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5" >
<select name="jhfs" style="width: 96; height: 23" size="1">
<option value=""></option>
<%for i=0 to UBound(stockway) %>
<option value="<%=stockway(i)%>" <%if rsjh("jhfs")=stockway(i) then %> selected <%end if%>><%=stockway(i)%></option>
<%next %>
</select> </td>
</tr>
<tr>
<td width="11%" height="8" align="right" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5">
<font size="2">商品编码</font>
</td>
<td width="21%" height="8" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5">
<input type="text" name="spbm" size="17" <%if spbm<>"" then%> value="<%=spbm%>" <%end if %> value="<%=rsjh("prodcode")%>" onkeyup="key2()" tabindex="2" >
<input type="button" value="..." name="cmdsearch1" onclick="cpmc()" class="hand" style="background-color: #D1D1D1; border-style: solid; border-width: 1" >
</td>
<td width="13%" height="8" align="right" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5">
<font size="2">商品名称
</font>
</td>
<td width="15%" height="8" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5" >
<font size="2"></font>
<input type="text" name="spmc" size="14" <%if spbm<>"" then%> value="<%=spmc%>" <%end if %> value="<%=spmc1%>" readonly style="background-color: #edefef">
</td>
<td width="10%" height="8" align="right" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5" >
<font size="2">规格型号
</font>
</td>
<td width="15%" height="8" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5" >
<input type="text" name="ggxh" size="14" <%if spbm<>"" then%> value="<%=ggxh%>" <%end if %> value="<%=ggxh1%>" readonly style="background-color: #edefef">
</td>
</tr>
<tr>
<td width="11%" height="23" align="right" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5">
<font size="2">计量单位
</font>
</td>
<td width="21%" height="23" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5">
<input type="text" name="jldw" size="14" <%if spbm<>"" then%> value="<%=jldw%>" <%end if %> value="<%=jldw1%>" readonly style="background-color: #edefef">
<td width="13%" height="23" align="right" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5">
<font size="2">入库仓库
</font>
</td>
<td width="15%" height="23" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5" >
<select name="rkck" size="1" style="width:120">
<option value=""></option>
<%for i=0 to UBound(house) %>
<option value="<%=house(i)%>" <%if rsjh("rkck")=house(i) then%> selected <%end if %>><%=house(i)%></option>
<%next %>
</select>
</td>
<td width="10%" height="23" align="right" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5" >
<font size="2">仓库仓位
</font>
</td>
<td width="15%" height="23" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5" >
<input type="text" name="ckcw" size="14" value="<%=rsjh("ckcw")%>">
</td>
</tr>
<tr>
<td width="11%" height="23" align="right" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5">
<font size="2">数量
</font>
</td>
<td width="21%" height="23" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5">
<input type="text" name="sl" size="7" value="<%=rsjh("spsl")%>">
</td>
<td width="13%" height="23" align="right" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5">
<font size="2">不含税单价
</font>
</td>
<td width="15%" height="23" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5" >
<input type="text" name="bhsdj" size="14" <%if spbm<>"" then%> value="<%=cbj%>" <%end if %> value="<%=rsjh("bhsdj")%>">
</td>
<td width="10%" height="23" align="right" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5" >
<font size="2">税率
</font>
</td>
<td width="15%" height="23" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5" >
<select name="spsl" style="width: 96; height: 23" size="1" onchange="dj()">
<option value="0"></option>
<%for i=0 to UBound(tax) %>
<option value="<%=tax(i)%>" <%if (spbm="") and (cdbl(rsjh("sl"))=cdbl(tax(i))) then %> selected <%end if %>><%=tax(i)%></option>
<%next %>
</select> </td>
</tr>
<tr>
<td width="11%" height="23" align="right" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5">
<font size="2">含税单价
</font>
</td>
<td width="21%" height="23" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5">
<input type="text" name="hsdj" size="14" <%if spbm<>"" then%> value="" <%end if %> value="<%=rsjh("hsdj")%>" readonly style="background-color: #edefef">
</td>
<td width="13%" align="right" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5">
<font size="2">制单人
</font>
</td>
<td width="15%" height="23" colspan="3" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5" >
<input type="text" name="zdr" size="14" value="<%=Pname(rsjh("zdr"))%>" readonly style="background-color: #edefef">
</td>
</tr>
<tr>
<td width="11%" height="23" align="right" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5">
<font size="2">备注</font>
</td>
<td width="24%" height="23" colspan="5" bgcolor="#F7F4E5" bordercolorlight="#F7F4E5" bordercolor="#F7F4E5">
<p align="left">
<input type="text" name="bz" size="74" tabindex="4" value="<%=rsjh("bz")%>">
</tr>
</table>
<p align="center">
<input type="button" value="保存" name="bc" onclick="datacheck()" class="hand" style="background-color: #D1D1D1; border-style: solid; border-width: 1">
<a href=k_stockbrow.asp>返回</a>
</form>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -