J_3RS_CCD_FORMS SAP ABAP INCLUDE - Include J_3RS_CCD_FORMS
J_3RS_CCD_FORMS 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 J_3RS_CCD_FORMS 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 J_3RS_CCD_FORMS. "Basic submit
SUBMIT J_3RS_CCD_FORMS AND RETURN. "Return to original report after report execution complete
SUBMIT J_3RS_CCD_FORMS VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: Include J_3RS_CCD_FORMS
INCLUDES used within this REPORT J_3RS_CCD_FORMS
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:
MESSAGES_INITIALIZE * CALL FUNCTION 'MESSAGES_INITIALIZE' * EXPORTING * RESET = 'X' * I_IDENTIFICATION = g_ident ** COLLECT_AND_SEND = ' ' * IMPORTING * E_IDENTIFICATION = g_ident * EXCEPTIONS * LOG_NOT_ACTIVE = 1 * WRONG_IDENTIFICATION = 2 * OTHERS = 3.
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING address_selection = ls_address_selection IMPORTING address_value = ls_address_value EXCEPTIONS parameter_error = 1 address_not_exist = 2 version_not_exist = 3 internal_error = 4 OTHERS = 5.
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING address_selection = ls_address_selection IMPORTING address_value = ls_address_value EXCEPTIONS parameter_error = 1 address_not_exist = 2 version_not_exist = 3 internal_error = 4 OTHERS = 5.
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING address_selection = ls_address_selection IMPORTING address_value = ls_address_value EXCEPTIONS parameter_error = 1 address_not_exist = 2 version_not_exist = 3 internal_error = 4 OTHERS = 5.
ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING address_selection = ls_address_selection IMPORTING address_value = ls_address_value EXCEPTIONS parameter_error = 1 address_not_exist = 2 version_not_exist = 3 internal_error = 4 OTHERS = 5.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = ls_ccditems-SRC_CCD IMPORTING output = lv_ccd_converted.
J_3RSPASSDEAL_GETDATA CALL FUNCTION 'J_3RSPASSDEAL_GETDATA' EXPORTING IV_BUKRS = P_BUKRS IT_INTPODNUM = lt_intpd IV_DP_INFO_ONLY = ' ' CHANGING CT_PASSDEAL_ALV = lt_passd EXCEPTIONS DATA_NOT_FOUND = 1 NO_AUTHORIZATION = 2 OTHERS = 3.
UNIT_CONVERSION_SIMPLE CALL FUNCTION 'UNIT_CONVERSION_SIMPLE' EXPORTING INPUT = P_BRGEW * NO_TYPE_CHECK = 'X' * ROUND_SIGN = ' ' UNIT_IN = P_GEWEI UNIT_OUT = lv_gewei IMPORTING * ADD_CONST = * DECIMALS = * DENOMINATOR = * NUMERATOR = OUTPUT = P_BRGEW_KG EXCEPTIONS CONVERSION_NOT_FOUND = 1 DIVISION_BY_ZERO = 2 INPUT_INVALID = 3 OUTPUT_INVALID = 4 OVERFLOW = 5 TYPE_INVALID = 6 UNITS_MISSING = 7 UNIT_IN_NOT_FOUND = 8 UNIT_OUT_NOT_FOUND = 9 OTHERS = 10.
READ_EXCHANGE_RATE CALL FUNCTION 'READ_EXCHANGE_RATE' EXPORTING DATE = sy-datum FOREIGN_CURRENCY = p_header-WAERS LOCAL_CURRENCY = J_3RSCCDHEADER_TOTAL-LWAERS TYPE_OF_RATE = gv_ratetype IMPORTING EXCHANGE_RATE = J_3RSCCDHEADER_TOTAL-KURSK EXCEPTIONS NO_RATE_FOUND = 1 NO_FACTORS_FOUND = 2 NO_SPREAD_FOUND = 3 DERIVED_2_TIMES = 4 OTHERS = 5.
J_3RSCCD_PRICING CALL FUNCTION 'J_3RSCCD_PRICING' EXPORTING I_CCD_TYPE = J_3RSCCDHEADER_TOTAL-TYPE I_PRMODE = GV_PRMODE I_SCRMODE = GV_SCRMODE * I_KSCHL = I_KBETR = lv_kbetr_source I_WAERS = lv_waers_source I_KOMK = gs_komk I_KOMP = gs_komp I_TKOMV = gt_tkomv_pg IMPORTING * E_KSCHL = E_KBETR = lv_kbetr_result E_WAERS = lv_waers_result E_KOMK = gs_komk E_KOMP = gs_komp E_TKOMV = gt_tkomv_pg EXCEPTIONS INVALID_SCRMODE = 1 INVALID_MODE = 2 SCREEN_ERROR = 3 PROCEDURE_NOT_FOUND = 4 PRICING_ERROR = 5 WRONG_KNUMV = 6 OTHERS = 7.
MATERIAL_UNIT_CONVERSION CALL FUNCTION 'MATERIAL_UNIT_CONVERSION' EXPORTING INPUT = P_QUANT_SUOM KZMEINH = 'X' MATNR = P_MATNR MEINH = P_VRKME MEINS = P_MEINS * EXTENDED_CONV = ' ' * TYPE_UMR = ' ' * NO_OUTPUT = ' ' * CHARGE = * CHARG_CUOBJ = * WERKS = IMPORTING * ADDKO = * MEINS = OUTPUT = P_MGLME UMREN = P_UMZIN UMREZ = P_UMZIZ * BATCH_CONVERSION_ERROR = * KZWSO = EXCEPTIONS CONVERSION_NOT_FOUND = 1 INPUT_INVALID = 2 MATERIAL_NOT_FOUND = 3 MEINH_NOT_FOUND = 4 MEINS_MISSING = 5 NO_MEINH = 6 OUTPUT_INVALID = 7 OVERFLOW = 8 OTHERS = 9.
MESSAGES_INITIALIZE CALL FUNCTION 'MESSAGES_INITIALIZE' EXPORTING RESET = 'X' I_IDENTIFICATION = g_ident * COLLECT_AND_SEND = ' ' IMPORTING E_IDENTIFICATION = g_ident EXCEPTIONS LOG_NOT_ACTIVE = 1 WRONG_IDENTIFICATION = 2 OTHERS = 3.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = wa_messages-MSGID msgty = wa_messages-MSGTY msgv1 = wa_messages-msgv1 msgv2 = wa_messages-msgv2 msgv3 = wa_messages-msgv3 msgv4 = wa_messages-msgv4 txtnr = wa_messages-msgno * zeile = error_count zeile = l_item_num "number of item and subitem EXCEPTIONS * MESSAGE_TYPE_NOT_VALID = 1 * NOT_ACTIVE = 2 OTHERS = 3.
MESSAGES_SHOW CALL FUNCTION 'MESSAGES_SHOW' EXPORTING object = text-031 * SHOW_LINNO = ' ' SHOW_LINNO_TEXT = 'Item/Subitem' * SHOW_LINNO_TEXT_LEN = 10 I_USE_GRID = 'X' EXCEPTIONS INCONSISTENT_RANGE = 1 NO_MESSAGES = 2 OTHERS = 3.
J_3RSCCD_PRICING_SAVE CALL FUNCTION 'J_3RSCCD_PRICING_SAVE' CHANGING P_KNUMV = J_3RSCCDHEADER_TOTAL-KNUMV P_TKOMV = gt_tkomv EXCEPTIONS DB_ERROR = 1 KONV_NUMBER_ERROR = 2 EMPTY_KONV = 3 OTHERS = 4.
UNIT_CONVERSION_SIMPLE CALL FUNCTION 'UNIT_CONVERSION_SIMPLE' EXPORTING INPUT = lv_brgew * NO_TYPE_CHECK = 'X' * ROUND_SIGN = ' ' UNIT_IN = lv_gewei UNIT_OUT = P_GEWEI IMPORTING * ADD_CONST = * DECIMALS = * DENOMINATOR = * NUMERATOR = OUTPUT = lv_brgew_converted EXCEPTIONS CONVERSION_NOT_FOUND = 1 DIVISION_BY_ZERO = 2 INPUT_INVALID = 3 OUTPUT_INVALID = 4 OVERFLOW = 5 TYPE_INVALID = 6 UNITS_MISSING = 7 UNIT_IN_NOT_FOUND = 8 UNIT_OUT_NOT_FOUND = 9 OTHERS = 10.
UNIT_CONVERSION_SIMPLE CALL FUNCTION 'UNIT_CONVERSION_SIMPLE' EXPORTING INPUT = P_NTGEW * NO_TYPE_CHECK = 'X' * ROUND_SIGN = ' ' UNIT_IN = P_GEWEI UNIT_OUT = lv_gewei_kg IMPORTING * ADD_CONST = * DECIMALS = * DENOMINATOR = * NUMERATOR = OUTPUT = P_NTGEW_KG EXCEPTIONS CONVERSION_NOT_FOUND = 1 DIVISION_BY_ZERO = 2 INPUT_INVALID = 3 OUTPUT_INVALID = 4 OVERFLOW = 5 TYPE_INVALID = 6 UNITS_MISSING = 7 UNIT_IN_NOT_FOUND = 8 UNIT_OUT_NOT_FOUND = 9 OTHERS = 10.
UNIT_CONVERSION_SIMPLE CALL FUNCTION 'UNIT_CONVERSION_SIMPLE' EXPORTING INPUT = P_BRGEW * NO_TYPE_CHECK = 'X' * ROUND_SIGN = ' ' UNIT_IN = P_GEWEI UNIT_OUT = lv_gewei_kg IMPORTING * ADD_CONST = * DECIMALS = * DENOMINATOR = * NUMERATOR = OUTPUT = P_BRGEW_KG EXCEPTIONS CONVERSION_NOT_FOUND = 1 DIVISION_BY_ZERO = 2 INPUT_INVALID = 3 OUTPUT_INVALID = 4 OVERFLOW = 5 TYPE_INVALID = 6 UNITS_MISSING = 7 UNIT_IN_NOT_FOUND = 8 UNIT_OUT_NOT_FOUND = 9 OTHERS = 10.
CALL FUNCTION 'MATERIAL_UNIT_CONVERSION' EXPORTING INPUT =-LSMENG KZMEINH = 'X' MATNR = P_CCDITEM_MATNR MEINH = -VRKME MEINS = P_CCDITEM_MEINS * EXTENDED_CONV = ' ' * TYPE_UMR = ' ' * NO_OUTPUT = ' ' * CHARGE = * CHARG_CUOBJ = * WERKS = IMPORTING * ADDKO = * MEINS = lv_meins "base UOM OUTPUT = lv_subitem_quant_buom * UMREN = P_UMZIN * UMREZ = P_UMZIZ * BATCH_CONVERSION_ERROR = * KZWSO = EXCEPTIONS CONVERSION_NOT_FOUND = 1 INPUT_INVALID = 2 MATERIAL_NOT_FOUND = 3 MEINH_NOT_FOUND = 4 MEINS_MISSING = 5 NO_MEINH = 6 OUTPUT_INVALID = 7 OVERFLOW = 8 OTHERS = 9.
MATERIAL_UNIT_CONVERSION CALL FUNCTION 'MATERIAL_UNIT_CONVERSION' EXPORTING INPUT = lv_subitem_quant_buom * KZMEINH = ' ' MATNR = P_CCDITEM_MATNR MEINH = P_CCDITEM_VRKME MEINS = P_CCDITEM_MEINS "base UOM * EXTENDED_CONV = ' ' * TYPE_UMR = ' ' * NO_OUTPUT = ' ' * CHARGE = * CHARG_CUOBJ = * WERKS = IMPORTING * ADDKO = * MEINS = lv_meins OUTPUT =
-LSMENG_ITUOM * UMREN = P_UMZIN * UMREZ = P_UMZIZ * BATCH_CONVERSION_ERROR = * KZWSO = EXCEPTIONS CONVERSION_NOT_FOUND = 1 INPUT_INVALID = 2 MATERIAL_NOT_FOUND = 3 MEINH_NOT_FOUND = 4 MEINS_MISSING = 5 NO_MEINH = 6 OUTPUT_INVALID = 7 OVERFLOW = 8 OTHERS = 9.
MATERIAL_UNIT_CONVERSION CALL FUNCTION 'MATERIAL_UNIT_CONVERSION' EXPORTING INPUT =
-LSMENG KZMEINH = 'X' MATNR = P_CCDITEM_MATNR MEINH = -VRKME MEINS = P_CCDITEM_MEINS "base UOM * EXTENDED_CONV = ' ' * TYPE_UMR = ' ' * NO_OUTPUT = ' ' * CHARGE = * CHARG_CUOBJ = * WERKS = IMPORTING * ADDKO = * MEINS = lv_meins "base UOM OUTPUT = lv_subitem_quant_buom * UMREN = P_UMZIN * UMREZ = P_UMZIZ * BATCH_CONVERSION_ERROR = * KZWSO = EXCEPTIONS CONVERSION_NOT_FOUND = 1 INPUT_INVALID = 2 MATERIAL_NOT_FOUND = 3 MEINH_NOT_FOUND = 4 MEINS_MISSING = 5 NO_MEINH = 6 OUTPUT_INVALID = 7 OVERFLOW = 8 OTHERS = 9.
MATERIAL_UNIT_CONVERSION CALL FUNCTION 'MATERIAL_UNIT_CONVERSION' EXPORTING INPUT = lv_subitem_quant_buom * KZMEINH = ' ' MATNR = P_CCDITEM_MATNR MEINH = P_CCDITEM_VRKME MEINS = P_CCDITEM_MEINS "base UOM * EXTENDED_CONV = ' ' * TYPE_UMR = ' ' * NO_OUTPUT = ' ' * CHARGE = * CHARG_CUOBJ = * WERKS = IMPORTING * ADDKO = * MEINS = lv_meins "base UOM OUTPUT =
-LSMENG_ITUOM * UMREN = P_UMZIN * UMREZ = P_UMZIZ * BATCH_CONVERSION_ERROR = * KZWSO = EXCEPTIONS CONVERSION_NOT_FOUND = 1 INPUT_INVALID = 2 MATERIAL_NOT_FOUND = 3 MEINH_NOT_FOUND = 4 MEINS_MISSING = 5 NO_MEINH = 6 OUTPUT_INVALID = 7 OVERFLOW = 8 OTHERS = 9.
MATERIAL_UNIT_CONVERSION CALL FUNCTION 'MATERIAL_UNIT_CONVERSION' EXPORTING INPUT =
-LSMENG KZMEINH = 'X' MATNR = P_CCDITEM_MATNR MEINH = -VRKME MEINS = P_CCDITEM_MEINS "base UOM * EXTENDED_CONV = ' ' * TYPE_UMR = ' ' * NO_OUTPUT = ' ' * CHARGE = * CHARG_CUOBJ = * WERKS = IMPORTING * ADDKO = * MEINS = lv_meins "base UOM OUTPUT = lv_subitem_quant_buom * UMREN = P_UMZIN * UMREZ = P_UMZIZ * BATCH_CONVERSION_ERROR = * KZWSO = EXCEPTIONS CONVERSION_NOT_FOUND = 1 INPUT_INVALID = 2 MATERIAL_NOT_FOUND = 3 MEINH_NOT_FOUND = 4 MEINS_MISSING = 5 NO_MEINH = 6 OUTPUT_INVALID = 7 OVERFLOW = 8 OTHERS = 9.
MATERIAL_UNIT_CONVERSION CALL FUNCTION 'MATERIAL_UNIT_CONVERSION' EXPORTING INPUT = lv_subitem_quant_buom * KZMEINH = ' ' MATNR = P_CCDITEM_MATNR MEINH = P_CCDITEM_VRKME MEINS = P_CCDITEM_MEINS "base UOM * EXTENDED_CONV = ' ' * TYPE_UMR = ' ' * NO_OUTPUT = ' ' * CHARGE = * CHARG_CUOBJ = * WERKS = IMPORTING * ADDKO = * MEINS = lv_meins "base UOM OUTPUT =
-LSMENG_ITUOM * UMREN = P_UMZIN * UMREZ = P_UMZIZ * BATCH_CONVERSION_ERROR = * KZWSO = EXCEPTIONS CONVERSION_NOT_FOUND = 1 INPUT_INVALID = 2 MATERIAL_NOT_FOUND = 3 MEINH_NOT_FOUND = 4 MEINS_MISSING = 5 NO_MEINH = 6 OUTPUT_INVALID = 7 OVERFLOW = 8 OTHERS = 9.
J_3RSCCD_PRICING CALL FUNCTION 'J_3RSCCD_PRICING' EXPORTING I_CCD_TYPE = J_3RSCCDHEADER_TOTAL-TYPE I_PRMODE = GV_PRMODE I_SCRMODE = GV_SCRMODE * I_KSCHL = I_KBETR = lv_kbetr_source I_WAERS = lv_waers_source I_KOMK = gs_komk I_KOMP = gs_komp I_TKOMV = gt_tkomv_pg IMPORTING * E_KSCHL = E_KBETR = lv_kbetr_result E_WAERS = lv_waers_result E_KOMK = gs_komk E_KOMP = gs_komp E_TKOMV = gt_tkomv_pg EXCEPTIONS INVALID_SCRMODE = 1 INVALID_MODE = 2 SCREEN_ERROR = 3 PROCEDURE_NOT_FOUND = 4 OTHERS = 5.
RV_ORDER_FLOW_INFORMATION CALL FUNCTION 'RV_ORDER_FLOW_INFORMATION' EXPORTING comwa = l_vbc06 nachfolger = abap_true n_stufen = '50' vorgaenger = abap_true v_stufen = '50' TABLES vbfa_tab = lt_vbfa EXCEPTIONS no_vbfa = 1 no_vbuk_found = 2 OTHERS = 3.
F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING DDIC_STRUCTURE = 'J_3RS_SUBITMS_DOC' retfield = 'DELVN' WINDOW_TITLE = lv_title VALUE_ORG = 'S' MULTIPLE_CHOICE = 'X' TABLES VALUE_TAB = lt_subitms_total * FIELD_TAB = lt_fields RETURN_TAB = lt_return DYNPFLD_MAPPING = lt_dynfield EXCEPTIONS PARAMETER_ERROR = 1 NO_VALUES_FOUND = 2 OTHERS = 3.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = ls_return-FIELDVAL IMPORTING output = lv_converted.
MATERIAL_UNIT_CONVERSION CALL FUNCTION 'MATERIAL_UNIT_CONVERSION' EXPORTING INPUT = ps_subitems_new-LSMENG KZMEINH = 'X' MATNR = J_3RSCCDITEM_TOTAL-MATNR MEINH = ps_subitems_new-VRKME MEINS = J_3RSCCDITEM_TOTAL-MEINS * EXTENDED_CONV = ' ' * TYPE_UMR = ' ' * NO_OUTPUT = ' ' * CHARGE = * CHARG_CUOBJ = * WERKS = IMPORTING * ADDKO = * MEINS = lv_meins "base UOM OUTPUT = lv_subitem_quant_buom * UMREN = P_UMZIN * UMREZ = P_UMZIZ * BATCH_CONVERSION_ERROR = * KZWSO = EXCEPTIONS CONVERSION_NOT_FOUND = 1 INPUT_INVALID = 2 MATERIAL_NOT_FOUND = 3 MEINH_NOT_FOUND = 4 MEINS_MISSING = 5 NO_MEINH = 6 OUTPUT_INVALID = 7 OVERFLOW = 8 OTHERS = 9 .
MATERIAL_UNIT_CONVERSION CALL FUNCTION 'MATERIAL_UNIT_CONVERSION' EXPORTING INPUT = lv_subitem_quant_buom * KZMEINH = ' ' MATNR = J_3RSCCDITEM_TOTAL-MATNR MEINH = J_3RSCCDITEM_TOTAL-VRKME MEINS = J_3RSCCDITEM_TOTAL-MEINS "base UOM * EXTENDED_CONV = ' ' * TYPE_UMR = ' ' * NO_OUTPUT = ' ' * CHARGE = * CHARG_CUOBJ = * WERKS = IMPORTING * ADDKO = * MEINS = lv_meins OUTPUT = ps_subitems_new-LSMENG_ITUOM * UMREN = P_UMZIN * UMREZ = P_UMZIZ * BATCH_CONVERSION_ERROR = * KZWSO = EXCEPTIONS CONVERSION_NOT_FOUND = 1 INPUT_INVALID = 2 MATERIAL_NOT_FOUND = 3 MEINH_NOT_FOUND = 4 MEINS_MISSING = 5 NO_MEINH = 6 OUTPUT_INVALID = 7 OVERFLOW = 8 OTHERS = 9 .
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 J_3RS_CCD_FORMS or its description.