0

# PCR Absence QUOTA remaining days

Nov 30, 2016 at 12:21 AM

63

Former Member

Hi experts

I have to deal with a 2 kinds of Employee Groups, Temporary and Permanent; they have a different type of QUOTA calculation. But a Temporary Employee can change to a Permanent employee. So I need to calculate the QUOTA as Permanent by subtracting the Absence QUOTA remaining days as a Temporary employee (14).

I checked by HRS=FR14C but it doesn’t check the year, so it worked on 2016 but on 2017 changed the QUOTA Permanent to. But the FR14C is only 2016.

ZPRP * **** OUTWPPERSG

ZPRP * **** * HRS=YDEYZ3

ZPRP * **** * HRS?1

ZPRP * **** * * HRS=FR14C

ZPRP * **** * * ROUNDH>60

ZPRP * **** * * HRS?0

ZPRP * **** * * > GCYGZPRPA

ZPRP A **** HRS/14

ZPRP A **** HRS-D0QTA

ZPRP A **** HRS*-1

ZPRP A **** ADDDB0QTAZ

ZPRP A **** ADDDB0QTBZ

How could I check only the current year?

Rémi Corriveau Nov 30, 2016 at 05:42 PM
1

Create a Time pcr that will query the Quota (using Operation OUTAQTYP), and for the return value 14, use Operation HRS=QCREST to find it's Balance and transfer that into an Information Time Type (using Operation ADDDBxxxx). Insert that pcr in your Time Evaluation Schema before the Quota Allowance Calculation pcr, and call it through Function P2006.

You will then have an Information TT that can be used to calculate the Allowance of Permanent employees, but you should still delimit the Temporary employee's Quota as of the Transfer Date.

Share
Former Member Dec 06, 2016 at 06:17 PM
0

Thank you very mucha Remi !

I ve tried counting the days between the current date and expiration day of the quota by HRS=FV14L, if its bigger than 365 then is not the current year. I think Its similar.

ZPRP * **** OUTWPPERSG

ZPRP * **** * HRS=YDEYZ3

ZPRP * **** * HRS?1 Operac.decisión HRS

ZPRP * **** * * HRS=FV14L

ZPRP * **** * * GCYGZPRP1

ZPRP 1 **** HRS?365 Operac.decisión HRS

ZPRP 1 **** * HRS=FR14C

------....

ZPRP 2 **** < HRS/14

ZPRP 2 **** < HRS-D0QTA

ZPRP 2 **** < HRS*-1

ZPRP 2 **** < ADDDB0QTAZ Activ.SaldDía = 0

ZPRP 2 **** < ADDDB0QTBZ Activ.SaldDía = 0

Share