ABAP code for caliculating the demand variability

Hi gurus,
I need to calculate the the demand variability for the requested raw material,
Demand Variability for raw materials is calculated by taking the standard deviation of 52 data points, each point representing the total consumption in a week.
The raw consumption data contains negative figures on many days, resulting from inventory adjustment transactions. Aggregate consumption to a weekly bucket to keep variability from being artificially inflated by any negative figures from adjustments due to physicals, poor practices, or cycle counts.
Calculation
Calculate the consumption for every week based on MSEG-MENGE where MKPF-BUDAT falls within the week bucket from Sunday till Saturday. This is the value Xn.
SUM all 52 Xn values for every week. This is Y.
Divide the Y/52 = Z
Calculate for that year the standard deviation
SQRT (((Xn-Z)2)/n)
Can you any one give the code for this condition.
Thanks in advance.

any help please...

Similar Messages

ABAP Code for Backup the entire table data in the application server

Hello Friends,
I have to create the table data Backup and Store the entire table data in the application server and also be able to restore the data back if needed.
this should be dynamic program for any table based on the table name given on the application server.. I have developed a program for this but its having problems with the Quantity, amount. Its not writing it correctly at the application level.
ANy Suggestions on this.
Below is the program for this.
Thanks,
Ster.
* Report YWMM_TABLE_DUMP                                             *
REPORT ywmm_table_dump .
TABLES :
        dd03l.
* Type spool declaration
TYPE-POOLS:
        abap, slis.
DATA: i_table_data1 TYPE REF TO data.
DATA : it_dd03l LIKE dd03l OCCURS 0 WITH HEADER LINE.
*DATA : gt_fieldcat TYPE lvc_s_fcat.
DATA : i_fcat      TYPE STANDARD TABLE OF lvc_s_fcat,
       l_dr_line         TYPE   REF TO data,
       l_v_as4vers       TYPE as4vers.
FIELD-SYMBOLS: <f_table_data1>     TYPE STANDARD TABLE,
               <f_wa_table_data1> TYPE ANY.
SELECTION-SCREEN: BEGIN OF BLOCK bl1 WITH FRAME TITLE text-001.
PARAMETERS: rb_copy RADIOBUTTON GROUP map DEFAULT 'X',
            rb_rest RADIOBUTTON GROUP map.
SELECTION-SCREEN: END   OF BLOCK bl1.
SELECTION-SCREEN: BEGIN OF BLOCK bl2 WITH FRAME TITLE text-002.
PARAMETERS: p_table TYPE tabname OBLIGATORY,
            p_plfld TYPE dd03l-fieldname.
SELECTION-SCREEN SKIP 1.
PARAMETERS: p_bkfile TYPE localfile OBLIGATORY.
SELECTION-SCREEN: END   OF BLOCK bl2.
PERFORM get_data.
IF rb_copy = 'X'.
PERFORM backup.
ELSEIF rb_rest = 'X'.
PERFORM database_update.
ENDIF.
*&      Form get_data
FORM get_data.
CLEAR   i_fcat.
REFRESH i_fcat.
CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
       EXPORTING
            i_structure_name = p_table " Table Name
       CHANGING
            ct_fieldcat      = i_fcat
       EXCEPTIONS
            OTHERS           = 1.
CALL METHOD cl_alv_table_create=>create_dynamic_table
EXPORTING
    it_fieldcatalog = i_fcat
IMPORTING
    ep_table        = i_table_data1.
IF sy-subrc = 0.
    ASSIGN i_table_data1->* TO <f_table_data1>.
ELSE.
    WRITE: 'Error creating internal table'.
ENDIF.
IF rb_copy = 'X'.
    SELECT * FROM (p_table) INTO CORRESPONDING FIELDS OF
              TABLE <f_table_data1> UP TO 20 ROWS.
ELSEIF rb_rest = 'X'.
    CREATE DATA l_dr_line LIKE LINE OF <f_table_data1>.
    ASSIGN l_dr_line->* TO <f_wa_table_data1>.
*Get Data from Application Server
* Opening the dataset P_BKFILE given in the selection screen
    TRANSLATE p_bkfile TO LOWER CASE.
    OPEN DATASET p_bkfile FOR INPUT IN TEXT MODE." ENCODING DEFAULT.
    IF sy-subrc NE 0.
*    MESSAGE:
    ELSE.
      DO.
* Reading the file from application server
        READ DATASET p_bkfile INTO <f_wa_table_data1>.
        IF sy-subrc = 0.
          APPEND <f_wa_table_data1> TO <f_table_data1>.
        ELSE.
          EXIT.
        ENDIF.
      ENDDO.
* Closing the dataset
      CLOSE DATASET p_bkfile.
    ENDIF.
ENDIF.
ENDFORM.                    " get_data
*&      Form backup
*       text
* --> p1        text
* <-- p2        text
FORM backup.
TRANSLATE p_bkfile TO LOWER CASE.
OPEN DATASET p_bkfile FOR OUTPUT IN TEXT MODE.
IF sy-subrc NE 0.
    WRITE: text-017.
    STOP.
ELSE.
    LOOP AT <f_table_data1> ASSIGNING <f_wa_table_data1>.
      TRANSFER <f_wa_table_data1> TO p_bkfile.
    ENDLOOP.
ENDIF.
CLOSE DATASET p_bkfile.
ENDFORM.                    " backup
*&      Form database_update
FORM database_update.
DATA : i_mara_u TYPE STANDARD TABLE OF mara WITH HEADER LINE,
         i_ekpo_u TYPE STANDARD TABLE OF ekpo WITH HEADER LINE,
         i_eban_u TYPE STANDARD TABLE OF eban WITH HEADER LINE,
         i_resb_u TYPE STANDARD TABLE OF resb WITH HEADER LINE,
         i_plpo_u TYPE STANDARD TABLE OF plpo WITH HEADER LINE,
         i_stpo_u TYPE STANDARD TABLE OF stpo WITH HEADER LINE,
         i_vbap_u TYPE STANDARD TABLE OF vbap WITH HEADER LINE,
         i_vbrp_u TYPE STANDARD TABLE OF vbrp WITH HEADER LINE,
         i_lips_u TYPE STANDARD TABLE OF lips WITH HEADER LINE,
         i_afvc_u TYPE STANDARD TABLE OF afvc WITH HEADER LINE,
         i_asmd_u TYPE STANDARD TABLE OF asmd WITH HEADER LINE,
*           i_cooi_u TYPE STANDARD TABLE OF cooi WITH HEADER LINE,
         i_qmel_u TYPE STANDARD TABLE OF qmel WITH HEADER LINE,
         i_cooi_u TYPE STANDARD TABLE OF cooi WITH HEADER LINE,
         i_esll_u TYPE STANDARD TABLE OF esll WITH HEADER LINE,
         i_t165_u TYPE STANDARD TABLE OF t165 WITH HEADER LINE,
         i_t165e_u TYPE STANDARD TABLE OF t165e WITH HEADER LINE,
         i_twpko_u TYPE STANDARD TABLE OF twpko WITH HEADER LINE,
         i_tpext_u TYPE STANDARD TABLE OF tpext WITH HEADER LINE,
         i_ce4mxpa_u TYPE STANDARD TABLE OF ce4mxpa WITH HEADER LINE,
         i_ce4mxpa_acct_u TYPE STANDARD TABLE OF ce4mxpa_acct WITH
                                                         HEADER LINE,
         i_zaim_u TYPE STANDARD TABLE OF zaim WITH HEADER LINE,
         i_s012_d TYPE STANDARD TABLE OF s012 WITH HEADER LINE,
         i_s012_i TYPE STANDARD TABLE OF s012 WITH HEADER LINE,
         i_dummy TYPE STANDARD TABLE OF mara.
CASE p_table.
    WHEN 'MARA'.
*     Non-Key
      PERFORM move_to_table USING   <f_table_data1>
                            CHANGING i_mara_u[]
                                     i_mara_u.
      PERFORM update_table USING i_mara_u[].
ENDCASE.
ENDFORM.                    " database_update
*&      Form move_to_mara
FORM move_to_table USING    p_tab_from TYPE STANDARD TABLE
                   CHANGING p_tab_to   TYPE STANDARD TABLE
                            p_w_table.
DATA: l_wa_fcat TYPE lvc_s_fcat.
FIELD-SYMBOLS: <f_field_from> TYPE ANY,
                 <f_field_to>   TYPE ANY.
LOOP AT p_tab_from ASSIGNING <f_wa_table_data1>.
    LOOP AT i_fcat INTO l_wa_fcat.
      ASSIGN COMPONENT l_wa_fcat-fieldname
     OF STRUCTURE <f_wa_table_data1> TO <f_field_from>.
      ASSIGN COMPONENT l_wa_fcat-fieldname
     OF STRUCTURE p_w_table TO <f_field_to>.
      <f_field_to> = <f_field_from>.
    ENDLOOP.
    APPEND p_w_table TO p_tab_to.
ENDLOOP.
ENDFORM.                    " move_to_mara
*&      Form update_table
FORM update_table USING p_table_update TYPE STANDARD TABLE.
SELECT SINGLE *
    FROM dd03l
   WHERE fieldname = p_plfld
     AND tabname   = p_table
     AND keyflag   <> 'X'
     AND as4local = 'A'
     AND   as4vers = l_v_as4vers
     AND   ( comptype = 'E' OR comptype = space ).
IF sy-subrc = 0.
*   Do update
    IF NOT p_table_update IS INITIAL.
      UPDATE (p_table) FROM TABLE p_table_update.
      IF sy-subrc = 0.
        COMMIT WORK.
      ELSE.
        ROLLBACK WORK.
        WRITE: text-003.
        STOP.
      ENDIF.
    ENDIF.
ELSE.
*delete and insert.
    IF NOT p_table_update IS INITIAL.
*      DELETE (p_table).
      IF sy-subrc = 0.
        INSERT (p_table) FROM TABLE p_table_update.
        IF sy-subrc = 0.
          COMMIT WORK.
        ELSE.
          ROLLBACK WORK.
          WRITE: text-018.
          STOP.
        ENDIF.
      ELSE.
        ROLLBACK WORK.
        WRITE: text-018.
        STOP.
      ENDIF.
    ENDIF.
ENDIF.
ENDFORM.                    " update_table
Edited by: Julius Bussche on Jul 18, 2008 1:43 PM
Please use a meaningfull subject title!

ARS,
I am struggling a bit to get this.
there is a syntax error,
Field "FIELDS_INT-TYPE" is unknown. It is neither in one of thespecified tables nor defined by a "DATA" statement.
Again you have asked to move to a diffrent table. What is that table and how to build it.
    LOOP AT <f_table_data1> ASSIGNING <f_wa_table_data1>.
      LOOP AT i_fcat INTO l_fcat.
        IF l_fcat-inttype EQ 'P'.
          ASSIGN COMPONENT l_fcat-fieldname
              OF STRUCTURE <f_wa_table_data1> TO <f_field>
              TYPE     fields_int-type
              DECIMALS fields_int-decimals.
        ELSE.
          ASSIGN COMPONENT l_fcat-fieldname
              OF STRUCTURE <f_wa_table_data1> TO <f_field>
              TYPE     fields_int-type.
        ENDIF.
        " Move <f_field> to a new table and use this table for download
      ENDLOOP.
      TRANSFER <f_wa_table_data1> TO p_bkfile.
    ENDLOOP.
Ster

ABAP Code for loading the flat files kept at FTP locations

Hi all,
I need to automate the process of data loading via flat files with the help of process chains , with respect to which I require following help:
1. what steps should I follow to load the data with respect that whenever the new file comes in the directory of the ftp location start that process chain for data load.(Note : there is no fix time that when the new file will be coming)
2. Every time the new file will be having differnt name , then in that case how we will be fetching the new file which is require for data loading?
Thanks and Regards,
Neha

Hi Neha,
I have not worked on this or made this code.
Recently my onsite did it.
Try to find more gyan on this functiona module...'DX_GET_PHYSICAL_FILENAME'
Code is... write it in infopackge start routine.
DATA: v_filename LIKE dxfile-filename.
Below function module generates the filename with the complete path
based on the app server attached to the Central Instance
The logical mapping Z_INBOUND_EBIZ_PAYMENTS is maintained in the
transaction - "FILE"
CALL FUNCTION 'DX_GET_PHYSICAL_FILENAME'
    EXPORTING
      i_filename             = 'Z_INBOUND_EBIZ_PAYMENTS'
    IMPORTING
      o_filename             = v_filename
    EXCEPTIONS
      not_registered         = 1
      logical_filename_error = 2
      OTHERS                 = 3.
IF sy-subrc = 0.
    p_filename = v_filename.
    p_subrc = 0.
ELSE.
    p_subrc = 4.
ENDIF.
Regards,
San!

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.

Need ABAP code for the below Services requirement

Hi,
We have a requirement to show all the services for a particular Purchase order number.For this I built a view on 2 tables ESLL and EKPO.Now based on the below logic I need to bring the services for the Purchase order..
1.Enter PO number,item no. and Doc category in EKPO and find the Pack no.
2.Now take the Pack no. of EKPO and give in ESLL and find the Sub pack no.
3.Now take this Subpack no. and Give this sub pack as Pack no. in ESLL
4.This will be the Service entry record for that PO number.
Can any one Please suggest me to how to write the ABAP code for the above logic.
Thanks & Regards,
Dinakar

Hi Dinaker,
Did you find any solution for this issue. I too have a similar requirement of pulling all the service orders for a specific Purchase Order in the BW report.
Thanks,
SAPBWI

How to write the ABAP code for Datasource Enhancment

Hi Team,
Can you please help me how to write the code for the enhancement i have made to the standard datasource
i have added the fields ZZPayer and ZZPayer_access.
I just wanted to know how to write the ABAP code to populate the data for these fields.
Regards,
Pradeep P.

Hi
From a performance point of view would like to suggest a few changes :
WHEN '<DS name>'.
select zzfields from <table> into itab
for all entries in c_t_data where <condition>.
If sy_subrc = 0.
loop at c_t_data assiging f_c_t_data.
read itab into wa_itab where key = f_c_t_data-key.
f_c_t_data-zzfield = wa-itab-zzfield.
endloop.
refresh itab.
regards,
aparna
endif.

ABAP Code for SAP exit varaibles?

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.

Hi Kumar,
Try this below mentioned example where default date is current date.
Step1: Create a variable(ex: cur_date) on requrired characteristic with Processing type "Customer Eixt" and check the check box for ready for input(if this variable need in selection screen).
Step 2: Goto T Code : CMOD and provide appropriate Project and choose components and click on display.
Step3: Double click on exit "EXIT_SAPLRRS0_001" you can see include "ZXRSRU01", double click on include.
Step4: Sample code to populate.
WHEN 'CUR_DATE'.
Data : l_p_range_SSS TYPE rrrangesid.
IF I_STEP = 1.
l_p_range_SSS-Low = sy-datum.
l_p_range_SSS-Sign = 'I'.
l_p_range_SSS-Opt = 'EQ'.
APPEND l_p_range_SSS TO e_t_range.
Endif.
The following values are valid for I_STEP:
· I_STEP = 1
Call up takes place directly before variable entry
· I_STEP = 2
Call up takes place directly after variable entry. This step is only started up when the same variable could not be filled at I_STEP=1.
· I_STEP = 3
In this call up, you can check the values of the variables. Triggering an exception (RAISE) causes the variable screen to appear once more. Afterwards, I_STEP=2 is also called up again.
· I_STEP = 0
The enhancement is not called from the variable screen. The call up can come from the authorization check or from the Monitor.
Also, refer this link..
http://help.sap.com/saphelp_bw320/helpdata/en/1d/ca10d858c2e949ba4a152c44f8128a/content.htm
Cheers,
Allen

Needs sample ABAP code for field routine

Dear Expert,
There is a field "Pay Scale Group" in my DSO which stores the data in the format
AA1/B1/CCC2/DD2/EEE1, A1/BB2/CC2/DDD3/EE2 etc. These data has to be transferred to
InfoCube where "pay Scale Group" in the InfoCube will store the data like EEE1,EE2 etc.
I need to write a field routine on the transformation between DSO and Cube.
Can any one please help me with the sample ABAP code for this scenario.
Some more examples for better understanding of the requirement:-
Data in DSO(Source)            Data in Cube(Target)
===================            ===================
AA1/B1/CCC2/DD2/EEE1            EEE1
AAA1/BB2/CC1/DDD3/EE2           EE2
A2/BBB2/CC2/DDD3/EEE5           EEE5
AA2/BB1/C1/DDD3/EE3             EE3
A3/B1/CC2/DDD1/EE4              EE4
Many thanks in advance.
Regards,
Prakash
Please do not dump your code requirements in SDN
Edited by: Pravender on May 18, 2011 11:37 AM

Hi,
You can use the following code :
Suppose the technical name of the field coming from DSO is ZPAY_SGRP.
And also for example let me take one record, that is ZPAY_SGRP = AA1/B1/CCC2/DD2/EEE1 .
My assumption is that there will always be 4 '/'.
In the field routine write the below code
data: V1(5) type c,
          V2(5) type c,
         V3(5) type c,
          V4(5) type c,
         V5(5) type c.
data : VAR1 TYPE /BIC/OIZPAY_SGRP.
split VAR 1 at '/' into V1 V2 V3 V4 V5.
result = V5.
V5 will be having the characters after the last '/' .That is V5 = EEE1.
Hope the above reply was helpful.
Kind Regards,
Ashutosh Singh
Edited by: Ashutosh Singh on May 17, 2011 3:53 PM
Edited by: Ashutosh Singh on May 17, 2011 4:17 PM

ABAP code for BI 7.0 transformations start routine

Hi all,
I am trying to update data from DSO1 (Source1: transaction data) to Infocube(TARGET)
In the transformations Start routine, I have to read DSO2(Source2: Master data) for some fields.
DSO1 has CUSTOMER as part of key
DSO2 has CUSTOMER (key) and other fields....FIELD1, FILED2, FIELD3
Infocube to be updated with FIELDS1,2 & 3 WHILE READING DSO2.
WHERE DSO1 CUSTOMER matches with DSO2 CUSTOMER.
Also, data NOT TO BE UPLOADED into Infocube if FIELD1 in DSO2= NULL
Please give me the abap code for the above logic.
Appreciate any help in this regard.
Thanks.

This is a doc from this site:
https://www.sdn.sap.com/irj/sdn/go/portal/prtroot/docs/library/uuid/6090a621-c170-2910-c1ab-d9203321ee19
Ravi Thothadri

How To Create ABAP Code For HR Context Sensitive Structural Authorization

Hello,
We have created a HR Custom Program which IS NOT built off the PCH or PNP Logical Database. As a result, we need to manually create ABAP code for HR Context Sensitive Structural Authorization Check in our custom HR program. Via HR Context Sensitive Structural Authorizations, we are restricting access to personnel numbers and the underlying HRP* tables.
Any assistance would be greatly appreciated with the identification of the SAP standard function modules (Ex. RH_STRU_AUTHORITY_CHECK, HR_CHECK_AUTHORITY_INFTY, HR_CHECK_AUTHORITY_INFTY , etc) used in HR Context Sensitive Structural Authorization Check, how they are used to control HR Structural authorization (P_ORGINCON), and some sample code.
Thank you in advance for all your assistance,
Ken Bowers

Hello Ken
You can use the interface methods IF_EX_HRPAD00AUTH_CHECK to get the same structural authorization as you can see in PA20/PA30. You need to use the methods set_org_assignment and check_authorization for this purpose. For more information you can refer to include FP50PE21 from line 237 onwards till 270.
Regards
Ranganath

ABAP code for wrting a file to application server

<Moderator Message: We are not here to do your job for you>
Hi All,
i have a requirement to get the data from some other ABAP program and this data has to be written in one of the files present in application server.
please provide me the exact ABAP code for this...
Edited by: Siegfried Szameitat on Dec 17, 2008 10:40 AM

this has to be done using a process chain

ABAP Code for BI objects

Hi Friends,
I have created BI objects like infocubes, infoobjects, DTP, Datasource to transfer data from a flat file to BI system using SAP GUI... All data from flat file are transfered to BI successfully... i dont have any knowledge in ABAP... So i need to see the ABAP code for the BI objects i created above in my project... how can i see the coding for that?
thanks in advance
sasi

Hi Sasi,
All the objects which you create in BI will be stored in some standad tables,it only fetch details accordingly from those tables.For MasterData you can find the option as Display Routines in Extras.If you want to get more infomation about the STD Table and the Program involed in BI objects,just enter in (/h) mode.
Regards,
Prem

ABAP code for Hierarchy Loading from Flat File

Hi,
Can anyone give me some idea / ABAP code for generating parent - child relationships (NODEIDS) from a flat file and load into BW.
Best regards
Any insight into this development is highly appreciated

Hi,
also have a look at this how to to get informations about the file structure:
https://www.sdn.sap.com/irj/servlet/prt/portal/prtroot/docs/library/uuid/0403a990-0201-0010-38b3-e1fc442848cb
/manfred

ABAP code for Date Range

Hi All,
I have requirement to write code for date range.
Characterstic = Run-Out Date, it was created reference to 0Date.
Requirement is data should load depends on Run-Out Date 7 days old and 14 days future.
Logic is -7 days old >= Run_out date <= 14 days future.
please let me know how I need to proceed with ABAP code for this requirement.
Thanks.
Please do not ask for ABAP code here. Its not a training forum
Edited by: Pravender on Aug 18, 2011 1:46 AM

>
Sree vignesh wrote:
> Hi,
> In the select option we have a field month range as
> SELECT-OPTION : FROM 01.2007       TO 01.2009 " Let say Ur Selection option is SO_MONTH
> but now i need to add the DMBTR field considering the month range in the SELECT OPTION i.e., only FROM 01.2007 TO 01.2009 i mean without 2006 data.
>
> LOOP AT LT_DATA WHERE month in SO_MONTH. " Here add a Where condition
>     ls_output-matnr = lt_data-belnr.
>     ls_output-werks = lt_data-bukrs.
>     ls_output-lgort = lt_data-dmbtr.
>
>     COLLECT ls_output INTO lt_output .
>
>   ENDLOOP.
>
> please help with code .
>
> thanks in advance.
Regards,
Suneel G

T.code for check the Total SRS

pls tell me t.code for match the SRS (stock requitions slip)from store or production ?
Thanks
Rekha Sharma

U can check in MB25 or in MB51.

ABAP code for caliculating the demand variability

Similar Messages

Maybe you are looking for