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

BSELJF01 SAP ABAP INCLUDE - Forms







BSELJF01 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 BSELJF01 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 BSELJF01. "Basic submit
SUBMIT BSELJF01 AND RETURN. "Return to original report after report execution complete
SUBMIT BSELJF01 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 BSELJF01

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:

RS_SET_SELSCREEN_STATUS CALL FUNCTION 'RS_SET_SELSCREEN_STATUS' EXPORTING P_STATUS = 'SELECTIO' TABLES P_EXCLUDE = XEXCL EXCEPTIONS OTHERS = 1.

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

SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING TEXT = TEXT-PG1.

K_KKB_REPORT_AUTHORITY_CHECK CALL FUNCTION 'K_KKB_REPORT_AUTHORITY_CHECK' EXPORTING I_KKBC = LD_KKBC * I_KKBU = * I_OBJ = * I_CKRCO = * I_ACTVT = I_VBAK = XVBAK EXCEPTIONS NO_AUTHORITY = 1 OTHERS = 2.

SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING TEXT = TEXT-PG2.

K_KKB_CO_OBJECT_READ CALL FUNCTION 'K_KKB_CO_OBJECT_READ' EXPORTING OBJECT_DATA = BKKBC * EXCHANGE_CURRENCY_TYPES = ' ' READ_KATYP = 'X' TABLES T_BEKNZ = RA_BEKNZ T_HERKZ = RA_HERKZ T_KKBC = LT_KKBC T_KSTAR = RA_KSTAR T_WRTTP = RA_WRTTP T_OBJNR = LR_OBJNR EXCEPTIONS OTHERS = 1.

SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING TEXT = TEXT-PG2.

K_KKB_CO_OBJECT_READ CALL FUNCTION 'K_KKB_CO_OBJECT_READ' EXPORTING OBJECT_DATA = BKKBC * EXCHANGE_CURRENCY_TYPES = ' ' READ_KATYP = 'X' TABLES T_BEKNZ = RA_BEKNZ T_HERKZ = RA_HERKZ T_KKBC = YKKBC T_KSTAR = RA_KSTAR T_WRTTP = RA_WRTTP EXCEPTIONS OTHERS = 1.

K_KKB_LO_COLUMNS_CHOICE CALL FUNCTION 'K_KKB_LO_COLUMNS_CHOICE' EXPORTING I_CHOICE = 'S' I_SAVE = 'X' * I_SUM = ' ' * I_STACK_INDEX = '1' * I_CHARTEXT = * I_FIGTEXT = * I_XMASTERFIELD = * I_XSLAVEFIELD = IMPORTING E_CHANGED = LFLG_CHANGED E_SAVED = LFLG_SAVED * e_xmasterfield = * e_xslavefield = CHANGING C_XFIELDCAT = XFIELDCAT C_ALAYOUT = ALAYOUT EXCEPTIONS OTHERS = 1.

POPUP_TO_CONFIRM_WITH_MESSAGE CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' EXPORTING * DEFAULTOPTION = 'Y' DIAGNOSETEXT1 = TEXT-PD1 DIAGNOSETEXT2 = TEXT-PD2 DIAGNOSETEXT3 = TEXT-PD3 TEXTLINE1 = TEXT-PT1 TEXTLINE2 = TEXT-PT2 TITEL = TEXT-PUE * START_COLUMN = 25 * START_ROW = 6 IMPORTING ANSWER = LD_ANSWER EXCEPTIONS OTHERS = 1.

K_KKB_LO_COLUMNS_CHOICE CALL FUNCTION 'K_KKB_LO_COLUMNS_CHOICE' EXPORTING I_CHOICE = 'K' I_SAVE = 'X' I_SUM = 'X' * I_STACK_INDEX = '1' * I_CHARTEXT = * I_FIGTEXT = * i_xmasterfield = * I_XSLAVEFIELD = IMPORTING E_CHANGED = FLG_CHANGED E_SAVED = LFLG_SAVED E_XMASTERFIELD = XMFIELD E_XSLAVEFIELD = XSFIELD CHANGING C_XFIELDCAT = XFIELDCAT C_ALAYOUT = ALAYOUT EXCEPTIONS OTHERS = 1.

K_KKB_LO_COLUMNS_CHOICE CALL FUNCTION 'K_KKB_LO_COLUMNS_CHOICE' EXPORTING I_CHOICE = 'M' I_SAVE = 'X' I_SUM = 'X' * I_STACK_INDEX = '1' * i_chartext = 'Merkmale' " TODO 10.07.96

KKBH_CURRENT_RULE_SHOW CALL FUNCTION 'KKBH_CURRENT_RULE_SHOW' EXPORTING * I_RULE_NR = I_RULE = ARULE EXCEPTIONS RULE_NOT_FOUND = 1 OTHERS = 2.

K_KKB_CURRENT_APPLICATION_GET CALL FUNCTION 'K_KKB_CURRENT_APPLICATION_GET' IMPORTING E_ANW = L_ANW * e_tkkbu = EXCEPTIONS NO_APPLICATION_SET = 1 OTHERS = 2.

K_KKB_SD_ORDERS_LIST_DISSOLVE CALL FUNCTION 'K_KKB_SD_ORDERS_LIST_DISSOLVE' EXPORTING * RGJNR = IANW = L_ANW * CHOICE_J = 'X' * CHOICE_K = 'X' * CHOICE_P = 'X' JOBNAME = L_JOB * IDFO = 'K' KOKRS = P_KOKRS I_TRSTI = LS_TRSTI * KST = IMPORTING EXIT = L_EXIT * e_jobname = TABLES * GLO_TAB = KDAUF_TAB = LT_VBELN EXCEPTIONS NO_JOB = 1 INTERNAL_ERROR = 2.

K_KKB_ORDER_TREE CALL FUNCTION 'K_KKB_ORDER_TREE' EXPORTING I_VBELN = LD_VBELN " I_WINDOW = 'X' " I_STATUS = '0' " I_ANW = '3' " I_OBJW = ' ' " I_TAB = 'X' I_CHOICE_J = ' ' I_CHOICE_P = ' ' I_CHOICE_K = ' ' * IMPORTING * E_POSNR = EXCEPTIONS OBJECT_NOT_FOUND = 01.

K_KKR_SALES_ORDER_TREE CALL FUNCTION 'K_KKR_SALES_ORDER_TREE' EXPORTING I_VBELN = LD_VBELN I_POSNR = L_POSNR " I_WINDOW = 'X' " I_STATUS = '0' " I_ANW = '3' " I_OBJW = ' ' " I_TAB = 'X' I_CHOICE_J = ' ' I_CHOICE_P = ' ' I_CHOICE_K = ' ' * IMPORTING * E_POSNR = EXCEPTIONS OBJECT_NOT_FOUND = 01.

KKBH_RULE_CREATE CALL FUNCTION 'KKBH_RULE_CREATE' EXPORTING I_TKKBH = LD_ARULE I_SAVE = ' ' I_F4 = 'X' I_FORMEL_GROUP = 'K' IMPORTING E_TKKBH = LD_ARULE E_CANC = LD_CANCEL EXCEPTIONS OTHERS = 1.

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.

SAPGUI_PROGRESS_INDICATOR * CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' " übersteuert sonst * EXPORTING " 'Kosten werden gelesen' * PERCENTAGE = R_PERCENTAGE * TEXT = TEXT-PG3.

K_KKB_LO_COLUMNS_CHOICE CALL FUNCTION 'K_KKB_LO_COLUMNS_CHOICE' EXPORTING I_CHOICE = 'K' I_SAVE = 'X' * I_SUM = ' ' * I_STACK_INDEX = '1' * I_CHARTEXT = * I_FIGTEXT = * I_XMASTERFIELD = * I_XSLAVEFIELD = IMPORTING E_CHANGED = LFLG_CHANGED E_SAVED = LFLG_SAVED * e_xmasterfield = * e_xslavefield = CHANGING C_XFIELDCAT = XFIELDCAT C_ALAYOUT = ALAYOUT EXCEPTIONS OTHERS = 1.

K_KKB_LO_COLUMNS_CHOICE CALL FUNCTION 'K_KKB_LO_COLUMNS_CHOICE' EXPORTING I_CHOICE = 'M' I_SAVE = 'X' * I_SUM = ' ' * I_STACK_INDEX = '1' * I_CHARTEXT = * I_FIGTEXT = * I_XMASTERFIELD = * I_XSLAVEFIELD = IMPORTING E_CHANGED = LFLG_CHANGED E_SAVED = LFLG_SAVED * e_xmasterfield = * e_xslavefield = CHANGING C_XFIELDCAT = XFIELDCAT C_ALAYOUT = ALAYOUT EXCEPTIONS OTHERS = 1.

K_KKB_LIST_OUTPUT CALL FUNCTION 'K_KKB_LIST_OUTPUT' EXPORTING * I_PROGRESS_MES = 'Y' * I_TOP_OF_PAGE = 'Y' I_AT_USER_COMMAND = 'N' I_STATUS = 'N' I_ALAYOUT = ALAYOUT I_REPORT = 'RKTFGSSJ' I_MASTERNAME = 'XVBAK' I_SLAVENAME = 'XVBAP' I_XISETAB = XSELDATA[] * I_XHIDE = I_XMASTERFIELD = XMFIELD I_XSLAVEFIELD = XSFIELD IMPORTING E_STACK_INDEX = GD_OUTINDEX TABLES I_XMASTERTAB = XVBAK I_XSLAVETAB = XVBAP I_XHEADER = XHEADER EXCEPTIONS OTHERS = 1.

K_KKB_LIST_OUTPUT CALL FUNCTION 'K_KKB_LIST_OUTPUT' EXPORTING * I_PROGRESS_MES = 'Y' * I_TOP_OF_PAGE = 'Y' I_AT_USER_COMMAND = 'N' I_STATUS = 'N' I_ALAYOUT = ALAYOUT I_REPORT = 'RKTFGSSJ' I_XISETAB = XSELDATA[] I_MASTERNAME = 'XVBAP' * I_SLAVENAME = 'XVBAP' * I_XHIDE = I_XMASTERFIELD = XMFIELD * I_XSLAVEFIELD = XSFIELD IMPORTING E_STACK_INDEX = GD_OUTINDEX TABLES I_XMASTERTAB = XVBAP * I_XSLAVETAB = XVBAP I_XHEADER = XHEADER EXCEPTIONS OTHERS = 1.

K_KKB_LIST_LAYOUT_INFO_GET CALL FUNCTION 'K_KKB_LIST_LAYOUT_INFO_GET' IMPORTING ES_LAYOUT = LS_LAYOUT ET_FIELDCAT = LT_FIELDCAT ET_SORT = LT_SORTINFO[] EXCEPTIONS NO_INFOS = 1 OTHERS = 2.

K_KKB_LIST_DISPLAY CALL FUNCTION 'K_KKB_LIST_DISPLAY' EXPORTING I_CALLBACK_PROGRAM = L_REPID I_CALLBACK_USER_COMMAND = 'USER_COMMAND_RESULT' I_CALLBACK_TOP_OF_PAGE = 'TOP_OF_PAGE' I_CALLBACK_PF_STATUS_SET = 'STATUS_INLI_NEW' * I_CALLBACK_LAYOUT_SAVE = * I_CALLBACK_FIELDCAT_SAVE = I_TABNAME = 'XVBAP' IS_LAYOUT = GS_NLT_LAYOUT IT_FIELDCAT = GT_NLT_FIELDCAT[] * I_FCTYPE = 'R' * IT_SPECIAL_GROUPS = IT_SORT = LT_SORTINFO[] IS_SEL_HIDE = LS_SELHIDE * I_SCREEN_START_COLUMN = 0 * I_SCREEN_START_LINE = 0 * I_SCREEN_END_COLUMN = 0 * I_SCREEN_END_LINE = 0 TABLES T_OUTTAB = XVBAP EXCEPTIONS OTHERS = 1.

K_KKB_HIER_SEQU_LIST_DISPLAY CALL FUNCTION 'K_KKB_HIER_SEQU_LIST_DISPLAY' EXPORTING I_CALLBACK_PROGRAM = L_REPID I_CALLBACK_USER_COMMAND = 'USER_COMMAND_RESULT' I_CALLBACK_TOP_OF_PAGE = 'TOP_OF_PAGE' I_CALLBACK_PF_STATUS_SET = 'STATUS_INLI_NEW' * I_CALLBACK_LAYOUT_SAVE = * I_CALLBACK_FIELDCAT_SAVE = I_TABNAME_MASTER = 'XVBAK' I_TABNAME_SLAVE = 'XVBAP' IS_KEYINFO = LS_KEYINFO IS_LAYOUT = GS_NLT_LAYOUT IT_FIELDCAT = GT_NLT_FIELDCAT[] * I_FCTYPE = 'R' * IT_SPECIAL_GROUPS = IT_SORT = LT_SORTINFO[] IS_SEL_HIDE = LS_SELHIDE * I_SCREEN_START_COLUMN = 0 * I_SCREEN_START_LINE = 0 * I_SCREEN_END_COLUMN = 0 * I_SCREEN_END_LINE = 0 TABLES T_OUTTAB_MASTER = XVBAK T_OUTTAB_SLAVE = XVBAP EXCEPTIONS OTHERS = 1.

K_KKB_LIST_OUTPUT * call function 'K_KKB_LIST_OUTPUT' * exporting ** I_PROGRESS_MES = 'Y' ** I_TOP_OF_PAGE = 'Y' * i_at_user_command = 'N' * i_status = 'N' * i_alayout = alayout * i_report = 'RKTFGSSJ' * i_xisetab = xseldata[] * i_mastername = 'XVBAP' ** I_SLAVENAME = 'XVBAP' ** I_XHIDE = * i_xmasterfield = xmfield ** I_XSLAVEFIELD = XSFIELD * importing * e_stack_index = gd_outindex * tables * i_xmastertab = xvbap ** I_XSLAVETAB = XVBAP * i_xheader = xheader * exceptions * others = 1.

K_KKB_TOP_OF_PAGE_HEADER CALL FUNCTION 'K_KKB_TOP_OF_PAGE_HEADER' EXPORTING IT_HEADER = XHEADER[] EXCEPTIONS OTHERS = 1.



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