SAP ABAP IMG Activity MILL_CLMMBE_ADDIN1 (Business Add-In: Enhance Stock Overview By Characteristics)
Hierarchy
ECC-DIMP (Software Component) DIMP
   IS-MP (Application Component) Mill Products Industry Solution
     MILL_CUST (Package) Customizing for IS Mill Products
IMG Activity
ID MILL_CLMMBE_ADDIN1 Business Add-In: Enhance Stock Overview By Characteristics  
Transaction Code S_KA5_12001415   (empty) 
Created on 20030113    
Customizing Attributes    
Customizing Activity MILL_CLMMBE_ADDIN1   Enhance Stock Overview By Characteristics 
Document
Document Class SIMG   Hypertext: Object Class - Class to which a document belongs.
Document Name MILL_CLMMBE_ADDIN1    

Description

This business add-in contains the following methods:

  • ADDIN_SET_LISTTYPE

    This method tells the instance whether the user has chosen to
    display the object list or the stock overview.
    Implement the method exactly as specified in the example. This way, within the instance the list type is available in every method.
  • ADDIN_DEACTIVATE_FCODES

    With this method, you can deactivate the indivdiual function codes. The relevant pushbuttons then no longer appear in the result list. For example, you can deactivate the add-in pushbuttons for the object list list type.

  • ADDIN_METHOD1 - ADDIN_METHOD3

    These methods are called up from the stock overview if the respective add-in pushbutton is triggered.

  • ADDIN_METHOD4 - ADDIN_METHOD6

    These methods are called up from the object list if the respective add-in pushbuttons are triggered.

    If you implement FCodes:

    • Activate implementation first.
    • Then activate the GUI status STANDARD for program MILL_CLMMBE.

      The second step is no longer necessary as of Release 4.6C.

Examples

Example for ADDIN_SET_LISTTYPE:

* The Add-in is notified whether this is the object search

* or stock overview.

method IF_EX_MILL_CLMMBE_ADDIN1~ADDIN_SET_LISTTYPE.

IF_EX_MILL_CLMMBE_ADDIN1~L_LISTTYPE = I_LISTTYPE.

endmethod.

Example for ADDIN_METHOD1:

* Access Material Documents for Material

method IF_EX_MILL_CLMMBE_ADDIN1~ADDIN_METHOD1.

* Local data

Data: LS_CBE_EXT TYPE MILLC_STOCK_TABLE_ITEM,

L_BWART TYPE RM07M-BWART.

READ TABLE CT_CBE_EXT INTO LS_CBE_EXT

WITH KEY BOX = 'X'.

IF NOT LS_CBE_EXT-CHARG IS INITIAL AND SY-SUBRC EQ 0.

SET PARAMETER ID 'MAT' FIELD LS_CBE_EXT-MATNR.

SET PARAMETER ID 'WRK' FIELD LS_CBE_EXT-WERKS.

SET PARAMETER ID 'CHA' FIELD LS_CBE_EXT-CHARG.

SET PARAMETER ID 'LGO' FIELD LS_CBE_EXT-LGORT.

SET PARAMETER ID 'BWA' FIELD L_BWART.

CALL TRANSACTION 'MB51' AND SKIP FIRST SCREEN.

ENDIF.

endmethod.

Example for ADDIN_METHOD3:

* Refresh Results List

method IF_EX_MILL_CLMMBE_ADDIN1~ADDIN_METHOD3.

* Local data

DATA: LT_CLOBJ2 TYPE standard table of millc_objectlist_item,

LT_MMBEKEY TYPE standard table of MILLC_MMBEKEY_ITEM,

LS_HEADER TYPE MILLC_HEADER_TABLE_ITEM,

X TYPE c value 'X'.

FIELD-SYMBOLS: <LS_CBE_EXT> TYPE MILLC_STOCK_TABLE_ITEM.

PERFORM SELECT_OBJECTS IN PROGRAM MILL_CLMMBE

TABLES

CT_SELECTION

CT_CLASSES

CT_SELFEATURES

CT_OBTAB

CT_MATNR

CT_WERKS

CT_CHARG

LT_CLOBJ2

USING

I_KLART

I_MAX.

* Split object list into key fields needed for MMBE

PERFORM SPLIT_CLOBJ IN PROGRAM MILL_CLMMBE TABLES LT_CLOBJ2

LT_MMBEKEY.

* Fill communication structure with control information

REFRESH CT_CBE_EXT.

* Read MMBE with key

perform read_mmbe in program MILL_CLMMBE tables lt_mmbekey

ct_cbe_ext

using IS_OPTIONS.

* Insert shorttexts

if IS_OPTIONS-SHORTTEXTS eq x.

perform get_shorttexts in program MILL_CLMMBE

tables ct_cbe_ext.

endif.

* Insert characteristic values

if IS_OPTIONS-CHARVALUES eq x.

perform get_values in program MILL_CLMMBE tables CT_chars

IT_CABNT

ct_cbe_ext

using I_KLART.

endif.

* Insert original batches

if IS_OPTIONS-ORIGBATCH eq x.

perform GET_ORIGBATCHES in program MILL_CLMMBE

tables ct_cbe_ext.

endif.

LOOP AT CT_CBE_EXT ASSIGNING <LS_CBE_EXT>.

* Set icon for hotspot exit to MMBE in list

<LS_CBE_EXT>-MMBEICON = '@3Q@'.

MODIFY CT_CBE_EXT FROM <LS_CBE_EXT>.

* Fill headertab

CHECK LS_HEADER-MATNR NE <LS_CBE_EXT>-MATNR OR

LS_HEADER-WERKS NE <LS_CBE_EXT>-WERKS OR

LS_HEADER-LGORT NE <LS_CBE_EXT>-LGORT.

LS_HEADER-MATNR = <LS_CBE_EXT>-MATNR.

LS_HEADER-MAKTX = <LS_CBE_EXT>-MAKTX.

LS_HEADER-WERKS = <LS_CBE_EXT>-WERKS.

LS_HEADER-NAME1 = <LS_CBE_EXT>-NAME1.

LS_HEADER-MD04ICON = '@3W@'.

LS_HEADER-MM03ICON = '@A6@'.

LS_HEADER-LGORT = <LS_CBE_EXT>-LGORT.

APPEND LS_HEADER TO CT_HEADER.

ENDLOOP.

IS_SELFIELD-REFRESH = X.

UNASSIGN <LS_CBE_EXT>.

endmethod.

Example for method ADDIN_DEACTIVATE_FCODES

method IF_EX_MILL_CLMMBE_ADDIN1~ADDIN_DEACTIVATE_FCODES.

* Local data

DATA LS_EXTAB TYPE SLIS_EXTAB.

* Deactivate second Fcode for stocklist

IF IF_EX_MILL_CLMMBE_ADDIN1~L_LISTTYPE EQ

IF_EX_MILL_CLMMBE_ADDIN1~C_LISTTYPE_STOCKLIST.

LS_EXTAB-FCODE = '+CF2'.

APPEND LS_EXTAB TO ET_EXTAB.

ELSE.

* Deactivate all Fcodes

LS_EXTAB-FCODE = '+CF1'.

APPEND LS_EXTAB TO ET_EXTAB.

LS_EXTAB-FCODE = '+CF2'.

APPEND LS_EXTAB TO ET_EXTAB.

LS_EXTAB-FCODE = '+CF3'.

APPEND LS_EXTAB TO ET_EXTAB.

ENDIF.

endmethod.

Business Attributes
ASAP Roadmap ID    
Mandatory / Optional    
Critical / Non-Critical    
Country-Dependency    
Maintenance Objects
Maintenance object type E   Business Add-In - Definition 
History
Last changed by/on SAP  20030113 
SAP Release Created in 471