<html xmlns="http://www.w3.org/1999/xhtml">
<!--#include file="../Inc/Conn.asp" -->
<!--#include file="../Inc/SK.Session.asp" -->
<!--#include file="../Inc/SK.Funtion.asp" -->
<%if Not (Getconfig("SK_Finance")="0" AND (Session("Manager")="1" OR (JudgePopedomTF(Session("UserName"),"SK700000000") AND JudgePopedomTF(Session("UserName"),"SK700000201")))) then Call ReturnError()%>
<%
'AddNew
if RQ("Action")="Add" and F("S_Di")<>"" and F("S_BanksID")<>"" and F("S_AccTitle")<>"" and F("S_Amount")<>"" and F("S_Atime")<>""then
Call ChkIsOuter()
set rs=server.createobject("adodb.recordset")
sql="select * from SK_Accounts"
rs.open sql,conn,1,3
rs.AddNew
rs("SK_Di")=NoCSSHackInput(F("S_Di"))
rs("SK_BanksID")=NoCSSHackInput(F("S_BanksID"))
rs("SK_AccTitle")=NoCSSHackInput(F("S_AccTitle"))
rs("SK_Amount")=NoCSSHackInput(F("S_Amount"))
rs("SK_Atime")=NoCSSHackInput(F("S_Atime"))
rs("SK_Aname")=NoCSSHackInput(F("S_Aname"))
rs("SK_SalesOrders")="0"
rs("SK_ProcureOrders")="0"
rs("SK_Content")=NoCSSHackContent(F("S_Content"))
rs("SK_SalesID")=Session("UID")
rs("SK_Time")=Now()
rs.Update
rs.Close 
set rs=Nothing
'Event Begin
if getconfig("SK_Event")=0 then
set rsEvent=server.createobject("adodb.recordset")
sqlEvent="select * from SK_SystemEvent"
rsEvent.open sqlEvent,conn,1,3
rsEvent.AddNew
rsEvent("SK_Title")="新建账户收支："&NoCSSHackInput(F("S_AccTitle"))&""
rsEvent("SK_User")=Session("UserName")
rsEvent("SK_Time")=Now()
rsEvent("SK_IP")=request.ServerVariables("Remote_Addr")
rsEvent.Update
rsEvent.Close 
set rsEvent=Nothing
end if
'Event End
Response.Write("<script LANGUAGE='javascript'>alert('恭喜你,操作成功！');window.close();window.opener.location.reload();</script>")
Response.End
end if
%>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=GB2312" />
<title>新建账户收支</title>
<META http-equiv=Page-Enter content=SKCRM>
<META http-equiv=Page-Exit content=SKCRM>
<META content="MSHTML 6.00.3790.2858" name=GENERATOR>
<LINK href="../images/style.css" type=text/css rel=stylesheet>
<script language="javascript" src="../Inc/Check.js"></script>
<script language="javascript" src="../Inc/Calendar.js"></script>
<script language="javascript" src="../Inc/jquery.js"></script>
<SCRIPT language=javascript src="../inc/Openwin.js"></SCRIPT>
<script>
window.onbeforeunload = function()
{
if (document.body.offsetWidth-50 < event.clientX && event.clientY<0)
{
return "是否关闭当前窗口？关闭本窗口将放弃新建信息！";
}
}
</script>
<style type="text/css">
<!--
body {
margin: 5px 0px 5px 0px;
overflow-x: hidden;
}
-->
</style>
<SCRIPT language=JavaScript>
function Form1_Validator(theForm)
{

if(form1.S_AccTitle.value ==""){
alert("对不起,主题不能为空!");
form1.S_AccTitle.focus();
return false;
}

if(form1.S_BanksID.value ==""){
alert("对不起,请选择收支账户!");
form1.S_BanksID.focus();
return false;
}

if(form1.S_Amount.value ==""){
alert("对不起,金额不能为空!");
form1.S_Amount.focus();
return false;
}

if(form1.S_Atime.value ==""){
alert("对不起,日期不能为空!");
form1.S_Atime.focus();
return false;
}

return true;
}
</SCRIPT>
</head>
<body>
<table width="99%" border="0" align="center" cellpadding="0" cellspacing="0">
<TBODY>
<tr>
<td class="SK_Td_Top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="12" height="25"><img src="../images/tab_03.gif" width="12" height="25" /></td>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="46%" valign="middle">新建账户收支</td>
<td width="54%"></td>
</tr>
</table></td>
<td width="16"><img src="../images/tab_07.gif" width="16" height="25" /></td>
</tr>
</table></td>
</tr>
<tr>
<td>

<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="8" background="../images/tab_12.gif"></td>
<td>

<form name="thisForm" id="form1" method="post" action="?Action=Add" onSubmit="return Form1_Validator(this)"> 
<table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="b5d6e6">
<tr>
  <td class="SK_Text2">收支类别</td>
  <td width="31%" class="SK_Text1"><select name="S_Di" style="width:100">
    <option value="0">收入</option>
    <option value="1">支出</option>
  </select></td>
  <td width="10%" class="SK_Text2">收支主题</td>
  <td width="47%" class="SK_Text1"><input name="S_AccTitle" type="text" size="30"> <font color=red>*</font></td>
</tr>
<tr>
  <td class="SK_Text2">收支账户</td>
  <td class="SK_Text1"><select name="S_BanksID" style="width:100">
<option value="" selected></option>
<%
Set rsBanks=Server.CreateObject("ADODB.RecordSet") 
sqlBanks="SELECT * from SK_Banks order by BanksID asc" 
rsBanks.Open sqlBanks,conn,1,1
do while not rsBanks.eof
%><option value="<%=rsBanks("BanksID")%>"><%=rsBanks("SK_BankName")%></option>
<%
rsBanks.movenext
loop
rsBanks.close
set rsBanks=Nothing
%></select></td>
  <td class="SK_Text2">收支金额</td>
  <td class="SK_Text1"><input name="S_Amount" type="text" size="20" onKeyPress="if(!this.value.match(/^[\+\-]?\d*?\.?\d*?$/))this.value=this.t_value;else this.t_value=this.value;if(this.value.match(/^(?:[\+\-]?\d+(?:\.\d+)?)?$/))this.o_value=this.value;if((event.keyCode<48 || event.keyCode>57) && event.keyCode!=46 || /\.\d\d$/.test(value))event.returnValue=false" onKeyUp="if(!this.value.match(/^[\+\-]?\d*?\.?\d*?$/))this.value=this.t_value;else this.t_value=this.value;if(this.value.match(/^(?:[\+\-]?\d+(?:\.\d+)?)?$/))this.o_value=this.value" onBlur="if(!this.value.match(/^(?:[\+\-]?\d+(?:\.\d+)?|\.\d*?)?$/))this.value=this.o_value;else{if(this.value.match(/^\.\d+$/))this.value=0+this.value;if(this.value.match(/^\.$/))this.value=0;this.o_value=this.value}"> <font color=red>*</font></td>
</tr>
<tr>
  <td class="SK_Text2">收支日期</td>
  <td class="SK_Text1"><input name="S_ATime" type="text" onClick="new Calendar().show(this);" value="<%=Date()%>" size="12" readOnly /> <font color=red>*</font></td>
  <td class="SK_Text2">经办人员</td>
  <td class="SK_Text1"><input name="S_Aname" type="text" size="20"></td>
</tr>

<tr>
  <td valign="top" class="SK_Text2">收支描述</td>
  <td colspan="3" class="SK_Text1"><IFRAME ID="eWebEditor1" SRC="<%=getconfig("SK_EditorPath")%>/ewebeditor.htm?id=S_Content&style=mini" FRAMEBORDER="0" SCROLLING="no" WIDTH="600" HEIGHT="300"></IFRAME>
<input type="hidden" name="S_Content"></td>
</tr>

<tr>
<td colspan="4" class="SK_Text">
<INPUT class="button1" type="submit" value=" 保存 "> 
<input type="button" value=" 关闭 " onClick="window.opener.location.reload();window.close();" class="button1" /></td>
</tr>
</table>
</form>

</td>
<td width="8" background="../images/tab_15.gif"></td>
</tr>
</table></td>
</tr>
<tr>
<td class="SK_Td_Foot">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="1%" height="20"><img src="../images/tab_18.gif" width="12" height="20" /></td>
<td width="98%" class="SK_Td_Page"></td>
<td width="1%"><img src="../images/tab_20.gif" width="16" height="20" /></td>
</tr>
</table>

</td>
</tr>
</TBODY>
</table>
</body>
<%
Call CloseDB()
%>
</html>