EY_OPERATOR
Back to current versionRestore this version

EY - End of Year #

The End of Year (EY) operator will return the last day of the year of the date found in Operand 3.

Statement
Employees are not eligible for pension benefits until January 1 of the year following their Hire Date. Pension contributions are stored in PC 1100, and are equal to 1% of Gross Earnings.

LineCMDOTOperand 1OPEROTOperand2OTOperand3If Goto Else GoTo
00010 LETVPENSION START DATEEYDBEEM.HIRE_DATEA+1D00020
00020 IFVPENSION START DATEGE$GPAY-PERIOD-START 0010099999
00100 LETPC1100MLTECGROSS PAYN0.0199999
99999 EXIT 99999

In the example above, an employee hired March 16, 1998 would begin having contributions made to pension on January 1, 1999. The operator determines the end of the year of the hire date in Operand 2, namely, December 31, 1998. Operand 3 takes that date and adds one day to get the result January 1, 1999. Refer to BD for possible Operand 3 values.