WBS element - Project System

Hi
Current project, MM integrated with PS .
I need expert who involved MM – PS, please let me know the mail id and process.
I need your help further lot of requirement and ideas from your end,
Current requirement is :
Is there any standard report for  Vendor , Material , Project and sorted by after delivery date.
Want to see for specific vendor , what is WBS number and what are material brought.
Pl let me know any reports available in SAP.
waiting for your kind reponse..
thnx in adv.
Best regards
Shiva.

hi,
thnx , i checked already but i am not able to find as per requirements,
if PS consultant can easily find out this ........
try it out..
thnx
best regards
SK

Similar Messages

  • Travel Expenses settlements against Service Order/WBS Element/Project Ord

    Hi Experts,
    I have one req. in Travel Expenses, i.e. need to settle travel expneses against Service Order/WBS Element/Project Order.
    Can you guide me how to do this req.
    Thanks & Regards
    Rajesh

    Hye mate,
    This is possible for sure what you need to do is to go at travel request . In travel Request there is an option of Enhanced Travel cost/ Alternative master cost center. if you click on it . you would find an option of cost assignmnet click on it
    there you would have option , like an excel sheet like fields of  the cost centre, wbs element, profit center, order number what eve is requred and save it.
    now the cot of trip would go that particulat cost center or der numbe or WBS rather then the cost center assigned at master data in ifototype 0027.
    Regards
    Waqas Anwar

  • Budgeting on WBS in Project System

    Hello every body,
    Can u tell me, the procedure of the budget implemented in the WBS?
    I am use the CJ30 t-code. Suppose the budget is exceeded at that time, I am change the overall budget. Still, when I am going to change the yearly budget it shows the error and it could not do the contract requisition. I think I may wrong.
    What is its procedure?
    How to transfer the budget one year to another year with step-by-step procedure?
    How to settlement the project with step-by-step procedure?

    Hi Asutosh,
    The budget is the approved cost limit for a project.It differs from project cost planning due to its binding nature. Whereas the project costs need to be estimated as accurately as possible during the planning phase, the funds are predetermined as a budget in the approval phase. The budget is the limit set by management for project costs over a certain period of time.
    Through transaction CJ30, you can change original Budget.But once approved by Management,you can not change it in CJ30 as and when your requirement gets changed.
    Let us say initially you have got budget of Rs.1,50,000/- from Management for one WBS,then this amount will appear for particular WBS in CJ30. You can raise contract requisition against this WBS till max limit Rs.1,50,000/- only.
    Suppose your contract value is going to exceed Rs.1,50,000/- , you can not  go and change amount for WBS in transaction CJ30.It is not allowed.You have to give justification for exceeding amount for this contract. Then management can approve you additional amount in the form of supplementary budget.
    Similarly if you have got budget of Rs.1,50,000 and you are going to spend only Rs.1,25,000 in this year, then balance can be carried forward for next year.Same can be informed to Managment as well.
    For transferring budget from one year to another year use transaction CJ34.
    There is one more concept called Availability control.With this you can set up a tolerance limit.Let us say for your budgetted amount, you have put up tolerance limit of 90%, then you are allowed to raise contract requisition against WBS till 90% of total budgetted amount.If contract amount is going to exceed this limit, then system will give an error with the message "Budget not available".Then you have to get supplementary budget to fulfill this crietria.
    Please refer the link below to know more about the procedure of Budget implementation
    http://help.sap.com/saphelp_46c/helpdata/en/86/98853478616434e10000009b38f83b/frameset.htm- Go to topic Budget Management.
    For Settlement of the project, you should define settlement rule for WBS element.Settlement rule will contain Distribution rule in the form of category,settlement receiver,perecentage allocation,amount.
    Hope this will be helpful.
    Regards
    Tushar

  • Changing Activity Elements  under the WBS in Project Systems

    I have added additional fields to the AFVU structure and need to update the fields.
    I created a sub-screen using enhancement CNEX0008. This subscreen contains my added fields.  I wanted to use tcode CN22 to perform the updates.
    When i record a BDC for Tcode CN22 to preform the update, I find the screen numbers change. I am trying to update the internal activity entries.  I can not see a pattern as to why this is happening so i thought i would look for a bapi to perform my updates. But i don't know how to use the bapi's to update my added fields. or which one to use.
    Can anyone give me ideas as to which way to go - and how?
    Please and Thanks,

    Hi,
    Use BAPI BAPI_INTERNALORDER_CREATE. To add custom field, you have to user the table EXTENSIONIN of this BAPI. But before that you will have to <b>extend AUFK using append structure CI_AUFK ( enhancement COOPA003 )</b>
    This what SAP says about this table.
    You can use this parameter to transfer user-defined fields from  order master records. However, no fields are supported that are updated in user-defined tables. Only the user-defined fields created within the framework of the SAP enhancement COOPA003 that are updated automatically in table AUFK are supported. This means you must use the table extension BAPI_TE_AUFK
    The enhancement COOPA_01 includes the function module EXIT_SAPLRKIO_001, in which checks of the user-defined fields can be implemented.
    The documentation to the structure BAPIPAREX that this parameter is based on contains more information about the use of this parameter.
    <b>This is how you populate this table.</b> Check this code
    DATA: gt_ci_aufk     LIKE bapi_te_aufk
                             OCCURS 0 WITH HEADER LINE.
    DATA: gt_extensionin LIKE bapiparex
                             OCCURS 0 WITH HEADER LINE.
    DATA: lst_ci_aufk LIKE ci_aufk.
    ** Five variables used to handle the structure length changes
    DATA: lv_length    TYPE i,
          lv_length1   TYPE i,
          lv_length2   TYPE i,
          lv_length3   TYPE i,
          lv_length4   TYPE i.
    FIELD-SYMBOLS <f> LIKE bapi_te_aufk.
    DESCRIBE FIELD <f> LENGTH lv_length.
    IF lv_length > 720.
      lv_length4 = lv_length - 720.
      lv_length3 = 240.
      lv_length2 = 240.
      lv_length1 = 240.
    ELSEIF lv_length > 480 AND lv_length <= 720.
      lv_length3 = lv_length - 480.
      lv_length2 = 240.
      lv_length1 = 240.
    ELSEIF lv_length > 240 AND lv_length <= 480.
      lv_length2 = lv_length - 240.
      lv_length1 = 240.
    ELSEIF lv_length <= 240.
      lv_length1 = lv_length.
    ENDIF.
    * move custom field
    lst_ci_aufk-field1 = 'field1 data'.
    lst_ci_aufk-field2 = 'field2 data'.
    lst_ci_aufk-field3 = 'field3 data'.
    lst_ci_aufk-field4 = 'field4 data'.
    * move order number
    gt_ci_aufk-orderid = 'iternal order no'. "In create node keep this blank
    * move custom fields
    MOVE-CORRESPONDING lst_ci_aufk TO gt_ci_aufk.
    * This is for the EXTENSIONIN (Custom fields structiure - CI_AUFK)
    LOOP AT gt_ci_aufk.
      gt_extensionin-structure = 'BAPI_TE_AUFK'.
      IF lv_length1 > 0.
        MOVE gt_ci_aufk+0(lv_length1)   TO gt_extensionin-valuepart1.
      ENDIF.
      IF lv_length2 > 0.
        MOVE gt_ci_aufk+240(lv_length2) TO gt_extensionin-valuepart2.
      ENDIF.
      IF lv_length3 > 0.
        MOVE gt_ci_aufk+480(lv_length3) TO gt_extensionin-valuepart3.
      ENDIF.
      IF lv_length4 > 0.
        MOVE gt_ci_aufk+720(lv_length4) TO gt_extensionin-valuepart4.
      ENDIF.
      APPEND  gt_extensionin.
    ENDLOOP.
    Let me know if you have any question.
    Regards,
    RS

  • Related to PS of WBS Element

    Hi gurus,
    when am doing creation of PR or PO the system is allowing for a value more than approved in the project system. There is no check in the system to stop creation of PR or PO having value more than approved WBS element. However system is perfectly working if it is service scenario.
    System should work perfectly at every level (PR, PO, GRIN, Issue of material(MIGO), Reservation against PM Orders etc.) both im material as well as in service scenario against approved WBS element (Project System).
    Please can any suggest for that.
    Its very urgent.
    Regards
    Raj

    Depends on the settings you defined as 'Availability-control activity group' under configuration node 'Define Tolerance Limits'
    Path: Project System>Costs>Budget>Define Tolerance Limits
    Mention the activity group for your budget profile to ++. Once done execute T Code: CJBN mentioning the project and the budget profile.
    Regards
    Sreenivas

  • WBS Elements not getting created in ECC Project System from CRM 7.0

    Dear all,
    We are trying to integrate SAP CRM 7.0 with SAP ECC-PS module. The objective is to bring in the marketing plan and elements data from the CRM system, and to create the corresponding WBS in project system. We have done most of the configuration as recommended by SAP in both the systems, and we see that the BDOCS are getting generated and sent to the ECC system. The following steps have been successfully completed:
    1.       Set up the RFC connections between the two systems
    2.       Selected the connection type as Middleware in CRM system.
    3.       Installed the cProject Add on in CRM box.
    4.       Created a project scenario (with project and network profiles) in the PS system and assigned the same in the CRM system.
    5.       The Project Scenario in PS config has the same name as the Project Type in CRM config.
    6.       Created and released the campaign ids being created in the CRM system.
    As already mentioned, we can see that the BDOCS are coming to the ECC system and are getting stored in BDOC_TRACK table. However the issue is that the corresponding WBS elements are not getting generated in the ECC system. Is there anything that that we are missing in the ECC box which would trigger the WBS element creation?
    Request you all to share your inputs which would be immensely beneficial for us in achieving this integration.
    Thanks and Kind Regards,
    Aditya Shrivastava

    Hello Aditya,
    We too are facing this issue.. if you have resolved the issue could you please let us know the solution ?
    Some inputs related to our system,
    We have upgrade from CRM 4.0 to CRM 7.0 SP07 and R/3 backend system is on 4.7 SP27, earlier we have completed the upgrade on sandbox without any issues which was upgrade to CRM 7.0 SP04 but with SP07 we are facing the problem of WBS Element not getting created in R/3.
    Your help is highly appreciated.
    Thanks & Regards,
    Sumukh Kapoor.

  • Transaction Data for Project Definition & WBS Element of Project System(PS)

    Hi all,
       We want to install the Project Systems and the requirement is to report on the following fields:
    Project Definition  (Project Definition   PROJ     PSPID)
    Project Definition  (PS Short Description PROJ     POST1)
    Project Definition  (System Status  CNJ_STAT     STTXT_INT)
    WBS Element         (Project Type       PRPS     PRART)
    WBS Element         (Short ID             PRPS     POSKI)
    WBS Element         (Person Responsible     PRPS     VERNR)
    WBS Element         (Company Code     PRPS     PBUKR)
      R/3 Table Names and Field names are in brackets.
      0PROJECT_ATTR & 0PROJECT_TEXT are DataSources of 0PROJECT Master Data.
      0WBS_ELEMT_ATTR & 0WBS_ELEMT_TEXT are DataSources of 0WBS_ELEMT Master Data.
      How can I find the transaction data for those above fields, PLEASE ?
      Thanks in advance.

    Hi
    Kindly check the following data sources:
    0PS_CLM_CST ( Costs of a Claim)
    0PS_CSH_NTW ( Network plan payments)
    0PS_CSH_NWA ( Payments on network plan process)
    0PS_CSH_WBS ( Payments on WBS element)
    0PS_DAT_NTW ( Network dates )
    0PS_DAT_NWA ( Dates network operation)
    0PS_DAT_PRJ ( Date project )
    0PS_DAT_WBS ( WBS Element Dates)
    0PS_NAE_EVA ( Progress in Network Activity Elements)
    0PS_NTW_EVA ( Progress in Networks)
    0PS_NWA_EVA ( Network Activity Earned Value)
    0PS_ORD_EVA ( Order Earned Value)
    0PS_WBS_EVA ( Earned Value WBS Element)
    hope this helps!
    best regards,
    Thangesh

  • CJ9B - error message when copy locked project or wbs element

    Dear Expert,
    Tcode CJ9B is for copy planning wbs element/project and every month i need to unblocked all the project or wbs that not use (locked) one by one to make CJ9B able to run without any error.
    Is there any way to do mass change on wbs element or project as i unblock one by one in tcode CJ02?
    Please advice what is different between CJ9B and CJ9F? Is it same doing copy planning wbs or project?
    regards,
    ng chong chuan

    For the locking and unlocking you can use CJ20n  -->WBS element overview instead of the CJ02 so, you can make mass locking and unlocking of WBS  all the WBS elements of project atleast.
    CNMASS tcode is for the mass changes in PS but same will not work for hte system status change.
    One workaround is that you write BDC via SHDB txn and user that BDC to change the status of all the WBS for which you wanted to  lock/ unlock .
    You can also use LSMW also.
    Regards
    Nitin

  • While creation of wbs element system show ticks on Acc Asgn & Planning elem

    Dear All,
    In CJ20N Tcode i am creating Project Defn. & WBS Elements.
    I needed such functionality like when i enter TCode CJ20N & creating WBS Elements then, system should show the Ticks on Planning Element & Account Assignment Element which must appear on selecting the main screen of the WBS.
    Presently we have done it thru substitution. Thru this we are getting the result, but it is only after saving the WBS.

    Only way I can see the Planning element checked before saving is going to Edit - Validation/Substitution - Substituion...in CJ20N and the check box gets ticked before saving. Again its using the functionality of Substituion only but you can see the check box ticked before saving.
    Hope it helps.
    Arya

  • How to Find PS GUID with WBS Element (POSID) or Project Definition (PSPID)?

    Hi all,
        I am creating the custom Extractor similar to 0CO_OM_WBS_1 (WBS elements: Costs) to load into 0PS_C041 (Project System - Controlling (New)). I have the WBS Element (POSID) & Project Definition (PSPID) and I how can I find the GUID (UUID in X form Binary) so that I could map it into 0PSGUID InfoObject in the Transformation. We have WBS Element & Project Definition (PSPID) as Navigation Attributes of 0PSGUID instead of under some Dimension in 0PS_C041 Cube and that's why I am trying to find the GUID with WBS Element (POSID) or Project Definition (PSPID), PLEASE.
    Thanks,
    Venkat.

    Hi Bala
    Yes, you have put it rather correctly.
    We use WBS elements for booking and posting time (client requirement). So what I am looking for is WBS Elements with the system status TERL (Time and Expense Released).
    I talked of the deletion flag also, because a WBS element flagged for deletion can't be used. It's one of the criteria to screen the WBS elements.
    I hope it's clearer now.
    Vinitha.

  • How to post actual in WBS element.

    Hi There,
    I have one typical situation here.
    My company dont have Project system in SAP. now they are implementing PS.
    They wanted to bring all projects and Wbs element in SAP
    They have budget on XYZ wbs elemnt is about 150,000 USD. and they have spend 100,000.
    so i want to post 100,000 as actual.
    So they can have avialable balance of 50,000 USD.
    can anyone tell me the procedure. ?
    Thanks in advance..

    For any movement of goods receipt or goods issues, system posts FI documenet and system looks for WBS element also.
    After entering WBS element only system posts FI document. 
    In some cases we need to buy without purchase order (Oils/Lubricants/Spare parts etc.), in such case we use direct FI purchases (F-02) and posts  FI document and enters WBS element and system posts directly to WBS
    Srinivas

  • Material Purchase Requisition with WBS from Projects

    Hi ;
    As per our client requirement we need to create Material Purchase Requisition  with WBS Element  Material .Can Some one send me the procedure .
    Thanks in Advance ;
    Joydeep Mukherjee

    HI Joydeep,
    This is not possible in PS via CJ20N transaction to create material PR without activities. This is standard SAP restriction, i guess this cannot be changed.
    You can use ME51N by account assigning to Project / WBS element, then system will allow you to create.
    This is kind of two different functionalities we have to create PR for WBS element / Project / Network.
    Regards
    Terence

  • WBS element in MB1A

    Hello
    In MB1A it is possible a WBS element to be required, optional or suppressed? If yes, how will I do it?
    Thanks

    Hi,
    Go to trasnaction code OMJJ.  Select the check boxes Client and Movement type --> Press enter --> Give respective client code and movement type as 221 (Note: Select 291 also if you use this MT for GI to WBS element).  Then select the movement type and click field selection (201).  Then double click on additional account assignments.  Here make the field WBS element/Project to required entry.  Now your query will be resolved.
    Regards,

  • Creation of WBS Element Hierarchy

    Hi Friends,
    I have input file like the below(1 Project definition and n WBS elements)
    Project Definition     WBS Element
    HE-000200     
                         HE-000200.01
                         HE-000200.01.00001
                         HE-000200.01.00002
                         HE-000200.02
                         HE-000200.02.00001
                         HE-000200.02.00002
                         HE-000200.03
                         HE-000200.03.00001
                         HE-000200.03.00002
                         HE-000200.04
                         HE-000200.04.00001
                         HE-000200.04.00002
    I created Project Definition HE-000200 by using BAPI_BUS2001_create.
    Now I want to create above WBS elements hierarchy for the above project.
    I am using the BAPI_BUS2054_create_multi.
    is it possitble to create wbs elemnents like the baove hierarchy by using BAPI_BUS2054_create_multi? if yes send me the code , it will help to me.
    !!!!! IT is very urgent.
    Waiting for your inputs
    Regards,

    Hi Raju,
    See this .,.,this might help u.,.,
    *& Include ZBAPIWBS
    *& Report Z_BAPI_CJ20N
    REPORT Z_BAPI_CJ20N.
    INCLUDE ZBAPICJ20NTOP.
    INCLUDE ZBAPICJ20NFILEUP.
    INCLUDE ZBAPICJ20NLOGIC.
    *& Include ZBAPICJ20NTOP
    DATA: BEGIN OF ITMAIN OCCURS 0,
    PROJECT_DEFINITION TYPE PS_PSPID,
    DESCRIPTION TYPE PS_POST1,
    PROJECT_PROFILE TYPE PROFIDPROJ,
    BUS_AREA TYPE GSBER,
    WBS_ELEMENT TYPE PS_POSID,
    WBS_DESCRIPTION TYPE PS_POST1,
    END OF ITMAIN,WA_MAIN LIKE LINE OF ITMAIN,ITWBS LIKE STANDARD
    TABLE OF ITMAIN WITH HEADER LINE, ITMAIN2 LIKE STANDARD TABLE OF
    ITMAIN.
    DATA: ITPRJDEF TYPE STANDARD TABLE OF BAPI_PROJECT_DEFINITION WITH
    HEADER LINE,WA_PRJDEF LIKE LINE OF ITPRJDEF.
    DATA: ITPRJDEFUP TYPE STANDARD TABLE OF BAPI_PROJECT_DEFINITION_UP WITH
    HEADER LINE, WA_PRJDEFUP LIKE LINE OF ITPRJDEFUP.
    DATA: ITMETPRJ TYPE STANDARD TABLE OF BAPI_METHOD_PROJECT,
    WA_METPRJ LIKE LINE OF ITMETPRJ.
    DATA: RETURN TYPE BAPIRETURN1,MSG TYPE STANDARD TABLE OF
    BAPI_METH_MESSAGE WITH HEADER LINE.
    DATA: LINES TYPE I,REFNO TYPE I VALUE 0.
    DESCRIBE TABLE ITMAIN LINES LINES.
    DATA: METTYPE TYPE STRING VALUE 'Create'.
    DATA: WA_DUPLI LIKE LINE OF ITMAIN.
    WA_DUPLI-PROJECT_DEFINITION = 'JB'.
    DATA: SPLIT1(50) TYPE C.
    DATA: PREVWBS TYPE PS_POSID VALUE ' ',
    LEFTWBS TYPE PS_POSID VALUE ' '.
    DATA: POS TYPE I VALUE 1.
    DATA: OFF TYPE I VALUE 0,MODE TYPE I,INDEX1 TYPE I VALUE 0,
    INDEX2 TYPE I VALUE 0,INDEX3 TYPE I VALUE 0,
    INDEX4 TYPE I VALUE 0,INDEX5 TYPE I VALUE 0,
    POS2 TYPE I VALUE 0,FLAG TYPE I VALUE 0.
    DATA: ITBUS TYPE STANDARD TABLE OF BAPI_BUS2054_NEW,
    WA_BUS LIKE LINE OF ITBUS, RET TYPE STANDARD TABLE OF BAPIRET2,
    WA_RET LIKE LINE OF RET, ITBUS2 LIKE STANDARD TABLE OF BAPI_BUS2054_NEW,
    WA_BUS2 LIKE LINE OF ITBUS, WA_BUS3 LIKE LINE OF ITBUS.
    DATA: BAPIRET TYPE BAPIRETURN1,
    PROJEX TYPE BAPI_PROJECT_DEFINITION_EX.
    *& Include ZBAPICJ20NFILEUP
    CALL FUNCTION 'UPLOAD'
    EXPORTING
    FILENAME = ' '
    FILETYPE = 'DAT'
    TABLES
    DATA_TAB = ITMAIN .
    *& Include ZBAPICJ20NLOGIC
    SORT ITMAIN BY PROJECT_DEFINITION WBS_ELEMENT.
    LOOP AT ITMAIN INTO WA_MAIN.
    IF WA_DUPLI-PROJECT_DEFINITION <> WA_MAIN-PROJECT_DEFINITION.
    WA_PRJDEF-PROJECT_DEFINITION = WA_MAIN-PROJECT_DEFINITION.
    WA_PRJDEF-DESCRIPTION = WA_MAIN-DESCRIPTION.
    WA_PRJDEF-PROJECT_PROFILE = WA_MAIN-PROJECT_PROFILE.
    WA_PRJDEF-BUS_AREA = WA_MAIN-BUS_AREA.
    WA_PRJDEFUP-PROJECT_DEFINITION = 'X'.
    WA_PRJDEFUP-DESCRIPTION = 'X'.
    WA_PRJDEFUP-PROJECT_PROFILE = 'X'.
    WA_PRJDEFUP-BUS_AREA = 'X'.
    WA_METPRJ-REFNUMBER = REFNO + 1 .
    WA_METPRJ-OBJECTTYPE = 'ProjectDefinition'.
    WA_METPRJ-METHOD = METTYPE.
    WA_METPRJ-OBJECTKEY = WA_MAIN-PROJECT_DEFINITION.
    APPEND WA_METPRJ TO ITMETPRJ.
    WA_METPRJ-REFNUMBER = ''.
    WA_METPRJ-OBJECTTYPE = ''.
    WA_METPRJ-METHOD = 'Save'.
    WA_METPRJ-OBJECTKEY = ''.
    APPEND WA_METPRJ TO ITMETPRJ.
    CALL FUNCTION 'BAPI_PROJECT_MAINTAIN'
    EXPORTING
    I_PROJECT_DEFINITION = WA_PRJDEF
    I_PROJECT_DEFINITION_UPD = WA_PRJDEFUP
    IMPORTING
    RETURN = RETURN
    TABLES
    I_METHOD_PROJECT = ITMETPRJ
    E_MESSAGE_TABLE = MSG.
    IF SY-SUBRC = 0.
    FLAG = 1.
    ENDIF.
    WA_DUPLI-PROJECT_DEFINITION = WA_MAIN-PROJECT_DEFINITION.
    COMMIT WORK.
    DELETE ITMETPRJ FROM 1 TO 2.
    INCLUDE ZBAPIWBS_ALL.
    ENDIF.
    ENDLOOP.
    *& Include ZBAPIWBS_ALL
    LOOP AT ITMAIN INTO WA_MAIN WHERE PROJECT_DEFINITION = WA_DUPLI-PROJECT_DEFINITION.
    APPEND WA_MAIN TO ITWBS.
    ENDLOOP.
    *Sort the table
    LOOP AT ITWBS INTO WA_MAIN.
    SPLIT1 = WA_MAIN-WBS_ELEMENT.
    POS = 0.
    LOOP AT ITWBS WHERE WBS_ELEMENT <> SPLIT1.
    IF STRLEN( ITWBS-WBS_ELEMENT ) = STRLEN( SPLIT1 ).
    IF POS = 0.
    APPEND WA_MAIN TO ITMAIN2.
    ENDIF.
    APPEND ITWBS TO ITMAIN2.
    DELETE ITWBS WHERE WBS_ELEMENT EQ ITWBS-WBS_ELEMENT.
    POS = 1.
    ELSE.
    IF POS = 0.
    APPEND WA_MAIN TO ITMAIN2.
    DELETE ITWBS WHERE WBS_ELEMENT EQ WA_MAIN.
    ENDIF.
    POS = 1.
    ENDIF.
    ENDLOOP.
    INDEX1 = INDEX1 + 1.
    ENDLOOP.
    *Define UP element
    LOOP AT ITMAIN2 INTO WA_MAIN.
    WA_BUS-WBS_ELEMENT = WA_MAIN-WBS_ELEMENT.
    WA_BUS-DESCRIPTION = WA_MAIN-WBS_DESCRIPTION.
    WA_BUS-WBS_UP = ''.
    WA_BUS-WBS_LEFT = ''.
    SPLIT1 = WA_MAIN-WBS_ELEMENT.
    LOOP AT ITMAIN2 INTO WA_MAIN WHERE WBS_ELEMENT <> SPLIT1.
    IF STRLEN( WA_MAIN-WBS_ELEMENT ) < STRLEN( SPLIT1 ) .
    FIND WA_MAIN-WBS_ELEMENT IN SPLIT1.
    IF SY-SUBRC = 0.
    WA_BUS-WBS_UP = WA_MAIN-WBS_ELEMENT.
    PREVWBS = WA_MAIN-WBS_ELEMENT.
    ENDIF.
    ENDIF.
    ENDLOOP.
    APPEND WA_BUS TO ITBUS.
    INDEX2 = INDEX2 + 1.
    ENDLOOP.
    PREVWBS = ''.
    LEFTWBS = ''.
    Define LEFT ELEMENT.
    LOOP AT ITMAIN2 INTO WA_MAIN.
    POS = 0.
    SPLIT1 = WA_MAIN-WBS_ELEMENT.
    READ TABLE ITBUS INTO WA_BUS2 WITH KEY WBS_ELEMENT = WA_MAIN-WBS_ELEMENT.
    WA_BUS-WBS_ELEMENT = SPLIT1.
    WA_BUS-DESCRIPTION = WA_MAIN-WBS_DESCRIPTION.
    WA_BUS-WBS_UP = WA_BUS2-WBS_UP.
    OFF = SY-TABIX.
    LOOP AT ITMAIN2 INTO WA_MAIN WHERE WBS_ELEMENT <> SPLIT1.
    READ TABLE ITBUS INTO WA_BUS3 WITH KEY WBS_ELEMENT = WA_MAIN-WBS_ELEMENT.
    IF STRLEN( WA_BUS2-WBS_ELEMENT ) = STRLEN( WA_BUS3-WBS_ELEMENT ) AND
    WA_BUS2-WBS_UP = WA_BUS3-WBS_UP AND POS = 0.
    IF STRLEN( LEFTWBS ) <> STRLEN( SPLIT1 ).
    LEFTWBS = ''.
    ENDIF.
    IF STRLEN( LEFTWBS ) = STRLEN( SPLIT1 ).
    FIND WA_BUS2-WBS_UP IN LEFTWBS.
    IF SY-SUBRC <> 0.
    LEFTWBS = ''.
    ENDIF.
    ENDIF.
    WA_BUS-WBS_LEFT = LEFTWBS.
    LEFTWBS = SPLIT1.
    POS = 1.
    MODIFY ITBUS INDEX OFF FROM WA_BUS.
    ENDIF.
    ENDLOOP.
    ENDLOOP.
    WA_BUS-WBS_ELEMENT = ''.
    APPEND WA_BUS TO ITBUS.
    Store WBS ELEMENTS.
    LOOP AT ITBUS INTO WA_BUS.
    SPLIT1 = WA_BUS-WBS_ELEMENT.
    APPEND WA_BUS TO ITBUS2.
    INDEX3 = 1.
    POS = 0.
    LOOP AT ITBUS INTO WA_BUS WHERE WBS_ELEMENT <> SPLIT1.
    IF STRLEN( WA_BUS-WBS_ELEMENT ) <> STRLEN( SPLIT1 ) AND POS = 0.
    POS = 1.
    INDEX4 = INDEX3.
    CALL FUNCTION 'BAPI_PS_INITIALIZATION' .
    CALL FUNCTION 'BAPI_BUS2054_CREATE_MULTI'
    EXPORTING
    I_PROJECT_DEFINITION = WA_DUPLI-PROJECT_DEFINITION
    TABLES
    IT_WBS_ELEMENT = ITBUS2
    ET_RETURN = RET .
    CALL FUNCTION 'BAPI_PS_PRECOMMIT'
    TABLES
    ET_RETURN = RET.
    CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
    EXPORTING
    WAIT = 'X'
    IMPORTING
    RETURN = WA_RET.
    ENDIF.
    APPEND WA_BUS TO ITBUS2.
    INDEX3 = INDEX3 + 1.
    ENDLOOP.
    DELETE ITBUS2 FROM 1 TO INDEX3.
    DELETE ITBUS FROM 1 TO INDEX4.
    ENDLOOP.
    DELETE ITWBS FROM 1 TO INDEX1.
    CLEAR ITWBS.
    DELETE ITMAIN2 FROM 1 TO INDEX2.
    *At the end of all projects' processing
    IF FLAG = 1.
    CALL FUNCTION 'POPUP_FOR_INTERACTION'
    EXPORTING
    HEADLINE = 'PS Project & WBS Creation'
    TEXT1 = 'All the Projects have been created.Please check......'
    TICON = 'I'
    BUTTON_1 = 'OK'.
    ELSE.
    CALL FUNCTION 'POPUP_FOR_INTERACTION'
    EXPORTING
    HEADLINE = 'Deb Program'
    TEXT1 = 'No Projects were created...'
    TICON = 'I'
    BUTTON_1 = 'CANCEL'
    ENDIF.
    Regards
    Deb

  • Not allowing to create wbs element

    Hi Experts,
    It would be really kind of you to Help me out of the situation,
    Iam trying to Add one more wbs element .The system was throwing error.
    and Iwant to consider activity dates at the time of caliculating wbs date How to do this.
    Thanks
    Athidi.

    Hi Dear ,
    Iam getting Error::
    "Several WBS elements on level 1 not allowed
    you cannot save the wbs if there are several wbs elements at level 1."
    Thanks,
    Atidi

Maybe you are looking for