Relation ships in Org management

Hi Every one,
My first question is  regarding maintaing org management relation ships .How we maintain relation ships between persons(s) in development system coz there will be no data available  in development system.????
My second question is ,For example I  created org unit A ,Org Unit B ,i assigned a position sr clerk to org unit A and sr Clerk to Org unit B. .Now my question is position  in org unit B should  reports to  position in  org unit  A..and .how their relation ships are  maintained????

Hi,
1. I think u got the solution for the first one from amit,
2. This can be done using expert mode.kindly do the senario which u told and create relationship as u told which is possible here.
kindly check out and let me know if u have any concern.
Asha

Similar Messages

  • Org unit relation ship periods

    Dear All,
    Scenario:-
    I have created a root or unit,under this root org unit i have created additional org units but the validity period box contains to validity periods are there.
    organisational unit  :
    Link text string :
    The above two will be displayed as Object period and relationship period on the screen.
    Here my doubt is if i enter the date for organisational unit beyond the root organisational unit its allowing but in case of link text string(relationship period) its not allowing.
    can any body explain the logic behind this issue.
    Thanks inadvance
    Regards
    Ananya.K

    Hi,
    System will allow you to create Any number of Org units as the sys doesnot know which is the root org unit , Sub unit  but when your maitaing relation ship it will check based the relation your goping to assign.
    Regards,
    Sri

  • Relation between Sales org and Shipping Point

    Hai all,
           Can any one tell me wt is the relation between Sales Org and Shipping point?
    Ravi
    < PLEASE DONT USE SMS LANGUAGE AND PLEASE SEARCH THE FORUMS.  >

    Hi Ravi,
    There is no direct relation.
    Sales organisation in broader level, it is responsible for selling a product in a company.
    It is liable to the customer interms of service of the product or service and confirmation of the sale order, delivery and invoicing.
    Shipping Point is a logical point from where the shipment / dispatch begins.
    Both Sales organisation & Shipping point wil be linked to plant (one or more).
    In case of sale order, sales org will decide the delivering plant.
    Shipping point will be picked based on delivery plant, sh.conditions (cmr) & loading grp (mmr).
    hope this is clear to you now!

  • SAP_pp_019 heuristics creates automatic fixed pegging  relation ship  .generally we have automatic fixed pegging and manual fixed pegging

    SAP_pp_019 heuristics creates automatic fixed pegging  relation ship  .generally we have automatic fixed pegging and manual fixed pegging .
    Example :
    1) created sale order and triggered GATP
    2)It calls CTP where SAP_PP_019 is run and coresponding planning takes place and pegging relation ship are generated in product view
    3)when I Trigger Gatp to  same sales order .why the pegging losses as it is fixed pegging so it should not break while converting to production order ?????
    please correct if am wrong in any of 3 steps
    Thanks & Regards
    Virender

    Virender,
    Expert Pravin has answered your question about Planning Procedures
    I will make two small comments.  In my CTP experience, I have never seen anyone use the SAP_PP_019 heuristic as a CTP heuristic.  019 is a pegging heuristic, and typically CTP uses some type of material planning heuristic (e.g. create supply elements).  I am not saying that your heuristic is wrong, I am only saying that I have never seen it used in such a way.
    I have further never seen an implementation for CTP where there were more than 2 different planning procedures in use.
    You did not ask for it, but let me give you a small piece of advice.  CTP and multilevel planning are not simple or trivial subjects.  From your responses about planning procedures, I will draw the conclusion that your experience in this area is...somewhat limited.
    Yes, you can go to SCN and ask for advice, and we will offer whatever help we can.  However, the detailed troubleshooting techniques required to solve such a problem are not really suited to SCN postings.  There are already 30 items in this post, and the end does not seem to be in sight.
    If I were in the position of being responsible for solving this problem, and I had little experience to bring to bear, and there was no documentation which described the original solution in detail, then I would request local expert assistance to help me in this matter.  If such assistance were not to be available, I would further request my management to engage an external resource to assist; one who has extensive experience in customized CTP solutions. A competent CTP expert can probably zero in on the problem in a few days.  
    Using only yourself and SCN as a resource, you may find a solution to your problem tomorrow, or you may not find it after months of searching.  In most businesses I have worked with, this level of uncertainty would be considered unacceptable.
    Good Luck & Best Regards,
    DB49

  • Adding another option in the list option in the relation ship tab

    Hi,
    I am working on creating another option in the list of option for the relations ship tab for the account details of Org type.
    I was able to create the new Option and i have create a another event which is assign int eh application set but and it is showing in the detail area1 of the relations but when I choose that option no even it is getting fired.  I have cloed the further relation ship option i cloned the structure and class and even but even then it is not getting fired. I have assigned the view linkkage ACC_REL but even then it is not getting fired.  Please send me the list of table in which we need to do the setting.
    Thanks
    naveen

    Resolved

  • Custom Object & Relation ship in OM

    Hi Exports,
    How to create new object and relation ship in OM.
    There is some specific requirment that create new custom object along with relation ship.
    Please let me know.
    Thanks & Regards
    Rajesh

    Heloo Dilek,
    I have created New object and relation ship as suggested by you and I am able to save the record.
    But when I went to Overview of the custom object for IT 1001 I am getting one stranage error "No time constraint exists for key 30001O 500215341001A   1 200901019999123199500354"
    On the above error 50021534 Org. unit object (O), 50035486 is Custom object (99).
    I have maintained TC for AXXX & BXXX as a 3 of subtype 1001 in table V_T777ZVK.
    Please tell me where I did mistake.
    Thanks & Regards
    Rajesh

  • Org Management programing Material

    Hi,
    Can any one pls send me the document on reporting in Org Management.
    Thankyou.

    Hi
    see the sample code using Orgn management infotypes like HRP1000 etc
    report zporgr0040
    line-size 108
    line-count 60(1)
    no standard page heading
    message-id zndc.
    Database Tables
    tables: hrp1001, " HR Master Record (Orgn. Assignment)
    pa0002, " Personal Data
    t528t, " Position Texts
    t527x, " Org Unit Text
    t528b, " Positions
    csks, " Cost Center
    cskt. " Cost Center Texts
    Declaration of Internal Tables
    Internal Table for Orgn Object Data HRP1000
    data: begin of obj_tab occurs 0,
    otype like hrp1000-otype, " Object Type
    objid like hrp1000-objid, " Object ID
    plvar like hrp1000-plvar, " Plan Version
    istat like hrp1000-istat, " Planning Status
    begda like hrp1000-begda, " Begin date
    endda like hrp1000-endda, " End date
    end of obj_tab.
    Internal Table for Active Employees data PA0000
    data: begin of stat_tab occurs 0,
    pernr like pa0000-pernr, " Object Type
    begda like pa0000-begda, " Begin date
    endda like pa0000-endda, " End date
    stat2 like pa0000-stat2, " Employment Status
    end of stat_tab.
    Internal Table for Actual Orgn Assignment Data PA0001
    data: begin of act_tab occurs 0,
    pernr like pa0001-pernr, " Object Type
    begda like pa0001-begda, " Begin date
    endda like pa0001-endda, " End date
    kostl like pa0001-kostl, " Cost Center
    orgeh like pa0001-orgeh, " Org Unit
    plans like pa0001-plans, " Position
    natio like pa0002-natio, " Nationality
    end of act_tab.
    Internal Table for Orgn Data HRP1001
    data: begin of org_tab occurs 0,
    otype like hrp1001-otype, " Object Type
    objid like hrp1001-objid, " Object ID
    plvar like hrp1001-plvar, " Plan Version
    istat like hrp1001-istat, " Planning Status
    begda like hrp1001-begda, " Begin date
    endda like hrp1001-endda, " End date
    subty like hrp1001-subty, " Sub Type
    sclas like hrp1001-sclas, " Type of Related Object
    sobid like hrp1001-sobid, " Id of Related Object
    kostl like pa0001-kostl, " Cost Center
    plstx like t528t-plstx, " Position Text
    orgtx like t527x-orgtx, " Org Unit Text
    end of org_tab.
    Internal Table for Position Calculations
    data: begin of org1_tab occurs 0,
    kostl like pa0001-kostl, " Cost Center
    objid like hrp1001-objid, " Object ID
    end of org1_tab.
    Internal Table for Position Calculations
    data: begin of org2_tab occurs 0,
    kostl like pa0001-kostl, " Cost Center
    count type i, " No of Positions
    end of org2_tab.
    Internal Table for Actual Manpower Calculations
    data: begin of act1_tab occurs 0,
    kostl like pa0001-kostl, " Cost Center
    natio like pa0002-natio, " Nationality
    plans like pa0001-plans, " Position
    end of act1_tab.
    Internal Table for Actual Manpower Calculations(UAE)
    data: begin of act2_tab occurs 0,
    kostl like pa0001-kostl, " Cost Center
    natio like pa0002-natio, " Nationality
    end of act2_tab.
    Internal Table for Actual Manpower Calculations(Others)
    data: begin of act3_tab occurs 0,
    kostl like pa0001-kostl, " Cost Center
    natio like pa0002-natio, " Nationality
    end of act3_tab.
    Internal Table for Actual Manpower Calculations(UAE)
    data: begin of act4_tab occurs 0,
    kostl like pa0001-kostl, " Cost Center
    count1 type i, " No of Positions(UAE)
    end of act4_tab.
    Internal Table for Actual Manpower Calculations(OTHERS)
    data: begin of act5_tab occurs 0,
    kostl like pa0001-kostl, " Cost Center
    count2 type i, " No of Positions(Others)
    end of act5_tab.
    Internal Table for Vaccancies Data
    data: begin of vac_tab occurs 0,
    plvar like hrp1007-plvar, " Plan Version
    otype like hrp1007-otype, " Object Type
    objid like hrp1007-objid, " Object ID
    istat like hrp1007-istat, " Planning Status
    begda like hrp1007-begda, " Begin date
    endda like hrp1007-endda, " End date
    vacan like hrp1007-vacan, " Vacancy Indicator
    status like hrp1007-status, " Status of Vacancy
    end of vac_tab.
    Internal Table to store the Report Output data
    data : begin of rep_tab occurs 0 ,
    kostl(10) type n, " Cost Cente
    plans like pa0001-plans, " Position
    vacan like hrp1007-vacan, " Vacancy Indicator
    status like hrp1007-status, " Status of Vacancy
    plstx like t528t-plstx, " Position Text
    orgtx like t527x-orgtx, " Org Unit Text
    end of rep_tab.
    Internal Table to store the Report Output data
    data : begin of rep1_tab occurs 0 ,
    kostl(10) type n, " Cost Cente
    cnt type i, " No of Vacancies
    end of rep1_tab.
    Internal Table to store the Report Output data
    data : begin of rep2_tab occurs 0 ,
    kostl(10) type n, " Cost Cente
    app_no type i, " Approved
    nat_no type i, " National
    exp_no type i, " Expatriate
    tot_no type i, " Total
    vac_no type i, " Vacancies
    end of rep2_tab.
    Declaration of Variables
    data: v_sobid like hrp1001-sobid, " Object Id
    v_sobid1 like hrp1001-sobid, " Object Id
    v_sobid2 like hrp1001-sobid, " Object Id
    v_sclas like hrp1001-sclas, " Related Obj Type
    v_subty like hrp1001-subty, " Related Object Id
    v_otype like hrp1007-otype, " Object Type
    v_str(9) type c, " Text
    v_str1(10) type c, " Text
    v_cnt like sy-tabix. " Table Index
    Declaration of Constants
    constants : c_x type c value 'X', " Flag
    c_stat1 like pa0000-stat2 value '3', " Emp Status
    c_plan like hrp1001-plvar value '01', " Plan Version
    c_name like hrp1000-uname value 'SAP', " Uname
    c_uae like pa0002-natio value 'AE', " Country
    c_type like hrp1007-otype value 'O', " Object Type
    c_otype like hrp1007-otype value 'S', " Object Type
    c_stat like hrp1007-status value '0', " Status
    c_pstat like hrp1007-istat value '1', " Plang Status
    c_sclas like hrp1001-sclas value 'K', " Rel. Obj Type
    c_subty like hrp1001-subty value 'A002', " Related ObjId
    c_subty2 like hrp1001-subty value 'A003', " Related ObjId
    c_sclas1 like hrp1001-sclas value 'O', " Rel.Obj Type
    c_subty1 like hrp1001-subty value 'A011', " Rel.Object Id
    c_kokrs like coej-kokrs value '1000'. " Controlling Area
    Selection Screen
    selection-screen begin of block b1 with frame title text-001.
    parameters :
    p_date like pa0001-begda obligatory default sy-datum. " Date
    select-options :
    s_kostl for csks-kostl, " Cost Center
    s_plans for t528b-plans. " Position ID
    selection-screen end of block b1.
    At selection-screen
    at selection-screen.
    Validate the Selection Screen fields
    perform validate_screen.
    Start-of-Selection
    start-of-selection.
    Get the Orgn data from database Table HRP1001
    perform get_org_data.
    Get the Actual Manpower from PA0001
    perform get_act_data.
    Get the Vaccancies data from database Table HRP1007
    perform get_vac_data.
    Append the data into final Internal Table
    perform append_data.
    Top-of-page
    top-of-page.
    Write the Report and Column Headings
    perform top_of_page.
    End-of-Page
    end-of-page.
    write /1(108) sy-uline.
    End-of-Selection
    end-of-selection.
    Display the Output Report.
    perform display_report.
    Form-Routines
    *& Form validate_screen
    Validation of selection Screen fields
    form validate_screen.
    Validation of Position ID
    clear t528b.
    if not s_plans[] is initial.
    select single plans
    into t528b-plans
    from t528b
    where plans in s_plans.
    if sy-subrc <> 0.
    message e999 with 'Invalid Position ID'(009).
    endif.
    endif.
    Validation of Cost Center
    clear csks.
    if not s_kostl[] is initial.
    select single kostl
    into csks-kostl
    from csks
    where kostl in s_kostl.
    if sy-subrc <> 0.
    message e999 with 'Invalid Cost Center'(008).
    endif.
    endif.
    endform. "validate_screen
    *& Form get_org_data
    Get the Orgn Data from Database Table HRP1001
    form get_org_data.
    v_str = 'Developee'(002).
    v_str1 = 'Deployment'(003).
    Select All the Positions from HRP1000
    select otype " Object Type
    objid " Object ID
    plvar " Plan Version
    istat " Planning Status
    begda " Begin date
    endda " End date
    into table obj_tab
    from hrp1000
    where otype = c_otype and
    plvar = c_plan and
    istat = c_pstat and
    begda le p_date and
    endda ge p_date and
    objid in s_plans and
    uname ne c_name.
    sort obj_tab by otype objid.
    Get the Orgn and Cost Center for all the above Positions
    if not obj_tab[] is initial.
    select otype " Object Type
    objid " Object ID
    plvar " Plan Version
    istat " Planning Status
    begda " Begin date
    endda " End date
    subty " Sub Type
    sclas " Type of Related Object
    sobid " Id of Related Object
    into table org_tab
    from hrp1001
    for all entries in obj_tab
    where otype = c_otype and
    plvar = c_plan and
    istat = c_pstat and
    begda le p_date and
    endda ge p_date and
    sclas eq c_sclas1 and
    subty eq c_subty2 and
    objid eq obj_tab-objid.
    endif.
    sort org_tab by otype objid.
    Get the Cost Center
    loop at org_tab.
    v_otype = c_otype. " S
    v_sclas = c_sclas. " K
    v_subty = c_subty1. " A011
    v_sobid = org_tab-objid.
    perform get_org using v_otype v_sclas v_subty
    v_sobid.
    if sy-subrc = 0.
    org_tab-kostl = hrp1001-sobid+0(10).
    else.
    v_otype = c_otype. " S
    v_sclas = c_sclas1. " O
    v_subty = c_subty2. " A003
    v_sobid = org_tab-objid.
    perform get_org using v_otype v_sclas v_subty
    v_sobid.
    if sy-subrc = 0.
    v_otype = c_type. " O
    v_sclas = c_sclas. " K
    v_subty = c_subty1. " A011
    v_sobid1 = v_sobid.
    perform get_org using v_otype v_sclas v_subty
    v_sobid.
    if sy-subrc <> 0.
    v_otype = c_type. " O
    v_sclas = c_sclas1. " O
    v_subty = c_subty. " A002
    v_sobid = v_sobid1.
    perform get_org using v_otype v_sclas v_subty
    v_sobid.
    if sy-subrc = 0.
    v_otype = c_type. " O
    v_sclas = c_sclas. " K
    v_subty = c_subty1. " A011
    v_sobid2 = v_sobid.
    perform get_org using v_otype v_sclas v_subty
    v_sobid.
    if sy-subrc <> 0.
    v_otype = c_type. " O
    v_sclas = c_sclas1. " O
    v_subty = c_subty. " A002
    v_sobid = v_sobid2.
    perform get_org using v_otype v_sclas v_subty
    v_sobid.
    else.
    org_tab-kostl = hrp1001-sobid+0(10).
    endif.
    endif.
    else.
    org_tab-kostl = hrp1001-sobid+0(10).
    endif.
    else.
    v_otype = c_otype. " S
    v_sclas = c_otype. " S
    v_subty = c_subty. " A002
    v_sobid = org_tab-objid.
    perform get_org using v_otype v_sclas v_subty
    v_sobid.
    if sy-subrc = 0.
    v_otype = c_otype. " S
    v_sclas = c_sclas. " K
    v_subty = c_subty1. " A011
    v_sobid1 = v_sobid.
    perform get_org using v_otype v_sclas v_subty
    v_sobid.
    if sy-subrc <> 0.
    v_otype = c_otype. " S
    v_sclas = c_sclas1. " O
    v_subty = c_subty2. " A003
    v_sobid = v_sobid1.
    perform get_org using v_otype v_sclas v_subty
    v_sobid.
    if sy-subrc = 0.
    v_otype = c_type. " O
    v_sclas = c_sclas. " K
    v_subty = c_subty1. " A011
    v_sobid2 = v_sobid.
    perform get_org using v_otype v_sclas v_subty
    v_sobid.
    if sy-subrc <> 0.
    v_otype = c_type. " O
    v_sclas = c_sclas1. " O
    v_subty = c_subty. " A002
    v_sobid = v_sobid2.
    perform get_org using v_otype v_sclas v_subty
    v_sobid.
    else.
    org_tab-kostl = hrp1001-sobid+0(10).
    endif.
    endif.
    else.
    org_tab-kostl = hrp1001-sobid+0(10).
    endif.
    endif.
    endif.
    endif.
    Get the Position Text
    clear t528t.
    select single plstx from t528t into t528t-plstx
    where sprsl = sy-langu and
    otype = c_otype and
    plans = org_tab-objid.
    org_tab-plstx = t528t-plstx.
    Get the Org Unit Text
    clear t527x.
    select single orgtx from t527x into t527x-orgtx
    where sprsl = sy-langu and
    orgeh = org_tab-sobid+0(8).
    org_tab-orgtx = t527x-orgtx.
    modify org_tab index sy-tabix.
    clear v_sobid.
    endloop.
    sort org_tab by otype objid.
    Calculate the Approved No of Positions
    loop at org_tab.
    if org_tab-kostl in s_kostl.
    move-corresponding org_tab to org1_tab.
    append org1_tab.
    clear org1_tab.
    endif.
    endloop.
    sort org1_tab by kostl objid.
    clear v_cnt.
    loop at org1_tab.
    at end of kostl.
    sy-tabix = sy-tabix - v_cnt.
    org2_tab-kostl = org1_tab-kostl.
    org2_tab-count = sy-tabix.
    v_cnt = v_cnt + sy-tabix.
    append org2_tab.
    clear:org2_tab.
    endat.
    endloop.
    sort org2_tab by kostl.
    endform. "get_org_data
    *& Form get_act_data
    Get the Actual Manpower Data from Database Table PA0001
    form get_act_data.
    clear : stat_tab, act_tab.
    refresh: stat_tab, act_tab.
    Get all the Active Employees
    select pernr " Object Type
    begda " Begin date
    endda " End date
    stat2 " Emp Status
    into table stat_tab
    from pa0000
    where stat2 eq c_stat1 and
    begda le p_date and
    endda ge p_date.
    sort act_tab by pernr.
    if not stat_tab[] is initial.
    select pernr " Object Type
    begda " Begin date
    endda " End date
    kostl " Cost Center
    orgeh " Org Unit
    plans " Position
    into table act_tab
    from pa0001
    for all entries in stat_tab
    where pernr eq stat_tab-pernr and
    kostl in s_kostl and
    plans in s_plans and
    persg eq '1' and
    begda le p_date and
    endda ge p_date.
    endif.
    sort act_tab by pernr.
    loop at act_tab.
    move-corresponding act_tab to act1_tab.
    clear pa0002-natio.
    select single natio into pa0002-natio from pa0002
    where pernr = act_tab-pernr.
    if sy-subrc = 0.
    act1_tab-natio = pa0002-natio.
    endif.
    append act1_tab.
    clear act1_tab.
    endloop.
    sort act1_tab by kostl natio.
    Calculate the Local and Expatriate Manpower
    loop at act1_tab.
    if act1_tab-natio = c_uae.
    act2_tab-kostl = act1_tab-kostl.
    act2_tab-natio = act1_tab-natio.
    else.
    act3_tab-kostl = act1_tab-kostl.
    act3_tab-natio = act1_tab-natio.
    endif.
    append: act2_tab, act3_tab.
    clear : act2_tab,act3_tab.
    endloop.
    sort act2_tab by kostl.
    sort act3_tab by kostl.
    Actual UAE Manpower
    clear v_cnt.
    loop at act2_tab.
    at end of kostl.
    sy-tabix = sy-tabix - v_cnt.
    act4_tab-kostl = act2_tab-kostl.
    act4_tab-count1 = sy-tabix.
    v_cnt = v_cnt + sy-tabix.
    append act4_tab.
    clear:act4_tab.
    endat.
    endloop.
    sort act4_tab by kostl.
    Other Countries
    clear v_cnt.
    loop at act3_tab.
    at end of kostl.
    sy-tabix = sy-tabix - v_cnt.
    act5_tab-kostl = act3_tab-kostl.
    act5_tab-count2 = sy-tabix.
    v_cnt = v_cnt + sy-tabix.
    append act5_tab.
    clear:act5_tab.
    endat.
    endloop.
    sort act5_tab by kostl.
    endform. "get_act_data
    *& Form get_org
    Get the Cost Center from Parent Org Id
    form get_org using p_v_otype p_v_sclas p_v_subty p_v_sobid.
    clear hrp1001.
    select single * from hrp1001
    where otype = p_v_otype and
    plvar = c_plan and
    istat = c_pstat and
    begda le p_date and
    endda ge p_date and
    sclas eq p_v_sclas and
    subty eq p_v_subty and
    objid eq p_v_sobid.
    v_sobid = hrp1001-sobid+0(8).
    endform. " get_org
    *& Form get_vac_data
    Get the Vaccancies Data from Database Table HRP1007
    form get_vac_data.
    if not org_tab[] is initial.
    select plvar " Plan Version
    otype " Object Type
    objid " Object ID
    istat " Planning Status
    begda " Begin date
    endda " End date
    vacan " Vacancy Indicator
    status " Status of Vacancy
    into table vac_tab
    from hrp1007
    for all entries in org_tab
    where plvar = c_plan and
    otype = c_otype and
    istat eq c_pstat and
    objid = org_tab-objid and
    begda le p_date and
    endda ge p_date and
    vacan eq c_x and
    status eq c_stat.
    endif.
    sort vac_tab by plvar otype objid.
    Get the HR data into the rep_tab Internal Table
    loop at vac_tab.
    rep_tab-plans = vac_tab-objid.
    rep_tab-vacan = vac_tab-vacan.
    rep_tab-status = vac_tab-status.
    read table org_tab with key objid = vac_tab-objid.
    if sy-subrc = 0.
    rep_tab-kostl = org_tab-kostl.
    rep_tab-plstx = org_tab-plstx.
    rep_tab-orgtx = org_tab-orgtx.
    endif.
    append rep_tab.
    clear rep_tab.
    endloop.
    loop at rep_tab.
    if not rep_tab-kostl in s_kostl.
    delete rep_tab index sy-tabix.
    endif.
    endloop.
    sort rep_tab by kostl plans.
    delete rep_tab where plstx cs v_str.
    delete rep_tab where orgtx cs v_str1.
    Calculate the Count of Vacancies in each Division
    clear v_cnt.
    loop at rep_tab.
    at end of kostl.
    sy-tabix = sy-tabix - v_cnt.
    rep1_tab-kostl = rep_tab-kostl.
    rep1_tab-cnt = sy-tabix.
    v_cnt = v_cnt + sy-tabix.
    append rep1_tab.
    clear:rep1_tab.
    endat.
    endloop.
    sort rep1_tab by kostl.
    endform. "get_vac_data
    *& Form append_data
    Append the data into final Internal Table
    form append_data.
    loop at org2_tab.
    rep2_tab-kostl = org2_tab-kostl.
    rep2_tab-app_no = org2_tab-count.
    read table act4_tab with key kostl = org2_tab-kostl
    binary search.
    if sy-subrc = 0.
    rep2_tab-nat_no = act4_tab-count1.
    endif.
    read table act5_tab with key kostl = org2_tab-kostl
    binary search.
    if sy-subrc = 0.
    rep2_tab-exp_no = act5_tab-count2.
    endif.
    read table rep1_tab with key kostl = org2_tab-kostl
    binary search.
    if sy-subrc = 0.
    rep2_tab-vac_no = rep1_tab-cnt.
    endif.
    rep2_tab-tot_no = rep2_tab-nat_no + rep2_tab-exp_no.
    append rep2_tab.
    clear rep2_tab.
    endloop.
    sort rep2_tab by kostl.
    endform. "append_data
    *& Form top_of_page
    Write the Report and Column Headings
    form top_of_page.
    skip.
    format color col_heading on.
    write: /1(108) 'NATIONAL DRILLING COMPANY'(010) centered,
    /1(108) 'Summary of Manning Level Report'(011) centered.
    format color off.
    skip.
    write: /2 'Key Date :'(013), p_date,
    75 'Report Run Date:'(041), sy-datum.
    if not s_kostl[] is initial.
    if s_kostl-high is initial.
    write: /2 'Cost Center :'(023), s_kostl-low,
    75 'Time :'(042), sy-uzeit.
    else.
    write: /2 'Cost Center From:'(024), s_kostl-low+7(3),
    'To'(022), s_kostl-high,
    75 'Time :'(042), sy-uzeit.
    endif.
    else.
    write: /75 'Time :'(042), sy-uzeit.
    endif.
    if not s_plans[] is initial.
    if s_plans-high is initial.
    write: /2 'Position Id :'(019), s_plans-low,
    75 'User :'(043), sy-uname.
    else.
    write: /2 'Position Id From:'(021), s_plans-low,
    'To'(022), s_plans-high,
    75 'User :'(043), sy-uname.
    endif.
    else.
    write: /75 'User :'(043), sy-uname.
    endif.
    write: /75 'Page No :'(044), sy-pagno.
    skip.
    write /1(108) sy-uline.
    format color col_heading.
    write:/1 sy-vline,
    12 sy-vline, 53 sy-vline,
    64 sy-vline, 65(32) 'Actual'(018) centered,
    97 sy-vline,108 sy-vline.
    write:/1 sy-vline, 2(10) 'CostCenter'(014),
    12 sy-vline, 13(40) 'Description'(026) centered,
    53 sy-vline, 54(10) 'Approved'(025) centered,
    64 sy-vline, 65(32) sy-uline,
    97 sy-vline, 98(10) 'Vacancies'(017),
    108 sy-vline.
    write:/1 sy-vline,
    12 sy-vline, 53 sy-vline,
    64 sy-vline, 65(10) 'National'(015) centered,
    75 sy-vline, 76(10) 'Expatriate'(020) centered,
    86 sy-vline, 87(10) 'Total'(016) centered,
    97 sy-vline,108 sy-vline.
    format color off.
    write /1(108) sy-uline.
    endform. "top_of_page
    *& Form Display_report
    Write the Report Output
    form display_report.
    if rep2_tab[] is initial.
    message i999 with
    'No Data found for the entered Selection'(035).
    else.
    loop at rep2_tab.
    Authorization Check for the Orgn and Cost Centers
    perform auth_check_org.
    if sy-subrc = 0.
    clear cskt.
    select single ltext into cskt-ltext from cskt
    where spras = sy-langu and
    kokrs = c_kokrs and
    kostl = rep2_tab-kostl.
    format color col_normal.
    write: /1 sy-vline, 2(10) rep2_tab-kostl+7(3),
    12 sy-vline, 13(40) cskt-ltext,
    53 sy-vline, 54(10) rep2_tab-app_no,
    64 sy-vline, 65(10) rep2_tab-nat_no,
    75 sy-vline, 76(10) rep2_tab-exp_no,
    86 sy-vline, 87(10) rep2_tab-tot_no,
    97 sy-vline, 98(10) rep2_tab-vac_no,
    108 sy-vline.
    format color off.
    at last.
    sum.
    format color 3.
    write /1(108) sy-uline.
    write: /1 sy-vline, 2(10) 'Total'(027),
    12 sy-vline,
    53 sy-vline, 54(10) rep2_tab-app_no,
    64 sy-vline, 65(10) rep2_tab-nat_no,
    75 sy-vline, 76(10) rep2_tab-exp_no,
    86 sy-vline, 87(10) rep2_tab-tot_no,
    97 sy-vline, 98(10) rep2_tab-vac_no,
    108 sy-vline.
    format color off.
    endat.
    endif.
    endloop.
    endif.
    write /1(108) sy-uline.
    endform. " Display_report
    *& Form auth_check_org
    Authorization Check for the Orgn and Cost Center
    form auth_check_org.
    authority-check object 'ZNDCHROM'
    id 'PLVAR' dummy
    id 'OTYPE' dummy
    id 'KOSTL' field rep2_tab-kostl.
    endform. "auth_check_org
    Also
    Check this link : http://www.sapdevelopment.co.uk/hr/hrhome.htm.
    Reward points if found helpful……
    Cheers,
    Chandra Sekhar.

  • Org.Management Infotypes..

    Hi Experts..
    Could you please tell me where we use Org.Management infotypes(IT1000 to1999)
    Thanks in advance.

    OM infotypes are those in which we store all the information regarding all organization attributes, activities etc..  e.g
    Position is related to organization so we maintain it in OM infotypes..
    in 1000, we maintain its name and long text .. in 1001 we maintain relationship of position with other OM attributes i.e. Org Unit, Job, Business Area etc.
    We maintain 1000 and 1001 infotypes for all OM objects...
    but other Infotypes may vary depending upon their attributes..
    e.g. IT 1007 is maintained for Job.. whether it is vacant or not..
    similarly IT 1610 is used for US Job attributes... we can maintain only attributes here not position and others.
    Reward if useful
    regards
    Pradeep

  • Sample code for Org Management

    Hi,
             I am new to Org Management coding in HR ABAP.
       Can anybody post some simple sample code for Org. Management so that I can understand the flow of coding..
    Thanks and Regards,
    Ram

    Hi
    see the sample code using Orgn management infotypes like HRP1000 etc
    report zporgr0040
           line-size 108
           line-count 60(1)
           no standard page heading
           message-id zndc.
    Database Tables
    tables: hrp1001,     " HR Master Record (Orgn. Assignment)
            pa0002,      " Personal Data
            t528t,       " Position Texts
            t527x,       " Org Unit Text
            t528b,       " Positions
            csks,        " Cost Center
            cskt.        " Cost Center Texts
    Declaration of Internal Tables
    Internal Table for Orgn Object Data  HRP1000
    data: begin of obj_tab occurs 0,
            otype like hrp1000-otype,      " Object Type
            objid like hrp1000-objid,      " Object ID
            plvar like hrp1000-plvar,      " Plan Version
            istat like hrp1000-istat,      " Planning Status
            begda like hrp1000-begda,      " Begin date
            endda like hrp1000-endda,      " End date
          end of obj_tab.
    Internal Table for Active Employees data PA0000
    data: begin of stat_tab occurs 0,
            pernr like pa0000-pernr,       " Object Type
            begda like pa0000-begda,       " Begin date
            endda like pa0000-endda,       " End date
            stat2 like pa0000-stat2,       " Employment Status
          end of stat_tab.
    Internal Table for Actual Orgn Assignment Data PA0001
    data: begin of act_tab occurs 0,
            pernr like pa0001-pernr,       " Object Type
            begda like pa0001-begda,       " Begin date
            endda like pa0001-endda,       " End date
            kostl like pa0001-kostl,       " Cost Center
            orgeh like pa0001-orgeh,       " Org Unit
            plans like pa0001-plans,       " Position
            natio like pa0002-natio,       " Nationality
          end of act_tab.
    Internal Table for Orgn Data HRP1001
    data: begin of org_tab occurs 0,
            otype like hrp1001-otype,      " Object Type
            objid like hrp1001-objid,      " Object ID
            plvar like hrp1001-plvar,      " Plan Version
            istat like hrp1001-istat,      " Planning Status
            begda like hrp1001-begda,      " Begin date
            endda like hrp1001-endda,      " End date
            subty like hrp1001-subty,      " Sub Type
            sclas like hrp1001-sclas,      " Type of Related Object
            sobid like hrp1001-sobid,      " Id of Related Object
            kostl like pa0001-kostl,       " Cost Center
            plstx like t528t-plstx,        " Position Text
            orgtx like t527x-orgtx,        " Org Unit Text
          end of org_tab.
    Internal Table for Position Calculations
    data: begin of org1_tab occurs 0,
            kostl like pa0001-kostl,       " Cost Center
            objid like hrp1001-objid,      " Object ID
          end of org1_tab.
    Internal Table for Position Calculations
    data: begin of org2_tab occurs 0,
            kostl like pa0001-kostl,       " Cost Center
            count type i,                  " No of Positions
          end of org2_tab.
    Internal Table for Actual Manpower Calculations
    data: begin of act1_tab occurs 0,
            kostl like pa0001-kostl,       " Cost Center
            natio like pa0002-natio,       " Nationality
            plans like pa0001-plans,       " Position
          end of act1_tab.
    Internal Table for Actual Manpower Calculations(UAE)
    data: begin of act2_tab occurs 0,
            kostl like pa0001-kostl,       " Cost Center
            natio like pa0002-natio,       " Nationality
          end of act2_tab.
    Internal Table for Actual Manpower Calculations(Others)
    data: begin of act3_tab occurs 0,
            kostl like pa0001-kostl,       " Cost Center
            natio like pa0002-natio,       " Nationality
          end of act3_tab.
    Internal Table for Actual Manpower Calculations(UAE)
    data: begin of act4_tab occurs 0,
            kostl like pa0001-kostl,       " Cost Center
            count1 type i,                 " No of Positions(UAE)
          end of act4_tab.
    Internal Table for Actual Manpower Calculations(OTHERS)
    data: begin of act5_tab occurs 0,
            kostl like pa0001-kostl,       " Cost Center
            count2 type i,                 " No of Positions(Others)
          end of act5_tab.
    Internal Table for Vaccancies Data
    data: begin of vac_tab occurs 0,
            plvar like hrp1007-plvar,      " Plan Version
            otype like hrp1007-otype,      " Object Type
            objid like hrp1007-objid,      " Object ID
            istat like hrp1007-istat,      " Planning Status
            begda like hrp1007-begda,      " Begin date
            endda like hrp1007-endda,      " End date
            vacan like hrp1007-vacan,      " Vacancy Indicator
            status like hrp1007-status,    " Status of Vacancy
          end of vac_tab.
    Internal Table to store the Report Output data
    data : begin of rep_tab occurs 0 ,
             kostl(10) type n,                  " Cost Cente
             plans   like pa0001-plans,         " Position
             vacan   like hrp1007-vacan,        " Vacancy Indicator
             status  like hrp1007-status,       " Status of Vacancy
             plstx   like t528t-plstx,          " Position Text
             orgtx like t527x-orgtx,            " Org Unit Text
           end of rep_tab.
    Internal Table to store the Report Output data
    data : begin of rep1_tab occurs 0 ,
             kostl(10) type n,                  " Cost Cente
             cnt     type i,                    " No of Vacancies
           end of rep1_tab.
    Internal Table to store the Report Output data
    data : begin of rep2_tab occurs 0 ,
             kostl(10) type n,                  " Cost Cente
             app_no    type i,                  " Approved
             nat_no    type i,                  " National
             exp_no    type i,                  " Expatriate
             tot_no    type i,                  " Total
             vac_no    type i,                  " Vacancies
           end of rep2_tab.
    Declaration of Variables
    data: v_sobid  like hrp1001-sobid,   " Object Id
          v_sobid1 like hrp1001-sobid,   " Object Id
          v_sobid2 like hrp1001-sobid,   " Object Id
          v_sclas  like hrp1001-sclas,   " Related Obj Type
          v_subty  like hrp1001-subty,   " Related Object Id
          v_otype  like hrp1007-otype,   " Object Type
         v_str(9)    type c,            " Text
         v_str1(10)  type c,            " Text
          v_cnt    like sy-tabix.        " Table Index
    Declaration of Constants
    constants : c_x         type c value 'X',            " Flag
                c_stat1  like pa0000-stat2  value '3',   " Emp Status
                c_plan   like hrp1001-plvar value '01',  " Plan Version
                c_name   like hrp1000-uname value 'SAP', " Uname
                c_uae    like pa0002-natio  value 'AE',  " Country
                c_type   like hrp1007-otype  value 'O',  " Object Type
                c_otype  like hrp1007-otype  value 'S',  " Object Type
                c_stat   like hrp1007-status value '0',  " Status
                c_pstat  like hrp1007-istat  value '1',  " Plang Status
                c_sclas  like hrp1001-sclas value 'K',    " Rel. Obj Type
                c_subty  like hrp1001-subty value 'A002', " Related ObjId
                c_subty2 like hrp1001-subty value 'A003', " Related ObjId
                c_sclas1 like hrp1001-sclas value 'O',    " Rel.Obj Type
                c_subty1 like hrp1001-subty value 'A011', " Rel.Object Id
                c_kokrs  like coej-kokrs value '1000'. " Controlling Area
    Selection Screen
    selection-screen begin of block b1 with frame title text-001.
    parameters     :
      p_date  like pa0001-begda obligatory default sy-datum. " Date
    select-options :
      s_kostl for csks-kostl,                     " Cost Center
      s_plans for t528b-plans.                    " Position ID
    selection-screen end of block b1.
    At selection-screen
    at selection-screen.
    Validate the Selection Screen fields
      perform validate_screen.
    Start-of-Selection
    start-of-selection.
    Get the Orgn data from database Table HRP1001
      perform get_org_data.
    Get the Actual Manpower from PA0001
      perform get_act_data.
    Get the Vaccancies data from database Table HRP1007
      perform get_vac_data.
    Append the data into final Internal Table
      perform append_data.
    Top-of-page
    top-of-page.
    Write the Report and Column Headings
      perform top_of_page.
    End-of-Page
    end-of-page.
      write /1(108) sy-uline.
    End-of-Selection
    end-of-selection.
    Display the Output Report.
      perform display_report.
    Form-Routines
    *&      Form  validate_screen
    Validation of selection Screen fields
    form validate_screen.
    Validation of Position ID
      clear t528b.
      if not s_plans[] is initial.
        select single plans
          into t528b-plans
          from t528b
          where plans in s_plans.
        if sy-subrc <> 0.
          message e999 with 'Invalid Position ID'(009).
        endif.
      endif.
    Validation of Cost Center
      clear csks.
      if not s_kostl[] is initial.
        select single kostl
          into csks-kostl
          from csks
          where kostl in s_kostl.
        if sy-subrc <> 0.
          message e999 with 'Invalid Cost Center'(008).
        endif.
      endif.
    endform.                  "validate_screen
    *&      Form  get_org_data
    Get the Orgn Data from Database Table HRP1001
    form get_org_data.
    v_str  = 'Developee'(002).
    v_str1 = 'Deployment'(003).
    Select All the Positions from HRP1000
      select otype       " Object Type
             objid       " Object ID
             plvar       " Plan Version
             istat       " Planning Status
             begda       " Begin date
             endda       " End date
         into table obj_tab
         from hrp1000
         where otype = c_otype  and
               plvar = c_plan   and
               istat = c_pstat  and
               begda le p_date  and
               endda ge p_date  and
               objid in s_plans and
               uname ne c_name.
      sort obj_tab by otype objid.
    Get the Orgn and Cost Center for all the above Positions
      if not obj_tab[] is initial.
        select otype       " Object Type
               objid       " Object ID
               plvar       " Plan Version
               istat       " Planning Status
               begda       " Begin date
               endda       " End date
               subty       " Sub Type
               sclas       " Type of Related Object
               sobid       " Id of Related Object
           into table org_tab
           from hrp1001
           for all entries in obj_tab
           where otype = c_otype  and
                 plvar = c_plan   and
                 istat = c_pstat  and
                 begda le p_date  and
                 endda ge p_date  and
                 sclas eq c_sclas1 and
                 subty eq c_subty2 and
                 objid eq obj_tab-objid.
      endif.
      sort org_tab by otype objid.
    Get the Cost Center
      loop at org_tab.
        v_otype = c_otype.       " S
        v_sclas = c_sclas.       " K
        v_subty = c_subty1.                                     " A011
        v_sobid = org_tab-objid.
        perform get_org using v_otype v_sclas v_subty
                        v_sobid.
        if sy-subrc = 0.
          org_tab-kostl = hrp1001-sobid+0(10).
        else.
          v_otype = c_otype.    " S
          v_sclas = c_sclas1.   " O
          v_subty = c_subty2.                                   " A003
          v_sobid = org_tab-objid.
          perform get_org using v_otype v_sclas v_subty
                         v_sobid.
          if sy-subrc = 0.
            v_otype = c_type.     " O
            v_sclas = c_sclas.    " K
            v_subty = c_subty1.                                 " A011
            v_sobid1 = v_sobid.
            perform get_org using v_otype v_sclas v_subty
                                 v_sobid.
            if sy-subrc <> 0.
              v_otype = c_type.    " O
              v_sclas = c_sclas1.  " O
              v_subty = c_subty.                                " A002
              v_sobid = v_sobid1.
              perform get_org using v_otype v_sclas v_subty
                        v_sobid.
              if sy-subrc = 0.
                v_otype = c_type.   " O
                v_sclas = c_sclas.  " K
                v_subty = c_subty1.                             " A011
                v_sobid2 = v_sobid.
                perform get_org using v_otype v_sclas v_subty
                                 v_sobid.
                if sy-subrc <> 0.
                  v_otype = c_type.   " O
                  v_sclas = c_sclas1. " O
                  v_subty = c_subty.                            " A002
                  v_sobid = v_sobid2.
                  perform get_org using v_otype v_sclas v_subty
                          v_sobid.
                else.
                  org_tab-kostl = hrp1001-sobid+0(10).
                endif.
              endif.
            else.
              org_tab-kostl = hrp1001-sobid+0(10).
            endif.
          else.
            v_otype = c_otype.   " S
            v_sclas = c_otype.   " S
            v_subty = c_subty.                                  " A002
            v_sobid = org_tab-objid.
            perform get_org using v_otype v_sclas v_subty
                           v_sobid.
            if sy-subrc = 0.
              v_otype = c_otype.  " S
              v_sclas = c_sclas.  " K
              v_subty = c_subty1.                               " A011
              v_sobid1 = v_sobid.
              perform get_org using v_otype v_sclas v_subty
                                   v_sobid.
              if sy-subrc <> 0.
                v_otype = c_otype.  " S
                v_sclas = c_sclas1. " O
                v_subty = c_subty2.                             " A003
                v_sobid = v_sobid1.
                perform get_org using v_otype v_sclas v_subty
                          v_sobid.
                if sy-subrc = 0.
                  v_otype = c_type.   " O
                  v_sclas = c_sclas.  " K
                  v_subty = c_subty1.                           " A011
                  v_sobid2 = v_sobid.
                  perform get_org using v_otype v_sclas v_subty
                                   v_sobid.
                  if sy-subrc <> 0.
                    v_otype = c_type.    " O
                    v_sclas = c_sclas1.  " O
                    v_subty = c_subty.                          " A002
                    v_sobid = v_sobid2.
                    perform get_org using v_otype v_sclas v_subty
                            v_sobid.
                  else.
                    org_tab-kostl = hrp1001-sobid+0(10).
                  endif.
                endif.
              else.
                org_tab-kostl = hrp1001-sobid+0(10).
              endif.
            endif.
          endif.
        endif.
    Get the Position Text
        clear t528t.
        select single plstx from t528t into t528t-plstx
          where sprsl = sy-langu and
                otype = c_otype  and
                plans = org_tab-objid.
        org_tab-plstx = t528t-plstx.
    Get the Org Unit Text
        clear t527x.
        select single orgtx from t527x into t527x-orgtx
          where sprsl = sy-langu and
                orgeh = org_tab-sobid+0(8).
        org_tab-orgtx = t527x-orgtx.
        modify org_tab index sy-tabix.
        clear v_sobid.
      endloop.
      sort org_tab by otype objid.
    Calculate the Approved No of Positions
      loop at org_tab.
        if org_tab-kostl in s_kostl.
          move-corresponding org_tab to org1_tab.
          append org1_tab.
          clear org1_tab.
        endif.
      endloop.
      sort org1_tab by kostl objid.
      clear v_cnt.
      loop at org1_tab.
        at end of kostl.
          sy-tabix = sy-tabix - v_cnt.
          org2_tab-kostl = org1_tab-kostl.
          org2_tab-count   = sy-tabix.
          v_cnt = v_cnt + sy-tabix.
          append org2_tab.
          clear:org2_tab.
        endat.
      endloop.
      sort org2_tab by kostl.
    endform.              "get_org_data
    *&      Form  get_act_data
    Get the Actual Manpower Data from Database Table PA0001
    form get_act_data.
      clear  : stat_tab, act_tab.
      refresh: stat_tab, act_tab.
    Get all the Active Employees
      select pernr       " Object Type
             begda       " Begin date
             endda       " End date
             stat2       " Emp Status
           into table stat_tab
           from pa0000
           where stat2 eq c_stat1 and
                 begda le p_date  and
                 endda ge p_date.
      sort act_tab by pernr.
      if not stat_tab[] is initial.
        select pernr       " Object Type
               begda       " Begin date
               endda       " End date
               kostl       " Cost Center
               orgeh       " Org Unit
               plans       " Position
           into table act_tab
           from pa0001
           for all entries in stat_tab
           where pernr eq stat_tab-pernr and
                 kostl in s_kostl and
                 plans in s_plans and
                 persg eq '1'     and
                 begda le p_date  and
                 endda ge p_date.
      endif.
      sort act_tab by pernr.
      loop at act_tab.
        move-corresponding act_tab to act1_tab.
        clear pa0002-natio.
        select single natio into pa0002-natio from pa0002
          where pernr = act_tab-pernr.
        if sy-subrc = 0.
          act1_tab-natio = pa0002-natio.
        endif.
        append act1_tab.
        clear act1_tab.
      endloop.
      sort act1_tab by kostl natio.
    Calculate the Local and Expatriate Manpower
      loop at act1_tab.
        if act1_tab-natio = c_uae.
          act2_tab-kostl = act1_tab-kostl.
          act2_tab-natio = act1_tab-natio.
        else.
          act3_tab-kostl = act1_tab-kostl.
          act3_tab-natio = act1_tab-natio.
        endif.
        append: act2_tab, act3_tab.
        clear : act2_tab,act3_tab.
      endloop.
      sort act2_tab by kostl.
      sort act3_tab by kostl.
    Actual UAE Manpower
      clear v_cnt.
      loop at act2_tab.
        at end of kostl.
          sy-tabix = sy-tabix - v_cnt.
          act4_tab-kostl   = act2_tab-kostl.
          act4_tab-count1  = sy-tabix.
          v_cnt = v_cnt + sy-tabix.
          append act4_tab.
          clear:act4_tab.
        endat.
      endloop.
      sort act4_tab by kostl.
    Other Countries
      clear v_cnt.
      loop at act3_tab.
        at end of kostl.
          sy-tabix = sy-tabix - v_cnt.
          act5_tab-kostl   = act3_tab-kostl.
          act5_tab-count2  = sy-tabix.
          v_cnt = v_cnt + sy-tabix.
          append act5_tab.
          clear:act5_tab.
        endat.
      endloop.
      sort act5_tab by kostl.
    endform.              "get_act_data
    *&      Form  get_org
    Get the Cost Center from Parent Org Id
    form get_org using p_v_otype p_v_sclas p_v_subty p_v_sobid.
      clear hrp1001.
      select single * from hrp1001
            where otype = p_v_otype  and
                  plvar = c_plan   and
                  istat = c_pstat  and
                  begda le p_date  and
                  endda ge p_date  and
                  sclas eq p_v_sclas   and
                  subty eq p_v_subty  and
                  objid eq p_v_sobid.
      v_sobid = hrp1001-sobid+0(8).
    endform.                    " get_org
    *&      Form  get_vac_data
    Get the Vaccancies Data from Database Table HRP1007
    form get_vac_data.
      if not org_tab[] is initial.
        select plvar       " Plan Version
               otype       " Object Type
               objid       " Object ID
               istat       " Planning Status
               begda       " Begin date
               endda       " End date
               vacan       " Vacancy Indicator
               status      " Status of Vacancy
           into table vac_tab
           from hrp1007
           for all entries in org_tab
           where plvar = c_plan   and
                 otype = c_otype  and
                 istat eq c_pstat and
                 objid = org_tab-objid and
                 begda le p_date and
                 endda ge p_date and
                 vacan eq c_x  and
                 status eq c_stat.
      endif.
      sort vac_tab by plvar otype objid.
    Get the HR data into the rep_tab Internal Table
      loop at vac_tab.
        rep_tab-plans  = vac_tab-objid.
        rep_tab-vacan  = vac_tab-vacan.
        rep_tab-status = vac_tab-status.
        read table org_tab with key objid = vac_tab-objid.
        if sy-subrc = 0.
          rep_tab-kostl = org_tab-kostl.
          rep_tab-plstx = org_tab-plstx.
          rep_tab-orgtx = org_tab-orgtx.
        endif.
        append rep_tab.
        clear  rep_tab.
      endloop.
      loop at rep_tab.
        if not rep_tab-kostl in s_kostl.
          delete rep_tab index sy-tabix.
        endif.
      endloop.
      sort rep_tab by kostl plans.
    delete rep_tab where plstx cs v_str.
    delete rep_tab where orgtx cs v_str1.
    Calculate the Count of Vacancies in each Division
      clear v_cnt.
      loop at rep_tab.
        at end of kostl.
          sy-tabix = sy-tabix - v_cnt.
          rep1_tab-kostl = rep_tab-kostl.
          rep1_tab-cnt   = sy-tabix.
          v_cnt = v_cnt + sy-tabix.
          append rep1_tab.
          clear:rep1_tab.
        endat.
      endloop.
      sort rep1_tab by kostl.
    endform.                  "get_vac_data
    *&      Form append_data
    Append the data into final Internal Table
    form append_data.
      loop at org2_tab.
        rep2_tab-kostl = org2_tab-kostl.
        rep2_tab-app_no = org2_tab-count.
        read table act4_tab with key kostl = org2_tab-kostl
                                     binary search.
        if sy-subrc = 0.
          rep2_tab-nat_no = act4_tab-count1.
        endif.
        read table act5_tab with key kostl = org2_tab-kostl
                                     binary search.
        if sy-subrc = 0.
          rep2_tab-exp_no = act5_tab-count2.
        endif.
        read table rep1_tab with key kostl = org2_tab-kostl
                                     binary search.
        if sy-subrc = 0.
          rep2_tab-vac_no = rep1_tab-cnt.
        endif.
        rep2_tab-tot_no = rep2_tab-nat_no + rep2_tab-exp_no.
        append rep2_tab.
        clear rep2_tab.
      endloop.
      sort rep2_tab by kostl.
    endform.             "append_data
    *&      Form  top_of_page
    Write the Report and Column Headings
    form top_of_page.
      skip.
      format color col_heading on.
      write: /1(108) 'NATIONAL DRILLING COMPANY'(010) centered,
             /1(108) 'Summary of Manning Level Report'(011) centered.
      format color off.
      skip.
      write: /2 'Key Date        :'(013), p_date,
             75 'Report Run Date:'(041), sy-datum.
      if not s_kostl[] is initial.
        if s_kostl-high is initial.
          write: /2 'Cost Center     :'(023), s_kostl-low,
                 75 'Time           :'(042), sy-uzeit.
        else.
          write: /2 'Cost Center From:'(024), s_kostl-low+7(3),
                                    'To'(022), s_kostl-high,
                 75 'Time           :'(042), sy-uzeit.
        endif.
      else.
        write: /75  'Time           :'(042), sy-uzeit.
      endif.
      if not s_plans[] is initial.
        if s_plans-high is initial.
          write: /2 'Position Id     :'(019), s_plans-low,
                 75 'User           :'(043), sy-uname.
        else.
          write: /2 'Position Id From:'(021), s_plans-low,
                              'To'(022), s_plans-high,
                 75 'User           :'(043), sy-uname.
        endif.
      else.
        write: /75 'User           :'(043), sy-uname.
      endif.
      write: /75 'Page No        :'(044), sy-pagno.
      skip.
      write /1(108) sy-uline.
      format color col_heading.
      write:/1 sy-vline,
            12 sy-vline, 53 sy-vline,
            64 sy-vline, 65(32)  'Actual'(018) centered,
            97 sy-vline,108 sy-vline.
      write:/1 sy-vline,  2(10) 'CostCenter'(014),
            12 sy-vline, 13(40) 'Description'(026) centered,
            53 sy-vline, 54(10) 'Approved'(025) centered,
            64 sy-vline, 65(32)  sy-uline,
            97 sy-vline, 98(10) 'Vacancies'(017),
           108 sy-vline.
      write:/1 sy-vline,
            12 sy-vline, 53 sy-vline,
            64 sy-vline, 65(10) 'National'(015) centered,
            75 sy-vline, 76(10) 'Expatriate'(020) centered,
            86 sy-vline, 87(10) 'Total'(016) centered,
            97 sy-vline,108 sy-vline.
      format color off.
      write /1(108) sy-uline.
    endform.               "top_of_page
    *&      Form  Display_report
    Write the Report Output
    form display_report.
      if rep2_tab[] is initial.
        message i999 with
        'No Data found for the entered Selection'(035).
      else.
        loop at rep2_tab.
    Authorization Check for the Orgn and Cost Centers
          perform auth_check_org.
          if sy-subrc = 0.
            clear cskt.
            select single ltext into cskt-ltext from cskt
                where spras = sy-langu and
                      kokrs = c_kokrs and
                      kostl = rep2_tab-kostl.
            format color col_normal.
            write: /1 sy-vline, 2(10) rep2_tab-kostl+7(3),
                   12 sy-vline, 13(40) cskt-ltext,
                   53 sy-vline, 54(10) rep2_tab-app_no,
                   64 sy-vline, 65(10) rep2_tab-nat_no,
                   75 sy-vline, 76(10) rep2_tab-exp_no,
                   86 sy-vline, 87(10) rep2_tab-tot_no,
                   97 sy-vline, 98(10) rep2_tab-vac_no,
                  108 sy-vline.
            format color off.
            at last.
              sum.
              format color 3.
              write /1(108) sy-uline.
              write: /1 sy-vline, 2(10) 'Total'(027),
                     12 sy-vline,
                     53 sy-vline, 54(10) rep2_tab-app_no,
                     64 sy-vline, 65(10) rep2_tab-nat_no,
                     75 sy-vline, 76(10) rep2_tab-exp_no,
                     86 sy-vline, 87(10) rep2_tab-tot_no,
                     97 sy-vline, 98(10) rep2_tab-vac_no,
                    108 sy-vline.
              format color off.
            endat.
          endif.
        endloop.
      endif.
      write /1(108) sy-uline.
    endform.                    " Display_report
    *&      Form  auth_check_org
    Authorization Check for the Orgn and Cost Center
    form auth_check_org.
      authority-check object 'ZNDCHROM'
            id 'PLVAR' dummy
            id 'OTYPE' dummy
            id 'KOSTL' field rep2_tab-kostl.
    endform.                  "auth_check_org
    <b>Reward points for useful Answers</b>
    Regards
    Anji

  • Migrating HR Org Management data.... any help files etc.

    Hi,
    I am familiar with migrating HR master data, payroll data, NI data, i.e. infotypes etc.
    I would like to know if anyone can give me a heads up on migrating Org management data, and positions data. Is there any abap involvement for this or is it purely a functional issue?
    What are main transactions for this? Can it be done with lsmw? Is there a standard procedure for migrating org mgt data?
    Any advice and assistance greatly appreciated.
    Thank you.

    I am using tcode PP02 and then entering values for
    Plan Version,
    Object Type,
    Object ID,
    Infotype,
    Subtype,
    Planning status, and
    Validity.
      Once I hit create icon "Create Relationships" screen comes up here I have to enter Type of related object, which I can select from a drop down list. This field is P1001-SCLAS. Which is of 2 characters, but when I see a drop down list its a description which is more than 2 characters. How can I populate values in this field using BDC  or Recording. the value I am reading from a file for this field is k or s ... but same field has a drop down list with descriptions but not k or s...., its kind of hard for me to imagin how this field can be populated. When I run a session in SM35  I am getting an error in BDC session as " No batch input data for screen MP100100 2000 ".When I look Converted data in LSMW its k or s ... but not description this is obvious.
      Thanks.

  • How can provide parent-child nodes relation ships?

    how can provide parent-child nodes relation ships?

    I was under the impression that scenegraph is like a JTree. But in JavaFX only leaf node rendering in scenegraph. This situation was confusing my mind. In JavaFX CustomNode must be extending and return a group for custom leaf. If we want to a create parent-child node hierarchy we are create CustomNode that return a group and this group contain an another group,etc. So there is maybe only a way. If you learning to JavaFX first time.This way don't look familiar.

  • Org managament -Cost Center- Position

    Hi Experts,
    There is  a clarification required, I am creating Jobs,Positions from 01.01.1900 upto 31.12.9999 and the FI consultant has created his Cost centers mentioning the date as 01.04.2009. As se says that I need to mantain the cost center creation dates only 1 year prior to GO-LIVE date.
    Now the problem is when I am creating one of the Positions in the Account Assignment tab details and its Cost distribution tab in Org Managment with PPOCE transaction, by assigning the positions relevent Cost Center where he falls to....the system throws and error stating that Cost Center not maintained on 01.01.1900 as it is the matter of that cost centers have been created only from 01.04.2009.
    So, now can any of you let me know how myself and FI consultant need to resolve this issue?
    Best Regards,
    KishoreJ.

    Hi,
    So, I would go ahead and create Jobs & Positions according to Cost Center dates. Can you please clarify me with one thing is
    Now If I create the Jobs & Position of the date from which Cost Centers have been created in my case 01.04.2009, will I be able to hire an employee with the created Jobs & Positions with previous date like for example an employee is working with Organization from 01.01.2003 till date as when I do hiringaction, system asks me for joining date, so mentioning his joinning date as 01.01.2003 and maintain all the Org data with Account Assignment, Cost Distribution as per the relevent dates.
    Thank You,
    KishoreJ.

  • FS CD Table Relation Ships Required

    Hi
    I am looking for the SAP table Relation ships in FS-CD (Financial Services - Collections & Disbursements).
    Earlier answers will be rewarded.
    Regards.
    Nikhil.B

    Below are the list of tables in FICA
    DFKKOP Items in contract account document
    DFKKOPK Items in contract account document
    DFKKKO Header Data in Open Item Accounting Document
    DFKKREP05 Payment History: Reversals and Write-Offs
    DFKKREP06 Tax Report Data (Invoicing Time or Triggered)
    DPAYCHKH Header: Accounting Using Creation of Payment Media
    DPAYCHKH1 Supplemental Assignments with Creation of Payment Media
    Table fields Short descriptn
    DPAYC Payment program - administrative records
    DPAYCHKH Header: Accounting Using Creation of Payment Media
    DPAYCHKH1 Supplemental Assignments with Creation of Payment Media
    DPAYCHKP Header: Accounting Using Creation of Payment Media
    DPAYG Payment program - payment group
    DPAYH Payment program - data for payment
    DPAYP Payment program - data on paid item
    DPAYV Payment program: Variants for payment medium and list
    TFK042Q Payment Medium: Note of First Direct Debit
    TFK042U Payment Medium: Internal Note to Payee
    TFK042X Payment Program: Company Codes blocked by Payt Run
    YZFKKMAKO Dunning History Header
    FKCRPO Clarification Worklist Credit
    DFKKCFPAYRUN Clarif. Worklist: Payt Program
    DFKKCIBW FICA: Extraction of Cleared Items
    DFKKCOLFILE_H_W Subm. of Receivable for Collection: Header Data Buffer
    DFKKCOLFILE_P_W Subm. of Receivable for Collection: Item Buffer
    DFKKCOLFILE_T_W Subm. of Receivable for Collection: Trailer Data Buffer
    DFKKCOLLHBW_ST Collection Agency Extraction - Status Table
    DFKKCOLLHBW_TMP Collection Agency Extraction - Blocked Interval
    DFKKCOLLH_I_W Buffer: Collection Agency Information File (Header Data)
    DFKKCOLLP_IM_W Buffer: Coll. Agency Info File (Item Master Data Change)
    DFKKCOLLP_IP_W Buffer: Collection Agency Info File (Item for Payments)
    DFKKCOLLP_IR_W Buffer: Collection Agency Info File (Item for Callback)
    LAUFD Date ID
    DFKKCOLLT_I_W Buffer: Collection Agency Information File (Footer)
    DFKKCOMA Correspondence Dunning
    DFKKCOMAKT Correspondence Dunning Activities
    DFKKCRP Creditworthiness Record: Generating Actions
    DFKKDDA Debit Memo Notification (England)
    DFKKENQ Temporary Lock Entries for Mass Activities
    DFKKLOCKS FI-CA: Business Locks
    DFKKMACFCSMK FICA Dunning - Blocked Accounts
    DFKKOPCOLL Collection: Log of Receivables Submitted
    LAUFD Date ID
    DFKKOPKC Card Data Appendix for FICA Document
    DFKKORDERHIST Requests: Document History
    DFKKORDOPHIST Standing Requests: Document History
    DFKKPNBKC Prenotification file creation run: administration data
    DFKKPOH Payment Order: Header Data
    DFKKRDI Revenue Distribution
    DFKKRPL Link from Mass Run Interval for Application Log
    DFKKSTAT Table for Temporary Statistics Data, for Mass Activities
    LAUFD Date ID
    DFKKTAXEX Table of FI-CA Tax Exemptions
    DFKKTAX_EXEMPT Table of FI-CA Tax Exemptions
    DFKKUR Update Run: Run Data
    DFKKURE Update Run: Defective Data Records
    DFKKWOH Write-Off History
    DFKKZW2 Doubtful/Indiv. Val. Adjustments for Receivables - Tfr Pstg
    DFKKZWPT Log Table for Mass Activ. for Tfr Posting of Dbt Rec/IVAs
    DFK_JC_CNTR Container for Related Jobs
    DFKKCFRLS Clarification Cases: Returns Lots
    DFKKCFZST Clarification Cases from Payment Lot
    Reward points..

  • Custom Infotype for Org Management

    Hi Experts,
    I Iam trying to create custom infotype to capture some infomation on an Org Management custom object and I am not sure if I can do this through PM01 because this is neither employee or applicant info but custom object info. Any idea on how to do this?

    Hi,
    For creating OM custom infotype you should start with transaction SE11.  PM01 is only for employee and applicant IT.
    Go to SE11Create structure Ex:HRI9009 Create all necessary datatypes. (fields for your IT).
    Then go to PPCI enter IT name and number. then maintain Table T77I here maintain time constraint for your IT.
    If you still have doubts get back to me.
    Thanks and Regards,
    Shilpa

  • Edit Org Management Infotype 1000

    Hi All,
    Can you suggest me how to edit the Infotype screen of Org Management Infotype 1000.
    Requirement is to restrict the Org unit abbrevation without blank spaces.
    eg) EAB/AB/TM MR is not allowed. It should be  EAB/AB/TMMR

    Hi Veer,
    If you are talking about Org unit abbreviation, this can be done in any of the interfaces in Org Mgmt.
    For example, you can do it in Simple Maintenance, select the org unit and rename it whether abbreviation or name of the org unit.
    Best regards
    Ghouse

Maybe you are looking for

  • View Outlook Email on my iPhone

    Hi all, I've recently purchased an iPhone, but I'm hesitant to open it until I find out if I can view emails from Outlook. At work our email system (like many) is MS Outlook and I want to view my email (with syncing them) on my iPhone. Can I do this

  • Form Crashes when error occured !!!

    Hi All , we have an Application Developed on 10g iDS , and Deplyed on Linux suse , but a Strange behavior is coming up ; when any form specific error occured on the form such as (Can't insert null , not allowed value for list item ...) the Forms Serv

  • How do I change a bad location in the new photos app for Mac?

    I am not sure why but hundreds of my photos have the wrong location stored for them. Is there any easy way to change them in the new Photos app for mac? Thanks

  • ITunes won't play some CD's I upload

    I have an old 40GB iPod- I think it is the 4th generation (right before iPods with color screens came out). Every once in a while, I upload a CD that won't play in iTunes, and I don't know why. I have deleted the CD's from iTunes and uploaded them ag

  • Why does AVG Internet Security keep warning me that Firefox is using excessive memory and advisin me to close it and reopen?

    My browser was open and I was on Facebook. A message appeared from AVG Internet Security 2012, which is operating on my computer, telling me that FireFox was using excessive memory -- "260 MB of memory" and suggesting I close FireFox and reopen. This