var bma=getItemValueAsString("编码");
var dj=getItemValueAsDate("日期");
var je=getItemValueAsDouble("支出金额");
var nd=format(dj,"yyyy-MM");
var fl=getItemValueAsString("bxfl");
var ba1=getItemValueAsDouble("支出金额");
var process = getDocumentProcess();
var formProcess = getFormProcess();
var subform = formProcess.doView("11e3-5dbb-6cfe014c-9b80-1981822572f7");//表单ID值。可以通过数据库客户端查看那张表的formid字段值就可以。
var doc = process.doNew(subform,getWebUser(),createParamsTable());
var sql="select * from hsgl.tlk_期初有权录入 where to_char(item_年度,'yyyy-mm') ='"+nd+"' and item_编码 ='"+bma+"' and STATELABEL ='完成审核'";
println(sql);
var datas = queryBySQL(sql);
println("datas======"+datas);
var value=0;
if (fl=="报销直列"){
var value=0;
if(datas.size()>0){
for (var iter = datas.iterator(); iter.hasNext();) {
var data1 = iter.next();
value = data1.getItemValueAsDouble("bxzlzc");
}
value=value+je;
println("value======"+value);
var num1 =data1.getItemValueAsDouble("bxzljh");
var num2=data1.getItemValueAsDouble("直列预增");
var num=num1+num2;
num=num-value;
if (num<0) {
msg="不允许透支,请检查支出额度和预算指标!";
}else
{
var ljzc=data1.getItemValueAsDouble("累计支出");
var hjyq=data1.getItemValueAsDouble("合计有权");
ljzc=ljzc+ba1;
var jcje=hjyq-ljzc;
data1.findItem("累计支出").setValue(ljzc);
data1.findItem("节超金额").setValue(jcje);
data1.findItem("bxzlzc").setValue(value);
process.doUpdate(data1);
}
}else
{
msg ="本月无此部门科目预算或本月预算尚未通过财务预算审核,不能支出!";
}}
else
{
var value1=0;
if(datas.size()>0){
for (var iter = datas.iterator(); iter.hasNext();) {
var data = iter.next();
value1 = data.getItemValueAsDouble("clzc");
}
value1=value1+je;
println("value======"+value1);
var num1 =data.getItemValueAsDouble("zc");
var num2=data.getItemValueAsDouble("材料支出预增");
var num=num1+num2;
num=num-value1;
if (num<0) {
msg="不允许透支,请检查支出额度和预算指标!";
}else
{
var ljzc1=data.getItemValueAsDouble("累计支出");
var hjyq1=data.getItemValueAsDouble("合计有权");
ljzc1=ljzc1+ba1;
var jcje1=hjyq1-ljzc1;
data.findItem("累计支出").setValue(ljzc1);
data.findItem("节超金额").setValue(jcje1);
data.findItem("clzc").setValue(value1);
process.doUpdate(data);
}
}else
{
msg ="本月无此部门科目预算或本月预算尚未通过财务预算审核,不能支出!";
}
} |