Skip to Content
0
Nov 19, 2013 at 08:47 AM

cFolders - Status Management fatal error

22 Views

Hi,

I am having an fatal whenever 'Status management' link is clicked in cFolders.

This issue has started coming after we created & saved a new status profile and now we are not able to access status management in cFolders.

cFolders version - CPRXRPM 450_700 SP15

Error details given below.

CL_CFS_P_STATUS===============CM006 33

METHOD get_profile_attributes .

***********************************************************************

* Name : CL_CFS_p_STATUS.GET_PROFILE_ATTRIBUTES *

* Issue : 25.02.2002 - GG - SAP AG *

* *

* Purpose : get attributes of a status profile

*

* *

* Changes : *

* [ Date ] - [ Name ] - [ Action ] *

* / / - - *

***********************************************************************

DATA: lt_tj20t TYPE TABLE OF tj20t,

ls_status_prof TYPE cfs_status_prof,

ls_profile_txt TYPE cfs_ts_profile_texts,

ls_tj20 TYPE tj20,

ls_tj30 TYPE tj30,

lf_stsma TYPE j_stsma.

FIELD-SYMBOLS: <fs_tj20t> TYPE tj20t.

* ---------------------------------------------------------------------

CLEAR rs_profile_attributes.

* get profile data from "own" tables

CALL METHOD me->get_bsva_keys_for_profile

EXPORTING: i_id = i_id

IMPORTING: e_bsva_profile_key = lf_stsma

e_cfs_status_prof = ls_status_prof.

IF ls_status_prof IS INITIAL.

RAISE EXCEPTION TYPE cx_cfs_fatal_error.

ENDIF.

* get profile data from BSVA (TJ20, TJ20T)

SELECT SINGLE * FROM tj20 INTO ls_tj20

WHERE stsma = lf_stsma.

IF sy-subrc <> 0.

RAISE EXCEPTION TYPE cx_cfs_fatal_error.

ENDIF.

* get lang. dependend data

SELECT * FROM tj20t INTO TABLE lt_tj20t

WHERE stsma = lf_stsma.

* get the initial-status

SELECT SINGLE * FROM tj30 INTO ls_tj30

WHERE stsma = lf_stsma AND

inist = 'X'.

IF sy-subrc = 0.

SELECT SINGLE status_id

INTO rs_profile_attributes-initial_status_id

FROM cfs_status

WHERE bsva_profile_key = ls_tj30-stsma AND

bsva_status_key = ls_tj30-estat.

ENDIF.

* ---------------------------------------------------------------------

* Map data

* ---------------------------------------------------------------------

MOVE-CORRESPONDING ls_status_prof TO rs_profile_attributes.

rs_profile_attributes-id = ls_status_prof-profile_id.

LOOP AT lt_tj20t ASSIGNING <fs_tj20t>.

CLEAR ls_profile_txt.

ls_profile_txt-language = <fs_tj20t>-spras.

ls_profile_txt-text = <fs_tj20t>-txt.

APPEND ls_profile_txt TO rs_profile_attributes-texts.

ENDLOOP.

ENDMETHOD.

Regards,

Ravi