SAP Reports / Programs | Cross-Application Components | Cross-Application Components | Visual Enterprise Planner integration with ERP(CA-VE-VEP-INT) SAP CA

comments icon Comments

VMP_P_COCKPIT_F01 SAP ABAP INCLUDE - Include VMP_P_COCKPIT_F01







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


INCLUDES used within this REPORT VMP_P_COCKPIT_F01

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:

VMP_PLNSCP_SEARCH
  CALL FUNCTION 'VMP_PLNSCP_SEARCH'
    EXPORTING
      iv_dokar      = p_dokar
      iv_doknr      = p_doknr
      iv_doktl      = p_doktl
      iv_dokvr      = p_dokvr
      iv_matnr      = p_matnr
      iv_werks      = p_werks
    IMPORTING
      et_plnscp_hdr = gt_plnscp_hdr
      es_message    = gs_message.

CONVERSION_EXIT_ALPHA_INPUT
          CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
            EXPORTING
              input  = ps_sear_details-alternative
            IMPORTING
              output = ps_sear_details-alternative.

LVC_FIELDCATALOG_MERGE
  CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
    EXPORTING
*     I_BUFFER_ACTIVE        =
      i_structure_name       = 'VMP_S_PLNSCP_HDR'
      i_client_never_display = 'X'
*     I_BYPASSING_BUFFER     =
*     I_INTERNAL_TABNAME     =
    CHANGING
      ct_fieldcat            = ct_fieldcat
    EXCEPTIONS
      inconsistent_interface = 1
      program_error          = 2
      OTHERS                 = 3.

VMP_GET_PLNSCP_HDR
  CALL FUNCTION 'VMP_GET_PLNSCP_HDR'
    EXPORTING
      it_documentid = lt_doc_id
*     IT_MATNR      =
    IMPORTING
      et_plnscp_hdr = lt_plnscp_hdr
      es_message    = ls_message.

VMP_ADD_PLNSCP
  CALL FUNCTION 'VMP_ADD_PLNSCP'
    EXPORTING
      iv_dokar        = ps_details-dokar
      iv_doknr        = ps_details-doknr
      iv_doktl        = ps_details-doktl
      iv_dokvr        = ps_details-dokvr
      iv_matnr        = ps_details-matnr
      iv_werks        = ps_details-werks
      iv_stlan        = ps_details-stlan
      iv_stlal        = ps_details-stlal
      iv_log_sys      = ps_details-rfcdest
      iv_plnscp_descr = ps_details-descr
      iv_is_part_file = r_ps_purc
      iv_is_leg_asm   = lv_is_legacy
      iv_chng_no      = ps_details-aennr
      iv_alt_no       = ps_details-alternative
    IMPORTING
      es_message      = gs_message.

CONVERSION_EXIT_ALPHA_INPUT
    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
      EXPORTING
        input  = ps_details-alternative
      IMPORTING
        output = gs_plnscp_id-plan_scope_alt.

LVC_FIELDCATALOG_MERGE
  CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
    EXPORTING
*     I_BUFFER_ACTIVE        =
      i_structure_name       = 'VMP_S_MBOM_MAT'
      i_client_never_display = 'X'
*     I_BYPASSING_BUFFER     =
*     I_INTERNAL_TABNAME     =
    CHANGING
      ct_fieldcat            = lt_fieldcat
    EXCEPTIONS
      inconsistent_interface = 1
      program_error          = 2
      OTHERS                 = 3.

VMP_CHANGE_PLNSCP
  CALL FUNCTION 'VMP_CHANGE_PLNSCP'
    EXPORTING
      is_plnscp_id     = gs_plnscp_id
      iv_dokvr         = ps_details-dokvr
      iv_plnscp_descr  = ps_details-descr
      iv_log_sys       = ps_details-rfcdest
      iv_plant         = ps_details-werks
      iv_change_number = ps_details-aennr
      iv_check_out     = ps_details-checkout_flag    " 'X'--Check out
      iv_part_file     = ps_details-purc_part
      iv_mbom_usage    = ps_details-stlan
      it_del_mbom_id   = gt_del_mbom_id
    IMPORTING
      es_message       = gs_message.

CONVERSION_EXIT_ALPHA_INPUT
    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
      EXPORTING
        input  = ps_details-doknr
      IMPORTING
        output = ps_details-doknr.

VMP_DELETE_PLNSCP
  CALL FUNCTION 'VMP_DELETE_PLNSCP'
    EXPORTING
      iv_dokar      = ps_details-dokar
      iv_doknr      = ps_details-doknr
      iv_doktl      = ps_details-doktl
      iv_dokvr      = ps_details-dokvr
      iv_plnscp_alt = ps_details-alternative
    IMPORTING
      es_message    = gs_message.

BAPI_DOCUMENT_GETDETAIL2
  CALL FUNCTION 'BAPI_DOCUMENT_GETDETAIL2'
    EXPORTING
      documenttype    = ps_details-dokar
      documentnumber  = ps_details-doknr
      documentpart    = ps_details-doktl
      documentversion = ps_details-dokvr
      getobjectlinks  = abap_true
    IMPORTING
      documentdata    = ls_documentdata
      return          = ls_return
    TABLES
      objectlinks     = lt_drad.

RFC_READ_R3_DESTINATION
  CALL FUNCTION 'RFC_READ_R3_DESTINATION'
    EXPORTING
      destination             = ps_details-rfcdest
*     AUTHORITY_CHECK         = 'X'
*     BYPASS_BUF              = 'X'
    EXCEPTIONS
      authority_not_available = 1
      destination_not_exist   = 2
      information_failure     = 3
      internal_failure        = 4
      OTHERS                  = 5.

GET_DYNP_VALUE
  CALL FUNCTION 'GET_DYNP_VALUE'
    EXPORTING
      i_field = 'PS_DETAILS-RFCDEST'
      i_repid = sy-repid
      i_dynnr = '0600'
*     I_CONV_INPUT  = ' '
*     I_CONV_OUTPUT = ' '
    CHANGING
      o_value = ps_details-rfcdest.

RHF4_RFC_FIELD_VALUE_REQUEST
    CALL FUNCTION 'RHF4_RFC_FIELD_VALUE_REQUEST'
      EXPORTING
        tabname               = 'T001W'
        fieldname             = 'WERKS'
        searchhelp            = 'H_T001W_C'
        shlpparam             = 'WERKS'
        dynpprog              = sy-repid
        dynpnr                = '0600'
        dynprofield           = lv_fname
*       STEPL                 = 0
        value                 = lv_fval
*       MULTIPLE_CHOICE       = ' '
*       DISPLAY               = ' '
*       SUPPRESS_RECORDLIST   = ' '
*       CALLBACK_PROGRAM      = ' '
*       CALLBACK_FORM         = ' '
*       CBK_PLVAR             = ' '
*       CBK_OTYPE             = ' '
*       CBK_TITLE             = ' '
*       RETURN_ALL_FIELDS     = '*'
      TABLES
        return_tab            = lt_result
*       INTERFACE             =
      EXCEPTIONS
        field_not_found       = 1
        no_help_for_field     = 2
        inconsistent_help     = 3
        no_values_found       = 4
        communication_failure = 5
        system_failure        = 6
        OTHERS                = 7.

RHF4_RFC_FIELD_VALUE_REQUEST
    CALL FUNCTION 'RHF4_RFC_FIELD_VALUE_REQUEST'
      DESTINATION ps_details-rfcdest
      EXPORTING
        tabname               = 'T001W'
        fieldname             = 'WERKS'
        searchhelp            = 'H_T001W_C'
        shlpparam             = 'WERKS'
        dynpprog              = sy-repid
        dynpnr                = '0600'
        dynprofield           = lv_fname
*       STEPL                 = 0
        value                 = lv_fval
*       MULTIPLE_CHOICE       = ' '
*       DISPLAY               = ' '
*       SUPPRESS_RECORDLIST   = ' '
*       CALLBACK_PROGRAM      = ' '
*       CALLBACK_FORM         = ' '
*       CBK_PLVAR             = ' '
*       CBK_OTYPE             = ' '
*       CBK_TITLE             = ' '
*       RETURN_ALL_FIELDS     = '*'
      TABLES
        return_tab            = lt_result
*       INTERFACE             =
      EXCEPTIONS
        field_not_found       = 1
        no_help_for_field     = 2
        inconsistent_help     = 3
        no_values_found       = 4
        communication_failure = 5
        system_failure        = 6
        OTHERS                = 7.

GET_DYNP_VALUE
  CALL FUNCTION 'GET_DYNP_VALUE'
    EXPORTING
      i_field = 'PS_DETAILS-RFCDEST'
      i_repid = sy-repid
      i_dynnr = '0600'
*     I_CONV_INPUT  = ' '
*     I_CONV_OUTPUT = ' '
    CHANGING
      o_value = ps_details-rfcdest.

RHF4_RFC_FIELD_VALUE_REQUEST
    CALL FUNCTION 'RHF4_RFC_FIELD_VALUE_REQUEST'
      EXPORTING
        tabname               = 'T416'
        fieldname             = 'STLAN'
        searchhelp            = 'H_T416'
        shlpparam             = 'STLAN'
        dynpprog              = sy-repid
        dynpnr                = '0600'
        dynprofield           = lv_fname
*       STEPL                 = 0
        value                 = lv_fval
*       MULTIPLE_CHOICE       = ' '
*       DISPLAY               = ' '
*       SUPPRESS_RECORDLIST   = ' '
*       CALLBACK_PROGRAM      = ' '
*       CALLBACK_FORM         = ' '
*       CBK_PLVAR             = ' '
*       CBK_OTYPE             = ' '
*       CBK_TITLE             = ' '
*       RETURN_ALL_FIELDS     = '*'
      TABLES
        return_tab            = lt_result
*       INTERFACE             =
      EXCEPTIONS
        field_not_found       = 1
        no_help_for_field     = 2
        inconsistent_help     = 3
        no_values_found       = 4
        communication_failure = 5
        system_failure        = 6
        OTHERS                = 7.

RHF4_RFC_FIELD_VALUE_REQUEST
    CALL FUNCTION 'RHF4_RFC_FIELD_VALUE_REQUEST'
      DESTINATION ps_details-rfcdest
      EXPORTING
        tabname               = 'T412'
        fieldname             = 'STLAN'
        searchhelp            = 'H_T416'
        shlpparam             = 'STLAN'
        dynpprog              = sy-repid
        dynpnr                = '0600'
        dynprofield           = lv_fname
*       STEPL                 = 0
        value                 = lv_fval
*       MULTIPLE_CHOICE       = ' '
*       DISPLAY               = ' '
*       SUPPRESS_RECORDLIST   = ' '
*       CALLBACK_PROGRAM      = ' '
*       CALLBACK_FORM         = ' '
*       CBK_PLVAR             = ' '
*       CBK_OTYPE             = ' '
*       CBK_TITLE             = ' '
*       RETURN_ALL_FIELDS     = '*'
      TABLES
        return_tab            = lt_result
*       INTERFACE             =
      EXCEPTIONS
        field_not_found       = 1
        no_help_for_field     = 2
        inconsistent_help     = 3
        no_values_found       = 4
        communication_failure = 5
        system_failure        = 6
        OTHERS                = 7.

RHF4_RFC_FIELD_VALUE_REQUEST
















  CALL FUNCTION 'RHF4_RFC_FIELD_VALUE_REQUEST'
    EXPORTING
      tabname               = 'RFCDES'
      fieldname             = 'RFCDEST'
      searchhelp            = 'F4_RFCDESTYPEALL'
      shlpparam             = 'RFCDEST'
      dynpprog              = sy-repid
      dynpnr                = '0600'
      dynprofield           = lv_fname
*     STEPL                 = 0
      value                 = lv_fval
*     MULTIPLE_CHOICE       = ' '
*     DISPLAY               = ' '
*     SUPPRESS_RECORDLIST   = ' '
*     CALLBACK_PROGRAM      = ' '
*     CALLBACK_FORM         = ' '
*     CBK_PLVAR             = ' '
*     CBK_OTYPE             = ' '
*     CBK_TITLE             = ' '
*     RETURN_ALL_FIELDS     = '*'
    TABLES
      return_tab            = lt_result
*     INTERFACE             =
    EXCEPTIONS
      field_not_found       = 1
      no_help_for_field     = 2
      inconsistent_help     = 3
      no_values_found       = 4
      communication_failure = 5
      system_failure        = 6
      OTHERS                = 7.

VMP_LOAD_PLNSCP
  CALL FUNCTION 'VMP_LOAD_PLNSCP'
    EXPORTING
      is_plnscp_id = gs_plnscp_id
    IMPORTING
      es_message   = gs_message.

RH_FUNCTION_EXIST
  CALL FUNCTION 'RH_FUNCTION_EXIST'
    EXPORTING
      name               = 'CDESK_SHOW'
    EXCEPTIONS
      function_not_found = 1
      OTHERS             = 2.

CDESK_SHOW
    CALL FUNCTION 'CDESK_SHOW'                          "#EC EXISTS
      EXPORTING
        initial_view  = 'SAPSTRUCT'
*       WORKDIRECTORY = ' '
*       CHANGENO      = ' '
        validfrom     = sy-datum
        document      = ls_document
        sap_view_only = 'X'
*       hostname      = ' '
        cadsystem     = 'NONE'
        callback      = 'X'
        cadgroup      = 'DEFAULT'.

POPUP_TO_CONFIRM
  CALL FUNCTION 'POPUP_TO_CONFIRM'
    EXPORTING
      titlebar              = text-017
*     DIAGNOSE_OBJECT       = ' '
      text_question         = text-018
      text_button_1         = text-019
*     icon_button_1         = 'ICON_CHECKED'
      text_button_2         = text-020
*     icon_button_2         = 'ICON_INCOMPLETE '
      default_button        = '1'
      display_cancel_button = 'X'
*     USERDEFINED_F1_HELP   = ' '
*     START_COLUMN          = 25
*     START_ROW             = 6
      popup_type            = 'ICON_MESSAGE_QUESTION'
*     IV_QUICKINFO_BUTTON_1 = ' '
*     IV_QUICKINFO_BUTTON_2 = ' '
    IMPORTING
      answer                = gv_answer
*   TABLES
*     PARAMETER             =
    EXCEPTIONS
      text_not_found        = 1
      OTHERS                = 2.

GET_DYNP_VALUE
  CALL FUNCTION 'GET_DYNP_VALUE'
    EXPORTING
      i_field = 'PS_DETAILS-RFCDEST'
      i_repid = sy-repid
      i_dynnr = '0600'
*     I_CONV_INPUT  = ' '
*     I_CONV_OUTPUT = ' '
    CHANGING
      o_value = ps_details-rfcdest.

RHF4_RFC_FIELD_VALUE_REQUEST
    CALL FUNCTION 'RHF4_RFC_FIELD_VALUE_REQUEST'
      EXPORTING
        tabname               = 'AENR'
        fieldname             = 'AENNR'
        searchhelp            = 'VMP_SH_AEN1A'
        shlpparam             = 'AENNR'
        dynpprog              = sy-repid
        dynpnr                = '0600'
        dynprofield           = lv_fname
*       STEPL                 = 0
        value                 = lv_fval
*       MULTIPLE_CHOICE       = ' '
*       DISPLAY               = ' '
*       SUPPRESS_RECORDLIST   = ' '
*       CALLBACK_PROGRAM      = ' '
*       CALLBACK_FORM         = ' '
*       CBK_PLVAR             = ' '
*       CBK_OTYPE             = ' '
*       CBK_TITLE             = ' '
*       RETURN_ALL_FIELDS     = '*'
      TABLES
        return_tab            = lt_result
*       INTERFACE             =
      EXCEPTIONS
        field_not_found       = 1
        no_help_for_field     = 2
        inconsistent_help     = 3
        no_values_found       = 4
        communication_failure = 5
        system_failure        = 6
        OTHERS                = 7.

RHF4_RFC_FIELD_VALUE_REQUEST
    CALL FUNCTION 'RHF4_RFC_FIELD_VALUE_REQUEST'
      DESTINATION ps_details-rfcdest
      EXPORTING
        tabname               = 'AENR'
        fieldname             = 'AENNR'
        searchhelp            = 'VMP_SH_AEN1A'
        shlpparam             = 'AENNR'
        dynpprog              = sy-repid
        dynpnr                = '0600'
        dynprofield           = lv_fname
*       STEPL                 = 0
        value                 = lv_fval
*       MULTIPLE_CHOICE       = ' '
*       DISPLAY               = ' '
*       SUPPRESS_RECORDLIST   = ' '
*       CALLBACK_PROGRAM      = ' '
*       CALLBACK_FORM         = ' '
*       CBK_PLVAR             = ' '
*       CBK_OTYPE             = ' '
*       CBK_TITLE             = ' '
*       RETURN_ALL_FIELDS     = '*'
      TABLES
        return_tab            = lt_result
*       INTERFACE             =
      EXCEPTIONS
        field_not_found       = 1
        no_help_for_field     = 2
        inconsistent_help     = 3
        no_values_found       = 4
        communication_failure = 5
        system_failure        = 6
        OTHERS                = 7.

DYNP_VALUES_READ
  CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
      dyname               = sy-repid
      dynumb               = '0600'
      translate_to_upper   = abap_false
    TABLES
      dynpfields           = dynpfields
    EXCEPTIONS
      invalid_abapworkarea = 01
      invalid_dynprofield  = 02
      invalid_dynproname   = 03
      invalid_dynpronummer = 04
      invalid_request      = 05
      no_fielddescription  = 06
      undefind_error       = 07.

POPUP_DISPLAY_TEXT_WITH_PARAMS
  CALL FUNCTION 'POPUP_DISPLAY_TEXT_WITH_PARAMS'
    EXPORTING
      language       = sy-langu
      popup_title    = text-025
      start_column   = 10
      start_row      = 3
      text_object    = 'DMS-OLDTRANSACTIONS'
    IMPORTING
      cancelled      = lv_cancelled
    TABLES
      parameters     = params
    EXCEPTIONS
      error_in_text  = 01
      text_not_found = 02.

ENQUEUE_EVMP_PLNSCP_HDR
  CALL FUNCTION 'ENQUEUE_EVMP_PLNSCP_HDR'
    EXPORTING
      mode_vmp_plnscp_hdr = 'S'
      mandt               = sy-mandt
      documentid          = is_plnscp_id-documentid
      plan_scope_alt      = is_plnscp_id-plan_scope_alt
*     X_DOCUMENTID        = ' '
*     X_PLAN_SCOPE_ALT    = ' '
*     _SCOPE              = '2'
*     _WAIT               = ' '
*     _COLLECT            = ' '
    EXCEPTIONS
      foreign_lock        = 1
      system_failure      = 2
      OTHERS              = 3.

ENQUEUE_EVMP_PLNSCP_MBOM
  CALL FUNCTION 'ENQUEUE_EVMP_PLNSCP_MBOM'
    EXPORTING
      mode_vmp_plnscp_mbom = 'S'
      mandt                = sy-mandt
      documentid           = is_plnscp_id-documentid
      plnscp_alt           = is_plnscp_id-plan_scope_alt
*     PLNSCP_ITEM_CNT      =
*     X_DOCUMENTID         = ' '
*     X_PLNSCP_ALT         = ' '
*     X_PLNSCP_ITEM_CNT    = ' '
*     _SCOPE               = '2'
*     _WAIT                = ' '
*     _COLLECT             = ' '
    EXCEPTIONS
      foreign_lock         = 1
      system_failure       = 2
      OTHERS               = 3.

DEQUEUE_EVMP_PLNSCP_HDR
  CALL FUNCTION 'DEQUEUE_EVMP_PLNSCP_HDR'
    EXPORTING
      mode_vmp_plnscp_hdr = 'E'    " Lock mode for table VMP_PLNSCP_HDR
      mandt               = sy-mandt    " 01th enqueue argument
      documentid          = is_plnscp_id-documentid    " 02th enqueue argument
      plan_scope_alt      = is_plnscp_id-plan_scope_alt    " 03th enqueue argument
*     x_documentid        = SPACE    " Fill argument 02 with initial value?
*     x_plan_scope_alt    = SPACE    " Fill argument 03 with initial value?
*     _scope              = '3'
*     _synchron           = SPACE    " Synchonous unlock
*     _collect            = ' '    " Initially only collect lock
    .

DEQUEUE_EVMP_PLNSCP_MBOM
  CALL FUNCTION 'DEQUEUE_EVMP_PLNSCP_MBOM'
    EXPORTING
      mode_vmp_plnscp_mbom = 'E'    " Lock mode for table VMP_PLNSCP_MBOM
      mandt                = sy-mandt    " 01th enqueue argument
      documentid           = is_plnscp_id-documentid    " 02th enqueue argument
      plnscp_alt           = is_plnscp_id-plan_scope_alt    " 03th enqueue argument
*     plnscp_item_cnt      =     " 04th enqueue argument
*     x_documentid         = SPACE    " Fill argument 02 with initial value?
*     x_plnscp_alt         = SPACE    " Fill argument 03 with initial value?
*     x_plnscp_item_cnt    = SPACE    " Fill argument 04 with initial value?
*     _scope               = '3'
*     _synchron            = SPACE    " Synchonous unlock
*     _collect             = ' '    " Initially only collect lock
    .

GET_DYNP_VALUE
  CALL FUNCTION 'GET_DYNP_VALUE'
    EXPORTING
      i_field = 'PS_DETAILS-MATNR'
      i_repid = sy-repid
      i_dynnr = '0600'
*     i_conv_input = 'X'
*     i_conv_output = 'MATN1'
    CHANGING
      o_value = ps_details-matnr.

CONVERSION_EXIT_MATN1_INPUT
  CALL FUNCTION 'CONVERSION_EXIT_MATN1_INPUT'
    EXPORTING
      input  = ps_details-matnr
    IMPORTING
      output = ps_details-matnr.

GET_DYNP_VALUE
  CALL FUNCTION 'GET_DYNP_VALUE'
    EXPORTING
      i_field = 'PS_DETAILS-STLAN'
      i_repid = sy-repid
      i_dynnr = '0600'
*     I_CONV_INPUT  = ' '
*     I_CONV_OUTPUT = ' '
    CHANGING
      o_value = ps_details-stlan.

GET_DYNP_VALUE
  CALL FUNCTION 'GET_DYNP_VALUE'
    EXPORTING
      i_field = 'PS_DETAILS-WERKS'
      i_repid = sy-repid
      i_dynnr = '0600'
*     I_CONV_INPUT  = ' '
*     I_CONV_OUTPUT = ' '
    CHANGING
      o_value = ps_details-werks.

GET_DYNP_VALUE
  CALL FUNCTION 'GET_DYNP_VALUE'
    EXPORTING
      i_field = 'PS_DETAILS-AENNR'
      i_repid = sy-repid
      i_dynnr = '0600'
*     i_conv_input = 'X'
*     i_conv_output = 'AENNR'
    CHANGING
      o_value = gv_aennr.

CONVERSION_EXIT_AENNR_INPUT
  CALL FUNCTION 'CONVERSION_EXIT_AENNR_INPUT'
    EXPORTING
      input  = gv_aennr
    IMPORTING
      output = gv_aennr.




GET_DYNP_VALUE
  CALL FUNCTION 'GET_DYNP_VALUE'
    EXPORTING
      i_field = 'PS_DETAILS-RFCDEST'
      i_repid = sy-repid
      i_dynnr = '0600'
*     I_CONV_INPUT  = ' '
*     I_CONV_OUTPUT = ' '
    CHANGING
      o_value = ps_details-rfcdest.

VMP_LOAD_MBOMS
    CALL FUNCTION 'VMP_LOAD_MBOMS' DESTINATION ps_details-rfcdest
      EXPORTING
        it_mbom_id       = lt_mbom_input
*       IV_VALID_FROM    =
        iv_change_number = gv_aennr
      IMPORTING
        et_bom_ident     = lt_mbom_ident
        es_message       = ls_message.

VMP_LOAD_MBOMS
    CALL FUNCTION 'VMP_LOAD_MBOMS'
      EXPORTING
        it_mbom_id       = lt_mbom_input
*       IV_VALID_FROM    =
        iv_change_number = gv_aennr
      IMPORTING
        et_bom_ident     = lt_mbom_ident
        es_message       = ls_message.

DDIF_FIELDINFO_GET
  CALL FUNCTION 'DDIF_FIELDINFO_GET'
    EXPORTING
      tabname        = 'VMP_S_MBOM_ID'
*     FIELDNAME      = ' '
*     LANGU          = SY-LANGU
*     LFIELDNAME     = ' '
*     ALL_TYPES      = ' '
*     GROUP_NAMES    = ' '
*   IMPORTING
*     X030L_WA       =
*     DDOBJTYPE      =
*     DFIES_WA       =
*     LINES_DESCR    =
    TABLES
      dfies_tab      = lt_field_tab
*     FIXED_VALUES   =
    EXCEPTIONS
      not_found      = 1
      internal_error = 2
      OTHERS         = 3.

F4IF_INT_TABLE_VALUE_REQUEST
  CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      retfield        = 'ALTERNATE'
      value_org       = 'S'
      display         = abap_false
    TABLES
      field_tab       = lt_field_tab
      value_tab       = lt_mbom_id
      return_tab      = lt_return
    EXCEPTIONS
      parameter_error = 1
      no_values_found = 2
      OTHERS          = 3.

CONVERSION_EXIT_ALPHA_INPUT
  CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
    EXPORTING
      input  = ps_details-stlal
    IMPORTING
      output = ps_details-stlal.


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


   
 

VMP_P_COCKPIT_F01 - Include VMP_P_COCKPIT_F01
VMP_P_COCKPIT_E01 - Include VMP_P_COCKPIT_E01
VMP_P_COCKPIT - Program VMP_P_COCKPIT
VMP_P_COCKPIT - Program VMP_P_COCKPIT
VMP_EVENT_HANDLER - Include VMP_EVENT_HANDLER
VMITTYPES - documentation and ABAP source code