Aggregation level activation problem
Hello experts.
I have a problem with activation of aggregation level with abap program. When I debug the program i saw error like 'BWTK907074 BEX report is unavailable.' . Its a request code. Now i dont know how to pass this step and activate aggregation level.
Best Regards
Bilal
"If it is Nescessary my code is:
REPORT z_activate_obj.
DATA stat TYPE rsobjstat.
DATA cube TYPE rsinfocube.
TYPE-POOLS rsds.
DATA : rspar_tab TYPE TABLE OF rsparams ,
rspar_line LIKE LINE OF rspar_tab.
DATA zaglevel LIKE STANDARD TABLE OF rspls_alvl.
DATA wa1 LIKE LINE OF zaglevel .
ZFI_M01
SELECT SINGLE infocube objstat
INTO (cube,stat)
FROM rsdcube
WHERE objvers EQ 'A'.
IF stat NE 'ACT'.
PERFORM act_mpro USING cube.
ENDIF.
SELECT *
INTO TABLE zaglevel
FROM rspls_alvl
WHERE objvers EQ 'A'
AND objstat EQ 'INA'.
LOOP AT zaglevel INTO wa1.
PERFORM act_agglevel USING wa1-aggrlevel.
ENDLOOP.
&----
*& Form ACT_mpro
&----
FORM act_mpro USING p_cube.
rspar_line-selname = 'P_AREA'.
rspar_line-kind = 'P'.
rspar_line-sign = 'I'.
rspar_line-option = 'EQ'.
rspar_line-low = 'X'.
APPEND rspar_line TO rspar_tab.
rspar_line-selname = 'SO_MPRO'.
rspar_line-kind = 'S'.
rspar_line-sign = 'I'.
rspar_line-option = 'EQ'.
rspar_line-low = p_cube.
APPEND rspar_line TO rspar_tab.
DATA: number TYPE tbtcjob-jobcount,
name TYPE tbtcjob-jobname ,
print_parameters TYPE pri_params.
CONCATENATE 'Activate' p_cube INTO name SEPARATED BY space.
CALL FUNCTION 'JOB_OPEN'
EXPORTING
jobname = name
IMPORTING
jobcount = number
EXCEPTIONS
cant_create_job = 1
invalid_job_data = 2
jobname_missing = 3
OTHERS = 4.
SUBMIT rsdg_mpro_activate WITH SELECTION-TABLE rspar_tab
VIA JOB name NUMBER number
AND RETURN.
IF sy-subrc = 0.
CALL FUNCTION 'JOB_CLOSE'
EXPORTING
jobcount = number
jobname = name
strtimmed = 'X'
EXCEPTIONS
cant_start_immediate = 1
invalid_startdate = 2
jobname_missing = 3
job_close_failed = 4
job_nosteps = 5
job_notex = 6
lock_failed = 7
OTHERS = 8.
ENDIF.
ENDFORM. " ACT
&----
*& Form ACT_AGGLEVEL
&----
FORM act_agglevel USING p_agglevel.
DATA: l_t_return TYPE STANDARD TABLE OF bapiret2,
l_s_return TYPE bapiret2,
l_subrc TYPE sysubrc,
l_t_alvl TYPE STANDARD TABLE OF rspls_alvl,
l_s_alvl TYPE rspls_alvl,
l_t_alvl_iobj TYPE STANDARD TABLE OF rspls_s_rfc_alvl_iobj.
data zreturn like LINE OF l_t_return.
CALL FUNCTION 'RSPLS_ALVL_CHANGE'
EXPORTING
i_aggrlevel = p_agglevel
IMPORTING
e_subrc = l_subrc
TABLES
i_tk_alvl_iobj = l_t_alvl_iobj
e_tk_return = l_t_return.
CHECK l_subrc = 0.
CALL FUNCTION 'RSPLS_ALVL_CHECK'
EXPORTING
i_aggrlevel = p_agglevel
i_objvers = 'A'
IMPORTING
e_subrc = l_subrc
TABLES
e_tk_return = l_t_return.
CHECK l_subrc = 0.
CALL FUNCTION 'RSPLS_ALVL_ACTIVATE'
EXPORTING
i_aggrlevel = p_agglevel
IMPORTING
e_subrc = l_subrc
TABLES
e_tk_return = l_t_return.
loop at l_t_return into zreturn.
WRITE zreturn-message.
ENDLOOP.
ENDFORM. " ACT_AGGLEVEL