Hierarchy

⤷

⤷

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 |