fprovide.html

基于vb环境开发的pos终端系统

<!-- #include file="1_head.html" -->
<!-- #include file="2_pages.html" -->

<img src="<%=Modules.Login.ImgTip.Image.AsHREF%>" width="12" height="12">
<font size="-1">向<font color="#FF8040"><%=Session.Values('CityName')%></font>仓库供货。</font><br>
<img src="<%=Modules.Login.ImgTip.Image.AsHREF%>" width="12" height="12">
<font size="-1">输入所需信息，点击“提交”将生成新的交货通知号：</font>
<#STYLES><#WARNINGS><#SERVERSCRIPT>


<!------------------------------------------------------------------------->
<!------------------------------------------------------------------------->

<%
vdsaOldMsg=Modules.ProvInput.dsaOldMsg
vdsaOldMsg_MsgNo=vdsaOldMsg.MsgNo
vdsaOldMsg_Subject=vdsaOldMsg.Subject
vdsaOldMsg_dispGoodsClass=vdsaOldMsg.dispGoodsClass
vdsaOldMsg_BrandDisp=vdsaOldMsg.BrandDisp
vdsaOldMsg_PromotTo=vdsaOldMsg.PromotTo
vdsaOldMsg_dispMarketID=vdsaOldMsg.dispMarketID
vdsaOldMsg_InputDate=vdsaOldMsg.InputDate
%>

<%
function WriteColText(t)
{
   Response.Write((t!="")?t:"&nbsp")
}
%>
<img src="<%=Modules.Login.ImgTip.Image.AsHREF%>" width="12" height="12">
<font size="-1">未正式提交的交货通知，点击“交货通知号”可以继续编辑：(粉红底色表示退回需要补发)</font>
<form name="AdapterForm2" method="post">
  <input type="hidden" name="__act">
  <table>
    <tr>
    <td>
    <table border=0 cellspacing="2" cellpadding="1">
      <tr bgcolor="Silver">
<% if (vdsaOldMsg_MsgNo.Visible)
   { %>
      <th>交货通知号</th>
<% } %>
<% if (vdsaOldMsg_Subject.Visible)
   { %>
      <th>标题</th>
<% } %>
<% if (vdsaOldMsg_BrandDisp.Visible)
   { %>
      <th>品牌</th>
<% } %>
<% if (vdsaOldMsg_dispGoodsClass.Visible)
   { %>
      <th>分类</th>
<% } %>
<% if (vdsaOldMsg_dispMarketID.Visible)
   { %>
      <th>市场部责任人</th>
<% } %>
<% if (vdsaOldMsg_InputDate.Visible)
   { %>
      <th>&nbsp;提交日期&nbsp;</th>
<% } %>
      <th>&nbsp;&nbsp;&nbsp;&nbsp;</th></tr>
<% {
   var ri = 0
   var e = new Enumerator(vdsaOldMsg.Records)
   for (; !e.atEnd(); e.moveNext())
   { %>
      <tr bgcolor="<%= (vdsaOldMsg.State.Value==0) ? '#EAEAEA' : '#FFE8E8' %>">
<% if (vdsaOldMsg_MsgNo.Visible)
   { %>
      <td><div><a href="<%=dsaOldMsg.EditRecord.LinkToPage("PvMsgEdit", Page.Name).AsHREF%>"><% WriteColText(vdsaOldMsg_MsgNo.DisplayText) %></a></div></td>
<% } %>
<% if (vdsaOldMsg_Subject.Visible)
   { %>
      <td><div><% WriteColText(vdsaOldMsg_Subject.DisplayText) %></div></td>
<% } %>
<% if (vdsaOldMsg_BrandDisp.Visible)
   { %>
      <td><div><% WriteColText(vdsaOldMsg_BrandDisp.DisplayText) %></div></td>
<% } %>
<% if (vdsaOldMsg_dispGoodsClass.Visible)
   { %>
      <td><div><% WriteColText(vdsaOldMsg_dispGoodsClass.DisplayText) %></div></td>
<% } %>
<% if (vdsaOldMsg_dispMarketID.Visible)
   { %>
      <td><div><% WriteColText(vdsaOldMsg_dispMarketID.DisplayText) %></div></td>
<% } %>
<% if (vdsaOldMsg_InputDate.Visible)
   { %>
      <td><div align="center"><% WriteColText(vdsaOldMsg_InputDate.DisplayText) %></div></td>
<% } %>
      <td><input type="submit" value="删除" onclick="AdapterForm2.__act.value='<%=dsaOldMsg.DeleteMsg.LinkToPage(Page.Name, Page.Name).AsFieldValue%>'"></td>
      </tr>
<%   if (vdsaOldMsg.HiddenRecordFields != null)
     {
       vdsaOldMsg.HiddenRecordFields.WriteFields(Response)
     } %>
<%  ri++
   }
   e.moveFirst()
   } %>
<% if (vdsaOldMsg.HiddenFields != null)
   {
     vdsaOldMsg.HiddenFields.WriteFields(Response)
   } %>
    </table>
  </td>
    </tr>
  </table>
</form>
<!------------------------------------------------------------------------->
<!------------------------------------------------------------------------->

<!-- #include file="3_footer.html" -->