Problem in code of exit to derive a variabble value in BW query

Hi All,
In BW query for balance sheet related, i am using customer exit to get the previous cycle value based on the current planning cycle along with the current cycle. I have done some coding in my project enhancment in enhancement RSR00001. Its returning back the previous cycle period but when i run my query its not giving amount details for previous cycle , it just giving blank cycle.
Please help me to know how get amount details for the previous cycle along with current cycle.
Thanks in advance.
Regards,
Vishal

Thanks for ur reply,
Yes, amount data is available in cube for the previous cycle. Below is my code.
data : T_cycle type i,
       i_cycle(2) type c.
DATA: L_S_RANGE TYPE RSR_S_RANGESID,
       LOC_VAR_RANGE type RRRANGEEXIT.
statics : flag type i value 0.
*read table I_T_VAR_RANGE with key low = '10' into T_T_VAR_RANGE.
CASE I_VNAM.
WHEN 'ZECYCLE1'.
   IF I_STEP = 2.
     loop at i_t_var_range into loc_var_range where vnam = 'ZPCYCLE1'.
        clear L_S_RANGE.
        IF loc_var_range-low = 1.
           L_S_RANGE-low = 12.
           flag = 1.
        else.
           T_cycle = loc_var_range-low.
           t_cycle = t_cycle - 1.
           i_cycle = t_cycle.
           L_S_RANGE-low = i_cycle.
        endif.
           L_S_RANGE-high = loc_var_range-low.
           L_S_RANGE-sign = 'I'.
           L_S_RANGE-opt = 'EQ'.
           append L_S_RANGE to E_T_RANGE.
           exit.
     endloop.
   endif.
when 'ZEPRYEAR'.
   IF I_STEP = 2.
     loop at i_t_var_range into loc_var_range where vnam = '0P_FYEAR'.
        clear L_S_RANGE.
        IF flag = 1.
           t_cycle = loc_var_range-low.
           t_cycle = t_cycle - 1.
           i_cycle = t_cycle.
           L_S_RANGE-low = i_cycle.
           L_S_RANGE-high = loc_var_range-low.
           L_S_RANGE-sign = 'I'.
           L_S_RANGE-opt = 'BT'.
        else.
           L_S_RANGE-low = loc_var_range-low.
           L_S_RANGE-high = loc_var_range-high.
           L_S_RANGE-sign = 'I'.
           L_S_RANGE-opt = 'EQ'.
        endif.
           append L_S_RANGE to E_T_RANGE.
           exit.
     endloop.
   ENDIF.
ENDCASE.

Similar Messages

  • User Exit to derive characterstics values of COPA

    Hi
    I Am posting an FI document using the standard program rfbibl00 or through FB01.
    I have to post data to the PA segements too .
    But the problem is that i need to derive the value of Brand based upon the value to Profit centre.
    Can you help if ther is any user exit hat will be triggered where i can put in this code to derive the brand.
    Thanks
    Nikhil

    Hi,
      The follwoing user exits are available:
    Exit Name           Description
    F050S001            FIDCMT, FIDCC1, FIDCC2: Edit user-defined IDoc segment
    F050S002            FIDCC1: Change IDoc/do not send
    F050S003            FIDCC2: Change IDoc/do not send
    F050S004            FIDCMT, FIDCC1, FIDCC2: Change outbound IDoc/do not send
    F050S005            FIDCMT, FIDCC1, FIDCC2 Inbound IDoc: Change FI document
    F050S006            FI Outgoing IDoc: Reset Clearing in FI Document
    F050S007            FIDCCH Outbound: Influence on IDoc for Document Change
    F180A001            Balance Sheet Adjustment
    FARC0002            Additional Checks for Archiving MM Vendor Master Data
    RFAVIS01            Customer Exit for Changing Payment Advice Segment Text
    RFEPOS00            Line item display: Checking of selection conditions
    RFKORIEX            Automatic correspondence
    SAPLF051            Workflow for FI (pre-capture, release for payment)
    regards
    Aveek

  • Customer Exit for Deriving Current Fiscal Period, Period+1 and Period+2

    Hi all,
    I have created three customer exit variables in my query for custom info object ZFISCPER (Fiscal Year PEriod), Fiscal 1, Fiscal 2 and Fiscal 3. I want to write a customer exit to derive the current period, current 1 and current2 period's respectively for these variables based on the system date. The format of the period is YYYY0MM ( 2009004). Could someone give me the exact code i can plug in CMOD for these
    Thanks a lot
    Rashmi.

    Hi Rashmi,
    I think you need only one customer exit variable. Other can be derived by setting an offset to current Fiscal Period.
    Check the BI content variable for current fiscal period. Use this variable with an offset for derving the other periods (e.g. SAP Exit variables (0FPER, 0FYTCFP, 0FYTLFP). So you have to write no own code...
    Other option is to check how SAP exit is working and building own variable based on this code.
    Check the following link to get information how to do this:
    Reg Variable 0FYTCFP
    Regards
    Andreas

  • Launch error code: -2857 Exited with error code: 215

    Anybody have any idea what:
    "Launch error code: -2857 Exited with error code: 215"
    means when launching an app? Tries to launch, then quit. That shows up in the Console.
    Thanks.

    First I want to say thanks for the feedback. I appreciate the support and helpful suggestions.
    Second, Epson sent me an answer of sorts...they provided detailed instructions on uninstalling the application and then told me to reinstall using the disk image from their web site (in other words, don't use their web package to "update" and existing installation). I did this and things seem to be running fine now. It's unfortunate that their update instructions don't say to do this in the first place (maybe I missed it ).
    So at one level this issue is solved. Unfortunately I'm too curious and wanted to know why the error happend in the first place. As a software developer myself (mainframe and midrange server based) I hate the "delete and reinstall" answer as it does nothing to really identify and solve the real problem. But I do also appreciate the idea of "just get it fixed fast" so that's what I did.
    Anyway, I will now spend some time learning about Launch Services to see if I can get a more specific understanding of what happened.
    Thanks again for the help.
    24" iMac, 2GB Memory, etc   Mac OS X (10.4.8)   20" iMac, two MacBooks, one Dual Core Mac Mini

  • HT1339 ipod not recognized by my computer, it says "Windows has stopped this device because it has reported problems. (Code 43)" please help

    please help...
    my computer is not recognizing my ipod classic gen 5. it shows the sad face then i did the basic troubleshooting until logo comes out...
    still my computer is not recognizing my ipod.. it still says "Windows has stopped this device because it has reported problems. (Code 43)"

    See here: iPod displays a sad iPod icon
    Note that it's often a good sign of a hardware issue with the iPod's hard drive meaning the iPod will need to be serviced or replaced.
    B-rock

  • Is anyone else having email problems such as apps exiting in the middle of an email? It may be a wireless issue. I use First Class for work and yahoo email for personal. I will be in the middle of typing a long email and the app just quits, all data lost.

    Is anyone else having email problems such as apps exiting in the middle of an email? It may be a wireless issue. I use First Class for work and yahoo email for personal. I will be in the middle of typing a long email and the app just quits, all data lost.

    Have you tried restarting or resetting your iPad?
    Restart: Press On/Off button until the Slide to Power Off slider appears, select Slide to Power Off and, after the iPad shuts down, then press the On/Off button until the Apple logo appears.
    Reset: Press the Home and On/Off buttons at the same time and hold them until the Apple logo appears (about 10 seconds). Ignore the "Slide to power off"

  • Problem in code with Google Translate

    hi
    i have Problem in code with Google Translate
    Imports Google.API.Translate.Language
    Imports Google.API.Translate
    Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim text As String = "hello"
    Dim tr As New TranslateClient("https://translate.google.com")
    Dim xx As String = tr.Translate(text, Language.English, Language.French, Google.API.Translate.TranslateFormat.Text)
    MsgBox(xx)
    End Sub
    End Class
    All things good but it shows an error in the second line

    For assistance with Google API's contact Google.
    La vida loca

  • Problem in code.it is urgent.

    problem in code.it is urgent.
    i want to display all po,s with all grs from requistion up to inspection. if for a po gr not happend or inspection not happend it must also display leaving blank for that po. actual flow is pur.reqpur.ordergoods receipt---quality inspection. once u copy this code and execute it. u will get better idea.
    regards!
    prasad.
    REPORT Z_MM_REQDETAILS1.
    TABLES: EKKO, EKPO, MSEG, QALS, EBAN, MKPF, MAKT.
    TYPE-POOLS: SLIS.
    SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME.
    SELECT-OPTIONS: SBADAT FOR EBAN-BADAT,
    SLIFNR FOR EKKO-LIFNR,
    SEBELN FOR EKKO-EBELN,
    SBEDAT FOR EKKO-BEDAT,
    SBSART FOR EKKO-BSART,
    SMATNR FOR EKPO-MATNR,
    SBUDAT FOR MKPF-BUDAT.
    SELECTION-SCREEN END OF BLOCK B1.
    DATA: BEGIN OF EBAN_TAB OCCURS 0,
    BANFN LIKE EBAN-BANFN,
    BADAT LIKE EBAN-BADAT,
    MENGE LIKE EBAN-MENGE,
    EBELN LIKE EBAN-EBELN,
    AFNAM LIKE EBAN-AFNAM,
    END OF EBAN_TAB.
    DATA: BEGIN OF EKKO_TAB OCCURS 0,
    BSART LIKE EKKO-BSART,
    EBELN LIKE EKKO-EBELN,
    LIFNR LIKE EKKO-LIFNR,
    BEDAT LIKE EKKO-BEDAT,
    END OF EKKO_TAB.
    DATA: BEGIN OF EKPO_TAB OCCURS 0,
    EBELN LIKE EKPO-EBELN,
    MENGE LIKE EKPO-MENGE,
    MATNR LIKE EKPO-MATNR,
    BANFN LIKE EKPO-BANFN,
    EBELP LIKE EKPO-EBELP,
    END OF EKPO_TAB.
    DATA: BEGIN OF MSEG_TAB OCCURS 0,
    EBELN LIKE MSEG-EBELN,
    MBLNR LIKE MSEG-MBLNR,
    MATNR LIKE MSEG-MATNR,
    MENGE LIKE MSEG-MENGE,
    EBELP LIKE MSEG-EBELP,
    END OF MSEG_TAB.
    DATA: BEGIN OF MSEG_TAB1 OCCURS 0,
    MBLNR LIKE MSEG-MBLNR,
    EBELN LIKE MSEG-EBELN,
    END OF MSEG_TAB1.
    DATA: BEGIN OF QALS_TAB OCCURS 0,
    LMENGE01 LIKE QALS-LMENGE01,
    LMENGE07 LIKE QALS-LMENGE07,
    MATNR LIKE QALS-MATNR,
    MBLNR LIKE QALS-MBLNR,
    EBELN LIKE QALS-EBELN,
    EBELP LIKE QALS-EBELP,
    END OF QALS_TAB.
    DATA: BEGIN OF MKPF_TAB OCCURS 0,
    MBLNR LIKE MKPF-MBLNR,
    BUDAT LIKE MKPF-BUDAT,
    END OF MKPF_TAB.
    DATA: BEGIN OF MAKT_TAB OCCURS 0,
    MATNR LIKE MAKT-MATNR,
    MAKTX LIKE MAKT-MAKTX,
    END OF MAKT_TAB.
    DATA: BEGIN OF SELTAB OCCURS 0,
    EBELN LIKE EKKO-EBELN,
    BLDAT LIKE MKPF-BLDAT,
    END OF SELTAB.
    *DATA: BEGIN OF SELTAB1 OCCURS 0,
    BUDAT LIKE MKPF-BUDAT,
    END OF SELTAB1.
    DATA: REPID LIKE SY-REPID.
    DATA: F_OUTPUT1 TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE.
    DATA: IT_SORT TYPE SLIS_T_SORTINFO_ALV WITH HEADER LINE.
    DATA: REMARKS(40) TYPE C.
    DATA: BEGIN OF OUTPUT OCCURS 0,
    BANFN LIKE EBAN-BANFN,
    BADAT LIKE EBAN-BADAT,
    RMENGE LIKE EBAN-MENGE,
    AFNAM LIKE EBAN-AFNAM,
    BSART LIKE EKKO-BSART,
    EBELN LIKE EKKO-EBELN,
    LIFNR LIKE EKKO-LIFNR,
    BEDAT LIKE EKKO-BEDAT,
    PMENGE LIKE EKPO-MENGE,
    MATNR LIKE EKPO-MATNR,
    EBELP LIKE EKPO-EBELP,
    MBLNR LIKE MSEG-MBLNR,
    GMENGE LIKE MSEG-MENGE,
    LMENGE01 LIKE QALS-LMENGE01,
    LMENGE07 LIKE QALS-LMENGE07,
    BUDAT LIKE MKPF-BUDAT,
    MAKTX LIKE MAKT-MAKTX,
    REMARKS(40) TYPE C,
    SL_NO LIKE SY-TABIX,
    END OF OUTPUT.
    START-OF-SELECTION.
    IF SEBELN IS NOT INITIAL OR SLIFNR IS NOT INITIAL OR SBEDAT IS NOT INITIAL OR SBSART IS NOT INITIAL.
    SELECT EBELN
    BSART
    LIFNR
    BEDAT FROM EKKO INTO CORRESPONDING FIELDS OF TABLE EKKO_TAB WHERE EBELN IN SEBELN AND LIFNR IN SLIFNR AND BEDAT IN SBEDAT AND
    BSART IN SBSART.
    ELSEIF SBADAT IS NOT INITIAL.
    SELECT EBELN
    BANFN
    BADAT
    MENGE
    AFNAM FROM EBAN INTO CORRESPONDING FIELDS OF TABLE EBAN_TAB where BADAT IN SBADAT.
    SORT EBAN_TAB BY BADAT ASCENDING.
    select ebeln lifnr bedat bsart from ekko into corresponding fields of table ekko_tab for all entries in eban_tab where ebeln = eban_tab-ebeln.
    ELSEIF SMATNR IS NOT INITIAL.
    SELECT EBELN
    EBELP
    FROM EKPO INTO CORRESPONDING FIELDS OF TABLE SELTAB
    WHERE MATNR IN SMATNR.
    SORT SELTAB BY EBELN ASCENDING.
    DELETE ADJACENT DUPLICATES FROM SELTAB COMPARING EBELN.
    SELECT EBELN
    BSART
    BEDAT
    LIFNR FROM EKKO INTO CORRESPONDING FIELDS OF TABLE EKKO_TAB
    FOR ALL ENTRIES IN SELTAB WHERE EBELN = SELTAB-EBELN.
    ELSEIF SBUDAT IS NOT INITIAL.
    SELECT BUDAT
    MBLNR FROM MKPF INTO CORRESPONDING FIELDS OF TABLE MKPF_TAB WHERE
    BUDAT IN SBUDAT.
    sort mkpf_tab by budat ascending.
    SELECT EBELN FROM MSEG INTO CORRESPONDING FIELDS OF TABLE SELTAB FOR ALL ENTRIES IN
    MKPF_TAB WHERE MBLNR = MKPF_TAB-MBLNR.
    *SELECT EBELN
    FROM QALS INTO CORRESPONDING FIELDS OF TABLE SELTAB FOR ALL ENTRIES IN SELTAB WHERE EBELN = SELTAB-EBELN.
    SORT SELTAB BY EBELN ASCENDING.
    DELETE ADJACENT DUPLICATES FROM SELTAB COMPARING EBELN.
    SELECT EBELN
    BEDAT
    LIFNR
    BSART FROM EKKO INTO CORRESPONDING FIELDS OF TABLE EKKO_TAB
    FOR ALL ENTRIES IN SELTAB WHERE EBELN = SELTAB-EBELN.
    ENDIF.
    SELECT EBELN
    MENGE
    MATNR
    EBELP FROM EKPO INTO CORRESPONDING FIELDS OF TABLE EKPO_TAB FOR ALL ENTRIES IN EKKO_TAB WHERE EBELN = EKKO_TAB-EBELN AND
    MATNR IN SMATNR.
    SELECT EBELN
    BANFN
    BADAT
    MENGE
    AFNAM FROM EBAN INTO CORRESPONDING FIELDS OF TABLE EBAN_TAB FOR ALL ENTRIES IN EKKO_TAB WHERE EBELN = EKKO_TAB-EBELN AND
    BADAT IN SBADAT.
    SELECT EBELN
    MBLNR
    MATNR
    MENGE
    EBELP
    FROM MSEG INTO CORRESPONDING FIELDS OF TABLE MSEG_TAB FOR ALL ENTRIES IN EKPO_TAB WHERE EBELN = EKPO_TAB-EBELN AND
    MATNR = EKPO_TAB-MATNR AND
    EBELP = EKPO_TAB-EBELP AND
    BWART IN ('101','105').
    SELECT LMENGE01
    LMENGE07
    MATNR
    MBLNR
    EBELN FROM QALS INTO CORRESPONDING FIELDS OF TABLE QALS_TAB FOR ALL ENTRIES IN MSEG_TAB WHERE MBLNR = MSEG_TAB-MBLNR AND
    MATNR = MSEG_TAB-MATNR AND
    EBELN = MSEG_TAB-EBELN AND
    EBELP = MSEG_TAB-EBELP.
    SELECT MBLNR
    BUDAT FROM MKPF INTO CORRESPONDING FIELDS OF TABLE MKPF_TAB FOR ALL ENTRIES IN MSEG_TAB WHERE MBLNR = MSEG_TAB-MBLNR AND BUDAT
    IN SBUDAT.
    SELECT MATNR
    MAKTX FROM MAKT INTO CORRESPONDING FIELDS OF TABLE MAKT_TAB FOR ALL ENTRIES IN EKPO_TAB WHERE MATNR = EKPO_TAB-MATNR.
    *LOOP AT OUTPUT.
    **LOOP AT EKKO_TAB.
    **read table EKKO_TAB with key ebeln = output-ebeln.
    **if sy-subrc = 0.
    *READ TABLE EKPO_TAB WITH KEY EBELN = EKKO_TAB-EBELN.
    *IF SY-SUBRC = 0.
    *READ TABLE MSEG_TAB WITH KEY EBELN = EKPO_TAB-EBELN MATNR = EKPO_TAB-MATNR.
    *IF SY-SUBRC = 0.
    **READ TABLE QALS_TAB WITH KEY MBLNR = MSEG_TAB-MBLNR MATNR = MSEG_TAB-MATNR EBELN = MSEG_TAB-EBELN.
    **IF SY-SUBRC = 0.
              o OUTPUT-EBELN = EKKO_TAB-EBELN.
              o OUTPUT-BSART = EKKO_TAB-BSART.
              o OUTPUT-LIFNR = EKKO_TAB-LIFNR.
              o OUTPUT-BEDAT = EKKO_TAB-BEDAT.
    OUTPUT-PMENGE = EKPO_TAB-MENGE.
    OUTPUT-MATNR = EKPO_TAB-MATNR.
    OUTPUT-MBLNR = MSEG_TAB-MBLNR.
    OUTPUT-GMENGE = MSEG_TAB-MENGE.
              o OUTPUT-LMENGE01 = QALS_TAB-LMENGE01.
              o OUTPUT-LMENGE07 = QALS_TAB-LMENGE07.
    modify OUTPUT transporting pmenge matnr MBLNR GMENGE.
    **APPEND OUTPUT.
    *ENDIF.
    *ENDIF.
    *ENDLOOP.
    LOOP AT EKKO_TAB.
    LOOP AT EKPO_TAB WHERE EBELN = EKKO_TAB-EBELN.
    LOOP AT MSEG_TAB WHERE EBELN = OUTPUT-EBELN AND MATNR = output-MATNR AND EBELP = OUTPUT-EBELP.
    OUTPUT-EBELN = EKKO_TAB-EBELN.
    OUTPUT-BSART = EKKO_TAB-BSART.
    OUTPUT-LIFNR = EKKO_TAB-LIFNR.
    OUTPUT-BEDAT = EKKO_TAB-BEDAT.
    OUTPUT-PMENGE = EKPO_TAB-MENGE.
    OUTPUT-MATNR = EKPO_TAB-MATNR.
    OUTPUT-EBELP = EKPO_TAB-EBELP.
    APPEND OUTPUT.
    CLEAR OUTPUT.
    ENDLOOP.
    ENDLOOP.
    *LOOP AT OUTPUT.
    *LOOP AT EKPO_TAB WHERE EBELN = OUTPUT-EBELN.
    OUTPUT-PMENGE = EKPO_TAB-MENGE.
    OUTPUT-MATNR = EKPO_TAB-MATNR.
    OUTPUT-EBELP = EKPO_TAB-EBELP.
    *MODIFY OUTPUT TRANSPORTING PMENGE MATNR EBELP.
    *ENDLOOP.
    *ENDLOOP.
    LOOP AT OUTPUT.
    LOOP AT MSEG_TAB WHERE EBELN = OUTPUT-EBELN AND MATNR = OUTPUT-MATNR AND EBELP = OUTPUT-EBELP.
    *LOOP AT QALS_TAB WHERE MBLNR = MSEG_TAB-MBLNR AND MATNR = OUTPUT-MATNR AND EBELN = OUTPUT-EBELN AND EBELP = OUTPUT-EBELP.
    OUTPUT-MBLNR = MSEG_TAB-MBLNR.
    OUTPUT-GMENGE = MSEG_TAB-MENGE.
    OUTPUT-LMENGE01 = QALS_TAB-LMENGE01.
    OUTPUT-LMENGE07 = QALS_TAB-LMENGE07.
    OUTPUT-EBELP = QALS_TAB-EBELP.
    *APPEND OUTPUT.
    MODIFY OUTPUT TRANSPORTING MBLNR GMENGE.
    *CLEAR OUTPUT.
    *CLEAR MSEG_TAB.
    ENDLOOP.
    ENDLOOP.
    *ENDLOOP.
    LOOP AT OUTPUT.
    LOOP AT QALS_TAB WHERE MBLNR = OUTPUT-MBLNR AND MATNR = OUTPUT-MATNR AND EBELN = OUTPUT-EBELN.
    OUTPUT-LMENGE01 = QALS_TAB-LMENGE01.
    OUTPUT-LMENGE07 = QALS_TAB-LMENGE07.
    OUTPUT-EBELP = QALS_TAB-EBELP.
    MODIFY OUTPUT TRANSPORTING LMENGE01 LMENGE07.
    ENDLOOP.
    ENDLOOP.
    LOOP AT OUTPUT.
    LOOP AT EBAN_TAB WHERE EBELN = OUTPUT-EBELN.
    OUTPUT-BANFN = EBAN_TAB-BANFN.
    OUTPUT-BADAT = EBAN_TAB-BADAT.
    OUTPUT-RMENGE = EBAN_TAB-MENGE.
    OUTPUT-AFNAM = EBAN_TAB-AFNAM.
    MODIFY OUTPUT TRANSPORTING BANFN BADAT RMENGE AFNAM.
    ENDLOOP.
    ENDLOOP.
    LOOP AT OUTPUT.
    LOOP AT MKPF_TAB WHERE MBLNR = OUTPUT-MBLNR.
    OUTPUT-BUDAT = MKPF_TAB-BUDAT.
    MODIFY OUTPUT TRANSPORTING BUDAT.
    ENDLOOP.
    ENDLOOP.
    *LOOP AT OUTPUT.
    *SELECT SINGLE MATNR FROM EKPO INTO OUTPUT-MATNR WHERE EBELN = OUTPUT-EBELN.
    *MODIFY OUTPUT TRANSPORTING MATNR.
    *SELECT SINGLE MBLNR FROM MSEG INTO OUTPUT-MBLNR WHERE MATNR = OUTPUT-MATNR.
    *MODIFY OUTPUT TRANSPORTING MBLNR.
    *ENDLOOP.
    LOOP AT OUTPUT.
    LOOP AT MAKT_TAB WHERE MATNR = OUTPUT-MATNR.
    OUTPUT-MAKTX = MAKT_TAB-MAKTX.
    MODIFY OUTPUT TRANSPORTING MAKTX.
    ENDLOOP.
    ENDLOOP.
    *LOOP AT EKKO_TAB.
    LOOP AT EKPO_TAB WHERE EBELN = EKKO_TAB-EBELN.
              o LOOP AT MSEG_TAB WHERE EBELN = EKPO_TAB-EBELN AND MATNR = EKPO_TAB-MATNR.
              o LOOP AT QALS_TAB WHERE MBLNR = MSEG_TAB-MBLNR AND MATNR = MSEG_TAB-MATNR AND EBELN = MSEG_TAB-EBELN.
              o LOOP AT MKPF_TAB WHERE MBLNR = MSEG_TAB-MBLNR.
    OUTPUT-EBELN = EKKO_TAB-EBELN.
    OUTPUT-BSART = EKKO_TAB-BSART.
    OUTPUT-LIFNR = EKKO_TAB-LIFNR.
    OUTPUT-BEDAT = EKKO_TAB-BEDAT.
    OUTPUT-PMENGE = EKPO_TAB-MENGE.
    OUTPUT-MATNR = EKPO_TAB-MATNR.
    OUTPUT-EBELP = EKPO_TAB-EBELP.
              o OUTPUT-MBLNR = MSEG_TAB-MBLNR.
              o OUTPUT-GMENGE = MSEG_TAB-MENGE.
              o OUTPUT-BUDAT = MKPF_TAB-BUDAT.
              o OUTPUT-LMENGE01 = QALS_TAB-LMENGE01.
              o OUTPUT-LMENGE07 = QALS_TAB-LMENGE07.
              o MODIFY OUTPUT TRANSPORTING BSART LIFNR BEDAT PMENGE MATNR.
    APPEND OUTPUT.
    CLEAR OUTPUT.
              o CLEAR QALS_TAB.
              o ENDLOOP.
              o CLEAR MKPF_TAB.
              o ENDLOOP.
              o CLEAR MSEG_TAB.
              o ENDLOOP.
    CLEAR EKPO_TAB.
    ENDLOOP.
    CLEAR EKKO_TAB.
    ENDLOOP.
    **SELECT MBLNR EBELN FROM MSEG INTO TABLE MSEG_TAB1 FOR ALL ENTRIES IN EKKO_TAB WHERE EBELN = EKKO_TAB-EBELN.
              o LOOP AT OUTPUT.
              o MOVE-CORRESPONDING MSEG_TAB1 TO OUTPUT.
              o OUTPUT-MBLNR = MSEG_TAB1-MBLNR.
              o MODIFY OUTPUT TRANSPORTING MBLNR.
              o ENDLOOP.
    *LOOP AT OUTPUT.
    LOOP AT MSEG_TAB WHERE EBELN = output-EBELN AND MATNR = output-MATNR AND EBELP = OUTPUT-EBELP.
    **READ TABLE MSEG_TAB WITH KEY EBELN = OUTPUT-EBELN MATNR = OUTPUT-MATNR.
    *IF SY-SUBRC = 0.
    OUTPUT-MBLNR = MSEG_TAB-MBLNR.
    OUTPUT-GMENGE = MSEG_TAB-MENGE.
    *MODIFY OUTPUT TRANSPORTING MBLNR GMENGE.
    *ENDIF.
    *clear output.
    *ENDLOOP.
    *endloop.
    *LOOP AT OUTPUT.
    READ TABLE QALS_TAB WITH KEY MBLNR = OUTPUT-MBLNR MATNR = OUTPUT-MATNR EBELN = OUTPUT-EBELN.
    *IF SY-SUBRC = 0.
    *OUTPUT-LMENGE01 = QALS_TAB-LMENGE01.
    *OUTPUT-LMENGE07 = QALS_TAB-LMENGE07.
    *MODIFY OUTPUT TRANSPORTING LMENGE01 LMENGE07.
    *ENDIF.
    *ENDLOOP.
    LOOP AT OUTPUT.
    READ TABLE EBAN_TAB WITH KEY EBELN = OUTPUT-EBELN.
    IF SY-SUBRC = 0.
    OUTPUT-BANFN = EBAN_TAB-BANFN.
    OUTPUT-BADAT = EBAN_TAB-BADAT.
    OUTPUT-RMENGE = EBAN_TAB-MENGE.
    OUTPUT-AFNAM = EBAN_TAB-AFNAM.
    MODIFY OUTPUT TRANSPORTING BANFN BADAT RMENGE AFNAM.
    ENDIF.
    ENDLOOP.
    *LOOP AT OUTPUT.
    READ TABLE MKPF_TAB WITH KEY MBLNR = OUTPUT-MBLNR.
    IF SY-SUBRC = 0.
    OUTPUT-BUDAT = MKPF_TAB-BUDAT.
    MODIFY OUTPUT TRANSPORTING BUDAT.
    ENDIF.
    ENDLOOP.
    *LOOP AT OUTPUT.
    *READ TABLE MAKT_TAB WITH KEY MATNR = OUTPUT-MATNR.
    *IF SY-SUBRC = 0.
    *OUTPUT-MAKTX = MAKT_TAB-MAKTX.
    *MODIFY OUTPUT TRANSPORTING MAKTX.
    *ENDIF.
    *ENDLOOP.
    PERFORM F_OUTPUT.
    PERFORM SORT.
    PERFORM GRID.
    FORM F_OUTPUT.
    F_OUTPUT1-FIELDNAME = 'MATNR'.
    F_OUTPUT1-REF_TABNAME = 'EKPO'.
    F_OUTPUT1-REF_FIELDNAME = 'MATNR'.
    APPEND F_OUTPUT1.
    CLEAR F_OUTPUT1.
    F_OUTPUT1-FIELDNAME ='MAKTX'.
    F_OUTPUT1-SELTEXT_M = 'DESCRIPTION.'.
    APPEND F_OUTPUT1.
    CLEAR F_OUTPUT1.
    F_OUTPUT1-FIELDNAME = 'LIFNR'.
    F_OUTPUT1-REF_TABNAME = 'EKKO'.
    F_OUTPUT1-REF_FIELDNAME = 'LIFNR'.
    F_OUTPUT1-SELTEXT_M = 'SUPPLIER'.
    APPEND F_OUTPUT1.
    CLEAR F_OUTPUT1.
    F_OUTPUT1-FIELDNAME = 'AFNAM'.
    F_OUTPUT1-REF_TABNAME = 'EBAN'.
    F_OUTPUT1-REF_FIELDNAME = 'AFNAM'.
    APPEND F_OUTPUT1.
    CLEAR F_OUTPUT1.
    F_OUTPUT1-FIELDNAME = 'BANFN'.
    F_OUTPUT1-REF_TABNAME = 'EBAN'.
    F_OUTPUT1-REF_FIELDNAME = 'BANFN'.
    APPEND F_OUTPUT1.
    CLEAR F_OUTPUT1.
    F_OUTPUT1-FIELDNAME = 'BADAT'.
    F_OUTPUT1-SELTEXT_M = 'PRS DATE'.
    F_OUTPUT1-REF_TABNAME = 'EBAN'.
    F_OUTPUT1-REF_FIELDNAME = 'BADAT'.
    APPEND F_OUTPUT1.
    CLEAR F_OUTPUT1.
    F_OUTPUT1-FIELDNAME ='RMENGE'.
    *F_OUTPUT1-REF_TABNAME = 'MSEG'.
    *F_OUTPUT1-REF_FIELDNAME = 'MBLNR'.
    F_OUTPUT1-SELTEXT_M = 'PRS QTY'.
    APPEND F_OUTPUT1.
    CLEAR F_OUTPUT1.
    F_OUTPUT1-FIELDNAME = 'EBELN'.
    F_OUTPUT1-REF_TABNAME = 'EKKO'.
    F_OUTPUT1-REF_FIELDNAME = 'EBELN'.
    APPEND F_OUTPUT1.
    CLEAR F_OUTPUT1.
    F_OUTPUT1-FIELDNAME = 'BSART'.
    F_OUTPUT1-REF_TABNAME = 'EKKO'.
    F_OUTPUT1-REF_FIELDNAME = 'BSART'.
    APPEND F_OUTPUT1.
    CLEAR F_OUTPUT1.
    F_OUTPUT1-FIELDNAME = 'BEDAT'.
    F_OUTPUT1-REF_TABNAME = 'EKKO'.
    F_OUTPUT1-REF_FIELDNAME = 'BEDAT'.
    F_OUTPUT1-SELTEXT_M = 'PO DATE'.
    APPEND F_OUTPUT1.
    CLEAR F_OUTPUT1.
    F_OUTPUT1-FIELDNAME ='PMENGE'.
    F_OUTPUT1-SELTEXT_M = 'PO QTY'.
    APPEND F_OUTPUT1.
    CLEAR F_OUTPUT1.
    F_OUTPUT1-FIELDNAME = 'MBLNR'.
    F_OUTPUT1-REF_TABNAME = 'MSEG'.
    F_OUTPUT1-REF_FIELDNAME = 'MBLNR'.
    F_OUTPUT1-SELTEXT_M = 'GR NUMBER'.
    APPEND F_OUTPUT1.
    CLEAR F_OUTPUT1.
    F_OUTPUT1-FIELDNAME ='BUDAT'.
    F_OUTPUT1-SELTEXT_M = 'GR DATE'.
    APPEND F_OUTPUT1.
    CLEAR F_OUTPUT1.
    F_OUTPUT1-FIELDNAME ='GMENGE'.
    *F_OUTPUT1-REF_TABNAME = 'MSEG'.
    *F_OUTPUT1-REF_FIELDNAME = 'MBLNR'.
    F_OUTPUT1-SELTEXT_M = 'RECEIVED QTY'.
    APPEND F_OUTPUT1.
    CLEAR F_OUTPUT1.
    F_OUTPUT1-FIELDNAME = 'LMENGE01'.
    F_OUTPUT1-REF_TABNAME = 'QALS'.
    F_OUTPUT1-REF_FIELDNAME = 'LMENGE01'.
    F_OUTPUT1-SELTEXT_M = 'ACCEPTED QTY'.
    APPEND F_OUTPUT1.
    CLEAR F_OUTPUT1.
    F_OUTPUT1-FIELDNAME = 'LMENGE07'.
    F_OUTPUT1-REF_TABNAME = 'QALS'.
    F_OUTPUT1-REF_FIELDNAME = 'LMENGE07'.
    F_OUTPUT1-SELTEXT_M = 'REJECTED QTY'.
    APPEND F_OUTPUT1.
    CLEAR F_OUTPUT1.
    F_OUTPUT1-FIELDNAME ='REMARKS'.
    **F_OUTPUT1-REF_TABNAME = 'MSEG'.
    **F_OUTPUT1-REF_FIELDNAME = 'MBLNR'.
    F_OUTPUT1-SELTEXT_M = 'REMARKS'.
    APPEND F_OUTPUT1.
    CLEAR F_OUTPUT1.
    ENDFORM.
    FORM SORT.
    IT_SORT-FIELDNAME = 'MATNR'.
    IT_SORT-UP = 'X'.
    APPEND IT_SORT.
    CLEAR IT_SORT.
    IT_SORT-FIELDNAME = 'MAKTX'.
    IT_SORT-UP = 'X'.
    APPEND IT_SORT.
    CLEAR IT_SORT.
    IT_SORT-FIELDNAME = 'LIFNR'.
    IT_SORT-UP = 'X'.
    APPEND IT_SORT.
    CLEAR IT_SORT.
    IT_SORT-FIELDNAME = 'AFNAM'.
    IT_SORT-UP = 'X'.
    APPEND IT_SORT.
    CLEAR IT_SORT.
    IT_SORT-FIELDNAME = 'BANFN'.
    IT_SORT-UP = 'X'.
    APPEND IT_SORT.
    CLEAR IT_SORT.
    IT_SORT-FIELDNAME = 'BADAT'.
    IT_SORT-UP = 'X'.
    APPEND IT_SORT.
    CLEAR IT_SORT.
    IT_SORT-FIELDNAME = 'RMENGE'.
    IT_SORT-UP = 'X'.
    APPEND IT_SORT.
    CLEAR IT_SORT.
    IT_SORT-FIELDNAME = 'EBELN'.
    IT_SORT-UP = 'X'.
    APPEND IT_SORT.
    CLEAR IT_SORT.
    IT_SORT-FIELDNAME = 'BSART'.
    IT_SORT-UP = 'X'.
    APPEND IT_SORT.
    CLEAR IT_SORT.
    IT_SORT-FIELDNAME = 'BEDAT'.
    IT_SORT-UP = 'X'.
    APPEND IT_SORT.
    CLEAR IT_SORT.
    IT_SORT-FIELDNAME = 'PMENGE'.
    IT_SORT-UP = 'X'.
    APPEND IT_SORT.
    CLEAR IT_SORT.
    IT_SORT-FIELDNAME = 'MBLNR'.
    IT_SORT-UP = 'X'.
    APPEND IT_SORT.
    CLEAR IT_SORT.
    IT_SORT-FIELDNAME = 'BUDAT'.
    IT_SORT-UP = 'X'.
    APPEND IT_SORT.
    CLEAR IT_SORT.
    IT_SORT-FIELDNAME = 'GMENGE'.
    IT_SORT-UP = 'X'.
    APPEND IT_SORT.
    CLEAR IT_SORT.
    IT_SORT-FIELDNAME = 'LMENGE01'.
    IT_SORT-UP = 'X'.
    APPEND IT_SORT.
    CLEAR IT_SORT.
    IT_SORT-FIELDNAME = 'LMENGE07'.
    IT_SORT-UP = 'X'.
    APPEND IT_SORT.
    CLEAR IT_SORT.
    ENDFORM.
    FORM GRID.
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
    I_INTERFACE_CHECK = ' '
    I_BYPASSING_BUFFER = ' '
    I_BUFFER_ACTIVE = ' '
    I_CALLBACK_PROGRAM = 'REPID'
    I_CALLBACK_PF_STATUS_SET = ' '
    I_CALLBACK_USER_COMMAND = ' '
    I_CALLBACK_TOP_OF_PAGE = ' '
    I_CALLBACK_HTML_TOP_OF_PAGE = ' '
    I_CALLBACK_HTML_END_OF_LIST = ' '
    I_STRUCTURE_NAME =
    I_BACKGROUND_ID = ' '
    I_GRID_TITLE =
    I_GRID_SETTINGS =
    IS_LAYOUT =
    IT_FIELDCAT = F_OUTPUT1[]
    IT_EXCLUDING =
    IT_SPECIAL_GROUPS =
    IT_SORT =
    IT_FILTER =
    IS_SEL_HIDE =
    I_DEFAULT = 'X'
    I_SAVE = ' '
    IS_VARIANT =
    IT_EVENTS =
    IT_EVENT_EXIT =
    IS_PRINT =
    IS_REPREP_ID =
    I_SCREEN_START_COLUMN = 0
    I_SCREEN_START_LINE = 0
    I_SCREEN_END_COLUMN = 0
    I_SCREEN_END_LINE = 0
    I_HTML_HEIGHT_TOP = 0
    I_HTML_HEIGHT_END = 0
    IT_ALV_GRAPHICS =
    IT_HYPERLINK =
    IT_ADD_FIELDCAT =
    IT_EXCEPT_QINFO =
    IR_SALV_FULLSCREEN_ADAPTER =
    IMPORTING
    E_EXIT_CAUSED_BY_CALLER =
    ES_EXIT_CAUSED_BY_USER =
    TABLES
    T_OUTTAB = OUTPUT[].
    EXCEPTIONS
    PROGRAM_ERROR = 1
    OTHERS = 2
    IF SY-SUBRC 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
    WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
    ENDFORM.

    Hi prasad,
    Whats the problem exactly. Is it not displaying any records ?
    Thanks,
    bsv.

  • Facing Problem in XD01 Function Exit

    Hi,
    I am facing the problem in XD01 Function Exit EXIT_SAPMF02D_001. whenenver i am going active the include ZXF04U01, it is always creating the Local change request. But It is should be Transportable change request. That is why, the Basic people is enabled to transport the request into Production Server.
    So, How can i make the transportable change request for the same.
    kindly suggest me the solution for this problem.

    Thank for replying,
    My problem is not related to Local Object.
    Function Exit was already lying in project. Problem occurs while activing the function exit. It gives the request number ( Local changes request number) but the Basis person enable to see the request number in his screen.
    So, how should i make local change request to transportable change request.

  • CND problem with code-completion

    Hi,
    First of all I don't really know where to put this post about C++ Pack in NetBeans. I've read one post in which someone suggests that this section will be pretty close...
    Maybe someone here would be so kind and try to help me...
    I'm using Ubuntu 7.04 and I have a problem with code completion in NetBeans 5.5.1 CND and I'm a little bit frustrated right now....
    I installed Netbeans, then CND, Created new C++ Project. Added new source file, with #include <GL/glut.h> directive.
    Whole code was compiled without errors, and that's fine.
    There were some problems with linking but I've added "glut", "GL", "GLU" string to linker parameters in Project Properties.
    The main problem is the code assistant. When I'm hitting "glut" and press ctrl+space it shows functions from glut library but when I type "gl" (to type "glColor3ub...") and try to show the code completion pop-up it shows "No suggestions". The same thing is with GLU library.
    I've installed GL, GLU, glut libraries (they all sit calmly in /usr/include/GL).
    I've added the /usr/include and /usr/include/GL to C++ section.
    I think that the Netbeans is able to find those *.h files because, as I said before, the glut (and the glX) functions are shown properly but there is no sign of "gl" and "glu" FUNCTIONS in code completion (the #define values specified in gl.h and glu.h are on the list, but the functions aren't)...
    I don't have idea why glut and glX are working fine, and gl and glu aren't... If anyone have similar problem, know where to look for an answer or have some suggestions I would be much obliged...
    I've seen Eclipse CDT, Anjuta, kDevelop, Code::Blocks, VIM + icomplete... after checking them all there is only one decision - I want to use NetBeans CND. It's user-friendly, fast and I just like it. That's why I would really like to know why the code-completion isn't working in 100%...

    Vladimir,
    The glColor3ub function declaration is in gl.h file (which along with glu.h is included in glut.h).
    Thanks Maxim,
    In the matter of fact since yesterday I've been looking for the reason why the GL and GLU aren't indexed properly by the Netbeans CC and I've found something.
    The GLU library was indexed after deleting
    #include <GL/gl.h>directive. So it means that the gl.h library is messing up.
    I've checked whole file (gl.h) and noticed that the only part which is in conflict with NetBeans is this one:
    #elif defined(__GNUC__) && (__GNUC__ * 100 + __GNUC_MINOR__) >= 303
    #  define GLAPI __attribute__((visibility("default")))
    #  define GLAPIENTRYI'm using GCC 4.1 so the expression value is 401, so the GLAPI define looks like the line above.
    gl.h is indexed properly by NetBeans when it is representing "extern", so it should look like
    #  define GLAPI externIt is working fine if you delete this part of gl.h or for example (which I've done) add predefined macro (or change the existing one)
    __GNUC_MINOR__=-200I know that it isn't very clean solution... I'm not happy with cheating NetBeans about the version of installed GCC but unfortunately I am not a specialist in GNU C so maybe someone would find more elegant solution.
    As far as I know the __attribute__ feature makes the GCC more verbose (warnings, errors) but I don't know how much functionality am I loosing in fact...
    Edit: Why the code tags aren't working? :/
    Message was edited by:
    Makula

  • Device not detected My iphone is not dedtedcted by the computer. I am having Windows 7.Windows has stopped this device because it has reported problems. (Code 43) Error code no 43 is shown. I tried to fix it by running fix it porg in  Micro soft tech net.

    Device not detected
    My iphone is not dedtedcted by the computer. I am having Windows 7.Windows has stopped this device because it has reported problems. (Code 43) Error code no 43 is shown. I tried to fix it by running fix it porg in  Micro soft tech net. Still the problem has not been solved

    Folling this article step by step: http://support.apple.com/kb/ht1923 is the last thing I can think of, or try to create another user account/try on another computer....
    Sorry for the multiple posts

  • Configsrch returned error code 1 Exiting...

    Hello Everyone,
    I trying to install and run a regression test on OpenSparc T2. But when I execute the sims command I get the following message "sims-> .local_tool_wrapper: configsrch returned error code 1 Exiting..."
    (I source the OpenSparcT2.bash file without promting any error)
    The system I am using is a T200 server and the OS solaris.
    Thanks in advance for your help
    Regards
    /N

    Try creating a symbolic link to include old library files in 64-bit version of windows
    $ ln -s /xilinx/ise/13.4/ISE_DS/PlanAhead/lib/lnx32.o/libstdc++.so.5 /usr/lib32/libstdc++.so.5

  • Strange Problem with Code Groups / Codes

    Hey all, have a strange problem with Code Groups and Codes.
    Our data migration team accidentally loaded an early version of our catalog (code groups and codes) in to our 'Gold' configuration client. They then proceed to delete them all via transaction qs41. However, the code groups have been deleted, but not the codes.
    So, basically, no codes groups exist in table QPGR or QPGT but all the entries remain in QPCD with the assigment to code groups. The usage indicator is not set on the codes so why they did not get deleted with the codes groups is unknown.
    The issue that this is now causing us is that we can't recreate the codes groups with these codes assigned as the system thinks they already exist (via a check on table QPCD i would expect).
    Also, i have been unable to recreate what happened did in other clients... seems very strange.
    Any help appreciated.
    Cheers

    Ben,
    You could try SE11, and see if you can delete the records from there.. but I'm not hopeful...
    Otherwise you may need to write a quick ABAP program to delete the data base entries.
    PeteA

  • Keep trying to send a message and it wont go through i keep getting a message that says network problems cause code :3 what does that mean

    keep trying to send a message and it wont go through I keep getting a message pop up that says network problems cause code :3 what does this mean

    SMS Error: Cause Code 3, Error Code 2

  • How to Fix BlackBerry App World Identity installation fail problem: (Error Code 80003)

    Hello To all you kickass BlackBerry users!
    I have compiled a web site that addresses the issue if the ID Verification problem (Error Code 80003) when attempting to use AppWorld,
    It seems that it is mainly a Vodacom issue in South Africa, but it should also work with other service providers that have a similar problem. RIM and Vodacom are aware of it and are looking into a solution.. In the mean time you can fix your problem step by step here: http://www.blackberryapps.byethost17.com/
    Regards
    BB Solutions
    Feel free to send a friend request (pin on the site) to contact me personally for any queries you may have.

    Blackberry Identity sometimes gives a problem to download using BIS.
    you can go to manage connections, switch mobile network off, find a wifi hotspot, try updating the identity using wifi, or enter your network provider's apn settings in menu > options > advanced options > tcp/ip, enable the apn, enter service provider apn username and password, save hard reset , and download identity, just remember to undo the changes afterwards.

Maybe you are looking for

  • Export to Excel Formatting Lost

    I've got a CR designed such that the report prints out a separate page for each grouping of data bay a certain data field. The Crystal format and PDF format look beautiful and the paging is perfect.  Yet when I export to Excel it all runs together an

  • Goods Return or AP Credit Memo Creation if AP Reserve Inv created

    Hi All, Can anyone tell me how to create good return or ap credit note if ap reserve invoice is used. GRPO created with reference to ap reserve invoice always closed. Regards

  • I am having trouble with photo attachments in mail

    When i attach photos from Lightroom into my mail messages, they are embedded and do not appear as attachments.  When others receive the email, the pictures are embedded and can only be copied but cannot be used or edited like a normal attachment.  Wh

  • Problems with sound and music

    I got an Apple TV and I connected to my Samsung TV with HDMI. It works fine, I sync with my MacBook Pro and I can see my pics and get some music from my iTunes library. But I can't play the songs. I select them but when I press play it doesn't work.

  • AVCHD footage won't let me use transitions

    Hi, I just imported some AVCHD footage into Final Cut Pro 7 using Log and Transfer. When I try to add a transition between two clip it keeps saying there is not enough footage to do the transition. The thing is, there is enough footage as the clips I