SAP CJI3获取项目成本，取标准报表数据

根据事务代码CJI3获取数据，一般根据项目定义，wbs元素等条件，程序中直接获取对应的数据

REPORT ZFIPS01.
TABLES:prps.
SELECT-OPTIONS : r_budat FOR prps-erdat,
r_posid FOR prps-posid.

DATA: lv_va TYPE slis_vari.

DATA ls_cji3 TYPE REF TO data.
FIELD-SYMBOLS:<fs_cji3> TYPE ANY TABLE.

lv_va = ‘/Z456-TRE03’.

cl_salv_bs_runtime_info=>set( display = abap_false
metadata = abap_false
data = abap_true ).
"调用CJI3
SUBMIT rkpep003
WITH cn_pspnr IN r_posid
WITH r_budat IN r_budat
WITH p_zbox = ‘’
WITH p_disvar = lv_va
AND RETURN.

TRY .
cl_salv_bs_runtime_info=>get_data_ref("获取数据
IMPORTING r_data = ls_cji3 ).
ASSIGN ls_cji3->* TO <fs_cji3>.

LOOP AT <fs_cji3> ASSIGNING FIELD-SYMBOL(<fs_i3>).BREAK-POINT.ENDLOOP.

CATCH cx_salv_bs_sc_runtime_info.
"o_message = ‘无法获取数据’.
ENDTRY.
cl_salv_bs_runtime_info=>clear_all( ).