系统报表公式

报表公式

系统报表公式

页码公式（分组批打页码）

全局变量：intpage_num=0

公式名公式（值）类型函数参数计算点格式描述

get_this_pageInteger分页前#,###累加页数,并返回当前页

v_page_num++;码值

returnv_page_num;

get_group_pagInteger分组后:*+#,###返回组的总页码数，并将

eintgroup_page=v_page_num;全局变量清零

v_page_num=0;

returngroup_page;

合计公式（页计金额）

全局变量：doublepage_money=0

公式名公式（值）类型函数参数计算点格式描述

set_page_moneInteger_MONEY每条记录+#,###累加每条记录的金额数

y_sumv_page_money+=_MONEY.doubleValue();

return0;

get_page_monDouble分页后¥#,##0.00获取当前页金额累加值，

ey_sumDoublepage_money_sum=v_page_money;并清零

v_page_money=0;

returnpage_money_sum;

组末页判定公式

全局变量：booleangroup_llag=false

公式名公式（值）类型函数参数计算点格式描述

Set_group_flagInteger分组后:*+#,###当到组尾时设置组尾标

v_group_flag=true;志为真

return0;

clear_group_flInteger分页前#,###每一页开始时初始化设

agv_group_flag=false;置组尾标志为假

return0;

is_group_moneBit分页后True/False返回是否已经到组尾的

y_visiablereturnv_group_flag;判定

is_page_moneyBit分页后True/False返回是否还未到组尾的

_visiablereturn!v_group_flag;判定

日期公式

全局变量：Stringyear=Stringmonth=Stringday=

公式名公式（值）类型函数参数计算点格式描述

set_print_dateVarchar_PRINT分页前XXXXXX将日期拆分成年月日，并

_DATE分别保存

v_year=,,n;

v_month=,H,;

v_day=

StringprintDate=,,n;

if(_PRINT_DATE_IsNull){

printDate=_sysFetchDate.toString();

}else{

printDate=_PRINT_DATE;

)

Stringlbkenizerdate=new

StringTokenizer(printDate,n-u);

if(date.countTokens()==3){

v_year=date.nextToken();

v_month=date.nextToken();

v_day=date.nextToken();

)

return

get_yearVarchar分页后XXXXXX获取年

returnv_year;

get_monthVarchar分页后XXXXXX获取月

returnv_month;

get_dayVarchar分页后XXXXXX获取日

returnv_day;

金额公式（金额大小写）

公式名公式（值）类型函数参数计算点格式描述

get_money_cnvarchar_MONEY每天记录+XXXXXX金额大写转化

if(_MONEY.doubleValue()>=0){函数

returnChineseUtil.formatMoney(_MONEY.doubleValue(),false);说明：

}elseif<_MONEY.doubleValue()<0){ChineseUtil.fo

return“负”+rmatMoney（参

ChineseUtil.formatMoney(MathUtil.abs(_MONEY.doubleValue()),fal数I渗数2）

se);参数1为小写

Jelse金额;参数2为

return"M;是否小数点前

的0也翻译出

来.例如：30.10

false则翻译为

叁拾元壹角整

true则翻译为

叁拾元零壹角

整

get_money_lvarchar_MONEY每天记录+xxxxxx获取小写金额

if(_MONEY!=null){的右数第1位

Strings="¥"+.MONEY;

if(s.indexOf(".n)!=-l){

if(s.substring(s.indexOf(',.,')+l,s.length()).length()==1){

return”0"；

}else{

inti=s.length()-1;

returns.substring(i,i+l);

)

)

else{

return"0";

)

Jelse{

return

)

get_money_2Varchar.MONEY每天记录+xxxxxx获取小写金额

if(_MONEY!=null){的右数第2位

Strings二“¥"+.MONEY;

if(MathUtil.abs<_MONEY.doubleValue())<0.1){

return

)

inti=0;

if(s.indexOf(H.n)!=-1){

if(s.substring(s.indexOf(”.")+l,s.lenglh()).lenglh()==1){

returns.substring(s.indexOf(n.u)+l,s.length());

}else{

returns.substring(s.indexOf(n.")+1,s.length()-l);

)

}else{

return“0"；

)

)else{

return"n;

}

get_money_3Varchar.MONEY每天记录+xxxxxx获取小写金额

if(_MONEY!=null){的右数第3位

Strings="¥"+.MONEY;

if(MathUtil.abs(_MONEY.doubleValue())<0.1)

return

if(MathUtil.abs<_MONEY.doubleValue())>=0.1&

MathUlil.abs(_MONEY.doubleValue())<1)

return''Y'1;

if(s.indexOf(',.u)!=-l){

if(s.substring(s.indexOf(u.,')+1,s.length()).length()==1){

s=s+"O”；

inti=s.length()-4;

if(i<0)

returnuu;

else

returns.substring(i,i+l);

}else{

s=s;

inti=s.length()-4;

if(i<0)

return

else

returns.substring(i,i+l);

)

}else{

s=s+”.00”;

inti=s.length()-4;

if(i<0)

return

else

returns.substring(i,i+l)；

)

)else{

return,,n;

}

get_money_4Varchar.MONEY每天记录+xxxxxx获取小写金额

if(.MONEY!=null){的右数第4位

Strings="¥"+.MONEY;

if(MathUtil.abs(_MONEY.doubleValue())<1)

return

if(s.indexOfC，")!="l){

if(s.substring(s.indexOf(n.u)+1,s.length()).length()==1){

s=s+“0”；

inti=s.length()-5;

if(i<0)

return,M,;

else

returns.substring(i,i+l);

}else{

s=s;

inti=s.length()-5;

if(i<0)

returnuu;

else

returns.substring(i,i+l);

)

}else{

s=s+”.00”；

inti=s.length()-5;

if(i<0)

return,M,;

else

returns.substring(i,i+l);

)

}else{

return

)

get_money_5Varchar_MONEY每天记录+xxxxxx获取小写金额

if(_MONEY!=null){的右数第5位

Strings="¥"+.MONEY;

if(s.indexOf(',.u)!=-l){

if(s.substring(sjndexOf(n.,f)+1,s.length()).length()==1){

s=s+"0n;

inti=s.length()-6;

if(i<0)

return"H;

else

returnStringUtil.encode(s.substring(i,i+l),

HGBK");

}else{

s=s;

inti=s.length()-6;

if(i<0)

return"H;

else

returnStringUtil.encode(s.substring(i,i+l),

"GBKH);

)

}else{

s=s+”.00”；

inti=s.length()-6;

if(i<0)

return,M,;

else

returnStringUtil.encode(s.substring(i,i+l),

nGBK");

)

)else{

return,,n;

)

get_money_nvarchar_MONEY每天记录+xxxxxx获取小写金额

if(_MONEY!=null){的右数第n位

Strings="¥"+.MONEY;

if(s.indexOf(,,.u)!=-1){

if(s.substring(s.indexOf(n.u)+l,s.length()).length()==1){

s=s+"0n;

inti=s.length()-(n+1);

if(i<0)

return

else

returnStringUtil.encode(s.substring(i,i+l),

HGBK");

}else{

s=s;

inti=s.length()-(n+1);

if(i<0)

return"H;

else

returnStringUtil.encode(s.substring(i,i+l),

"GBKH);

)

}else{

s=s+100”；

inti=s.length()-(n+1);

if(i<0)

return,H,;

else

returnStringUtiLencode(s.substring(i,i+l),

nGBK");

)

)else{

return,,n;

)

统计公式（支出查询报表）

全局变量：

doublegroup_pk001=0;

doublegroup_pk002=0;

doublegroup_pk003=0;

doublegroup_pk004=0;

doublegroup_pk005=0;

doublegroup_indirect=0;

Stringname_pk001=null;

Stringname_pk002=null;

Stringname_pkOO3=null;

Stringname_pk004=null;

Stringname_pkOO5=null;

doubleitem_pk001=0;

doubleitem_pk002=0;

doubleitem_pk003=0;

doubleitem_pk004=0;

doubleitem_pk005=0;

doubleitem_indirect=0;

公式名公式（值）类型函数参数计算点格式描述

add_valuevarcharPAYOFF,每条记录+逐条扫描（处理）所有记录

KIND_CO

DE;

PAYOFF.

KIND_NA

ME;

MONEY;

PL_CODE

if(_PAYOFF_KIND_CODE.equals("001001001n)){

v_name_pk001=_PAYOFF_KIND_NAME;

v_item_pk001+=_CgetMoney;

v_group_pk001+=_f_getMoney;

if(_PL_CODE.equals("001u)){

v_totle_pk001+二_f_getMoney;

}elseif(_PL_CODE.equals("002u)){

v_totle_pk001-=_f_getMoney;

}elseif(_PL_CODE.equals(n003°)){

v_totle_pk001-=_f_getMoney;

}elseif(_PL_CODE.equals("004u)){

v_totle_pkOO1+二_f_getMoney;

)

}elseif<_PAYOFF_KIND_CODE.equals(uOO1001002")){

v_name_pk002=_PAYOFF_KIND_NAME;

v_item_pk002+=_f_getMoney;

v_group_pk002+=_f_getMoney;

ifLPL_CODE.equals(,,OOr,)){

v_totle_pk002+=_f_getMoney;

}elseif(_PL_CODE.equals(n002n)){

v_totle_pk002-=_f_getMoney;

}elseif(_PL_CODE.equals("003n)){

v_totle_pk002-=_f_getMoney;

}elseif(_PL_CODE.equals("004n)){

v_totle_pk002+=_f_getMoney;

)

}elseif(_PAYOFF_KIND_CODE.equals(nOO1001003")){

v_name_pk003=_PAYOFF_KIND_NAME;

v_item_pk003+=_f_getMoney;

v_group_pk003+=_f_getMoney;

if(_PL_CODE.equals(“0(M")){

v_totle_pk003+=_f_getMoney;

}elseif(_PL_CODE.equalsC'002u)){

v_totle_pk003-=_f_getMoney;

}elseif(_PL_CODE.equals(',003',)){

v_totle_pk003-=_f_getMoney;

}elseif<_PL_CODE.equals(n004H)){

v_totle_pk003+二_f_getMoney;

)

}elseif<_PAYOFF_KIND_CODE.equals(n001001004")){

v_name_pk004=_PAYOFF_KIND_NAME;

v_item_pk004+=_CgetMoney;

v_group_pk004+=_f_getMoney;

if(_PL_CODE.equals(',001u)){

v_totle_pk004+=_f_getMoney;

}elseif(_PL_CODE.equals("002u)){

v_totle_pk004-=_f_getMoney;

}elseif(_PL_CODE.equals(,,003'()){

clearGroupAllInteger分组前:*+组前初始化各个累加器

v_group_pk001=0;（清零）

v_group_pk002=0;

v_group_pk003=0;

v_group_pk004=0;

v_group_pk005=0;

v_group_indirect=0;

return0;

getGroupOOldouble分组后:*+#,##0.00组后获取各个累加器值

returnv_group_pk001;（直接支付的细化支出类

getGroup002double分组后:*+#,##0.00型）

returnv_group_pk002;

getGroup003double分组后:*+#,##0.00

returnv_group_pk003;

getGroup004double分组后:*+#,##0.00

returnv_group_pk004;

getGroup005double分组后:*+#,##0.00

returnv_group_pk005;

getSumGroupdouble分组后:*+#,##0.00获取直接支付总合值

Directreturn_f_getGroup001+_f_getGroup002+

_f_getGroup003+_f_getGroup004+工getGroup005;

getGroupIndiredouble分组后:*+#,##0.00获取授权支付值

Ctreturnv_group_indirect;

getGroupPaydouble分组后:*+#,##0.00获取所有支付值

return_CgetSumGroupDirect+_fLgetGroupIndirect;

getNameOOldouble分页后#,##0.00获取直接支付的细化支

returnv_name_pk001;出类型名称

getName002double分页后#,##0.00

returnv_name_pk002;

getName003double分页后#,##0.00

returnv_name_pk003;

getName004double分页后#,##0.00

returnv_name_pk004;

getName005double分页后#,##0.00

returnv_name_pk005;

clearltemAllInteger分组前:*+同上面的一组函数

v_item_pk001=0;可以依次类推

v_item_pk002=0;

v_item_pk003=0;

v_item_pk004=0;

v_item_pk005=0;

v_item_indirect=0;

return0;

getltemOOldouble分组后:*+#,##0.00

returnv_item_pk001;

getItem002double分组后:*+#,##0.00

returnv_item_pk002;

getItemOO3double分组后:*+#,##0.00

returnv_item_pk003;

getItemOO4double分组后:*+#,##0.00

returnv_item_pk004;

getItemOO5double分组后:*+#,##0.00

returnv_item_pk005;

getSumltemDirdouble分组后:*+#,##0.00

ectreturn_f_getItemOO1+_LgetItemOO2+_f_getItem003+

_f_getItem004+_f_get!tem005;

getllemlndirectdouble分组后:*+#,##0.00

returnv_item_indirect;

getltemPaydouble分组后:*+#,##0.00

return_LgetSumItemDirect+_f_getltemlndirect;

报表编号：1

报表名称：a_bank_acc_direct.rpt【财政直接支付入帐（退款）通

知书】

报表公式:

公式类别公式名公式（值）类型函数参数计算点格式描述

页码公式f_get_this_painteger分页前#,###.##获得当前页码

ge

Lget_group_Integer分组后：基层获得总页码

page预算单位编码

求和公式Lget_page_double分页后¥#,##0.00获得本页所有款型的总

money_sum和

条件公式Lbottom_texvarcharPA_CODE每条记录XXXXXX获得符合条件的文本显

t示

报表汇总:

汇总名汇总函数名返回类型函数参数分组格式描述

s_moneysum精度：0pay_money单号¥#,##0.00对参数pay_money进

小数位数：0行累加

报表编号：2

报表名称：a_bank_clear_detail.rpt【银行申请划款（退款）明细单】

报表公式:

公式类别公式名公式（值）类型函数参数计算点格式描述

求和公式f_get_page_double分页后¥#,##0.00获得本页所有款项的总

money_sum和

Cmoney_bigvarcharS_money分组后V报表,XXXXXX获得款项总和的大写

分页时刻（不）

报表汇总:

汇总名汇总函数名返回类型函数参数分组格式描述

s_moneysumDoublepay_money<none>¥#,##0.00获得款项总和的小写

精度：0

小数位数：0

报表编号：3

报表名称：a_bank_clear_sum.rpt【银行申请划款（退款）汇总清

单】

报表公式:

公式类别公式名公式（值）类型函数参数计算点格式描述

f_maintitleVarcharPA_CODE每条记录XXXXXX获得报表名称

精度255

小数位数：0

f_getDateVarcharSUM_DA分页前XXXXXX获得相应的日期

精度255TE分页时刻（是）

小数位数：0

LgetmoneyDoublepay_mone每条记录#,##0.00获得当前预算科目的资

精度：0y分页时刻（不）金额度

小数位数：0

f_get_page_Double分页后¥#,##0.00获得本页资金的总额度

money_sum精度：0分页时刻（是）

小数位数：0

Lmoney_bigVarchars_pay_mo分组后〈报表＞XXXXXX获得款项总和的大写

精度：255ney分页时刻（不）

小数位数：0

报表汇总:

汇总名汇总函数名返回类型函数参数分组格式描述

s_pay_moneysumDoublepay_money<none>¥#,##0.00获得款项总和（以阿

精度：0拉伯数字显示）

小数位数：0

报表编号：4

报表名称：a_bank_clear_vback.rpt【银行申请退款凭证】

报表公式:

公式类别公式名公式（值）类型函数参数计算点格式描述

匚moneyVarcharLget_mon每条记录XXXXXX获得退款额度（大写）

精度255ey分页时刻（不）

小数位数：0

f_get_moneyDoublesum_mone每条记录¥#,##0.00获得退款额度（小写）

精度：0y分页时刻（不）

小数位数：0

报表汇总:

汇总名汇总函数名返回类型函数参数分组格式描述

报表编号：5

报表名称：a_bank_clear_vback.rpt【银行申请划款凭证】

报表公式：

公式类别公式名公式（值）类型函数参数计算点格式描述

LmoneyVarcharsum_mone每条记录XXXXXX获得划款额度（大写）

精度255y分页时刻（是）

小数位数：0

报表汇总:

汇总名汇总函数名返回类型函数参数分组格式描述

报表编号：6

报表名称：a_pay_day.rpt【财政支出日报】

报表公式:

公式类公式名公式（值）类函数参数计算点格式描述

别型

CmaintitleVarcharPAY_ADJUST分组前〈报表＞XXXXXX获得报表名称

精度255_CODE分页时刻（否）

小数位数：0

f_getDateVarcharSUM_DATE每条记录XXXXXX获得相应的日期

精度255分页时刻（否）

小数位数：0

页码公Lget_this_pagInteger分页前#####获得当前页码

式e精度：0分页时刻（是）

小数位数：0

f_get_group_pInteger分组后：单号#####获得总页码

age精度：0分页时刻（是）

小数位数：0

fLpaytitleVarcharPAY_ADJUST每条记录#####获得预算单位名称

精度255_CODE分页时刻（否）

小数位数：0

Doublef_getSumGrou分组后:H级科¥#,##0.00获得所有预算单位所有

f_getGroupPay精度：0pDirect目编码组款项的合计

小数位数：0f_getGroupIndi分页时刻（是）

rect

f_getSumGrouDoublef_getGroup001分组后:目级科#,##0.00获得参数的总额度

pDirect精度：0f_getGroup002目编码

小数位数：0f_getGroup003分页时刻（是）

f_getGroup004

f_getGroup005

f_getGroupOO1Double分组后:目级科#,##0.00获得本组款项

精度：0目编码

小数位数：0分页时刻（是）

f_getGroup002Double分组后:目级科#,##0.00获得本组款项

精度：0目编码

小数位数：0分页时刻（是）

f_getGroup003Double分组后:目级科#,##0.00获得本组款项

精度：o目编码

小数位数：0分页时刻（是）

f_getGroup004Double分组后:目级科#,##0.00获得本组款项

精度：o目编码

小数位数：0分页时刻（是）

f_getGroup005Double分组后:目级科#,##0.00获得本组款项

精度：0目编码

小数位数：0分页时刻（是）

LgetGroupIndiDouble分组后:目级科#,##0.00获得本组授权支付额度

rect精度：0目编码

小数位数：0分页时刻（是）

f_gettermPayDoublef_getsumtermD分组后:基层预#,##0.00本预算单位款项总和

irect算单位编码

f_gettermlndire分页时刻（是）

Ct

f_getsumtermDDoublef_getterm001分组后:基层预#,##0.00获得同一预算单位直接

irectf_getterm002算单位编码支付款项总和

f_getterm003分页时刻（是）

f_getterm004

f_getterm005

f_gettermOO1Double分组后:基层预#,##0.00获得本科目的款项

算单位编码

分页时刻（是）

ll_getterm002Double分组后:基层预#,##0.00获得本科目的款项

算单位编码

分页时刻（是）

f_getterm003Double分组后:基层预#,##0.00获得本科目的款项

算单位编码

分页时刻（是）

f_getterm004Double分组后:基层预#,##0.00获得本科目的款项

算单位编码

分页时刻（是）

f_getterm005Double分组后:基层预#,##0.00获得本科目的款项

算单位编码

分页时刻（是）

f_gettermlndireDouble分组后:基层预#,##0.00获得授权支付的额度

Ct算单位编码

分页时刻（是）

CTotalPayDoublef_getSumTotal分组后：单号¥#,##0.00本页款项总和

Direct分页时刻（是）

f_getTotalIndir