联芯科技ERP项目-技术文档-FICO-006-利润中心利润表-V1.2-20090810

北京东软慧聚信息技术有限公司PAGEPAGE6 DATE\@"M/d/yyyy"10/29/2009Version1.0 FILENAME联芯科技ERP项目_技术文档_FICO_006_利润中心利润表_V1.2_20090810.doc北京东软慧聚信息技术有限公司PAGE1XXXXXX项目 DATE\@"M/d/yyyy"10/29/2009Version1.0 第I部分:需求模块MACROBUTTONCheckIt_CheckBox£MM MACROBUTTONCheckIt_CheckBox£PP MACROBUTTONCheckIt_CheckBox£SD ■FI MACROBUTTONCheckIt_CheckBox£CO MACROBUTTONCheckIt_CheckBox£IP/FMMACROBUTTONCheckIt_CheckBox£其它Spec编号ZDTYD_FI006短描述利润中心损益表类型MACROBUTTONCheckIt_Radiobutton报表MACROBUTTONCheckIt_RadiobuttonABAPProgramMACROBUTTONCheckIt_RadiobuttonInformationSystemMACROBUTTONCheckIt_RadiobuttonReportPrinter MACROBUTTONCheckIt_RadiobuttonReportWriterMACROBUTTONCheckIt_RadiobuttonSAPQueryMACROBUTTONCheckIt_RadiobuttonBWreportMACROBUTTONCheckIt_RadiobuttonCrystalReportsMACROBUTTONCheckIt_RadiobuttonOthersMACROBUTTONUnCheckIt_Radiobutton表单MACROBUTTONCheckIt_Radiobutton流程增强MACROBUTTONCheckIt_RadiobuttonUserExitMACROBUTTONCheckIt_RadiobuttonBADIMACROBUTTONCheckIt_RadiobuttonDialogProgram MACROBUTTONCheckIt_RadiobuttonOtherseMACROBUTTONCheckIt_Radiobutton接口MACROBUTTONCheckIt_RadiobuttonBAPIMACROBUTTONCheckIt_RadiobuttonIDOCMACROBUTTONCheckIt_RadiobuttonALEMACROBUTTONCheckIt_RadiobuttonOthersendMACROBUTTONCheckIt_Radiobutton数据转移需求优先级MACROBUTTONUnCheckIt_RadiobuttonHigh/关键 MACROBUTTONCheckIt_RadiobuttonMid/推荐 MACROBUTTONCheckIt_RadiobuttonLow/可选用户MACROBUTTONNextCell史艳要求日期上线前预计开发天数（由功能顾问与开发顾问评估）必填_____天是否有标准功能MACROBUTTONCheckIt_RadiobuttonYes MACROBUTTONUnCheckIt_RadiobuttonNo标准功能未采用的原因:MACROBUTTONCheckIt_RadiobuttonPerformanceMACROBUTTONCheckIt_RadiobuttonComplexityMACROBUTTONCheckIt_RadiobuttonOtherse参考的标准功能表单开发：列出参考的标准的Form的技术名称报表开发：列出参考的标准报表文档变更历史版本号文档维护时间姓名简要的描述V1.0200史艳初建V1.12009-08-05史艳修改

第II部分:详细功能描述目的：月末财务出具利润中心损益表，记录当月及本年各利润中心累计损益发生情况功能描述:在任何时候都能进行利润中心损益表的查询、打印选择条件见后详述财务部所有同仁都可以查询，总帐会计及三级经理以上可以打印使用开发新程序打印运行频率MACROBUTTONUnCheckIt_Radiobutton任何时间MACROBUTTONCheckIt_Radiobutton每天MACROBUTTONCheckIt_Radiobutton每周MACROBUTTONCheckIt_Radiobutton两周MACROBUTTONCheckIt_Radiobutton每月MACROBUTTONCheckIt_Radiobutton每年MACROBUTTONCheckIt_Radiobutton其它：运行方式MACROBUTTONUnCheckIt_Radiobutton手工MACROBUTTONCheckIt_Radiobutton自动MACROBUTTONCheckIt_Radiobutton批处理MACROBUTTONCheckIt_Radiobutton在线处理输出方式MACROBUTTONCheckIt_Radiobutton屏幕输出MACROBUTTONCheckIt_Radiobutton打印MACROBUTTONCheckIt_Radiobutton文件输出MACROBUTTONUnCheckIt_Radiobutton其它：打印和文件输出打印机类型激光打印机纸张大小A4纵印语言简体中文选择屏幕： 顺序字段名称字段技术名称字段描述P/S必填/可选特殊需求1利润中心FAGLFLEXT-PRCTR利润中心/利润中心组P必填2会计期间BKPF-MONAT会计期间P必填默认上一会计期间（如当前期间为1月则默认为1月）3会计年度BKPF-GJAHR会计年度P必填默认本会计年度报表/表单的字段抬头字段/表尾字段见附加EXCEL（利润中心损益表样表）。顺序字段名称字段技术名称字段描述特殊需求1利润中心名称CEPCT-LTEXT利润中心（组）对应的名称2年度BKPF-GJAHR取选择屏幕上的会计年度3会计期间BKPF-MONAT取选择屏幕上的会计期间格式/屏幕设计：见附件EXCEL（利润中心损益表样表）。逻辑关系：见下附件EXCEL（损益表公式）.根据样张中指定的科目范围并根据输入条件中的会计期间到FAGLFLEXT表中的HSL01到HSL16字段找到相应期间的数值，若输入期间为8,则到HSL08字段中查找相应数值作为本月数；到HSL01至HSL08字段查找相应数值作为本年累计数。若FAGLFLEXT表中同一会计科目存在多条记录，则取汇总数。第8至9行的数值除了考虑以上逻辑外还需考虑FAGLFLEXT表中的RFAREA字段，若此字段为02则将数值按以上逻辑显示在第8行中，若此字段为01则将数值按以上逻辑显示在第9行中若属收入类科目，则贷方发生额以正数表示，借方余额以负数表示，即取出的数值需乘以-1，见下方公式模板中的公式列，标注“乘以-1”当输入条件利润中心为“PT3001”时，报表数据取值包含“PT3001”和“GG3001”；当输入条件利润中心为“PT3101”时，报表数据取值包含“PT3101”和“GG3101”。17、18行6666010102取数逻辑：去COEP中取对象号为OR开头，且成本要素为6666010102，且年度、日期符合选择屏幕输入年度、日期。取出的行项目，存于内表A，内表A包含年度、月份、成本要素、内部订单号（对象号的后8位）、对象货币值。根据内部订单号反查COAS表，得到订单类型、利润中心。将反查得到的订单类型、利润中心字段加入A表，得到B表。从B表中取出满足条件的6666010102金额之和。备注：可根据输入的“利润中心”条件调用函数K_PRCTR_VALUES_GET（输入：利润中心组、利润中心范围；输出：利润中心）得到最终需要的利润中心，此字段对应到FAGLFLEXT中的PRCTR字段。样张：其它内容：对报表/单据的其它功能进行描述*注：删除上面不适用的行和注释行.

第III部分:技术说明ProgramnameZ_FI_EXEC_PC_PROFIT_LOSSTransactioncodeZFI006AuthorizationObject'ZR_FI_050','ZR_FI_051FormFormnameN/AOutputtypeN/AFormroutineN/A程序逻辑：程序逻辑说明及程序逻辑图点击执行后，选择下载路径后，系统会自动下载EXECLE文件到本地。利润表，首先通过在ATSELECTION-SCREEN事件中调用

PERFORM

authority_check

.进行判断执行用户是否ZRFIZR_FI_050、ZR_FI_051这两个角色来查看相关公司代码、利润中心的权限，如果有则执行，没有则报错。然后在data_get这个子过程中从数据库当中取出相应数据，放入相应的结构体当中，存放所选期间的财务数据，然后再CASE屏幕上输入的期间，来判断调用哪个月份的子过程，如1月份调用p_billing_1，2月调用p_billing_2.将数据处理完毕后，再将要放入EXECLE文件的数据存放在t_exceldata这个内表中，t_exceldata这个内表存放了要放入EXECLE文件数据的行、列、数据；通过调用自定义的FUNCTION，ZD_EXCEL_OUTPUT来实现下载EXECL文件的功能；选择屏幕的利润中心、利润中心组只能同时选一个，在选择利润中心组后通过frm_get_prctr得到所有要汇总的利润中心；在汇总数据时，要减去内部订单为6666010102的发生额，在相应的行项目信息中根据FS减去；另外关于有些行项目是通过其它行项目累加的，则是通过在EXLECL模版里实现的，而没有在系统代码里实现；INCLUDE

zd_fifm001_head_pc.

"头文件定义数据结构及变量

TABLES

faglflext.

SELECTION-SCREEN

BEGIN

OF

BLOCK

block1

WITH

FRAME

TITLE

title1.

"OBLIGATORY

.

"利润中心默认D200

SELECTION-SCREEN

BEGIN

OF

LINE

.

PARAMETERS

gp_x

RADIOBUTTON

GROUP

ra1

DEFAULT

'X'

USER-COMMAND

radbtn.

SELECTION-SCREEN

COMMENT

4(20)

text-001

."FOR

FIELD

gp_gjarh.

SELECTION-SCREEN

POSITION

POS_LOW.

SELECT-OPTIONS:

code

FOR

faglflext-prctr

MODIF

ID

sc1.

SELECTION-SCREEN

END

OF

LINE.

SELECTION-SCREEN

BEGIN

OF

LINE.

PARAMETERS:

gp_y

RADIOBUTTON

GROUP

ra1

.

SELECTION-SCREEN

COMMENT

4(31)

text-002.

PARAMETERS:

p_name

TYPE

setleaf-setname

MODIF

ID

sc2

.

SELECTION-SCREEN

END

OF

LINE.

SELECTION-SCREEN

END

OF

BLOCK

block1.

SELECTION-SCREEN

BEGIN

OF

BLOCK

block2

WITH

FRAME

TITLE

text-003.

PARAMETERS:

billing

LIKE

bkpf-monat

OBLIGATORY

DEFAULT

sy-datum+4(2)."会计期间

PARAMETERS:

year

LIKE

bkpf-gjahr

OBLIGATORY

DEFAULT

sy-datum+0(4)."会计年度

SELECTION-SCREEN

END

OF

BLOCK

block2.

INITIALIZATION.

"表头定义

title1

=

'利润中心利润表'.

**

*

AT

SELECTION-SCREEN

*

**

AT

SELECTION-SCREEN

ON

VALUE-REQUEST

FOR

p_name.

PERFORM

get_search_help

.

AT

SELECTION-SCREEN.

IF

code

IS

NOT

INITIAL

AND

p_name

IS

NOT

INITIAL.

MESSAGE

e003(z_1)

WITH

'利润中心组与利润中心不能同时输入'.

ENDIF.

PERFORM

frm_get_prctr.

"得到利润中心

START-OF-SELECTION.

PERFORM

frm_authority_check.

DATA

lv_data

LIKE

sy-datum.

CONCATENATE

year

'01'

INTO

lv_data.

CALL

FUNCTION

'BKK_GET_MONTH_LASTDAY'

EXPORTING

i_date

=

lv_data

IMPORTING

e_date

=

lv_data.

PERFORM

frm_get_title."得到利润中心、利润中心组描述

PERFORM

data_get."读取数据

CASE

billing.

"判断会计期间

WHEN

'1'.

PERFORM

p_billing_1.

"生成数据1月

WHEN

'2'.

PERFORM

p_billing_2.

"生成数据2月

WHEN

'3'

.

PERFORM

p_billing_3.

"生成数据3月

WHEN

'4'.

PERFORM

p_billing_4.

"生成数据4月

WHEN

'5'.

PERFORM

p_billing_5.

"生成数据5月

WHEN

'6'.

PERFORM

p_billing_6.

"生成数据6月

WHEN

'7'.

PERFORM

p_billing_7.

"生成数据7月

WHEN

'8'.

PERFORM

p_billing_8.

"生成数据8月

WHEN

'9'.

PERFORM

p_billing_9.

"生成数据9月

WHEN

'10'.

PERFORM

p_billing_10.

"生成数据10月

WHEN

'1