ABAP coding for variable SAP exit

Hi,
I'm looking for a way to see the coding of a SAP-exit query variable: 0FYTLFP.
So this is NO custom-exit (via CMOD).
I've tried the FM: RSVAREXIT<varname> but it doesn't exist.
Via RSRT i couldn't find the piece of coding either.
I'm not looking for the functionality but the piece of coding that is used for this.
How can I find it??
Cheers.

Ok, this code works as per my note above. If the period of the system date is the first of the fiscal year, it will return to the previous fiscal year to get a range for YTD.
Basically, this acts as if you're running the query in the previous period for current YTD.
WHEN 'ZFYTLFP'.
        CLEAR: ZE_T_RANGE, E_T_RANGE, ZI_T_VAR_RANGE, W_YEAR, W_PERIOD, L_FPER.
        DATA: l_poper    LIKE t009b-poper.
        DATA: l_fiscyear LIKE t009b-bdatj.
        DATA: l_curdate LIKE sy-datum.
        l_curdate = SY-DATUM.
        CALL FUNCTION 'DATE_TO_PERIOD_CONVERT'
          EXPORTING
              i_date         = l_curdate
              i_periv        = i_periv
          IMPORTING
              e_buper        = l_poper
              e_gjahr        = l_fiscyear
          EXCEPTIONS
              input_false    = 1
              t009_notfound = 2
              t009b_notfound = 3
              OTHERS         = 4.
       W_YEAR = l_fiscyear(4).
        W_PERIOD = l_poper(3).
        IF W_PERIOD = '001'.
          W_YEAR = W_YEAR - 1.
          W_PERIOD = '012'.
        ELSE.
          W_PERIOD = W_PERIOD - 1.
        ENDIF.
        ZE_T_RANGE-LOW(4)   = W_YEAR." year
        ZE_T_RANGE-LOW+4(3) = '001'.
        ZE_T_RANGE-HIGH(4) = W_YEAR. " year
        ZE_T_RANGE-HIGH+4(3) = W_PERIOD.
        ZE_T_RANGE-SIGN = 'I'.
        ZE_T_RANGE-OPT = 'EQ'.
        APPEND ZE_T_RANGE TO E_T_RANGE.

Similar Messages

Code ABAP of a var SAP Exit

Hi guys,
I need to know exactly that it gives back a variable SAP Exit, for it wanted to see the code ABAP of that variable , is this possible one?, some form exists to see the code ABAP of a variable SAP Exit?.
Thanks in advance.
Regards
Mauri.

Hi Mauricio,
Try using RSVAREXIT_<i>yrvariablename</i> in SE37 and display the code.
Hope this helps...

ABAP-Coding for EVERY Key figure in infocube 0RT_C02

Hello gurus;
      Does anybody know which is the reason for Abap-coding for every key figure in infocube 0rt_c02 from InfoSource 2lis_13_vditm?
Thanks in advanced!
Csr

Hi,
this is done like this in the business content because the extractor is providing the data with a process key; this process key is then translated into meaningfull business objects (key figures);
fro instance ProcessKey 202 in application SD is reflecting Credit memos:
* Credit Memo
IF COMM_STRUCTURE-PROCESSKEY = '202'
    AND COMM_STRUCTURE-BWAPPLNM EQ 'SD'.
* currency convert
    IF COMM_STRUCTURE-COST <> 0.       "Value in document UNIT
      PERFORM LOC_CURR_CONVERT
        USING    COMM_STRUCTURE-COST   "Value in doc UNIT
                 COMM_STRUCTURE-TRANS_DATE     "Date for exchange
                 COMM_STRUCTURE-DOC_CURRCY     "Document Currency
                 COMM_STRUCTURE-LOC_CURRCY     "Local currency
*                COMM_STRUCTURE-EXCHG_RATE     "Exchanging rate
                 COMM_STRUCTURE-/BIC/ZEXRATEAC "Exchanging rate Acctn
        CHANGING RESULT.
* the KPI's must be turned to positive because the SD-extractors
* allways deliver them neg. if it's a process back (e.g. return order)
      RESULT = RESULT * ( -1 ).
      UNIT = COMM_STRUCTURE-LOC_CURRCY.
* if the returncode is not equal zero, the result will not be updated
      RETURNCODE = 0.
    ELSE.
* if the returncode is not equal zero, the result will not be updated
      RETURNCODE = 4.
    ENDIF.
ELSE.
* if the returncode is not equal zero, the result will not be updated
    RETURNCODE = 4.
ENDIF.
the above routine is quite self explaining the code.
hope this helps...
Olivier.
Message was edited by:
        Olivier Cora

Formula variable sap exit

formula variable sap exit what are the changes in my report in quary designer

Hi,
If you're refering to the InfoObject 0CALYEAR, there is an exit variable available called: 0CYEAR - Current Calendar year
Which will filter on the current year.
br
Mikael

Looking for an ABAP-code for the customer-Exit Variable

Hello,
I have defined a Variable (Interval) which should be processed through Customer-Exit on characteristic Supplier-Date (date format). This Customer-Exit Variable is called ZDATE.
We have another time characteristic Fiscal year / period (0FISCPER) which has single mandatory input variable for ex. 003.2011. This input variable is called ZFISCPER.
Now I have to write an ABAP-Code where the customer exit variable ZDATE is derived (fiscal last year to last period) from input variable ZFISCPER in INCLUDE ZXRSRU01.
Means when the input variable (ZFISCPER) is 003.2011 then the customer exit variable ZDATE should be calculated in INCLUDE ZXRSRU01 as 01.01.2010 u2013 28.02.2011 (fiscal last year to last period).
Since I am quite new in ABAP, I will be grateful if you could write me sample ABAP for this.
Many thanks.

Hi,
should be something like:
DATA: l_s_range TYPE rsr_s_rangesid,
input LIKE sy-datum.
When 'ZDATE'
CONCATENATE '0101' 0FISCPER+3(4)-1 into l_s_range-low. "You get 01012010
CONCATENATE '01' Fiscper+1(6) into input. "You get 01032011
l_s_range-high = input-1. "You get 28022011
APPEND l_s_range TO e_t_range.
Greetings
Roman

Steps for Variable User Exit

Hi All,
I have to do some coding in my variable exit. I have followed the follwing steps to create a project a write the code. Anyone please confirm if my steps are correct or missing anything.
1. Go to CMOD, give project name and Click on create.
2. Enhancements -> give RSR00001. and click on Components.
3. Double click on 'EXIT_SAPLRRS0_001'. This will bring up the functionmodule in which we can find an include.
4. Double click on 'ZXRSRU01' Include.
5. Press Enter for the warning message.
6. It gave me a message saying that 'the Include doesnot exist, Do you want to create it'. Click Yes. This will bring up a blank ABAP editor.
7. Write the required code using CASE Statement.
Am I missing anything here?
I would be grateful if someone can send me any documents relating to the variable User Exits.
Best Rgds,
James.

Hi,
Directly go se38 and execute ZXRSRU01 program. Then write a case statement. below is the sample code to calculate default year month variable.
case v_name.
when 'ZYRMTH'.
    if i_step = 1.
      read table i_t_var_range
      with key vnam = 'ZYRMTH'
           into ld_s_var_range.
      if sy-subrc ne 0.   " no value exists, assigns default
        c_year = sy-datum(4).
        c_month = sy-datum+4(2).
        if c_month = 1.
          c_year = c_year - 1.
          c_month = 12.
        else.
          c_month = c_month - 1.
        endif.
        concatenate c_year c_month into c_monyr.
        l_s_range-low = c_monyr.
        clear e_t_range.
        l_s_range-sign = 'I'.
        l_s_range-opt = 'EQ'.
        append l_s_range to e_t_range.
      endif.
    endif.
endcase.
Regards,
Malli

Docs for ABAP coding for BW

Hello Gurus,
I need some documents or links where i can find enough info to learn abt ABAP coding in transfer, update rules, ABAP routine in infopackage and in the start routine etc. Can any one help me with this?
Looking for some basic concepts of ABAP.
Thank you,
Kumar
[email protected]

Hi,
Please check the following links that may be useful for you.
http://help.sap.com/saphelp_46c/helpdata/en/d3/2e974d35c511d1829f0000e829fbfe/frameset.htm
http://help.sap.com/printdocu/core/Print46c/en/Data/htm/english.htm.
https://www.sdn.sap.com/irj/servlet/prt/portal/prtroot/docs/library/uuid/4493c4a6-0301-0010-62a2-efd6ded61e04https://www.sdn.sap.com/irj/servlet/prt/portal/prtroot/docs/library/uuid/60cecb1d-0a01-0010-8289-b14fd99062fa
http://www.bwexpertonline.com/downloads/ABAPCodeforRuvinskyarticle.doc
http://www.bwexpertonline.com/downloads/Extractor_Source_Code.doc
http://www.bwexpertonline.com/downloads/Nissen.doc
https://www.sdn.sap.com/irj/sdn/abap
http://www.sap-img.com/abap/more-than-100-abap-interview-faqs.htm
http://www.sapgenie.com/faq/abap.htm
Regards,
®

Where to see the logic for 0FYEAR (SAP Exit)

There is already an SAP exit 0FYEAR. There is a requirement to make ZFYEAR1 just like 0FYEAR. So, i want to see where the code (logic) for 0FYEAR is present so that i can write the the same for my custom variable(ZFYEAR1) in CMOD. Can anyone help me with the name of the program?

Include ZXRSRU01 --> Function Module EXIT_SAPLRRSO_001
or
Search for Function Module RSVAREXIT_ [variable name]
Variable Name = 0FYear

ABAP Coding for RFC inputs

Hi,
I am new to ABAP coding. I use the WebDynpro ABAP . In that I need to call a RFC and get the data into the portal. I need to pass some input paramer to RFC. How could I do in the ABAP programming ?
thanks
Suresh

Hi suresh,
What you are asking is a not a wdbdynpro specific doubt but it is more related to abap.So i think you need to get some information about creating and using FM and RFC in abap.
Well i would just try to give you the steps that you should follow.
Step 1) Create a function module by using T CODE se37 make it remote enable i.e make it a RFC (you will ust need to check a radio button in properties tab)
Step 2) In rfc try to define the importing and exporting parameters and write your logic in the coding section.
Step 3) After creating RFC successully now u craete your webdynpro component and create a view inside the component.In view accrding to your business requirement you call this RFC in any of the methods i.e either in hooks methods or your custom methods .And pass the parameters to that rfc and get the results from the rfc.
Well i think i have just given you the overview of the process so while development if get any problem feel free to ask
regards
PG

ABAP Coding for uploading flat file

Hello experts,
I have a requirement like this..
i am uploading a flat to SEM-BPS transactional cube.my requirement is like this.
my flat file structure is
PP;QQ;RR;SS
A;    X;         1;      1
B:     1:         X:     X.
Here the PP QQ RR SS are the field names. If PP = A and QQ = X then the record should not update. else the record should be updated (PP = A , RR = 1 )
Kindly provide me the Sample coding
Thanks in advance.
Anil.
Message was edited by:
        anil kumar

TO load this file, you dont have to adopt the BPS way;it is like any other flat file load.
All you have to do is to delete all records in the data package where PP = a.
Delete data _pcakage where pp = 'AA'.
But i dont understand your other logic ( PP=a, RR =1).
Ravi Thothadri

Please help me in ABAP coding for the incoming transactional data

Hi
I have the following transactional data
Transaction ID- Buyer- Seg- Fam- Cla -Com-Total
00001 - AB co - Engineering - Machinery - Equipment - Mechanical -15000
00002 - AC co - Engineering - Machinery - Equipment - Mechanical -15850
00003 - DE co - IT - Hardware - Mouse -Optical -5850
00004 - AC co - Engineering - Machinery - Equipment - Architectural -10000
00005 - FE co - Engineering - Machinery - Equipment - NOT_KNOWN -1580
00006 - KC co - Engineering - Machinery - Equipment - NOT_KNOWN -75850
00007 - EG co - Engineering - Machinery - Equipment - Mechanical -180050
00008 - AS co- Engineering - Machinery - Equipment - Architectural -10550
00009 - DE co - IT - Hardware - Mouse -Optical -58500
00010 - EF co - IT - Hardware - Mouse -NOT_KNOWN -555850
00011 - EF co - Engineering - Machinery - Equipment - Mechanical -44850
00012 - AC co - IT - Hardware - NOT_KNOWN -NOT_KNOWN -585550
In this transactional data, SEG-> FAM -> CLA -> COM are in hierarchy
To distiguish the NOT_KNOWN which have different level i like to change there names like this...
NOT_KNOWN_1, NOT_KNOWN_2....like that
I expect the results to be like this
Transaction ID- Buyer- Seg- Fam- Cla -Com-Total
00001 - AB co - Engineering - Machinery - Equipment - Mechanical -15000
00002 - AC co - Engineering - Machinery - Equipment - Mechanical -15850
00003 - DE co - IT - Hardware - Mouse -Optical -5850
00004 - AC co - Engineering - Machinery - Equipment - Architectural -10000
00005 - FE co - Engineering - Machinery - Equipment - NOT_KNOWN_1 -1580
00006 - KC co - Engineering - Machinery - Equipment - NOT_KNOWN_1 -75850
00007 - EG co - Engineering - Machinery - Equipment - Mechanical -180050
00008 - AS co- Engineering - Machinery - Equipment - Architectural -10550
00009 - DE co - IT - Hardware - Mouse -Optical -58500
00010 - EF co - IT - Hardware - Mouse -NOT_KNOWN_2 -555850
00011 - EF co - Engineering - Machinery - Equipment - Mechanical -44850
00012 - AC co - IT - Hardware - NOT_KNOWN_3 -NOT_KNOWN_4 -585550
I like to make this changes in the coming data by writing a start routine
Could anyone provide me the required code to make this happen
Plz help me
Regards
KC

Hi
My Start routine screen look like this
Declaration of transfer structure (selected fields only)
TYPES: BEGIN OF TRANSFER_STRUCTURE ,
Record number to be filled in case of adding row(s)
to enable 'error handling'
    record      TYPE rsarecord,
InfoObject TRAID: CHAR - 000060
    /BIC/TRAID(000060) TYPE C,
InfoObject SEG5: CHAR - 000060
    /BIC/SEG5(000060) TYPE C,
InfoObject FAM5: CHAR - 000060
    /BIC/FAM5(000060) TYPE C,
InfoObject CLA5: CHAR - 000060
    /BIC/CLA5(000060) TYPE C,
InfoObject COM5: CHAR - 000032
    /BIC/COM5(000032) TYPE C,
InfoObject COCE: NUMC - 000015
InfoObject TOTALSEG: CHAR - 000032
    /BIC/TOTALSEG(000032) TYPE C,
END OF TRANSFER_STRUCTURE .
Is this information you are lookin or something more
Regards
KC

How to see the ABAP Code behind SAP Exit Variables.

Hi Everyone.
I was wondering if anyone could help me with the steps to see the ABAP Code behind a SAP Exit Variable.
Sometime back I remember of going to Transaction SE37 - Function Module and give the Variable name,
Eg: 0F_ADAY, Hit F4 or something like that and was able to see the ABAP Code/Function Module/Exit written for that Variable.same
But today I tried to do the same thing to see the code for Variable 0P_FVAEX but I was NOT able to see it.
I think I am missing something.
Can someone help me recollect what I am missing.
Thank You for your time
NOVICE

Hi bi novice,
big sorry for the late reply!
The following variables are defined in function module RREX_VARIABLE_EXIT as case statement:
'0CMONTH', '0CWEEK', '0CYEAR', '0CQUART', '0DAT', '0CWD', '0FYEAR', '0FPER', '0FYTCFP',
'0FYTLFP', '0FYTCD', '0CYTCM', '0CYTLM', '0CYTCD', '0LYTCLD', '0CMONTHT', '0CWEEKT', '0CYEART', '0CQUARTT', '0DATT', '0FYEART', '0FPERT'
Best regards,
Andreas

Code (ABAP) for the Customer Exit Variable (CMOD)

Scenario
An employee can purchase any no of policies in a day or month.each policy will have start date and expiry date.
My requirment
Count all the policies(valid) by employee on a ranges basis exception reporting
(0-10;10-20;20-30;30-40) and then able to drill down by policy start date and expiry date.
As per the requirment is to show policies that employee had with in the give date intreval which are not yet expired (active) i need to write a condition that will count only policies whose Expiry date is > Current calender day
As Policy Expiry Date is a char i am converting it to KF using fourmala variable so that i can write a condition on it using current cal day formula variable sap exit
Requirment:
Need a code for SAP exit variable which will meet the following requirment
There are the following 2 variables in the query
1) A variable (User Input)(Date Range) on Policy Start Date and
2) Authorisation Variable which is based on Authorisation Object(Analysis Authorisations)
I need a SAP Exit variable (CMOD) that will
BAsed on the user entered Policy Start date it has to pick all the policy exiry date of the policies and display all the policies whose expiry date is greate than Sy Date (Current Date) and also if Policy Expiry Date is blank or # it has to display
Arun supplied me with the below code...but i think it doesn't include blank expiry date or #...as i am new to ABAP please update me with releavent code
Policy Start Date : ZPST_DTE
Policy Expiry Date: ZPSP_DTE
Variable (Type:Customer Exit) on Expiry Date: ZEEXP_DTE
Arun's Code:
IF I_STEP = 1.
CASE V_NAME
WHEN 'X' " X is the variable u created for the exit
l_s_range-low = SY-DATUM.
l_s_range-opt = 'I'.
l_s_range-sign = 'GT'.
APPEND l_s_range TO e_t_range.
END CASE.
Please modify above code to include Blank or # values of Expiry Date
Thanks Arun
Please ask if you need further info as this is urgent
Thanks

Hi Arun,
Thanks for the help...will definetly assign points
(Closed the previous thread)
Please spare bit of ur time as this is my first ABAP Code
Can i include 2 restrictions..# and Variable (Customer Exit)...But how can i include Records with Blank Values
As the data from Source system the expiry date is filled up with either Date or # or Blank...my requiorment is to include all 3 and
Question:
As there are 2 other variables defined ..one on Policy Start Date (User input date intreval) and Location (Authorization Variable..Analysis Authorisations)...Do i need to change I_STEP in the code
(Req: Reports shows all the(still valid) policies emp has purchased between 2 give date (Variable on Policy Start date)
IF I_STEP = 1.
CASE V_NAME
WHEN 'X' " X is the variable u created for the exit
l_s_range-low = SY-DATUM.
l_s_range-opt = 'I'.
l_s_range-sign = 'GT'.
APPEND l_s_range TO e_t_range.
END CASE.

Performance of ABAP coding very poor

Hi gurus,
I'm a newbie in ABAP programming.
Currently, I managed to write an ABAP coding for BW to load data from a source DSO to target DSO.
We are using BW 3.5.
In the source, we have YTD amount as Key Figures.
In the start routine, we use ABAP coding to calculate the Monthly value and Last 12 Months value.
Monthly value is defined as: current month YTD - last month YTD (except when current month = January, then monthly value for January = YTD value for January)
Last 12 months value is calculated for example as follow:
for March 08, then Last 12 months value is April 07-March08
Thus the formula for last 12 Months value is:
           YTD current month current year + YTD month12 last year - YTD current month last year
I used internal table to read and store all of the information
However, I need to read 3 times from internal table to get all of the necessary value to calculate the monthly value and last 12 months value.
The performance is very low. The system runs for 40 minutes to read and calculate 15500 data.
Therefore if you can perhaps give some hint/tip/tricks how to improve the performance of the code, it will be highly appreciated.
Thank you very much in advance.
Best regards,
Fen
My code is as follow:
Define internal table to hold last year & current year data:
DATA: LCYEARDATA type sorted table of /bic/aZABC3_O00
        with unique key /BIC/ZABC_ENTI /BIC/ZABC_ACC
        /BIC/ZABC_SUBA /BIC/ZABC_VERS CALMONTH
        with header line.
Create variables needed to hold last month/year values.
DATA: CALMONTHLOW TYPE /BI0/OICALMONTH.
DATA: CALMONTHHIGH TYPE /BI0/OICALMONTH.
DATA: CALYEARTHISYEAR TYPE /BI0/OICALYEAR.
DATA: CALYEARLASTYEAR TYPE /BI0/OICALYEAR.
DATA: CURRENTMONTH TYPE /BI0/OICALMONTH2.
DATA: CURRENTMONTHLASTYEAR TYPE /BI0/OICALMONTH.
DATA: LASTMONTH TYPE /BI0/OICALMONTH.
DATA: CALMONTH12LASTYEAR TYPE /BI0/OICALMONTH.
DATA: LASTMOYTD type /BI0/OIAMOUNT.
DATA: LAST12MONTH TYPE /BI0/OIAMOUNT.
DATA: YTDLASTYEAR type /BI0/OIAMOUNT.
DATA: FIRSTRUN type N.
DATA: MONTHLYVALUE type /BI0/OIAMOUNT.
DATA: YTDMONTHLASTYEAR type /BI0/OIAMOUNT.
DATA: AMOUNT type /BI0/OIAMOUNT.
Set initial value of all variables to 0.
CALMONTHLOW = 0.
CALMONTHHIGH = 0.
CALYEARTHISYEAR = 0.
CALYEARLASTYEAR = 0.
CURRENTMONTH = 0.
CURRENTMONTHLASTYEAR = 0.
LASTMONTH = 0.
LASTMOYTD = 0.
LAST12MONTH = 0.
YTDLASTYEAR = 0.
YTDMONTHLASTYEAR = 0.
FIRSTRUN = 0.
MONTHLYVALUE = 0.
CALMONTH12LASTYEAR = 0.
Loop through data package.
LOOP AT DATA_PACKAGE.
    IF DATA_PACKAGE IS NOT INITIAL.
First run:
      IF FIRSTRUN = 0.
Get current year from any line in the data package.
        CALYEARTHISYEAR = DATA_PACKAGE-CALMONTH(4).
        FIRSTRUN = 1.
      ENDIF.
Calculate last year (i.e. data package year - 1).
        CALYEARLASTYEAR = CALYEARTHISYEAR - 1.
Calculate current month
        CURRENTMONTH = DATA_PACKAGE-CALMONTH+4(2).
*Set CALMONTHLOW and CALMONTHHIGH as time period to fill the internal
*table:
        CONCATENATE CALYEARLASTYEAR CURRENTMONTH INTO CALMONTHLOW.
        CONCATENATE CALYEARTHISYEAR CURRENTMONTH INTO CALMONTHHIGH.
Fill internal table with Last Years data and Current Year data:
        select *
          from /bic/aABC2_O00
          into table LCYEARDATA
          WHERE CALMONTH >= CALMONTHLOW
            AND CALMONTH <= CALMONTHHIGH
            AND /BIC/ZABC_ENTI = DATA_PACKAGE-/BIC/ZABC_ENTI
            AND /BIC/ZABC_ACC = DATA_PACKAGE-/BIC/ZABC_ACC
            AND /BIC/ZABC_SUBA = DATA_PACKAGE-/BIC/ZABC_SUBA
            AND /BIC/ZABC_VERS = DATA_PACKAGE-/BIC/ZABC_VERS.
Continue with the looping
Get last month from current month.
        LASTMONTH = DATA_PACKAGE-CALMONTH - 1.
*CHECK IF CURRENTMONTH = JAN then LastmonthYTD amount = 0, else read
*from the internal table.
*CURRENTMONTH = DATA_PACKAGE-CALMONTH+4(2). (this variable has been set
*above)
        IF CURRENTMONTH = '01'.
          LASTMOYTD = 0.
        ELSE.
          READ TABLE LCYEARDATA
            WITH KEY
            /BIC/ZABC_ENTI = DATA_PACKAGE-/BIC/ZABC_ENTI
            /BIC/ZABC_ACC = DATA_PACKAGE-/BIC/ZABC_ACC
            /BIC/ZABC_SUBA = DATA_PACKAGE-/BIC/ZABC_SUBA
            /BIC/ZABC_VERS = DATA_PACKAGE-/BIC/ZABC_VERS
              CALMONTH = LASTMONTH.
          IF sy-subrc IS INITIAL.
            LASTMOYTD = LCYEARDATA-AMOUNT.
          ENDIF.
        ENDIF.
*Calculate Monhtly value for this month (to later be stored in data
*package)
        MONTHLYVALUE = DATA_PACKAGE-AMOUNT - LASTMOYTD.
Count value for Last 12 Months:
1: Get the YTD Month12 Last Year & YTD CurrentMonth Last Year.
        CONCATENATE CALYEARLASTYEAR CURRENTMONTH INTO
        CURRENTMONTHLASTYEAR.
        CONCATENATE CALYEARLASTYEAR '12' INTO CALMONTH12LASTYEAR.
        READ TABLE LCYEARDATA
           WITH KEY
            /BIC/ZABC_ENTI = DATA_PACKAGE-/BIC/ZABC_ENTI
            /BIC/ZABC_ACC = DATA_PACKAGE-/BIC/ZABC_ACC
            /BIC/ZABC_SUBA = DATA_PACKAGE-/BIC/ZABC_SUBA
            /BIC/ZABC_VERS = DATA_PACKAGE-/BIC/ZABC_VERS
             CALMONTH = CALMONTH12LASTYEAR.
        IF sy-subrc IS INITIAL.
          YTDLASTYEAR = LCYEARDATA-AMOUNT.
        ENDIF.
        READ TABLE LCYEARDATA
          WITH KEY
            /BIC/ZABC_ENTI = DATA_PACKAGE-/BIC/ZABC_ENTI
            /BIC/ZABC_ACC = DATA_PACKAGE-/BIC/ZABC_ACC
            /BIC/ZABC_SUBA = DATA_PACKAGE-/BIC/ZABC_SUBA
            /BIC/ZABC_VERS = DATA_PACKAGE-/BIC/ZABC_VERS
            CALMONTH = CURRENTMONTHLASTYEAR.
        IF sy-subrc IS INITIAL.
          YTDMONTHLASTYEAR = LCYEARDATA-AMOUNT.
        ENDIF.
2. Specify YTD This month.
    AMOUNT = DATA_PACKAGE-AMOUNT.
*3: Last 12 Months = (YTD Last Year - YTD Month Last Year) + YTD This
*Month
       LAST12MONTH = YTDLASTYEAR - YTDMONTHLASTYEAR + YTDTHISMONTH.
       LAST12MONTH = YTDLASTYEAR - YTDMONTHLASTYEAR + AMOUNT.
Save MONTHLYVALUE and LAST12MONTH to the DATA_PACKAGE.
        DATA_PACKAGE-/BIC/ZAMTMO = MONTHLYVALUE.
        DATA_PACKAGE-/BIC/ZAMTLTM = LAST12MONTH.
        modify DATA_PACKAGE.
        ENDIF.
      ENDLOOP.
    ABORT = 0.

Hi,
Just check these blogs to improve performance...
The SQL Trace (ST05) u2013 Quick and Easy
The SQL Trace (ST05) Quick and Easy
The ABAP Runtime Trace (SE30) - Quick and Easy
The ABAP Runtime Trace (SE30) - Quick and Easy
Regards,
Sachin

Abap code for sap exit variables?

Hi,
i) Where can I find the abap code for SAP exit variables
OP_KEYDT used for the net due date
OP_KEYD2 used for the posting date
OP_KEYD3 used for the clearing date, which are used in FI AR aging report(0FIAR_C03).
Based on the Net Due Date, which is key date(0NETDUEDATE), entered by the user at runtime, the posting date and celaring date are populated.
II) The problem is we want to simulate a similar scenario, but with key date, which user enters is based on the custom Net Due Date(ZNETDUEDATE).And this date is populated to posting date and clearing date variables.
How do we acheive that.
Thanks.

Please tell how u solved ur issue i have the same scenario to be do.

ABAP coding for variable SAP exit

Similar Messages

Maybe you are looking for