ABAP实现本地化的资产负债表和损益表Word文档格式.docx
《ABAP实现本地化的资产负债表和损益表Word文档格式.docx》由会员分享,可在线阅读,更多相关《ABAP实现本地化的资产负债表和损益表Word文档格式.docx(120页珍藏版)》请在冰豆网上搜索。
WHEN‘2073′.
gv_name=”.
ENDCASE.
IFp_rp=‘BS’.
gv_rp=‘利润表’.
ENDIF.
START-OF-SELECTION.
PERFORMsynchrodata.
PERFORMget_data1.
*&
———————————————————————*
Include
ZFIR00026_TOP
*Datadefinition
TYPE-POOLSvrm.
TABLES:
faglflexa.
“同步数据用的凭证抬头表
DATA:
BEGINOFgt_bkpfsynOCCURS0,
gjahrLIKEbkpf-gjahr,
bukrsLIKEbkpf-bukrs,
belnrLIKEbkpf-belnr,
ENDOFgt_bkpfsyn.
DATAly(4)TYPEn.
“同步数据用的凭证行项目表(bseg)
BEGINOFgt_bsegsynOCCURS0,
gjahrLIKEbseg-gjahr,
bukrsLIKEbseg-bukrs,
belnrLIKEbseg-belnr,
prctrLIKEbseg-prctr,
pprctLIKEbseg-pprct,
buzeiLIKEbseg-buzei,
ENDOFgt_bsegsyn.
BEGINOFgt_fagasynOCCURS0.
INCLUDESTRUCTUREfaglflexa.
ENDOFgt_fagasyn.
TYPES:
ch(3)TYPEc,
cf(4)TYPEc,
cgcp(12)TYPEc,
ok_codeLIKEsy-ucomm.
c,d,
gv_bsTYPEukurs_currVALUE1,”倍数
gv_iden
(2).
“要显示的资产负债表
BEGINOFgt_alv_bs0OCCURS0,
lct1TYPEint1,
item1TYPEzitem,
yamt1TYPEhslvt12,
ysamt1TYPEhslvt12,
lct2TYPEint1,
item2TYPEzitem,
yamt2TYPEhslvt12,
ysamt2TYPEhslvt12,
waersLIKEt001-waers,
ENDOF
gt_alv_bs0.
BEGINOFgt_bsOCCURS0,
ukursTYPEukurs_curr,
gdatuTYPEgdatu_inv,
ENDOFgt_bs.
gv_mf(5).”Themonthfield
*Thereportversionaccountinformation.
“要显示的利润表
BEGINOFgt_alv_is0OCCURS0,
lctTYPEint1,
itemTYPEzitem,
yamtLIKEfaglflext-hslvt,”本年累计数
mamtLIKEfaglflext-hslvt,”本月累计数
ENDOFgt_alv_is0.
“下载数据的内表
BEGINOFgt_alv_is01OCCURS0,
ENDOFgt_alv_is01.
*利润表下钻数据内表
*–>
2012.01.16CCYUSTART
BEGINOFgt_skatOCCURS0,
saknrLIKEskat-saknr,
txt50LIKEskat-txt50,
ENDOFgt_skat.
*<
–2012.01.16CCYUEND.
BEGINOFgt_alv_is_dp1
OCCURS0,
racctLIKEfaglflexa-racct,
hslLIKEfaglflexa-hsl,
ENDOFgt_alv_is_dp1.
BEGINOFgt_alv_bs_dp1
ENDOFgt_alv_bs_dp1.
BEGINOFgt_alv_bs_dp2
ENDOFgt_alv_bs_dp2.
BEGINOFgs_alv_bs_dp_obj,
ENDOFgs_alv_bs_dp_obj.
gs_alv_bs_dp_obj1TYPEgs_alv_bs_dp_obj.
gt_alv_bs_dpTYPESTANDARDTABLEOFgs_alv_bs_dp_obj.
*利润表下钻临时数据内表
BEGINOFgt_alv_is_dp2OCCURS0,
ENDOFgt_alv_is_dp2.
BEGINOFgt_fagl_011zcOCCURS0,
versnLIKEfagl_011zc-versn,
ergsl
LIKEfagl_011zc-ergsl,
txt45LIKEfagl_011qt-txt45,
vonktLIKEfagl_011zc-vonkt,
bisktLIKEfagl_011zc-biskt,
ENDOFgt_fagl_011zc.
BEGINOFgt_fagl_011qtOCCURS0,
LIKEfagl_011qt-ergsl,
ENDOFgt_fagl_011qt.
BEGINOFgt_mamt_isOCCURS0,
amtLIKEfaglflext-hslvt,
ENDOFgt_mamt_is.
RANGESgr_actFORfaglflext-racct.
BEGINOFgt_monvOCCURS0,
month
(2)TYPEn,
valueLIKEfaglflext-hslvt,
ENDOFgt_monv.
BEGINOFgs_hsl,
hsl01LIKEfaglflext-hslvt,
hsl02LIKEfaglflext-hslvt,
hsl03LIKEfaglflext-hslvt,
hsl04LIKEfaglflext-hslvt,
hsl05LIKEfaglflext-hslvt,
hsl06LIKEfaglflext-hslvt,
hsl07LIKEfaglflext-hslvt,
hsl08LIKEfaglflext-hslvt,
hsl09LIKEfaglflext-hslvt,
hsl10LIKEfaglflext-hslvt,
hsl11LIKEfaglflext-hslvt,
hsl12LIKEfaglflext-hslvt,
ENDOFgs_hsl.
BEGINOFgs_hsl1,
hslvtLIKEfaglflext-hslvt,
ENDOFgs_hsl1.
gs_alv_isTYPEREFTOcl_gui_alv_grid,”thealvobjectforisreport
gs_alv_bsTYPEREFTOcl_gui_alv_grid,”thealvobjectforbsreport
gs_alv_is_dp1TYPEREFTOcl_gui_alv_grid,”thealvobjectforbsreport
gs_alv_bs_dp1TYPEREFTOcl_gui_alv_grid,”thealvobjectforbsreport
gs_conTYPEREFTOc