SAP Reports / Programs | Enterprise Controlling | Profit Center Accounting | Basic Settings(EC-PCA-BS) SAP EC
PCA01F01 SAP ABAP INCLUDE - documentation and ABAP source code
PCA01F01 is a standard ABAP INCLUDE available within your SAP system (depending on your version and release level). Below is the basic information available for this SAP report including which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC. Also check out the submitted Comments related to this SAP report or see any standard documentation available.
If you would like to execute this report or see the full code listing simply enter PCA01F01 into the relevant SAP transactions such as SE38 or SE80
ABAP code to call this SAP report using the submit statement
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.
SUBMIT PCA01F01. "Basic submit
SUBMIT PCA01F01 AND RETURN. "Return to original report after report execution complete
SUBMIT PCA01F01 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
INCLUDES used within this REPORT PCA01F01
No INCLUDES are used within this REPORT code!
TABLES used within REPORT and the associated SELECT statement:
No SAP DATABASE tables are accessed within this REPORT code!
Function Modules used within report and the associated call statement:
COPCA_APPL_LOG_WRITE CALL FUNCTION 'COPCA_APPL_LOG_WRITE' EXPORTING subobject = subobject altcode = altcode alprog = alprog altext = altext * KOKRS = bukrs = bukrs gjahr = gjahr perio = monat.
ENQUEUE_EPCA_AR CALL FUNCTION 'ENQUEUE_EPCA_AR' EXPORTING bukrs = bukrs gjahr = gjahr poper = poper * X_BUKRS = ' ' * X_GJAHR = ' ' * X_POPER = ' ' * _SCOPE = '2' * _WAIT = ' ' EXCEPTIONS foreign_lock = 01 system_failure = 02.
COPCA_BEST_RW_AUFBAUEN CALL FUNCTION 'COPCA_BEST_RW_AUFBAUEN' EXPORTING * TEXT = ' ' glvor = gc-prc4 "#EC DOM_EQUAL awtyp = gc-awtyp_pca bukrs = p_bukrs kokrs = gv-kokrs gjahr = p_gjahr monat = p_monat * KTOSL = ' ' pswsl = cur1 * pswbt = ' ' * hkont = ' ' * MATNR = ' ' * MENGE = ' ' * MEINS = ' ' * werks = ' ' * prctr = ' ' * BWKEY = ' ' * BWTAR = * curt2 = ' ' * waer2 = ' ' * WERT2 = * CURT3 = ' ' * WAER3 = ' ' * WERT3 = ' ' hoart = gc-hoart_forderungen TABLES t_acchd = t_acchd t_accit = t_accit t_acccr = t_acccr.
COPCA_FIX_GLEDGER CALL FUNCTION 'COPCA_FIX_GLEDGER' IMPORTING f_gledger = t_ledger.
COPCA_PRCTR_BUKRS_ACTIVE_ACT CALL FUNCTION 'COPCA_PRCTR_BUKRS_ACTIVE_ACT' EXPORTING gjahr = gjahr bukrs = bukrs pcrch = gc-buch IMPORTING lmona = gv-lmona pcacur = gv-pcacur pcacurtp = gv-pcacurtp pcatrcur = gv-pcatrcur vspkz = gv-vspkz dprct = gv-dprct kokrs = gv-kokrs EXCEPTIONS copca_not_active = 01 kokrs_not_found = 02 * MISSING_CONTROL_PARAMETER = 03 "RD_P30K099347 wrong_parameter_pcrch = 04 no_currency_found = 05.
RK_KOKRS_FIND CALL FUNCTION 'RK_KOKRS_FIND' EXPORTING bukrs = p_bukrs * GSBER = ' ' * TEST_KOKRS = ' ' IMPORTING kokrs = l_kokrs * T_KA01 = EXCEPTIONS OTHERS = 2.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = gc-arbgb * EXCEPTION_IF_NOT_ACTIVE = 'X' * msgty = 'W' "4.6b
OWN_LOGICAL_SYSTEM_GET CALL FUNCTION 'OWN_LOGICAL_SYSTEM_GET' IMPORTING own_logical_system = l_logsys EXCEPTIONS own_logical_system_not_defined = 1 OTHERS = 2.
KE_TRANSACTION_DATA_DELETE CALL FUNCTION 'KE_TRANSACTION_DATA_DELETE' EXPORTING " RPRCTR = ' ' " RACCT = ' ' " hrkft = ' ' rvers = gc-rvers_act rrcty = gc-satztyp_act poper = poper ryear = gjahr rbukrs = bukrs kokrs = gv-kokrs rhoart = gc-hoart_forderungen " DOCNR = ' ' " DOCLN = ' ' " DOCCT = ' ' " VERSA = ' ' " AFABE = ' ' activ = gc-prc4 " necessary not to delete online " postings logsys = l_logsys "insert note 101975 test_indicator = ' ' log = ' ' flag_glpca_commit = 'X' EXCEPTIONS document_number_incomplete = 01 hrkft_without_racct = 02 planversion_vs_actual_data = 03 missing_parameters = 04 OTHERS = 05.
KE_TRANSACTION_DATA_DELETE CALL FUNCTION 'KE_TRANSACTION_DATA_DELETE' EXPORTING " RPRCTR = ' ' " RACCT = ' ' " hrkft = ' ' rvers = gc-rvers_act rrcty = gc-satztyp_act poper = poper ryear = gjahr rbukrs = bukrs kokrs = gv-kokrs rhoart = gc-hoart_verbindl " DOCNR = ' ' " DOCLN = ' ' " DOCCT = ' ' " VERSA = ' ' " AFABE = ' ' activ = gc-prc4 " necessary not to delete online " postings logsys = l_logsys "insert note 101975 test_indicator = ' ' log = ' ' flag_glpca_commit = 'X' EXCEPTIONS document_number_incomplete = 01 hrkft_without_racct = 02 planversion_vs_actual_data = 03 missing_parameters = 04 OTHERS = 05.
G_PCA_FROM_RWBELEG_UPDATE CALL FUNCTION 'G_PCA_FROM_RWBELEG_UPDATE' EXPORTING i_test_only = 'X' IMPORTING e_error_found = error_found TABLES t_acccr = t_acccr t_acchd = t_acchd t_accit = t_accitglx t_ledger = t_ledger.
G_PCA_FROM_RWBELEG_UPDATE CALL FUNCTION 'G_PCA_FROM_RWBELEG_UPDATE' EXPORTING i_test_only = ' ' TABLES t_acccr = t_acccr t_acchd = t_acchd t_accit = t_accitglx t_ledger = t_ledger.
NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING nr_range_nr = gc-nrrangenr object = gc-object IMPORTING number = number returncode = returncode EXCEPTIONS OTHERS = 2.
G_POSTING_DATE_OF_PERIOD_GET CALL FUNCTION 'G_POSTING_DATE_OF_PERIOD_GET' EXPORTING period = l_monat variant = p_lmona year = gjahr IMPORTING * FROM_DATE = * LAST_NORMAL_PERIOD = to_date = l_datum * FROM_DATE_ORIG = EXCEPTIONS period_not_defined = 1 variant_not_defined = 2 OTHERS = 3 .
PCA_BESTAENDE_VORTRAGEN CALL FUNCTION 'PCA_BESTAENDE_VORTRAGEN' EXPORTING i_rldnr = gc-ledger i_rrcty = gc-satztyp_act i_rvers = gc-rvers_act i_ryear = gjahr i_rbukrs = bukrs i_rhoart = gc-hoart_forderungen i_kokrs = gv-kokrs i_activ = gc-prc4 " i_afabe = ' ' " I_VERSA = ' ' i_monat = monat i_datum = l_datum "SR_ALRK153279 EXCEPTIONS no_data_found = 01 data_not_cleared = 02.
PCA_BESTAENDE_VORTRAGEN CALL FUNCTION 'PCA_BESTAENDE_VORTRAGEN' EXPORTING i_rldnr = gc-ledger i_rrcty = gc-satztyp_act i_rvers = gc-rvers_act i_ryear = gjahr i_rbukrs = bukrs i_rhoart = gc-hoart_verbindl i_kokrs = gv-kokrs i_activ = gc-prc4 " i_afabe = ' ' " I_VERSA = ' ' i_monat = monat i_datum = l_datum "SR_ALRK153279 EXCEPTIONS no_data_found = 01 data_not_cleared = 02.
COPCA_START_BALANCE_CARRY_FORW * CALL FUNCTION 'COPCA_START_BALANCE_CARRY_FORW' * IN BACKGROUND TASK * starting new task 'X' * EXPORTING * i_comp_code = p_bukrs * i_transaction_year = p_gjahr * i_test_mode = p_testl.
FI_COMPANY_CODE_DATA CALL FUNCTION 'FI_COMPANY_CODE_DATA' EXPORTING i_bukrs = p_bukrs IMPORTING e_t001 = l_t001 EXCEPTIONS system_error = 1 OTHERS = 2.
CALL FUNCTION 'FI_COMPANY_CODE_DATA' EXPORTING i_bukrs = p_bukrs IMPORTING e_t001 = l_t001 EXCEPTIONS system_error = 1 OTHERS = 2.
COPCA_DISPLAY_ALV_PROTOCOLL CALL FUNCTION 'COPCA_DISPLAY_ALV_PROTOCOLL' EXPORTING i_report = c_report i_structure_name1 = 'PCA_AR_AP_ALV' i_structure_name2 = 'PCA_AR_AP_ALV_SHORT' i_save = 'A' i_comp_code = p_bukrs i_period = p_monat i_year = p_gjahr i_testrun = p_testl i_line_items = p_einzp i_comp_code_text = l_t001-butxt i_header_text = text-050 i_prot = p_prot TABLES it_data1 = lt_ar_ap it_data2 = lt_ar_ap_short it_top_of_page = gt_top_of_page EXCEPTIONS insufficient_input = 1 OTHERS = 2.
REUSE_ALV_COMMENTARY_WRITE * CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE' * EXPORTING * it_list_commentary = gt_top_of_page.
REUSE_ALV_VARIANT_DEFAULT_GET * CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET' ** EXPORTING ** I_SAVE = ' ' * CHANGING * cs_variant = p_variant * EXCEPTIONS * WRONG_INPUT = 1 * NOT_FOUND = 2 * PROGRAM_ERROR = 3 * OTHERS = 4 * .
SCMA_UPD_LOG_COUNT_TASKS CALL FUNCTION 'SCMA_UPD_LOG_COUNT_TASKS'.
KPEP_MONI_CLOSE_RECORD * CALL FUNCTION 'KPEP_MONI_CLOSE_RECORD' * EXPORTING * ls_key = ps_key * LS_MESSAGE = ls_message ** LD_OBJECTS = * LS_EXT = ps_ext ** LS_RL = ** TABLES ** LT_SPOOL = * changing * ld_aplstat = p_status ** EXCEPTIONS ** NO_ID_GIVEN = 1 ** OTHERS = 2 * .
SCMA_UPD_LOG_CLOSE_RECORD * CALL FUNCTION 'SCMA_UPD_LOG_CLOSE_RECORD' "WEBERK 29/03/99 * EXPORTING "WEBERK 29/03/99 * is_monitor_key = gs_key "WEBERK 29/03/99 * id_upd_total = g_commits "WEBERK 29/03/99 * . "WEBERK 29/03/99
MESSAGE_STORE * CALL FUNCTION 'MESSAGE_STORE' * EXPORTING * arbgb = 'KM' ** EXCEPTION_IF_NOT_ACTIVE = 'X' * msgty = 'S' * MSGV1 = p_bukrs * MSGV2 = text-010 ** MSGV3 = ' ' ** MSGV4 = ' ' * txtnr = 348 ** ZEILE = ' ' ** IMPORTING ** ACT_SEVERITY = ** MAX_SEVERITY = * EXCEPTIONS * MESSAGE_TYPE_NOT_VALID = 1 * NOT_ACTIVE = 2 * OTHERS = 3 * .
MESSAGES_SAVE * CALL FUNCTION 'MESSAGES_SAVE' * EXPORTING * i_balobject = c_object * I_BALSUBOBJECT = c_subobject ** I_IN_UPDATE_TASK = ' ' * i_identification = p_message_id * IMPORTING * E_LOG_HANDLE = p_log_handle * EXCEPTIONS * NO_MESSAGES = 1 * NOT_ACTIVE = 2 * PROGRAM_ERROR = 3 * SAVE_NOT_ALLOWED = 4 * WRONG_IDENTIFICATION = 5 * OTHERS = 6 * .
SCMA_UPD_LOG_UPD_RECORD CALL FUNCTION 'SCMA_UPD_LOG_UPD_RECORD' EXPORTING is_monitor_key = gs_key.
DDUT_DOMVALUE_TEXT_GET CALL FUNCTION 'DDUT_DOMVALUE_TEXT_GET' EXPORTING name = 'PCA_PROTOCOLL_TYPE' value = l_domval * LANGU = SY-LANGU texts_only = 'X' IMPORTING dd07v_wa = ls_dd07v EXCEPTIONS * NOT_FOUND = 1 * ILLEGAL_INPUT = 2 OTHERS = 3 .
NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING nr_range_nr = '01' object = l_object IMPORTING number = gs_extract-exname * QUANTITY = * RETURNCODE = EXCEPTIONS interval_not_found = 1 OTHERS = 7 .
REUSE_ALV_EXTRACT_SAVE CALL FUNCTION 'REUSE_ALV_EXTRACT_SAVE' EXPORTING is_extract = gs_extract i_get_selinfos = 'X' * I_NO_MESSAGE = * IS_SEL_HIDE = * I_EXP01 = * I_EXP02 = * I_EXP03 = * I_EXP04 = * I_EXP05 = * I_EXP06 = * I_EXP07 = * I_EXP08 = * I_EXP09 = * I_EXP10 = TABLES it_exp01 = pt_ar_ap it_exp02 = pt_ar_ap_short it_exp03 = pt_top_of_page * IT_EXP04 = * IT_EXP05 = * IT_EXP06 = * IT_EXP07 = * IT_EXP08 = * IT_EXP09 = * IT_EXP10 = EXCEPTIONS wrong_relid = 1 no_report = 2 no_exname = 3 no_extract_created = 4 OTHERS = 5 .
REUSE_ALV_EXTRACT_AT_INIT * CALL FUNCTION 'REUSE_ALV_EXTRACT_AT_INIT' * EXPORTING * I_REPORT = c_report ** I_HANDLE = ** I_LOG_GROUP = * I_USERNAME = sy-uname * CHANGING * cs_extract1 = gs_extract1 * .
REUSE_ALV_EXTRACT_AT_SELSCREEN * CALL FUNCTION 'REUSE_ALV_EXTRACT_AT_SELSCREEN' * EXPORTING * i_p_save = * i_p_load = * changing * c_p_ex1 = * c_p_ex2 = * c_p_ext1 = * c_p_ext2 = * cs_extract1 = * cs_extract2 = * .
NUMBER_RANGE_INTERVAL_UPDATE CALL FUNCTION 'NUMBER_RANGE_INTERVAL_UPDATE' EXPORTING object = p_object IMPORTING error_occured = l_flg_err TABLES error_iv = lt_tnriv_err interval = lt_tnriv EXCEPTIONS object_not_found = 01.
NUMBER_RANGE_UPDATE_CLOSE CALL FUNCTION 'NUMBER_RANGE_UPDATE_CLOSE' EXPORTING object = p_object EXCEPTIONS no_changes_made = 00 object_not_initialized = 02.
NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING nr_range_nr = l_nr_range_nr object = p_object * QUANTITY = QUANTITY IMPORTING number = p_extract_number * QUANTITY = QUANTITY returncode = l_retcode EXCEPTIONS interval_not_found = 01 number_range_not_intern = 02 object_not_found = 03.
Contribute (Add Comments)
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.
The contribute/comments section below therefore offer's an opportunity for anyone to add additional information. This can be anything from useful hints, tips and screen shots to relevant SAP notes or anything else you feel is relevant to this report.
This will then be available for everyone to easily find by simply searching on the report name PCA01F01 or its description.