FICEUR30 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for This report program may be run only in conjunction with a euro changeover for EC-CS...see full standard documentation available for this report. Also check out the submitted Comments related to this SAP report and the details below to see which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC.
If you would like to execute this report or see the full code listing simply enter FICEUR30 into the relevant SAP transactions such as SE38 or SE80
This report can be called from another progam/report simply by using the ABAP SUBMIT statement, see below for example ABAP code snipts of how to do this.
Selection Text: SO_RVERS = Version
Selection Text: SO_RLDNR = Ledger
Selection Text: SO_PLEVL = Posting level
Selection Text: SO_DOCTY = Document type
Selection Text: SO_DIMEN = Dimension
Selection Text: SO_BUNIT = Consolidation unit
Selection Text: PA_TEST = Test run
Selection Text: PA_STAT = Status management activated
Selection Text: PA_RYEAR = Year of conversion
Selection Text: PA_DELE = Delete transaction data
Title: Deletion of Euro-related Documents in the Conversion Year
Text Symbol: T10 = Rollup units, adjustment of LC to GC:
Text Symbol: T04 = Totals Records
Text Symbol: T03 = JEs Not Deleted
Text Symbol: T02 = Deleted JEs (SP)
Text Symbol: T01 = Deleted JEs
Text Symbol: S03 = Reported data in the totals records are deleted
Text Symbol: S02 = Documents with auto reversals in the subsequent period
Text Symbol: S01 = Settings: Reversed journal entries
Text Symbol: OP0 = Action:
Text Symbol: DL0 = Totals record generation
Text Symbol: B05 = Technical setting
Text Symbol: B04 = Further settings
Text Symbol: B03 = Org units for local currency conversion
Text Symbol: B02 = Ledger for group currency conversion
Text Symbol: B01 = Year of Euro conversion
Text Symbol: 002 = Do you really want to delete?
Text Symbol: 001 = The year's journal entries and totals records will be irrevocably lost.
Text Symbol: 000 = Deleting transaction data !
INCLUDE FICEUR3S.
No SAP DATABASE tables are accessed within this REPORT code!
FC_EURO_LIST * CALL FUNCTION 'FC_EURO_LIST' " STO01180 * EXPORTING " STO01180 * e_ddicstruct = 'ECMCA' " STO01180 ** t_show = t_show " STO01180 * e_text = text-s02 " STO01180 * t_tab = it_dr_doc_nd[] " STO01180 * CHANGING " STO01180 * c_tab = ecmca. " STO01180
FC_POST_COMMIT_INIT CALL FUNCTION 'FC_POST_COMMIT_INIT' "ged040700 EXPORTING E_DIMEN = A_DEL-RDIMEN.
FC_DOCUMENT_REFRESH CALL FUNCTION 'FC_DOCUMENT_REFRESH' EXPORTING E_DIMEN = A_DEL-RDIMEN E_RLDNR = A_DEL-RLDNR E_ITCLG = A_DEL-RITCLG E_RVERS = A_DEL-RVERS E_RYEAR = A_DEL-RYEAR E_PERID = A_DEL-POPER E_DOCTY = A_DEL-DOCTY E_TYPE = FC05_CON_DR_TYPE-CU E_ACTION = LD_ACTION ET_CU = LD_IT_CU E_DELETE = 'X' "STO230698 E_DOCCT = SPACE "STO230698 * et_cu_pcu = ld_it_pcu * et_cucg = ld_it_cucg * et_doc = it_dr_doc * et_doc_op = it_dr_doc_op IMPORTING IT_DOC = IT_DR_DOC IT_DOC_ND = IT_DR_DOC_ND IT_DOC_OP = IT_DR_DOC_OP.
POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING DEFAULTOPTION = 'N' TEXTLINE1 = TEXT-001 TEXTLINE2 = TEXT-002 TITEL = TEXT-000 IMPORTING ANSWER = LD_ANSWER.
FC_EURO_LIST CALL FUNCTION 'FC_EURO_LIST' EXPORTING E_DDICSTRUCT = 'EWUCS11' * t_show = t_show E_TEXT = TEXT-B02 T_TAB = IT_RLDNR[] CHANGING C_TAB = A_RLDNR.
FC_EURO_LIST CALL FUNCTION 'FC_EURO_LIST' EXPORTING E_DDICSTRUCT = 'EWUCS10' * t_show = t_show E_TEXT = TEXT-B03 T_TAB = IT_BUNIT[] CHANGING C_TAB = A_BUNIT.
G_INIT_POSTING * CALL FUNCTION 'G_INIT_POSTING' * EXPORTING * GLSIP = SPACE " keine Einzelposten * PERID = A_BASE-POPER * TABLES * TAB_ECMCA_ADD = TAB_ECMCA_ADD * TAB_USED = TAB_USED * EXCEPTIONS * OTHERS = 1.
FC_POST_COMMIT_INIT CALL FUNCTION 'FC_POST_COMMIT_INIT' "ged040700 EXPORTING E_DIMEN = A_BASE-RDIMEN.
G_INVERT_TT CALL FUNCTION 'G_INVERT_TT' EXPORTING BUNIT = V_RBUNIT DIMEN = A_BASE-RDIMEN PERID = A_BASE-POPER RLDNR = A_BASE-RLDNR RVERS = A_BASE-RVERS RYEAR = A_BASE-RYEAR E_FLG_INVERT_PERID = 'X' TABLES SEL_ITCLG = LD_RA_ITCLG "xhe230298 SEL_PLEVL = RA_PLEVL[] SEL_DOCTY = RA_DOCTY[] TAB_ECMCA = TAB_ECMCA EXCEPTIONS OTHERS = 1.
FC_DB_DOCUMENT_POST CALL FUNCTION 'FC_DB_DOCUMENT_POST' EXPORTING E_UPDATE_TASK = 'X' * E_DOCUMENT = "keine Einzelsätze CHANGING ct_ecmca = tab_ecmca[].
FC_EURO_LIST CALL FUNCTION 'FC_EURO_LIST' EXPORTING E_DDICSTRUCT = 'ECMCA' T_DISP = T_DISP E_TEXT = TEXT-S01 T_TAB = IT_DEL[] CHANGING C_TAB = A_DEL.
FC_EURO_LIST CALL FUNCTION 'FC_EURO_LIST' EXPORTING E_DDICSTRUCT = 'ECMCA' T_DISP = T_DISP E_TEXT = TEXT-S03 T_TAB = IT_DEL[] CHANGING C_TAB = A_DEL.
FC_EURO_LIST CALL FUNCTION 'FC_EURO_LIST' EXPORTING E_DDICSTRUCT = 'ECMCA' T_DISP = T_DISP E_TEXT = TEXT-S02 T_TAB = IT_DOC[] CHANGING C_TAB = ECMCA.
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.