SAP Reports / Programs | Controlling | Product Cost Controlling | Product Cost Controlling Information System(CO-PC-IS) SAP CO

BALV1F01 SAP ABAP INCLUDE - Forms







BALV1F01 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 BALV1F01 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 BALV1F01. "Basic submit
SUBMIT BALV1F01 AND RETURN. "Return to original report after report execution complete
SUBMIT BALV1F01 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Title: Forms


INCLUDES used within this REPORT BALV1F01

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:

K_KKB_CURRENT_APPLICATION_GET CALL FUNCTION 'K_KKB_CURRENT_APPLICATION_GET' IMPORTING E_ANW = G_ANW * E_TKKBU = EXCEPTIONS OTHERS = 1.

K_KKB_CURRENCY_TYPE_GET * call function 'K_KKB_CURRENCY_TYPE_GET' * importing * e_currency_type = g_currtype.

RS_SUBMIT_INFO CALL FUNCTION 'RS_SUBMIT_INFO' IMPORTING P_SUBMIT_INFO = ARSSUBINFO EXCEPTIONS OTHERS = 1.

K_KKB_OUTTAB_FILL CALL FUNCTION 'K_KKB_OUTTAB_FILL' TABLES IT_AUSP = XAUSP_DUMMY IT_CABN = XCABN T_OUTTAB = CHANGING CT_FIELDCAT = GT_FIELDCAT_S EXCEPTIONS OTHERS = 1.

REUSE_ALV_EXTRACT_LOAD CALL FUNCTION 'REUSE_ALV_EXTRACT_LOAD' EXPORTING IS_EXTRACT = GS_EXTRACT2 IMPORTING ES_ADMIN = GS_ADMIN ES_SEL_HIDE = LS_SEL_HIDE TABLES ET_EXP01 = CHANGING C_EXP01 = GFLG_RULE C_EXP02 = GS_RULE C_EXP03 = GT_COSTTAB C_EXP04 = G_CURRTYPE C_EXP05 = GS_TIME_FRAME C_EXP06 = G_VALUTYP.

REUSE_ALV_VARIANT_SELECT CALL FUNCTION 'REUSE_ALV_VARIANT_SELECT' EXPORTING I_DIALOG = 'N' I_USER_SPECIFIC = 'X' I_DEFAULT = ' ' * I_TABNAME_HEADER = * I_TABNAME_ITEM = IT_DEFAULT_FIELDCAT = GT_FIELDCAT_S I_LAYOUT = LS_LAYOUT IMPORTING * E_EXIT = ES_LAYOUT = LS_LAYOUT ET_FIELDCAT = GT_FIELDCAT_S ET_SORT = LT_SORT ET_FILTER = LT_FILTER CHANGING CS_VARIANT = GS_VARIANT_S EXCEPTIONS WRONG_INPUT = 1 FC_NOT_COMPLETE = 2 NOT_FOUND = 3 PROGRAM_ERROR = 4 OTHERS = 5.

REUSE_ALV_EXTRACT_SAVE CALL FUNCTION 'REUSE_ALV_EXTRACT_SAVE' EXPORTING IS_EXTRACT = GS_EXTRACT1 IS_SEL_HIDE = LS_SEL_HIDE I_EXP01 = GFLG_RULE I_EXP02 = GS_RULE I_EXP03 = GT_COSTTAB I_EXP04 = G_CURRTYPE I_EXP05 = GS_TIME_FRAME I_EXP06 = G_VALUTYP I_GET_SELINFOS = 'X' TABLES IT_EXP01 = .

REUSE_ALV_LIST_DISPLAY CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY' EXPORTING * i_background_id = 'ALV_WP' * I_INTERFACE_CHECK = ' ' I_CALLBACK_PROGRAM = L_REPID I_CALLBACK_PF_STATUS_SET = 'STATUS_SET' I_CALLBACK_USER_COMMAND = 'USER_COMMAND_S' * i_structure_name = '' IS_LAYOUT = LS_LAYOUT IT_FIELDCAT = GT_FIELDCAT_S IT_EXCLUDING = LT_EXCLUDING IT_SPECIAL_GROUPS = LT_SP_GROUP[] IT_SORT = LT_SORT IT_FILTER = LT_FILTER IS_SEL_HIDE = LS_SEL_HIDE I_DEFAULT = 'X' I_SAVE = 'A' IS_VARIANT = GS_VARIANT_S IT_EVENTS = LT_EVENTS IT_EVENT_EXIT = LT_EVENT_EXIT * IS_PRINT = * I_SCREEN_START_COLUMN = 0 * I_SCREEN_START_LINE = 0 * I_SCREEN_END_COLUMN = 0 * I_SCREEN_END_LINE = 0 * IMPORTING * E_EXIT_CAUSED_BY_CALLER = * ES_EXIT_CAUSED_BY_USER = TABLES T_OUTTAB = EXCEPTIONS PROGRAM_ERROR = 1 OTHERS = 2.

REUSE_ALV_GRID_DISPLAY CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' EXPORTING * i_background_id = 'ALV_WP' * I_INTERFACE_CHECK = ' ' I_CALLBACK_PROGRAM = L_REPID I_CALLBACK_PF_STATUS_SET = 'STATUS_SET' I_CALLBACK_USER_COMMAND = 'USER_COMMAND_S' * i_structure_name = '' I_GRID_SETTINGS = l_grid_settings IS_LAYOUT = LS_LAYOUT IT_FIELDCAT = GT_FIELDCAT_S IT_EXCLUDING = LT_EXCLUDING IT_SPECIAL_GROUPS = LT_SP_GROUP[] IT_SORT = LT_SORT IT_FILTER = LT_FILTER IS_SEL_HIDE = LS_SEL_HIDE I_DEFAULT = 'X' I_SAVE = 'A' IS_VARIANT = GS_VARIANT_S IT_EVENTS = LT_EVENTS IT_EVENT_EXIT = LT_EVENT_EXIT * IS_PRINT = * I_SCREEN_START_COLUMN = 0 * I_SCREEN_START_LINE = 0 * I_SCREEN_END_COLUMN = 0 * I_SCREEN_END_LINE = 0 * IMPORTING * E_EXIT_CAUSED_BY_CALLER = * ES_EXIT_CAUSED_BY_USER = TABLES T_OUTTAB = EXCEPTIONS PROGRAM_ERROR = 1 OTHERS = 2.

REUSE_ALV_LIST_LAYOUT_INFO_GET CALL FUNCTION 'REUSE_ALV_LIST_LAYOUT_INFO_GET' IMPORTING * ES_LAYOUT = ET_FIELDCAT = LT_FIELDCAT * ET_SORT = * ET_FILTER = * ES_LIST_SCROLL = * ES_VARIANT = EXCEPTIONS NO_INFOS = 1 PROGRAM_ERROR = 2 OTHERS = 3.

REUSE_ALV_GRID_LAYOUT_INFO_GET CALL FUNCTION 'REUSE_ALV_GRID_LAYOUT_INFO_GET' IMPORTING ET_FIELDCAT = LT_FIELDCAT EXCEPTIONS OTHERS = 0.

CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING INPUT = RS_SELFIELD-VALUE IMPORTING OUTPUT = L_AUFNR EXCEPTIONS OTHERS = 1.

OBJECT_KEY_GET_OR CALL FUNCTION 'OBJECT_KEY_GET_OR' EXPORTING OBJNR = AUFK-OBJNR IMPORTING AUFNR = RT_AUFNR-LOW EXCEPTIONS NOT_FOUND = 01 WRONG_OBART = 02.

RS_SET_SELSCREEN_STATUS CALL FUNCTION 'RS_SET_SELSCREEN_STATUS' EXPORTING P_STATUS = 'SELNEW' TABLES P_EXCLUDE = GT_EXTAB EXCEPTIONS OTHERS = 1.

K_KOKRS_SET CALL FUNCTION 'K_KOKRS_SET' EXPORTING DISPLAY = ' ' I_KOKRS = ' ' POPUP = R_POPUP IMPORTING E_KOKRS = G_KOKRS E_ACTION = LD_ACTION EXCEPTIONS NOT_FOUND = 01.

K_KOKRS_READ CALL FUNCTION 'K_KOKRS_READ' EXPORTING * GJAHR = '0000' KOKRS = P_KOKRS IMPORTING * E_TKA00 = E_TKA01 = BTKA01 EXCEPTIONS NOT_FOUND = 1 NOT_FOUND_GJAHR = 2 OTHERS = 3.

K_KKB_CURRENCY_TYPE_SWITCH * call function 'K_KKB_CURRENCY_TYPE_SWITCH' * exporting * to_kwaer = 'X'.

K_KKB_CURRENCY_TYPE_SWITCH * call function 'K_KKB_CURRENCY_TYPE_SWITCH' * exporting * to_kwaer = ' ' * to_owaer = 'X'.

K_ALV_TABLE_CREATE





CALL FUNCTION 'K_ALV_TABLE_CREATE' EXPORTING IT_FIELDCAT = GT_FIELDCAT_S[] I_CALLBACK_PROGRAM = L_REPID I_FORMNAME = 'SIMPLE_TABLE' EXCEPTIONS OTHERS = 1.

K_ALV_HIERSEQU_TABLES_CREATE CALL FUNCTION 'K_ALV_HIERSEQU_TABLES_CREATE' EXPORTING IT_FIELDCAT = GT_FIELDCAT_H[] I_CALLBACK_PROGRAM = L_REPID I_FORMNAME = 'HIERSEQ_TABLE' I_TABNAME_HEADER = 'GT_OUTTAB' I_TABNAME_ITEM = 'GT_OUTTAB_ITEM' EXCEPTIONS GENERATE_SUB_POOL_FAILED = 1 OTHERS = 2.

K_KOKRS_READ CALL FUNCTION 'K_KOKRS_READ' EXPORTING * GJAHR = '0000' KOKRS = G_KOKRS IMPORTING * e_tka00 = E_TKA01 = LS_TKA01 EXCEPTIONS NOT_FOUND = 1 NOT_FOUND_GJAHR = 2 OTHERS = 3.

DATE_TO_PERIOD_CONVERT CALL FUNCTION 'DATE_TO_PERIOD_CONVERT' EXPORTING I_DATE = SY-DATLO * I_MONMIT = 00 I_PERIV = LS_TKA01-LMONA IMPORTING E_BUPER = P_PERIOB E_GJAHR = P_GJAHRB EXCEPTIONS INPUT_FALSE = 1 T009_NOTFOUND = 2 T009B_NOTFOUND = 3 OTHERS = 4.

KKR_COOBJECT_VALUES_READ CALL FUNCTION 'KKR_COOBJECT_VALUES_READ' EXPORTING I_KOKRS = P_KOKRS * i_objnr = I_GJAHR_VON = P_GJAHRV I_GJAHR_BIS = P_GJAHRB I_PERIO_VON = P_PERIOV I_PERIO_BIS = P_PERIOB I_NUR_BELAST = ' ' I_READ_OWAER = LFLG_OWAER * I_KATYP = * I_NUR_P_I = * I_NUR_P_I_S = I_KONTROLLKOSTEN = L_CONTROL_COST I_BEWSICHT = P_VALUT I_PVERS = L_VERSI I_IVERS = L_VERSI I_SVERS = P_SVERS I_AVERS = P_AVERS * IMPORTING * E_KENNZAHLEN = TABLES RNG_OBJNR = LR_OBJNR * RNG_WRTTP = * RNG_BEKNZ = T_KENNZAHLEN = LT_KEYFIGURES * T_KKBC = * T_KKROBJ = * T_KKBOB = EXCEPTIONS NO_KOKRS_SET = 1 NO_INPUT_DATA = 2 DIFFERENT_INPUT_DATA = 3 OTHERS = 4.

K_KKB_CABN_TO_ALV_CONVERT CALL FUNCTION 'K_KKB_CABN_TO_ALV_CONVERT' IMPORTING ET_FIELDCAT = RT_FIELDCAT TABLES IT_CABN = XCABN IT_CABNT = XCABNT IT_KSML = XKSML EXCEPTIONS OTHERS = 1.

REUSE_ALV_FIELDCATALOG_MERGE * call function 'REUSE_ALV_FIELDCATALOG_MERGE' * exporting ** I_PROGRAM_NAME = ** I_INTERNAL_TABNAME = * i_structure_name = 'AUFK' ** I_CLIENT_NEVER_DISPLAY = 'X' ** I_INCLNAME = * changing * ct_fieldcat = rt_fieldcat * exceptions * inconsistent_interface = 1 * program_error = 2 * others = 3.

K_KKB_ORSEL_FIELDCAT_READ CALL FUNCTION 'K_KKB_ORSEL_FIELDCAT_READ' EXPORTING I_REPORT = L_REPID I_HANDLE = SPACE I_LOGGROUP = '0001' I_TABELLE = 'AUFK' TABLES E_T_TKKBORSEL = LT_ORSEL.

REUSE_ALV_FIELDCATALOG_MERGE * call function 'REUSE_ALV_FIELDCATALOG_MERGE' * exporting ** I_PROGRAM_NAME = ** I_INTERNAL_TABNAME = * i_structure_name = 'AFPO' ** I_CLIENT_NEVER_DISPLAY = 'X' ** I_INCLNAME = * changing * ct_fieldcat = rt_fieldcat * exceptions * inconsistent_interface = 1 * program_error = 2 * others = 3.

K_KKB_ORSEL_FIELDCAT_READ CALL FUNCTION 'K_KKB_ORSEL_FIELDCAT_READ' EXPORTING I_REPORT = L_REPID I_HANDLE = SPACE I_LOGGROUP = '0001' I_TABELLE = 'AFPO' TABLES E_T_TKKBORSEL = LT_ORSEL.

REUSE_ALV_FIELDCATALOG_MERGE * call function 'REUSE_ALV_FIELDCATALOG_MERGE' * exporting ** I_PROGRAM_NAME = ** I_INTERNAL_TABNAME = * i_structure_name = 'AFKO' ** I_CLIENT_NEVER_DISPLAY = 'X' ** I_INCLNAME = * changing * ct_fieldcat = rt_fieldcat * exceptions * inconsistent_interface = 1 * program_error = 2 * others = 3.

K_KKB_ORSEL_FIELDCAT_READ CALL FUNCTION 'K_KKB_ORSEL_FIELDCAT_READ' EXPORTING I_REPORT = L_REPID I_HANDLE = SPACE I_LOGGROUP = '0001' I_TABELLE = 'AFKO' TABLES E_T_TKKBORSEL = LT_ORSEL.

REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING * I_PROGRAM_NAME = * I_INTERNAL_TABNAME = I_STRUCTURE_NAME = 'KKB_PLANWERTE' * I_CLIENT_NEVER_DISPLAY = 'X' * I_INCLNAME = CHANGING CT_FIELDCAT = RT_FIELDCAT EXCEPTIONS INCONSISTENT_INTERFACE = 1 PROGRAM_ERROR = 2 OTHERS = 3.

REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING * I_PROGRAM_NAME = * I_INTERNAL_TABNAME = I_STRUCTURE_NAME = 'KKB_PLANMENGEN' * I_CLIENT_NEVER_DISPLAY = 'X' * I_INCLNAME = CHANGING CT_FIELDCAT = RT_FIELDCAT_QU EXCEPTIONS INCONSISTENT_INTERFACE = 1 PROGRAM_ERROR = 2 OTHERS = 3.

REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING * I_PROGRAM_NAME = * I_INTERNAL_TABNAME = I_STRUCTURE_NAME = 'KKB_EINHEITEN' * I_CLIENT_NEVER_DISPLAY = 'X' * I_INCLNAME = CHANGING CT_FIELDCAT = RT_FIELDCAT EXCEPTIONS INCONSISTENT_INTERFACE = 1 PROGRAM_ERROR = 2 OTHERS = 3.

REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING * I_PROGRAM_NAME = * I_INTERNAL_TABNAME = I_STRUCTURE_NAME = 'KKB_ISTWERTE' * I_CLIENT_NEVER_DISPLAY = 'X' * I_INCLNAME = CHANGING CT_FIELDCAT = RT_FIELDCAT EXCEPTIONS INCONSISTENT_INTERFACE = 1 PROGRAM_ERROR = 2 OTHERS = 3.

REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING * I_PROGRAM_NAME = * I_INTERNAL_TABNAME = I_STRUCTURE_NAME = 'KKB_ISTMENGEN' * I_CLIENT_NEVER_DISPLAY = 'X' * I_INCLNAME = CHANGING CT_FIELDCAT = RT_FIELDCAT_QU EXCEPTIONS INCONSISTENT_INTERFACE = 1 PROGRAM_ERROR = 2 OTHERS = 3.

REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING * I_PROGRAM_NAME = * I_INTERNAL_TABNAME = I_STRUCTURE_NAME = 'KKB_SOLL_ABW' * I_CLIENT_NEVER_DISPLAY = 'X' * I_INCLNAME = CHANGING CT_FIELDCAT = RT_FIELDCAT EXCEPTIONS INCONSISTENT_INTERFACE = 1 PROGRAM_ERROR = 2 OTHERS = 3.

REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING * I_PROGRAM_NAME = * I_INTERNAL_TABNAME = I_STRUCTURE_NAME = 'KKB_ABGRENZUNG' * I_CLIENT_NEVER_DISPLAY = 'X' * I_INCLNAME = CHANGING CT_FIELDCAT = RT_FIELDCAT EXCEPTIONS INCONSISTENT_INTERFACE = 1 PROGRAM_ERROR = 2 OTHERS = 3.

REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING * I_PROGRAM_NAME = * I_INTERNAL_TABNAME = I_STRUCTURE_NAME = 'KKB_VERGLEICH_ABSOLUT' * I_CLIENT_NEVER_DISPLAY = 'X' * I_INCLNAME = CHANGING CT_FIELDCAT = RT_FIELDCAT EXCEPTIONS INCONSISTENT_INTERFACE = 1 PROGRAM_ERROR = 2 OTHERS = 3.




REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING * I_PROGRAM_NAME = * I_INTERNAL_TABNAME = I_STRUCTURE_NAME = 'KKB_VERGLEICH_SONST' * I_CLIENT_NEVER_DISPLAY = 'X' * I_INCLNAME = CHANGING CT_FIELDCAT = RT_FIELDCAT_OT EXCEPTIONS INCONSISTENT_INTERFACE = 1 PROGRAM_ERROR = 2 OTHERS = 3.

REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING * I_PROGRAM_NAME = * I_INTERNAL_TABNAME = I_STRUCTURE_NAME = 'KKB_KENNZ' * I_CLIENT_NEVER_DISPLAY = 'X' * I_INCLNAME = CHANGING CT_FIELDCAT = RT_FIELDCAT EXCEPTIONS INCONSISTENT_INTERFACE = 1 PROGRAM_ERROR = 2 OTHERS = 3.

REUSE_ALV_POPUP_TO_SELECT CALL FUNCTION 'REUSE_ALV_POPUP_TO_SELECT' EXPORTING * I_TITLE = * I_SELECTION = 'X' * I_ZEBRA = ' ' * i_screen_start_column = 1 * i_screen_start_line = 0 * i_screen_end_column = 0 * i_screen_end_line = 0 I_CHECKBOX_FIELDNAME = 'BOX' * I_LINEMARK_FIELDNAME = I_SCROLL_TO_SEL_LINE = ' ' I_TABNAME = 'LT_MAXFIELDS' * I_STRUCTURE_NAME = IT_FIELDCAT = LT_FIELDCAT_POPUP[] * IT_EXCLUDING = * I_CALLBACK_PROGRAM = * I_CALLBACK_USER_COMMAND = IMPORTING * ES_SELFIELD = E_EXIT = L_EXIT TABLES T_OUTTAB = LT_MAXFIELDS EXCEPTIONS PROGRAM_ERROR = 1 OTHERS = 2.

K_KKB_OUTTAB_FILL CALL FUNCTION 'K_KKB_OUTTAB_FILL' TABLES IT_AUSP = XAUSP_DUMMY IT_CABN = XCABN T_OUTTAB = CHANGING CT_FIELDCAT = GT_FIELDCAT_H EXCEPTIONS OTHERS = 1.

REUSE_ALV_EXTRACT_LOAD CALL FUNCTION 'REUSE_ALV_EXTRACT_LOAD' EXPORTING IS_EXTRACT = GS_EXTRACT2 IMPORTING ES_ADMIN = GS_ADMIN ES_SEL_HIDE = LS_SEL_HIDE TABLES ET_EXP01 = ET_EXP02 = CHANGING C_EXP01 = GFLG_RULE C_EXP02 = GS_RULE C_EXP03 = GT_COSTTAB C_EXP04 = G_CURRTYPE C_EXP05 = GS_TIME_FRAME C_EXP06 = G_VALUTYP.

REUSE_ALV_VARIANT_SELECT CALL FUNCTION 'REUSE_ALV_VARIANT_SELECT' EXPORTING I_DIALOG = 'N' I_USER_SPECIFIC = 'X' I_DEFAULT = ' ' I_TABNAME_HEADER = 'GT_OUTTAB' I_TABNAME_ITEM = 'GT_OUTTAB_ITEM' IT_DEFAULT_FIELDCAT = GT_FIELDCAT_H I_LAYOUT = LS_LAYOUT IMPORTING * E_EXIT = ES_LAYOUT = LS_LAYOUT ET_FIELDCAT = GT_FIELDCAT_H ET_SORT = LT_SORT ET_FILTER = LT_FILTER CHANGING CS_VARIANT = GS_VARIANT_H EXCEPTIONS WRONG_INPUT = 1 FC_NOT_COMPLETE = 2 NOT_FOUND = 3 PROGRAM_ERROR = 4 OTHERS = 5.

REUSE_ALV_EXTRACT_SAVE CALL FUNCTION 'REUSE_ALV_EXTRACT_SAVE' EXPORTING IS_EXTRACT = GS_EXTRACT1 IS_SEL_HIDE = LS_SEL_HIDE I_EXP01 = GFLG_RULE I_EXP02 = GS_RULE I_EXP03 = GT_COSTTAB I_EXP04 = G_CURRTYPE I_EXP05 = GS_TIME_FRAME I_EXP06 = G_VALUTYP I_GET_SELINFOS = 'X' TABLES IT_EXP01 = IT_EXP02 = .

REUSE_ALV_HIERSEQ_LIST_DISPLAY CALL FUNCTION 'REUSE_ALV_HIERSEQ_LIST_DISPLAY' EXPORTING * I_INTERFACE_CHECK = ' ' I_CALLBACK_PROGRAM = L_REPID I_CALLBACK_PF_STATUS_SET = 'STATUS_SET' I_CALLBACK_USER_COMMAND = 'USER_COMMAND_H' IS_LAYOUT = LS_LAYOUT IT_FIELDCAT = GT_FIELDCAT_H * IT_EXCLUDING = IT_SPECIAL_GROUPS = LT_SP_GROUP[] IT_SORT = LT_SORT IT_FILTER = LT_FILTER IS_SEL_HIDE = LS_SEL_HIDE * I_SCREEN_START_COLUMN = 0 * I_SCREEN_START_LINE = 0 * I_SCREEN_END_COLUMN = 0 * I_SCREEN_END_LINE = 0 * I_DEFAULT = 'X' I_SAVE = 'A' IS_VARIANT = GS_VARIANT_H IT_EVENTS = LT_EVENTS IT_EVENT_EXIT = LT_EVENT_EXIT I_TABNAME_HEADER = 'GT_OUTTAB' I_TABNAME_ITEM = 'GT_OUTTAB_ITEM' * I_STRUCTURE_NAME_HEADER = * I_STRUCTURE_NAME_ITEM = IS_KEYINFO = LS_KEYINFO * IS_PRINT = * IMPORTING * E_EXIT_CAUSED_BY_CALLER = * ES_EXIT_CAUSED_BY_USER = TABLES T_OUTTAB_HEADER = T_OUTTAB_ITEM = EXCEPTIONS PROGRAM_ERROR = 1 OTHERS = 2.

DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING DYNAME = LS_D020S-PROG DYNUMB = LS_D020S-DNUM * TRANSLATE_TO_UPPER = ' ' * REQUEST = ' ' * PERFORM_CONVERSION_EXITS = ' ' * PERFORM_INPUT_CONVERSION = ' ' TABLES DYNPFIELDS = LT_DYNPREAD EXCEPTIONS INVALID_ABAPWORKAREA = 1 INVALID_DYNPROFIELD = 2 INVALID_DYNPRONAME = 3 INVALID_DYNPRONUMMER = 4 INVALID_REQUEST = 5 NO_FIELDDESCRIPTION = 6 INVALID_PARAMETER = 7 UNDEFIND_ERROR = 8 DOUBLE_CONVERSION = 9 OTHERS = 10.

REUSE_ALV_VARIANT_F4 CALL FUNCTION 'REUSE_ALV_VARIANT_F4' EXPORTING IS_VARIANT = RS_VARIANT I_SAVE = 'A' I_DISPLAY_VIA_GRID = 'X' I_TABNAME_HEADER = L_TABNAME I_TABNAME_ITEM = L_TABNAME_ITEM IT_DEFAULT_FIELDCAT = RT_FIELDCAT IMPORTING E_EXIT = L_EXIT ES_VARIANT = LS_VARIANT EXCEPTIONS NOT_FOUND = 2.

DYNP_VALUES_UPDATE CALL FUNCTION 'DYNP_VALUES_UPDATE' EXPORTING DYNAME = LS_D020S-PROG DYNUMB = LS_D020S-DNUM TABLES DYNPFIELDS = LT_DYNPREAD.

REUSE_ALV_VARIANT_DEFAULT_GET CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET' EXPORTING I_SAVE = 'A' CHANGING CS_VARIANT = RS_VARIANT EXCEPTIONS WRONG_INPUT = 1 NOT_FOUND = 2 PROGRAM_ERROR = 3 OTHERS = 4.

REUSE_ALV_VARIANT_EXISTENCE CALL FUNCTION 'REUSE_ALV_VARIANT_EXISTENCE' EXPORTING I_SAVE = 'A' CHANGING CS_VARIANT = RS_VARIANT EXCEPTIONS WRONG_INPUT = 1 NOT_FOUND = 2 PROGRAM_ERROR = 3 OTHERS = 4.

K_KKRC_CL_INFO_READ CALL FUNCTION 'K_KKRC_CL_INFO_READ' EXPORTING KLART = '013' KLASS = 'SAP_KKR_CLASS' NO_BUFFER = 'X' " K_NO_BUFFER IMPORTING IKLAH = LS_KLAH ISWOR = ASWOR TABLES ICABN = XCABN ICABNT = XCABNT IKSML = XKSML EXCEPTIONS CLASS_NOT_FOUND = 01 NO_CLASS_ADDRESS = 02 NO_FEATURE = 03 SYSTEM_FAILURE = 04.

K_KKB_DDIC_READ_FOR_OBJCHARS CALL FUNCTION 'K_KKB_DDIC_READ_FOR_OBJCHARS' EXPORTING I_HIART = 'OR' I_OBTAB = 'KKRAMERK' TABLES T_OUT_OMERK = OMERK_TBL * t_in_master_tabs = xmaster T_IN_CABN = XCABN.

STATUS_SEL_KUPPELAUFTRAG CALL FUNCTION 'STATUS_SEL_KUPPELAUFTRAG' EXPORTING SEL_SCHEMA_1 = R_SCHEME_ORDER SEL_SCHEMA_2 = R_SCHEME_HEADER SEL_SCHEMA_3 = R_SCHEME_ITEM TABLES AUFTRAG = LT_STATUSOBJ EXCEPTIONS SEL_SCHEMA_1_UNBEKANNT = 1 SEL_SCHEMA_2_UNBEKANNT = 2 SEL_SCHEMA_3_UNBEKANNT = 3 OTHERS = 4.

KKBH_RULE_CREATE CALL FUNCTION 'KKBH_RULE_CREATE' EXPORTING I_TKKBH = LS_RULE I_SAVE = ' ' I_F4 = 'X' * i_formel_group = 'K' IMPORTING E_TKKBH = LS_RULE E_CANC = LFLG_CANCEL EXCEPTIONS OTHERS = 1.

KKBH_EXCEPTION_LIGHT_GET CALL FUNCTION 'KKBH_EXCEPTION_LIGHT_GET' EXPORTING * T_VERS_I = I_KOKRS = R_KOKRS I_TKKBH_RULE = RS_RULE IMPORTING T_LIGHTS_E = LT_AMPEL TABLES T_CKBOB_I = RT_CKBOB EXCEPTIONS RULE_NOT_FOUND = 1 OTHERS = 2.

SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING PERCENTAGE = R_PERCENTAGE TEXT = R_TEXT.

REUSE_ALV_VARIANT_F4 CALL FUNCTION 'REUSE_ALV_VARIANT_F4' EXPORTING IS_VARIANT = con_VARIA I_SAVE = 'A' I_DISPLAY_VIA_GRID = 'X' IMPORTING ES_VARIANT = con_varia e_exit = con_exit EXCEPTIONS NOT_FOUND = 1 PROGRAM_ERROR = 2 OTHERS = 3.

POPUP_GET_VALUES_USER_CHECKED CALL FUNCTION 'POPUP_GET_VALUES_USER_CHECKED' EXPORTING POPUP_TITLE = TEXT-T02 PROGRAMNAME = L_REPID FORMNAME = 'ORDER_GROUP_CHECK' START_COLUMN = '5' START_ROW = '5' IMPORTING RETURNCODE = VARC1 TABLES FIELDS = IT_FIELDS.

K_GROUP_NAME_CHECK CALL FUNCTION 'K_GROUP_NAME_CHECK' EXPORTING GROUP_NAME = CODIA-AUFGR EXCEPTIONS ILLEGAL_NAME = 1 OTHERS = 2.

POPUP_TO_CONFIRM_WITH_VALUE CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_VALUE' EXPORTING TITEL = TEXT-100 "titel TEXT_BEFORE = TEXT-101 "textline1 OBJECTVALUE = CODIA-AUFGR TEXT_AFTER = TEXT-102 "textline2 DEFAULTOPTION = 'N' IMPORTING ANSWER = VARC2.

K_ORDER_SET_CREATE CALL FUNCTION 'K_ORDER_SET_CREATE' EXPORTING AUFGR = CODIA-AUFGR AUFGR_NAME = CODIA-STEXT OVERWRITE = 'X' TABLES T_AUFNR = LT_AUFNR.

K_GROUP_NAME_CHECK CALL FUNCTION 'K_GROUP_NAME_CHECK' EXPORTING GROUP_NAME = CODIA-AUFGR EXCEPTIONS ILLEGAL_NAME = 1 OTHERS = 2.

K_ORDER_READ CALL FUNCTION 'K_ORDER_READ' EXPORTING AUFNR = AUFNR IMPORTING AUTYP = LD_AUTYP EXCEPTIONS NOT_FOUND = 01.

KK_F_PKOSA_DISPLAY CALL FUNCTION 'KK_F_PKOSA_DISPLAY' EXPORTING I_PKOSA = AUFNR EXCEPTIONS PKOSA_NOT_OK = 1 OTHERS = 2.

K_KKB_REP_CALL_FOR_ORDER_LIST CALL FUNCTION 'K_KKB_REP_CALL_FOR_ORDER_LIST' EXPORTING I_ANW = ANW-rka I_BATCH = VFLG_BATCH TABLES T_AUFNR = LT_AUFNR t_globals = xglobals EXCEPTIONS ORDERLIST_IS_EMPTY = 01 NO_REPORT_FOUND = 02 CANCELED_BY_USER = 03 INTERNAL_ERROR = 04.

K_KKB_JOB_GET CALL FUNCTION 'K_KKB_JOB_GET' EXPORTING CHOICE = 'X' " Benutzerauswahl DFO = 'K' " Kostenartenbericht IANW = G_ANW " Anwendung TRA = ' ' IOBJ = 'O' " Vergleich von Aufträgen NUM = '2' " 2 Berichtsobjekte IMPORTING EXIT = LFLG_EXIT RGJNR = L_RGJNR EXCEPTIONS NOT_GENERATED = 01 NO_AUTHORITY = 02 NO_JOB = 03 NO_JOB_CHOSEN = 04.

K_KKB_GLOBALS_GET CALL FUNCTION 'K_KKB_GLOBALS_GET' EXPORTING DIALOG = ' ' INITIALIZE = ' ' RGJNR = L_RGJNR IANW = G_ANW ST_COL = 3 ST_ROW = 0 USER_DEFAULTS = ' ' IMPORTING EXIT = LFLG_EXIT TABLES EXC_TAB = XEXC_TAB GLOBALS = XGLOBALS EXCEPTIONS INTERNAL_ERROR = 01 JOB_DOES_NOT_EXIST = 02 NOT_GENERATED = 03 NO_AUTHORIZATION = 04 NO_GLOBALS = 05.

K_KKB_GLOBALS_GET CALL FUNCTION 'K_KKB_GLOBALS_GET' EXPORTING DIALOG = 'X' INITIALIZE = ' ' RGJNR = L_RGJNR IANW = ' ' "keine Anwendung, da sonst ST_COL = 5 "Dialog für KSTAR!!!!!!!!! ST_ROW = 5 USER_DEFAULTS = ' ' IMPORTING EXIT = LFLG_EXIT TABLES EXC_TAB = XEXC_TAB GLOBALS = XGLOBALS EXCEPTIONS INTERNAL_ERROR = 01 JOB_DOES_NOT_EXIST = 02 NOT_GENERATED = 03 NO_AUTHORIZATION = 04 NO_GLOBALS = 05.

K_KKB_GENERAL_REPORT_CALL_1 CALL FUNCTION 'K_KKB_GENERAL_REPORT_CALL_1' EXPORTING RGJNR = L_RGJNR TABLES GLOBALS = XGLOBALS SPECIAL_VALUES = XSVALUES VALUES = XVALUES EXCEPTIONS INTERNAL_ERROR = 01.

K_KKB_CURRENCY_TYPE_SWITCH CALL FUNCTION 'K_KKB_CURRENCY_TYPE_SWITCH' EXPORTING TO_KWAER = 'X' TO_OWAER = ' '.

K_KKB_CURRENCY_TYPE_SWITCH CALL FUNCTION 'K_KKB_CURRENCY_TYPE_SWITCH' EXPORTING TO_KWAER = ' ' TO_OWAER = 'X'.

K_KKB_OR_REPORT_CALL CALL FUNCTION 'K_KKB_OR_REPORT_CALL' EXPORTING IANW = G_ANW " Anwendung AUFNR = LT_AUFNR-AUFNR " Auftragsnummer BATCH = VFLG_BATCH" Batchverarbeitung ja/nein CHOICE_J = 'J' " Auswahl Bericht ja/nein CHOICE_K = 'J' " Auswahl Kostenartenschema j/n CHOICE_P = 'J' " Auswahl Berichtsparameter j/n KOKRS = G_KOKRS " Kostenrechnungskreis * importing * jobname = int_jobname " Jobname des Batchjobs TABLES GLOBALS = XGLOBALS" Berichtsparameter EXCEPTIONS INTERNAL_ERROR = 01 " interner Fehler NO_JOB = 02 " keine Berichte vorhanden NO_KST = 03 " kein Kostenartenschema vorh WRONG_INPUT = 04. " falsche Eingabe

K_KKB_OR_REPORT_CALL CALL FUNCTION 'K_KKB_OR_REPORT_CALL' EXPORTING IANW = G_ANW " Anwendung AUFNR = LT_AUFNR-AUFNR " Auftragsnummer BATCH = VFLG_BATCH" Batchverarbeitung ja/nein CHOICE_J = 'J' " Auswahl Bericht ja/nein CHOICE_K = 'J' " Auswahl Kostenartenschema j/n CHOICE_P = 'J' " Auswahl Berichtsparameter j/n KOKRS = G_KOKRS " Kostenrechnungskreis POSNR = * importing * jobname = int_jobname " Jobname des Batchjobs TABLES GLOBALS = XGLOBALS" Berichtsparameter EXCEPTIONS INTERNAL_ERROR = 01 " interner Fehler NO_JOB = 02 " keine Berichte vorhanden NO_KST = 03 " kein Kostenartenschema vorh WRONG_INPUT = 04. " falsche Eingabe

K_KKB_KKBCS_ORDER_REPORT CALL FUNCTION 'K_KKB_KKBCS_ORDER_REPORT' EXPORTING I_AUFNR = LT_AUFNR-AUFNR i_posnr = l_posnr "H1158361 i_varia = g_varia_kkbcs i_pivot = l_pivot EXCEPTIONS OBJECT_NOT_FOUND = 1 OTHERS = 2.

K_KKB_KKBCS_ORDER_REPORT CALL FUNCTION 'K_KKB_KKBCS_ORDER_REPORT' EXPORTING I_AUFNR = LT_AUFNR-AUFNR i_posnr = l_posnr i_pivot = l_pivot i_varia = g_varia_kkbcs EXCEPTIONS OBJECT_NOT_FOUND = 1 no_data = 3 OTHERS = 2.

K_KKB_JOB_GET CALL FUNCTION 'K_KKB_JOB_GET' EXPORTING CHOICE = 'X' " mit Auswahl IANW = G_ANW " Anwendung IOBJ = OBJ-AUF " Berichtsobjekt RGJNR = ANA_RGJNR " Berichtsgruppe UNAME = SY-UNAME " Benutzer-definierte Berichtsliste IMPORTING RGJNR = ANA_RGJNR EXIT = ANA_EXIT EXCEPTIONS NO_JOB = 1 " Keine Berichte bzw. nicht generiert

K_KKB_JOB_GET CALL FUNCTION 'K_KKB_JOB_GET' " Bericht aus Gesamtliste EXPORTING CHOICE = 'X' IANW = G_ANW IOBJ = OBJ-AUF RGJNR = ANA_RGJNR " UNAME = SPACE -> Gesamtliste IMPORTING RGJNR = ANA_RGJNR EXIT = ANA_EXIT EXCEPTIONS NO_JOB = 1 NO_JOB_CHOSEN = 2 OTHERS = 3.

K_KKB_KSTAR_SET_GET CALL FUNCTION 'K_KKB_KSTAR_SET_GET' " Holen Kostenartengruppe EXPORTING IANW = G_ANW CHOICE = 'X' KST = ANA_KST IMPORTING KST = ANA_KST EXIT = ANA_EXIT EXCEPTIONS NO_AUTHORITY = 1 NO_KSTAR_SET = 2 NO_SET_PICKED = 3 SET_BROKEN = 4.

K_KKB_GLOBALS_GET CALL FUNCTION 'K_KKB_GLOBALS_GET' " Globals holen EXPORTING INITIALIZE = 'X' DIALOG = 'X' RGJNR = ANA_RGJNR ST_COL = '3' ST_ROW = '1' IMPORTING EXIT = ANA_EXIT SFLAG = ANA_SFLAG TABLES EXC_TAB = ETAB GLOBALS = GLO_TAB EXCEPTIONS INTERNAL_ERROR = 01 JOB_DOES_NOT_EXIST = 02 NOT_GENERATED = 03 NO_AUTHORIZATION = 04 NO_GLOBALS = 05. " kann nicht auftreten, da ein

K_KKB_GENERAL_REPORT_CALL CALL FUNCTION 'K_KKB_GENERAL_REPORT_CALL' " Berichtsaufruf EXPORTING " je Auftrag BATCH = 'X' CHOICE_BJ = 'X' RGJNR = ANA_RGJNR LSTALL = 'X' IMPORTING EXIT = ANA_EXIT TABLES GLOBALS = GLO_TAB SEL_TAB1 = ANA_SEL1 SEL_TAB2 = ANA_SEL2 EXCEPTIONS INTERNAL_ERROR = 1.

K_KKB_KKBCS_BATCH_PROCESSING CALL FUNCTION 'K_KKB_KKBCS_BATCH_PROCESSING' EXPORTING I_PIVOT = l_pivot I_KOKRS = p_kokrs I_VARIA = G_varia_kkbcs-variant TABLES S_AUFNR = l_r_aufnr.

REUSE_ALV_GRID_LAYOUT_INFO_GET CALL FUNCTION 'REUSE_ALV_GRID_LAYOUT_INFO_GET' IMPORTING ES_LAYOUT = LS_LAYOUT * ET_FIELDCAT = * ET_SORT = * ET_FILTER = * ES_LIST_SCROLL = * ES_VARIANT = EXCEPTIONS NO_INFOS = 1 PROGRAM_ERROR = 2 OTHERS = 3.

REUSE_ALV_GRID_LAYOUT_INFO_SET CALL FUNCTION 'REUSE_ALV_GRID_LAYOUT_INFO_SET' EXPORTING IS_LAYOUT = LS_LAYOUT * IT_FIELDCAT = * IT_SORT = * IT_FILTER = * IS_LIST_SCROLL = EXCEPTIONS OTHERS = 1.

DYNP_VALUES_READ * call function 'DYNP_VALUES_READ' * exporting * dyname = ls_d020s-prog * dynumb = ls_d020s-dnum ** TRANSLATE_TO_UPPER = ' ' ** REQUEST = ' ' ** PERFORM_CONVERSION_EXITS = ' ' ** PERFORM_INPUT_CONVERSION = ' ' * tables * dynpfields = lt_dynpread * exceptions * invalid_abapworkarea = 1 * invalid_dynprofield = 2 * invalid_dynproname = 3 * invalid_dynpronummer = 4 * invalid_request = 5 * no_fielddescription = 6 * invalid_parameter = 7 * undefind_error = 8 * double_conversion = 9 * others = 10.

KKBH_RULE_TEXT_GET CALL FUNCTION 'KKBH_RULE_TEXT_GET' EXPORTING I_RULE = P_FORMEL * I_LANGU = SY-LANGU IMPORTING E_TEXT = L_TEXT EXCEPTIONS RULE_NOT_FOUND = 1 OTHERS = 2.

REUSE_ALV_LIST_LAYOUT_INFO_GET CALL FUNCTION 'REUSE_ALV_LIST_LAYOUT_INFO_GET' IMPORTING * ES_LAYOUT = ET_FIELDCAT = LT_FIELDCAT * ET_SORT = * ET_FILTER = * ES_LIST_SCROLL = * ES_VARIANT = EXCEPTIONS NO_INFOS = 1 PROGRAM_ERROR = 2 OTHERS = 3.

REUSE_ALV_COMMENTARY_WRITE CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE' EXPORTING * I_LOGO = 'COPC' "grid IT_LIST_COMMENTARY = GT_TOP_OF_PAGE.

DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING DYNAME = LS_D020S-PROG DYNUMB = LS_D020S-DNUM * TRANSLATE_TO_UPPER = ' ' * REQUEST = ' ' * PERFORM_CONVERSION_EXITS = ' ' * PERFORM_INPUT_CONVERSION = ' ' TABLES DYNPFIELDS = LT_DYNPREAD EXCEPTIONS INVALID_ABAPWORKAREA = 1 INVALID_DYNPROFIELD = 2 INVALID_DYNPRONAME = 3 INVALID_DYNPRONUMMER = 4 INVALID_REQUEST = 5 NO_FIELDDESCRIPTION = 6 INVALID_PARAMETER = 7 UNDEFIND_ERROR = 8 DOUBLE_CONVERSION = 9 OTHERS = 10.

K_KKB_VERSIONS_LIST CALL FUNCTION 'K_KKB_VERSIONS_LIST' EXPORTING I_VERSN = P_AVERS I_KOKRS = G_KOKRS * I_WRTTP = '32' I_VALUTYP = P_VALUT IMPORTING E_VERSN = P_AVERS EXCEPTIONS USER_ABEND = 1 NO_VERSION = 2 OTHERS = 3.

KKRS_CO_PRODUCT_MANUFACT_TREE CALL FUNCTION 'KKRS_CO_PRODUCT_MANUFACT_TREE' EXPORTING I_AUFNR = lt_aufnr-aufnr I_OBJW = l_pivot-currency_type is_time_range = l_time_range i_valutyp = g_valutyp i_variant = L_variant I_KOKRS = g_kokrs.

K_KKR_CO_PRODUCT_MANUFACT_TREE * CALL FUNCTION 'K_KKR_CO_PRODUCT_MANUFACT_TREE' * EXPORTING * I_AUFNR = LT_AUFNR-AUFNR ** I_TEXT = 'X' ** I_WINDOW = 'X' ** I_BEGROW = 5 ** I_BEGCOL = 10 ** I_ENDROW = 25 ** I_ENDCOL = 70 ** I_STATUS = '0' * I_ANW = G_ANW ** I_OBJW = ' ' ** I_CHOICE_J = 'X' ** I_CHOICE_K = 'X' ** I_CHOICE_P = 'X' ** I_KST = ' ' ** I_RGJNR = ' ' ** I_VALUTYP = '0' ** TABLES ** GLOBALS = * EXCEPTIONS * OBJECT_NOT_FOUND = 1 * OTHERS = 2.

K_KKB_REPORT_AUTHORITY_CHECK CALL FUNCTION 'K_KKB_REPORT_AUTHORITY_CHECK' EXPORTING I_KKBC = LS_KKBC * I_KKBU = * I_OBJ = * I_CKRCO = I_AUFK = LS_AUFK I_NO_VALUTYP_CHECK = LFLG_NO_VALUTYP EXCEPTIONS NO_AUTHORITY = 1 OTHERS = 2.

K_KKB_CURRENCY_TYPE_SWITCH call function 'K_KKB_CURRENCY_TYPE_SWITCH' exporting TO_KWAER = ' ' to_owaer = 'X'.

K_KKB_CURRENCY_TYPE_SWITCH call function 'K_KKB_CURRENCY_TYPE_SWITCH' exporting to_kwaer = 'X' to_owaer = ' '.



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 BALV1F01 or its description.