CMOD Enhancement - RSAP0001
Add new fields to Extract structure.
Run RSA6 to 'unhide' new fields.
FUNCTION EXIT_SAPLRSAP_001.
*"----------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*" IMPORTING
*" VALUE(I_DATASOURCE) TYPE RSAOT_OLTPSOURCE
*" VALUE(I_ISOURCE) TYPE SBIWA_S_INTERFACE-ISOURCE
*" VALUE(I_UPDMODE) TYPE SBIWA_S_INTERFACE-UPDMODE
*" TABLES
*" I_T_SELECT TYPE SBIWA_T_SELECT
*" I_T_FIELDS TYPE SBIWA_T_FIELDS
*" C_T_DATA
*" C_T_MESSAGES STRUCTURE BALMI OPTIONAL
*" EXCEPTIONS
*" RSAP_CUSTOMER_EXIT_ERROR
*"----------------------------------------------------------------------
INCLUDE ZXRSAU01.
ENDFUNCTION.
*&---------------------------------------------------------------------*
*& Include ZXRSAU01 *
*&---------------------------------------------------------------------*
* Written by Sheila Titchener - www.iconet-ltd.co.uk - Oct 2005
*&---------------------------------------------------------------------*
DATA: l_s_mc13vd0itm LIKE mc13vd0itm, " extract structure
l_tabix LIKE sy-tabix,
l_knumv TYPE knumv.
data: t_konv type table of konv.
data: w_konv type konv.
CASE i_datasource.
*/ in bw 1.2b case i_isource.
WHEN '2LIS_13_VDITM'.
LOOP AT c_t_data INTO l_s_mc13vd0itm.
l_tabix = sy-tabix.
SELECT SINGLE knumv FROM vbrk
INTO l_knumv
WHERE vbeln = l_s_mc13vd0itm-vbeln.
IF sy-subrc = 0.
SELECT * FROM konv INTO TABLE t_konv
WHERE knumv = L_knumv
AND kposn = l_s_mc13vd0itm-posnr.
LOOP AT t_konv INTO w_konv.
CASE w_konv-kschl.
WHEN 'PR00'.
l_s_mc13vd0itm-kschl1 = w_konv-kschl.
l_s_mc13vd0itm-kwert1 = w_konv-kwert.
WHEN 'ZELE'.
l_s_mc13vd0itm-kschl2 = w_konv-kschl.
l_s_mc13vd0itm-kwert2 = w_konv-kwert.
WHEN 'SKTV'.
l_s_mc13vd0itm-kschl3 = w_konv-kschl.
l_s_mc13vd0itm-kwert3 = w_konv-kwert.
WHEN 'VPRS'.
l_s_mc13vd0itm-kschl4 = w_konv-kschl.
l_s_mc13vd0itm-kwert4 = w_konv-kwert.
WHEN 'ZCST'.
l_s_mc13vd0itm-kschl5 = w_konv-kschl.
l_s_mc13vd0itm-kwert5 = w_konv-kwert.
WHEN 'ZSUR'.
l_s_mc13vd0itm-kschl6 = w_konv-kschl.
l_s_mc13vd0itm-kwert6 = w_konv-kwert.
WHEN 'ZSTD'.
l_s_mc13vd0itm-kschl7 = w_konv-kschl.
l_s_mc13vd0itm-kwert7 = w_konv-kwert.
ENDCASE.
ENDLOOP.
ENDIF.
Modify c_t_data from l_s_mc13vd0itm index l_tabix.
ENDLOOP.
WHEN OTHERS.
EXIT.
ENDCASE.
Tuesday, May 6, 2008
Sample ABAP Program of BW User Exit
Labels:
Sample ABAP Code Programs
Subscribe to:
Post Comments (Atom)
Blog Archive
-
▼
2008
(300)
-
▼
May
(80)
- Object oriented programming (OOP) All Steps
- Object oriented programming (OOP) Step2
- Object oriented programming (OOP) Step-by-step
- Object oriented programming (OOP) explained with a...
- Interview Question on BAPI, RFC, ABAP Objects, Tables
- The Other 50 ABAP Interview Faq's
- More than 100 ABAP Interview Faq's
- Events in Report
- Example: The IDoc Type ORDERS01
- Program for Outbound IDOC
- Basic Configuration in IDOC
- Sample ABAP Program to Upload table using new func...
- Sample ABAP Program for Submitting report with sel...
- Sample ABAP Program for Submitting report with sel...
- Sample ABAP Program for Sending SAP Mail
- Sample ABAP Program for Search Layout sets for giv...
- Sample ABAP Program for Sapscript PerForm Module
- Sample ABAP Program for Create IDOC
- Sample ABAP Program for Output file to application...
- Sample ABAP Program for Module Pool Skeleton
- Sample ABAP Program for Module Pool containing scr...
- Sample ABAP Program for MB1B Call Transaction
- Sample ABAP Program of Function Module to Convert ...
- Sample ABAP Program of FTP Function Module
- Sample ABAP Program to EXPORT LIST TO MEMORY
- Sample ABAP Program to Execute Unix command from w...
- Sample ABAP Program to Get Output in EXCEL
- Sample ABAP Program to Implement EDI
- Sample Program to dynamically change upload/downlo...
- Sample ABAP Program to download table using new fu...
- Sample ABAP Program to Download file to Presentati...
- Sample ABAP Program to display pop message to avoi...
- Sample ABAP Program of ALV Grid
- Sample ABAP Program of Dialogue Module Pool
- Sample ABAP Program to DIALOGUE FLOW LOGIC
- Sample ABAP Program to Delete a file from the appl...
- Sample ABAP Program to Compare to Unix or PC files...
- Sample ABAP Program to Colour cells in ALV
- Sample ABAP Program to Calculate difference betwee...
- Sample ABAP Program of BW User Exit
- Sample SAP ABAP Program to Browse a file on the ap...
- Sample SAP ABAP Program of ALV Grid control using ...
- SE30 - Runtime Analysis Tool
- List of System fields
- Write a report that displays the text 'Hello world...
- HR (Human Resource) Tutorials Free downloads
- FI (Financial) Tutorials Free downloads
- PM (Plant Maintenance) Tutorials Free downloads
- WM (Warehouse Management) Tutorials Free downloads
- QM (Quality Management) Tutorials Free downloads
- PP (Production Planning) Tutorials Free downloads
- SD (Sales and Distribution) Tutorials Free downloads
- MM (Material Management) Tutorials Free downloads
- IDOC INTRODUCTION & STRUCTURE
- Step-by-Step Guide for using LSMW to Update Custom...
- LIST of TABLES
- Transporting Objects and Standard Text from one cl...
- SAP R/3 INTERVIEW ARCHITECTURE QUESTIONS
- SAP TRANSACTIONS INTERVIEW QUESTIONS
- SAP MODULARIZATION INTERVIEW QUESTIONS
- SAP LOGICAL DATABASE INTERVIEW QUESTIONS
- SAP R/3 DATA DICTIONARY INTERVIEW QUESTIONS
- SAP BDC INTERVIEW QUESTIONS & ANSWERS
- SAP ABAP MENU PAINTER & SCREEN PAINTER Tutorials
- SAP ABAP WORKFLOW Tutorials PDF Free downloads
- SAP ABAP ITS Tutorials PDF Free downloads
- SAP ABAP EDI Tutorials PDF Free downloads
- SAP ABAP BAPI Tutorials PDF Free downloads
- SAP ABAP Change&Transport System Tutorials PDF Fre...
- SAP ABAP OBJECTS Tutorials PDF Free downloads
- SAP ABAP USER EXITS Tutorials PDF Free downloads
- SAP ABAP ALE Tutorials PDF Free downloads
- SAP ABAP IDOC Tutorials PDF Free downloads
- SAP ABAP LSMW Tutorials PDF Free downloads
- SAP ABAP BDC (Batch Data Communication) Tutorials ...
- SAP ABAP SAPSCRIPTS Tutorials Free downloads
- ALV Grid free download
- SAP ABAP INTERACTIVE REPORTING FAQs
- SAP ABAP REPORTING GENERAL
- SAP REPORTS FAQ
-
▼
May
(80)
No comments:
Post a Comment