Issues about Time manager's workplace

Dear Experts!
Now I'm getting the issue.
- The first, when I have an employee and I want to update time for the employee. Therefore, I used transaction code PTMW to done. But I didn't, the system display error: "you have to fill value in amount field".
-  Second, really I don't want to fill value in amount field.
Help me, Please!
Best regards, Huy

Huy  - Hi, When you select the employee you need to fil in the type of the absence please enter the type of the absence i am sure your records will get saved.
Let me know if you this error message still persists.
Thanks,

Similar Messages

  • Time Manager's Workplace  Configuration !!!!

    Hello Experts,
    Can anyone plz. tell me the configuration steps for Time Manager's Workplace ?
    Thanks & Regards,
    Rashmi

    Hi,<br>
    Below is the detail from SAP BP:
    1     Time Manageru2019s Workplace
    Time Manageru2019s Workplace features a user-friendly and task-oriented interface for maintaining time data and processing time evaluation messages. This interface was specifically designed to meet the need of time administrators in a decentralized enterprise. Although full Time Manageru2019s Workplace customizing has not been completed in the SAP Best Practices for HCM U.S., the following customizing is available for use in Time Manageru2019s Workplace.
    1.1     Payroll
    1.1.1     Absence Valuation
    Procedure
    1.     Access the activity using one of the following navigation options:
    IMG Path          Time Management  Payroll USA  Absences  Absence Valuation  Create Counting Classes for Absence Evaluation
    Transaction Code     PTFMLA
    1.2     Time Data
    1.2.1     Time Accounts
    Procedure
    1.     Access the activity using one of the following navigation options:
    IMG Path          Time Management  Time Evaluation  Time Manageru2019s Workplace  Basic Settings  Select HR Master Data and Time Data  Time Accounts  Define Display Objects for Time Accounts/Assign Reporting Quota Types
    Transaction Code     PTFMLA
    2.     On the u2018Change View u201CDisplay Object: Employee Time Quotasu201D: Overviewu2019 screen, you will see the following values:
    3.     In order to display time account balances, you must first define reporting quota types comprised of the selected time quotas. The following reporting quota types are delivered with the SAP Best Practices for HCM U.S..
    1.2.2     Reporting Quota Types
    Procedure
    1.     Access the activity using one of the following navigation options:
    IMG Path          Time Management  Time Manageru2019s Workplace  Basic Settings  Select HR Master Data and Time Data  Time Accounts  Define Reporting Quota Types
    Transaction Code     PTFMLA
    2.     On the Activity Window choose u2018Maintain Reporting Quota Typesu2019 activity and choose the u2018Chooseu2019 button. On the u2018Change View u201CDefine Reporting Quota Typesu201D: Overviewu2019 screen select Define Reporting Quota Types from the dialog structure.
    Good luck<br><br>
    Thanks,
    Amosha
    <br><br>"Known is a drop & unknown is an OCEAN!"

  • Cross Applicatin Time Sheet (CATS) Vs Time Manager's Workplace

    Dear Guru,
    I am not an expert in HCM Module.
    I would like someone to kindly do me a favour in explaining the diffent between CATS and Time Manager's Workplace.
    The main objective is to select the right tool for implementing Time Sheet User Interface for "Incentive Wage/Piece Work Payroll Scheme".
    Please kindly give me some light.
    Thanks in advance.
    Surapong

    The Cross-Application Time Sheet (CATS) is a cross-application tool for recording working times and tasks. It enables you to control all business processes concerning your employeesu2019 tasks u2013 from paying the employees, through monitoring the progress of a project, to creating invoices.
    Its main strength is that it enables your employees to record their own data.The Time Sheet is a cross-application component in SAP R/3.
    The Time Manageru2019s Workplace is a user interface incorporating the tasks involved in administrating employee time and labor and time evaluation messages. It was specifically designed to meet the needs of time administrators in decentralized departments.
    The Time Manageru2019s Workplace enables time administrators to do their daily work quickly.
    The Time Manageru2019s Workplace replaces the majority of functions of the Maintain Time Data (PA61) Time Management Pool (PT40), and Time Recording for Multiple Persons and Infotypes (RPTTMW00) transactions

  • Time Manager's Workplace required fields (BAdI)

    Hello,
    we have a problem with required fields in Time Manager's Workplace. In our process, when time aministrators creates absence ILLNESS, field Certified start is required field. In customizing and in note 415119 is written, that required fields can be customized with BAdI. Our specialist has tried to customize it as written in note but he didn't found how to customize screen enhancement. He also found, screen enhancement is not possible. Does anybody know, hot to fix that problem?
    BAdI, we are using is PT_BLP_USER.
    Thank you very much,
    David

    Hi David,
    To update any customization you made to the PTMW screens, you have to run the following Program on the Production System:
    Transaction SE38 > RPT_TMW_CUST_UPDATE_TCVIEW
    Select the u2018Update TCVIEW tableu2019 block.
    Run the program for the following Screen Areas:
    u2022 EN1: Column settings for Time Events tab in Multi-Day view
    u2022 TN1: Column settings for Time Data tab in Multi-Day view
    u2022 T11: Column settings for Time Data in One-Day view
    u2022 T1M: Column settings for Time Data in Multi-Person view
    Please let my know if this solves your problem.
    Regards
    Renier Loots

  • Issue about SOA Manager for PI 7.1

    Hi
      I've converted a function module to web service. I open the SOA Manager and the web service exists in the directory, But i'm not able to open the links for
    1)Open porttype WSDL document     
    2) Open WSDL document for selected binding     
    3) Open Web Service navigator for selected binding.
    When I click on these links, nothing happens, the page refreshes and no error/warning is also shown.
    Please help me resolving this issue or if any idea why it might be happening like this?
    Thank you
    Vijay

    Hi Vijay
    Does your user have the required authorizations? See the link below:
    Authorizations 
    http://help.sap.com/saphelp_nwpi71/helpdata/en/45/5688c7b69f09cce10000000a114a6b/frameset.htm
    Regards
    Mark

  • Time Manager's Workplace and Employee temporary assignment in Shift plannin

    Hello fellow SAPPERS,
    I trust that this mail finds you all well.I wonder if you could help me
    1. With the temporary assignment of employees to another org unit using the shift planning section of TM, will i be able to see those people temporarily assigned unedr my reporting structure within PTMW as the line manager.
    2. How do i default the people/employee list on PTMW that are reporting to a specific line manager or supervisor without having to do a selection of a specific org that one is reposible to. Is it STD and backed up by user exit. I know you have to set the ID's for selection condition in IMG. But i would kik eto find out how do i default the reporting structure/list of employees without having to first make selection via Org unit?
    Many Thanks
    Sher

    Hi,
    Note that I am not sure of my answer:
    1) It won't work because what you assign in shift planning doesn't change his "real" assignement.
    2) Right now I don't remmeber but I think it is possible... I am suppose to spend time exploring deeper PTMW, I'll let you know if I found something

  • Manager's Desktop and Time Manager's Workplace

    Hi All, we want to use TMW within MDT. TMW should start with the employees selected by the Manager's Desktop. Is it possible to do this?
    Thanks
    Gerard

    Hi, thank you for the answer. I know that I can start TMW from the Manager's Desktop platform but even if I select one employee in MDT and than I start TMW, the TMW comes up with all the employees for who I am the time administrator.
    I know I should use (or create) another selection rule but I cant find the right one. Do you have any idee?
    Thanks,
    Gerard

  • Time Manager's Workplace- SAP HR

    Dear Frinds,
    I have created a leave however when I go to PTMW to apply for leave for an employee it shows in ESS.However does not show the option for approval in PTMW. How do I configure the same.
    Thank You
    Khalid

    would you able to maintain it in time data maintenance screen?

  • Time manager workplace

    Hi all,
    An interesting question for the SAP guru's!
    In Time Manager Workplace (trx PTMW) the user has to select the employees he wants to see in the time data area.  Everytime he selects another date in the calendar he has to refresh or reload that list and again select the users he wants to see in the time data area.
    Does anyone have an idea how to fix this? 
    It would be really nice if everytime the user selects another date in the calendar that the employee selection is updated and that the updated employee list is also loaded in the time data window (pe multiple employee view)
    Any usefull suggestions will be rewarded
    Kind regards,
    Jonathan

    I got ur problem alright...I am sorry I probably have no answer to that...May be something to with the USER ID and the Transactions that it has...or may be u can check the following:But I am not sure of this either..
    Summary
    Symptom
    In the Time Manager's Workplace, users can choose the .Temporarily insert employees menu option to call up a dialog box and enter a personnel number directly. The personnel number is then added to the employee list included - regardless of whether it  is already in the list.
    If administrators use this function frequently, they may want to be able to use it more quickly. The disadvantage of the current approach of having the function in a menu button in the employee list is that the function cannot be accessed using a keyboard shortcut.
    Two alternative approaches are conceivable:
    1. An input field for the personnel number, or
    2. A button in the menu or in the GUI status with corresponding keyboard shortcut.
    The disadvantage of the first solution is that users must confirm their entries for the system to update data in the data entry area. There is therefore a risk that the personnel number entered does not correspond to the data displayed if the user has forgotten to confirm entry of the personnel number and the user could then enter data for the wrong employee. For this reason, the second, modal approach is favored.
    This note describes how to add an entry to the MEN screen area of the Time Manager's Workplace for calling up the employee dialog box. The new functionality is therefore fully customizable. The new functionality is inactive and you must make it accessible to users by maintaining the field selections of the MEN screen area.
    Additional key words
    TMW, employee selection
    Cause and prerequisites
    Usability improvement
    Solution
    Call up transaction SE80 and edit the functional group PT_GUI_SAP_TMW.
    In the GUI status CT_FACILITIES, add a new entry in the .Utilities context menu. Enter SELECT_EMP as the function code, .Temporarily insert employees as the function text and info text, ICON_EMPLOYEE as the icon name, and .I for the fastpath.
    Add the SELECT_EMP entry to the GUI status CT_FIELD_SELECTION also.
    In the GUI statuses PLAN and WORKLIST, add the SELECT_EMP entry to the Utilities menu bar. Afterwards, add the function to the application toolbar of both statuses. Finally, add the SELECT_EMP function to the UMSCH-F9 function key.
    Make the changes documented in the 'Source code corrections' section to the program objects and generate the changes.
    Source code corrections
    As you can see it is a copy from a SAP note...hope this helps...
    Message was edited by:
            Aniket Chatterjee

  • Time Management Status 7 without Payroll Integration.

    Dear All,
    when do we go about Time Management Status - 7 - without Payroll Integration.
    In this case how the process goes on SAP. what do we do in this status. do we record employees attendances in 2002 IT
    actually what happens.
    Regards
    kvn

    Hi KVN,
    You are using time management status 7 which means that no integration to payroll.Now as far as ur Quotas are considered then please use RPTQTA00 which is just a program and RPTIME00 or PT60 which will run time evaluation and if u want your Quotas to generate in time evaluation then just change V_556A_B in this table to increase so with time evaluation and no generation for Quotas to be with time evaluation.
    The client may ask sometimes for few Quotas to be prorated on a daily basis and so on in that case go with TE Quota generation
    else RPTQTA00 is ok.So see ur business and use either of it
    Let me know if u have any further Questions.
    Thanks
    Swati

  • Regarding Time management in HR

    Hi Experts,
                     I am new to HR-Abap, Can any body give brief idea about time management in hr in Techincal point of view .
    Thanks and regards,
    Sravanthi.

    Hi
    In time related infotypes records are multiple  for a single pernr
    say for example LEAVES
    within a time  for PERNR you will find different types of leaves
    go and see the infotypes data practically PA2001 and PA2005, r etc
    see the sample report on time related data
    REPORT zh_absence_quota
           NO STANDARD PAGE HEADING
           MESSAGE-ID zh_msg
           LINE-SIZE 169
           LINE-COUNT 60(1).
                   T A B L E S  D E C L A R A T I O N S
    TABLES:    pernr,    " Logical PNP
               t001p,    " Personnel Subarea
               t529u,    " Employment Status
               t500p,    " Personnel Area
               t501,     " Employee Group
               t503k,    " Employee Subgroup
               t549a,    " Payroll Area
               t554s,    " Absence Type
               t554t,    " Absence Type Texts
               t556a,    " Quota Type
               t527x,    " Orgn. Unit
               t556b,    " Quota Type Text
               pa0003.   " Payroll Status
    INFOTYPES:
               0000,   " Actions
               0001,   " Organizational Assignment
               2006,   " Absence Quota
               2001.   " Absences
                   T Y P E S  D E C L A R A T I O N S
    Employee Absence Structure
    TYPES: BEGIN OF s_2001,
             pernr TYPE persno,       " Personal Number
             awart TYPE awart,        " Absence Type
             subty TYPE subty,        " Sub Type
             endda TYPE endda,        " End date
             begda TYPE begda,        " Begin date
             abrtg TYPE abrtg,        " Absence days
             ename TYPE emnam,        " employee Name
             atext TYPE abwtxt,       " Absence Type Text
           END OF s_2001.
    Employee Absence Quota Structure
    TYPES: BEGIN OF s_2006,
             pernr TYPE persno,       " Personal Number
             ktart TYPE abwko,        " Absence Quota Type
             year(4) TYPE n,          " Year
             subty TYPE subty,        " Sub Type
             endda TYPE endda,        " End date
             begda TYPE begda,        " Begin date
             anzhl TYPE ptm_quonum,   " Absence Entitlement days
             ename TYPE emnam,        " employee Name
             ktext TYPE kotxt,        " Absence Type Text
             kverb TYPE kverb,        " Deduction Quota days
             anzhb TYPE ptm_quonum,   " Balance days
           END OF s_2006.
    Combined Employee Absence and Quota Structure
    TYPES: BEGIN OF s_rep,
             pernr TYPE persno,       " Personal Number
             ktart TYPE abwko,        " Absence Quota Type
             year(4) TYPE n,          " Year
             anzhl TYPE ptm_quonum,   " Absence Entitlement days
             kverb TYPE kverb,        " Deduction Quota days
             anzhb TYPE ptm_quonum,   " Balance days
             ktext TYPE kotxt,        " Quota Type Text
             awart TYPE awart,        " Absence Type
             abrtg TYPE abrtg,        " Absence days
             ename TYPE emnam,        " employee Name
             atext TYPE abwtxt,       " Absence Type Text
             endda TYPE endda,        " End date
             begda TYPE begda,        " Begin date
           END OF s_rep.
    Declaration of Variables
    DATA : gv_atext TYPE abwtxt,              " Absence Type Text
           gv_ktext TYPE kotxt,               " Absence Type Text
           gv_title1   TYPE sylisel,          " Report title
           gv_year(4)  TYPE c,                " Year
           gv_mon(2)   TYPE c,                " Month
           gv_hrs    TYPE abwtg,              " Hours
           gv_date   TYPE sydatum,            " Date
           gv_date1  TYPE sydatum,            " Date
           gv_dial.                           " Color flag
    Declaration of Constants
    CONSTANTS :
      c_x      TYPE c VALUE 'X',               " Sign
      c_1      TYPE persg   VALUE '1',         " Emp Group
      c_pernr(8) TYPE n VALUE '00000000',      " Pernr
      c_moabw  TYPE moabw   VALUE '01',        " Per SA Grouping
      c_mozko  TYPE mozko   VALUE '01',        " Per SA Grouping
      c_mopgk  TYPE mopgk   VALUE '1',         " Emp SGrp Grouping
      c_endda  TYPE sydatum VALUE '99991231',  " End Date
      c_val1(2) TYPE c VALUE '31',             " Date Type
      c_val2(2) TYPE c VALUE '12',             " Date Type
      c_val    LIKE p0041-dar01 VALUE '01',    " Date Type
      c_date1  LIKE sy-datum VALUE '18000101'. " Date
         I N T E R N A L  T A B L E S  D E C L A R A T I O N S
    DATA: i_2001 TYPE STANDARD TABLE OF s_2001 WITH HEADER LINE,
          i_2006 TYPE STANDARD TABLE OF s_2006 WITH HEADER LINE,
          i_rep1 TYPE STANDARD TABLE OF s_2006 WITH HEADER LINE,
          i_rep  TYPE STANDARD TABLE OF s_rep WITH HEADER LINE.
                     S E L E C T I O N  S C R E E N
    SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
    SELECT-OPTIONS: s_ktart FOR t556a-ktart,  " Absence Quota Type
                    s_awart FOR t554s-subty.  " Absence Type
    SELECTION-SCREEN END OF BLOCK b1.
    SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.
    SELECTION-SCREEN BEGIN OF LINE.
    SELECTION-SCREEN COMMENT 1(33) text-003.   " Quota & Absence
    PARAMETERS: p_qa RADIOBUTTON GROUP rb1.
    SELECTION-SCREEN END OF LINE.
    SELECTION-SCREEN BEGIN OF LINE.
    SELECTION-SCREEN COMMENT 1(33) text-004.   " Quota
    PARAMETERS: p_q RADIOBUTTON GROUP rb1.
    SELECTION-SCREEN END OF LINE.
    SELECTION-SCREEN BEGIN OF LINE.
    SELECTION-SCREEN COMMENT 1(33) text-005.   " Absence
    PARAMETERS: p_a RADIOBUTTON GROUP rb1.
    SELECTION-SCREEN END OF LINE.SELECTION-SCREEN END OF BLOCK b2.
                      I N I T I A L I Z A T I O N                        *
    INITIALIZATION.
                  A T  S E L E C T I O N - S C R E E N                   *
    AT SELECTION-SCREEN.
    Validate the screen fields
      PERFORM validate_screen.
                   S T A R T - O F - S E L E C T I O N                   *
    START-OF-SELECTION.
    Selection of Period
      PERFORM get_period.
    Get PERNR from LDB
    GET pernr.
      IF p0000-stat2 <> '0'.
    Get the data from PA0001,PA2001, PA2006
        PERFORM get_pers_data.
      ENDIF.
                   T O P - O F - P A G E                                 *
    TOP-OF-PAGE.
    Header of the List
      PERFORM header.
                   E N D - O F - P A G E                                 *
    Footer
    END-OF-PAGE.
      IF p_qa = c_x.
    Display both Absence and Quota Data
        WRITE /1(188) sy-uline.
      ELSEIF p_q = c_x.
    Display only Quota Data
        WRITE /1(114) sy-uline.
      ELSEIF p_a = c_x.
    Display only Absence Data
        WRITE /1(125) sy-uline.
      ENDIF.
                   E N D - O F - S E L E C T I O N                       *
    END-OF-SELECTION.
    Combine the Absence and Quota Data
      PERFORM append_data.
      IF p_qa = c_x.
    Display both Absence and Quota Data
        PERFORM display_qa_data.
      ELSEIF p_q = c_x.
    Display only Quota Data
        PERFORM display_q_data.
      ELSEIF p_a = c_x.
    Display only Absence Data
        PERFORM display_a_data.
      ENDIF.
    *&      Form  validate_screen
    Validation of Selection Screen fields
    FORM validate_screen .
    Validation of Personnel Number
      CLEAR pa0003.
      IF NOT pnppernr[] IS INITIAL.
        SELECT pernr
        FROM pa0003 UP TO 1 ROWS
          INTO pa0003-pernr
          WHERE pernr IN pnppernr.
        ENDSELECT.
        IF sy-subrc <> 0.
          MESSAGE e999 WITH 'Incorrect Personnel Number'(006).
        ENDIF.
      ENDIF.
    Validation of Employee Status
      CLEAR t529u.
      IF NOT pnpstat2[] IS INITIAL.
        SELECT SINGLE statv
          INTO t529u-statv
          FROM t529u
          WHERE statv IN pnpstat2 AND
                statn = '2' AND
                sprsl = sy-langu.
        IF sy-subrc <> 0.
          MESSAGE e999 WITH 'Invalid Employee Status'(007).
        ENDIF.
      ENDIF.
    Validation of Personnel Area
      CLEAR t500p.
      IF NOT pnpwerks[] IS INITIAL.
        SELECT persa
        FROM t500p UP TO 1 ROWS
          INTO t500p-persa
          WHERE persa IN pnpwerks.
        ENDSELECT.
        IF sy-subrc <> 0.
          MESSAGE e999 WITH 'Incorrect Personnel Area'(008).
        ENDIF.
      ENDIF.
    Validation of Personnel Sub Area
      CLEAR t001p.
      IF NOT pnpbtrtl[] IS INITIAL.
        SELECT btrtl
        FROM t001p UP TO 1 ROWS
          INTO t001p-btrtl
          WHERE btrtl IN pnpbtrtl.
        ENDSELECT.
        IF sy-subrc <> 0.
          MESSAGE e999 WITH 'Incorrect Personnel Sub Area'(009).
        ENDIF.
      ENDIF.
    Validation of Employee Group
      CLEAR t501.
      IF NOT pnppersg[] IS INITIAL.
        SELECT persg
        FROM t501 UP TO 1 ROWS
          INTO t501-persg
          WHERE persg IN pnppersg.
        ENDSELECT.
        IF sy-subrc <> 0.
          MESSAGE e999 WITH 'Incorrect Employee Group'(010).
        ENDIF.
      ENDIF.
    Validation of Employee Sub Group
      CLEAR t503k.
      IF NOT pnppersk[] IS INITIAL.
        SELECT persk
        FROM t503k UP TO 1 ROWS
          INTO t503k-persk
          WHERE persk IN pnppersk.
        ENDSELECT.
        IF sy-subrc <> 0.
          MESSAGE e999 WITH 'Incorrect Employee Sub Group'(011).
        ENDIF.
      ENDIF.
    Validation of Payroll Area
      CLEAR t549a.
      IF NOT pnpabkrs[] IS INITIAL.
        SELECT abkrs
        FROM t549a UP TO 1 ROWS
          INTO t549a-abkrs
          WHERE abkrs IN pnpabkrs.
        ENDSELECT.
        IF sy-subrc <> 0.
          MESSAGE e999 WITH 'Incorrect Employee Payroll Area'(026).
        ENDIF.
      ENDIF.
    Validation of Absence Type
      CLEAR t554s.
      IF NOT s_awart[] IS INITIAL.
        SELECT subty
        FROM t554s UP TO 1 ROWS
          INTO t554s-subty
          WHERE subty IN s_awart AND
                moabw EQ c_moabw AND
                endda EQ c_endda.
        ENDSELECT.
        IF sy-subrc <> 0.
          MESSAGE e999 WITH 'Incorrect Employee Absence Type'(012).
        ENDIF.
      ENDIF.
    Validation of Absence Quota Type
      CLEAR t556a.
      IF NOT s_ktart[] IS INITIAL.
        SELECT ktart
        FROM t556a UP TO 1 ROWS
          INTO t556a-ktart
          WHERE ktart IN s_ktart AND
                mopgk EQ c_mopgk AND
                mozko EQ c_mozko AND
                endda EQ c_endda.
        ENDSELECT.
        IF sy-subrc <> 0.
          MESSAGE e999 WITH 'Incorrect Employee Quota Type'(013).
        ENDIF.
      ENDIF.
    ENDFORM.                  "validate_screen
    *&      Form  get_period
    Get the Correct Period based on Selection screen selection
    FORM get_period.
      CLEAR: gv_year,gv_mon, gv_date, gv_date1.
      gv_year = sy-datum+0(4).
      gv_mon  = sy-datum+4(2).
      IF pnptimr1 = c_x.      " Current Date
        pnpbegda = sy-datum.
        pnpendda = sy-datum.
      ELSEIF pnptimr2 = c_x.  " Current Month
        CONCATENATE gv_year gv_mon c_val INTO gv_date.
        CONCATENATE gv_year gv_mon c_val1 INTO gv_date1.
        pnpbegda = gv_date.
        pnpendda = gv_date1.
      ELSEIF pnptimr3 = c_x.  " Current Year
        CONCATENATE gv_year c_val c_val INTO gv_date.
        CONCATENATE gv_year c_val2 c_val1 INTO gv_date1.
        pnpbegda = gv_date.
        pnpendda = gv_date1.
      ELSEIF pnptimr4 = c_x.  " Upto Today
        pnpbegda = c_date1.
        pnpendda = sy-datum.
      ELSEIF pnptimr5 = c_x.  " From Today
        pnpbegda = sy-datum.
        pnpendda = c_endda.
      ELSE.
        IF ( pnpbegda IS INITIAL AND pnpendda IS INITIAL ).
          pnpbegda = c_date1.
          pnpendda = c_endda.
        ELSEIF pnpbegda IS INITIAL AND NOT pnpendda IS INITIAL.
          pnpbegda = c_date1.
          pnpendda = pnpendda.
        ELSEIF NOT ( pnpbegda IS INITIAL AND pnpendda IS INITIAL ).
          pnpbegda = pnpbegda.
          pnpendda = pnpendda.
        ENDIF.
      ENDIF.
    ENDFORM.              "get_period
    *&      Form  get_pers_data
    Get the Absence and Quota Data from PA0001,PA2001,PA2006
    FORM get_pers_data.
      DATA: lv_year1(4) TYPE n,
            lv_year2(4) TYPE n,
            lv_date1 TYPE sydatum,
            lv_date2 TYPE sydatum,
            lv_anzhb TYPE ptm_quonum.   " Last Year Balance days
    Get data from Respective Infotypes
      rp_provide_from_last p0001 space pnpbegda pnpendda.
    Absence Data
      LOOP AT p2001 WHERE pernr = pernr-pernr AND
                          begda GE pnpbegda   AND
                          endda LE pnpendda.
        IF p2001-awart IN s_awart.
          i_2001-pernr    = pernr-pernr.
          i_2001-subty    = p2001-subty.
          i_2001-awart    = p2001-awart.
          i_2001-abrtg    = p2001-abrtg.
          i_2001-begda    = p2001-begda.
          i_2001-endda    = p2001-endda.
          READ TABLE p0001 WITH KEY pernr = p2001-pernr.
          i_2001-ename    = p0001-ename.
    Get the Absence Type Text
          CLEAR gv_atext.
          SELECT SINGLE atext INTO gv_atext FROM t554t
                  WHERE sprsl = sy-langu AND
                        moabw = c_moabw  AND
                        awart = p2001-awart.
          IF sy-subrc = 0.
            i_2001-atext = gv_atext.
          ENDIF.
          APPEND i_2001.
          CLEAR i_2001.
        ENDIF.
      ENDLOOP.
    Quota Data
      LOOP AT p2006 WHERE pernr = pernr-pernr AND
                          begda GE pnpbegda   AND
                          endda LE pnpendda.
        IF p2006-ktart IN s_ktart.
          i_2006-pernr    = pernr-pernr.
          i_2006-subty    = p2006-subty.
          i_2006-begda    = p2006-begda.
          i_2006-endda    = p2006-endda.
          i_2006-year     = p2006-endda+0(4).
          i_2006-ktart    = p2006-ktart.
          i_2006-anzhl    = p2006-anzhl.
          i_2006-kverb    = p2006-kverb.
          i_2006-anzhb    = p2006-anzhl - p2006-kverb.
          READ TABLE p0001 WITH KEY pernr = p2001-pernr.
          i_2006-ename    = p0001-ename.
    Get the Quota Type Text
          CLEAR gv_ktext.
          SELECT SINGLE ktext INTO gv_ktext FROM t556b
                  WHERE sprsl = sy-langu AND
                        mopgk = c_mopgk  AND
                        mozko = c_mozko  AND
                        ktart = p2006-ktart.
          IF sy-subrc = 0.
            i_2006-ktext = gv_ktext.
          ENDIF.
          APPEND i_2006.
          CLEAR i_2006.
        ENDIF.
      ENDLOOP.
    For Vacation Quota (80) get the Balance of the Last Year and
    add to the Current Year Quota
      LOOP AT i_2006.
        IF i_2006-ktart = '80'.
          lv_year1 = i_2006-endda+0(4).
          lv_year2 = lv_year1 - 1.
          CONCATENATE lv_year2 '01' '01' INTO lv_date1.
          CONCATENATE lv_year2 '12' '31' INTO lv_date2.
          LOOP AT p2006 WHERE pernr = i_2006-pernr AND
                              begda GE lv_date1    AND
                              endda LE lv_date2    AND
                              ktart = '80'.
            lv_anzhb = p2006-anzhl - p2006-kverb.
            i_rep1-pernr = i_2006-pernr.
            i_rep1-ktext = i_2006-ktext.
            i_rep1-anzhl = p2006-anzhl.
            i_rep1-kverb = p2006-kverb.
            i_rep1-ename = i_2006-ename.
            i_rep1-begda = p2006-begda.
            i_rep1-endda = p2006-endda.
            i_rep1-anzhb = lv_anzhb.
            i_rep1-ktart = '80'.
            i_rep1-year = lv_year2.
            APPEND i_rep1.
            CLEAR: i_rep1.
          ENDLOOP.
        ENDIF.
        CLEAR: lv_year1, lv_year2,
               lv_date1, lv_date2,lv_anzhb.
      ENDLOOP.
      SORT i_rep1 BY pernr ktart.
    ENDFORM.          "get_pers_data
    *&      Form  append_data
    Put the Absence and Quota Data into one Report Int Table
    FORM append_data.
      CLEAR:   i_rep.
      REFRESH: i_rep.
      SORT i_2001 BY pernr awart.
      SORT i_2006 BY pernr ktart year.
    Move I_REP1 data into i_2006
      LOOP AT i_rep1.
        MOVE-CORRESPONDING i_rep1 TO i_2006.
        APPEND i_2006.
        CLEAR  i_2006.
      ENDLOOP.
    Move the Absence and Quota Data into a final Int Table
      LOOP AT i_2006.
        i_rep-pernr = i_2006-pernr.
        i_rep-ename = i_2006-ename.
        i_rep-ktart = i_2006-ktart.
        i_rep-anzhl = i_2006-anzhl.
        i_rep-kverb = i_2006-kverb.
        i_rep-ktext = i_2006-ktext.
        i_rep-anzhb = i_2006-anzhb.
        i_rep-year  = i_2006-year.
        CLEAR i_2001.
        CASE i_2006-ktart.
          WHEN '81'.
            PERFORM get_2001 USING i_2006-pernr '1000' i_2006-year.
          WHEN '50'.
            PERFORM get_2001 USING i_2006-pernr '1002' i_2006-year.
          WHEN '80'.
            PERFORM get_2001 USING i_2006-pernr '1001' i_2006-year.
          WHEN '56'.
            PERFORM get_2001 USING i_2006-pernr '1003' i_2006-year.
          WHEN '51'.
            PERFORM get_2001 USING i_2006-pernr '1004' i_2006-year.
          WHEN '52'.
            PERFORM get_2001 USING i_2006-pernr '1005' i_2006-year.
          WHEN '54'.
            PERFORM get_2001 USING i_2006-pernr '1006' i_2006-year.
          WHEN '53'.
            PERFORM get_2001 USING i_2006-pernr '1007' i_2006-year.
          WHEN '55'.
            PERFORM get_2001 USING i_2006-pernr '1008' i_2006-year.
          WHEN '57'.
            PERFORM get_2001 USING i_2006-pernr '1009' i_2006-year.
          WHEN '90'.
            PERFORM get_2001 USING i_2006-pernr '2000' i_2006-year.
          WHEN '58'.
            PERFORM get_2001 USING i_2006-pernr '2001' i_2006-year.
          WHEN '59'.
            PERFORM get_2001 USING i_2006-pernr '2002' i_2006-year.
          WHEN '91'.
            PERFORM get_2001 USING i_2006-pernr '2003' i_2006-year.
        ENDCASE.
        IF sy-subrc <> 0.
          APPEND i_rep.
        ENDIF.
        CLEAR i_rep.
      ENDLOOP.
      SORT i_rep BY pernr ktart year.
      DELETE i_rep WHERE pernr = ' '.
    ENDFORM.              " append_data
    *&      Form  display_qa_data
    Display the Absence and Quota Data
    FORM display_qa_data.
      DATA: lv_flag,                   " New Flag
            lv_tot2 TYPE ptm_quonum.   " Absence Balance days
      IF i_rep[] IS INITIAL.
        MESSAGE i000 WITH 'No Data found'(014).
      ELSE.
        LOOP AT i_rep.
    toggle color
          PERFORM toggle_color.
          IF lv_flag <> space.
            NEW-LINE.
          ENDIF.
          AT NEW pernr.
            READ TABLE i_rep INDEX sy-tabix.
            WRITE:/1 sy-vline,2(8) i_rep-pernr,
              10 sy-vline,11(40)   i_rep-ename.
          ENDAT.
          AT NEW ktart.
            READ TABLE i_rep INDEX sy-tabix.
            WRITE: 1 sy-vline, 10 sy-vline,
              51 sy-vline,52(25)   i_rep-ktext.
          ENDAT.
          AT NEW year.
            READ TABLE i_rep INDEX sy-tabix.
            WRITE: 1 sy-vline, 10 sy-vline,
                  51 sy-vline,
                  77 sy-vline, 78(4)  i_rep-year,
                  82 sy-vline, 83(11) i_rep-anzhl,
                  94 sy-vline, 95(25) i_rep-atext,
                 120 sy-vline,133 sy-vline,
                 144 sy-vline,
                 155 sy-vline,156(13)  i_rep-anzhb,
                 169 sy-vline.
          lv_tot2 = lv_tot2 + i_rep-anzhb.
          ENDAT.
          WRITE: 1 sy-vline,  10 sy-vline,
                51 sy-vline,  77 sy-vline,
                82 sy-vline,  94 sy-vline,
               120 sy-vline,121(12)  i_rep-abrtg NO-ZERO,
               133 sy-vline,134(10)  i_rep-begda NO-ZERO,
               144 sy-vline,145(10)  i_rep-endda NO-ZERO,
               155 sy-vline,169 sy-vline.
          NEW-LINE.
          AT END OF pernr.
            WRITE  : /1(169) sy-uline.
            SUM.
            FORMAT COLOR 3.
            WRITE:/1 sy-vline,   10 sy-vline,
                  51 sy-vline,   77 sy-vline,
                  82 sy-vline,   94 sy-vline,
                 120 sy-vline,121(12) i_rep-abrtg,
                 133 sy-vline,144 sy-vline,
                 155 sy-vline, 156(13) lv_tot2,
                 169 sy-vline.
            FORMAT COLOR OFF.
            WRITE  : /1(169) sy-uline.
            CLEAR lv_tot2.
          ENDAT.
        ENDLOOP.
      ENDIF.
    ENDFORM.              " display_qa_data
    *&      Form  display_q_data
    Display only the Quota Data
    FORM display_q_data.
      DATA: lv_flag.               " New Flag
      SORT i_2006 BY pernr ktart year.
      IF i_2006[] IS INITIAL.
        MESSAGE i000 WITH 'No Data found'(014).
      ELSE.
        LOOP AT i_2006.
    Toggle Color
          PERFORM toggle_color.
          IF lv_flag <> space.
            NEW-LINE.
          ENDIF.
          AT NEW pernr.
            READ TABLE i_2006 INDEX sy-tabix.
            WRITE: /1 sy-vline,  2(8)  i_2006-pernr,
                   10 sy-vline,11(40)  i_2006-ename.
          ENDAT.
          AT NEW ktart.
            READ TABLE i_2006 INDEX sy-tabix.
            WRITE: 1 sy-vline,10 sy-vline,
                  51 sy-vline,52(25)  i_2006-ktext.
          ENDAT.
          AT NEW year.
            READ TABLE i_2006 INDEX sy-tabix.
            WRITE: 1 sy-vline,  10 sy-vline,
                  51 sy-vline,
                  77 sy-vline,78(4)  i_2006-year,
                  82 sy-vline,83(11) i_2006-anzhl,
                  94 sy-vline,95(13) i_2006-anzhb,
                 108 sy-vline.
            NEW-LINE.
          ENDAT.
          AT END OF pernr.
            WRITE  : /1(108) sy-uline.
            SUM.
            FORMAT COLOR 3.
            WRITE: /1 sy-vline, 10 sy-vline,
                   51 sy-vline,
                   77 sy-vline, 82 sy-vline,
                   94 sy-vline, 95(13) i_2006-anzhb,
                  108 sy-vline.
            FORMAT COLOR OFF.
            WRITE  : /1(108) sy-uline.
          ENDAT.
        ENDLOOP.
      ENDIF.
    ENDFORM.              " display_q_data
    *&      Form  display_a_data
    Display Only the Absence Quota
    FORM display_a_data.
      DATA: lv_flag.               " New Flag
      SORT i_2001 BY pernr awart.
      IF i_2001[] IS INITIAL.
        MESSAGE i000 WITH 'No Data found'(014).
      ELSE.
        LOOP AT i_2001.
    Toggle Color
          PERFORM toggle_color.
          IF lv_flag <> space.
            NEW-LINE.
          ENDIF.
          AT NEW pernr.
            READ TABLE i_2001 INDEX sy-tabix.
            WRITE: /1 sy-vline, 2(10) i_2001-pernr,
                   10 sy-vline,11(40) i_2001-ename.
          ENDAT.
          WRITE:  1 sy-vline, 10 sy-vline,
                  51 sy-vline,52(25) i_2001-atext,
                  77 sy-vline,78(12) i_2001-abrtg,
                  90 sy-vline,91(10) i_2001-begda,
                 101 sy-vline,102(10) i_2001-endda,
                 112 sy-vline.
          NEW-LINE.
          AT END OF pernr.
            WRITE  : /1(112) sy-uline.
            SUM.
            FORMAT COLOR 3.
            WRITE: /1 sy-vline, 10 sy-vline,
                   51 sy-vline,
                   77 sy-vline,78(12) i_2001-abrtg,
                   90 sy-vline,101 sy-vline,
                  112 sy-vline.
            FORMAT COLOR OFF.
            WRITE  : /1(112) sy-uline.
          ENDAT.
        ENDLOOP.
      ENDIF.
    ENDFORM.              " display_a_data
    *&      Form  header
    Write the Report Header
    FORM header .
      data : lv_pers type pbtxt,
             lv_orgn type orgtx.
      gv_title1 = sy-title.              " Set List Header
      IF p_qa = c_x.
        NEW-PAGE LINE-SIZE 193.
      ELSEIF p_a = c_x.
        NEW-PAGE LINE-SIZE 125.
      ELSEIF p_q = c_x.
        NEW-PAGE LINE-SIZE 119.
      ENDIF.
    Standard header
      FORMAT RESET.
      CALL FUNCTION 'Z_STANDARD_HEADER'
        EXPORTING
          title1 = gv_title1.
    Get the Personal Area and Org.Unit Texts
      clear : lv_pers,lv_orgn.
      select single name1 into lv_pers
        from t500p where persa = pnpwerks-low.
      select single orgtx into lv_orgn
        from t527x where sprsl = sy-langu and
                         orgeh = pnporgeh-low and
                         endda = c_endda.
      if not lv_pers is initial.
        write : /2 'Personal Area:'(017), 17(25) lv_pers color 7.
      endif.
      if not lv_orgn is initial.
        write : /2 'Organization Unit:'(021), 20(25) lv_orgn color 3.
      endif.
      IF p_qa = c_x.
        FORMAT COLOR COL_HEADING.
        WRITE  : /1(169) sy-uline.
        WRITE:/1 sy-vline,2(8)    'Emp.No'(015) CENTERED,
              10 sy-vline,11(40)  'Employee Name'(016) CENTERED,
              51 sy-vline,52(25)  'Quota Description'(018) CENTERED,
              77 sy-vline,78(4)   'Year'(027),
              82 sy-vline,83(11)  'Entitlement'(019),
              94 sy-vline,95(25)  'Absence Description'(022) CENTERED,
             120 sy-vline,121(12) 'Absence days'(023),
             133 sy-vline,134(10) 'From Date'(024),
             144 sy-vline,145(10) 'To Date'(025),
             155 sy-vline,156(13) 'Quota Balance'(020),
             169 sy-vline.
        WRITE  : /1(169) sy-uline.
      ELSEIF p_q = c_x.
        FORMAT COLOR COL_HEADING.
        WRITE  : /1(108) sy-uline.
        WRITE:/1 sy-vline,2(8)   'Emp.No'(015) CENTERED,
              10 sy-vline,11(40) 'Employee Name'(016) CENTERED,
              51 sy-vline,52(25) 'Quota Description'(018) CENTERED,
              77 sy-vline,78(4)  'Year'(027),
              82 sy-vline,83(11) 'Entitlement'(019),
              94 sy-vline,95(13) 'Quota Balance'(020),
             108 sy-vline.
        WRITE  : /1(108) sy-uline.
      ELSEIF p_a = c_x.
        FORMAT COLOR COL_HEADING.
        WRITE  : /1(112) sy-uline.
        WRITE:/1 sy-vline,2(8)    'Emp.No'(015) CENTERED,
              10 sy-vline,11(40)  'Employee Name'(016) CENTERED,
              51 sy-vline,52(25)  'Absence Description'(022) CENTERED,
              77 sy-vline,78(12)  'Absence days'(023),
              90 sy-vline,91(10)  'From Date'(024),
             101 sy-vline,102(10) 'To Date'(025),
             112 sy-vline.
        WRITE  : /1(112) sy-uline.
      ENDIF.
    ENDFORM.                    " header
    *&      Form  toggle_color
    This routine alters the color of the records in the list
    FORM toggle_color.
      IF gv_dial = space.
        FORMAT COLOR COL_NORMAL INTENSIFIED OFF.
        gv_dial = c_x.
      ELSE.
        FORMAT COLOR 1 INTENSIFIED OFF.
        CLEAR gv_dial.
      ENDIF.
    ENDFORM.                    " toggle_color
    *&      Form  get_2001
    Get the ABsence type for each Quota type
    FORM get_2001 USING p_pernr TYPE persno
                        p_value TYPE awart
                        p_year.
      LOOP AT i_2001 WHERE pernr = p_pernr AND
                           awart = p_value AND
                           endda+0(4) = p_year.
        i_rep-awart = i_2001-awart.
        i_rep-abrtg = i_2001-abrtg.
        i_rep-atext = i_2001-atext.
        i_rep-begda = i_2001-begda.
        i_rep-endda = i_2001-endda.
        APPEND i_rep.
      ENDLOOP.
    ENDFORM.                                                    " get_2001
    Regards
    anji

  • Important /standard Schemas & PCRs for Time Management

    Dear Gurus,
    I just completed my course and would like to explore more about Time Management.
    I would be glad if any one of you could share the important and most used schemas/ PCR's  of TIME MANAGEMENT in real time..
    Looking forward to hear from you soon to put myself in to SAP soon
    Sathya

    Hi sathya,
    For Time  Mgt mainly you have to focus on Schemas TM00, TM04
    and check the differences of those two,
    go to PE02 & read  document and concentrate on the below Pcrs.
    TO20            Calculate overtime with quota 2007 01
    TO10             Evaluate overtime approval in I0050
    TO15             Evaluate overtime approval in daily WS
    TO16              Determine overtime without approval
    TW15              Overtime after x hours/day
    Regards,
    Sri
    Edited by: Srini vas on Jul 14, 2009 3:33 PM

  • Activity - Time Management

    Hi,
    I need some clarification about my queries on time management of activities below-
    1. We capture /track costs of activities via various reports, but how do we track /capture time of activity? Is there any report or any table which gives detailed info about time management of activites?
    2. Does time management applicable for External activities too?
    Thanks a lot for your time and understanding. 
    Regards,
    Sumanth.

    Hi,
    You can also use the tac-CN47N to view actual hours posted against NWA.
    If you are using CATS system for employee time booking to NWA, then you can use tac- CATS_DA. Select the required paramters on main screen, processing status 10 to 60 and input the Network header as receiver account assignment and execture the report. The CATS_DA will let you know the time booking of multiple persons with status, for example apporal, rejected etec.
    Regards,
    PSR

  • Can any one explain me about PCR TD03 in time management

    Hi All ,
    can u pl expalin me about the PCR TD03, in time management, where if public holiday occurs on sunday move to next day.
    Thanks in advance
    Srinivas

    Hi All ,
    can u pl expalin me about the PCR TD03, in time management, where if public holiday occurs on sunday move to next day.
    Thanks in advance
    Srinivas

  • Time management issue -Employees dont have any periodic interval of working

    Hi Experts,
    We are implementing negative time management for one of the client where there are dynamic work schedules exist.
    The employees dont have any periodic interval of working. The off days for employees are also not fixed.(even holiday calender is not fixed)
    Currently they have legacy system where time administers (around 35 time admins ) put in DWS and off days for the employees for that month,
    and based on that the time administrition happens with the help of time machine. after payroll run happens in legacy system.
    what is the SAP solution - for such type of work styles? where dynamic work shcedules are there.
    People dont have fixed shifts to work on.
    points will be rewarded fully, people who are not sure about their solution - please sorry
    Thanks
    Jay

    Hi,
    We had implemented such a scenario for our customer.
    For this you have to implement 'OPEN WORK SCHEDULE RULES' which means employee can work at any time throughout the week and can take 'OFF' at any day of the week.
    Employee can work from any time in the day to any time he/she wants.
    follow the steps below to create the OPen WSR:-
    1.Create one DWS with 24 hours as planned working hours.
    2. Create the PWS with all 7 days working using the 24 hours DWS.
    3. Create the WSR rule using the above PWS.
    4. Generate the WSR.
    5. Assign to your employees and check it will work.
    Thanks & Regards, SWapnil Mishra

Maybe you are looking for