This page (revision-5) was last changed on 26-Nov-2021 10:22 by ihowie

This page was created on 26-Nov-2021 10:22 by JMyers

Only authorized users are allowed to rename pages.

Only authorized users are allowed to delete pages.

Page revision history

Version Date Modified Size Author Changes ... Change note
5 26-Nov-2021 10:22 1 KB ihowie to previous
4 26-Nov-2021 10:22 1 KB JMyers to previous | to last
3 26-Nov-2021 10:22 1 KB JMyers to previous | to last
2 26-Nov-2021 10:22 1 KB JMyers to previous | to last
1 26-Nov-2021 10:22 1 KB JMyers to last

Page References

Incoming links Outgoing links

Version management

Difference between version and

At line 2 added one line
At line 3 changed 2 lines
The number of months will be expressed as a fractional number.
Statement: If an employee has worked for the company for more than 20 years as of January 1, and their anniversary is this pay, give a $1000 bonus and store the bonus in PC 980.
The number of years returned will be expressed as a whole number.
;Statement:If an employee has worked for the company for more than 20 years as of January 1, and their anniversary is this pay, give a $1000 bonus and store the bonus in PC 980.
At line 6 changed 5 lines
00010 LET V JAN 1 OF THIS YEAR BY $S PERIOD-END-DATE 00020
00020 LET V YRS SERVICE AS OF JAN 1 YBT DB EEM.HIRE_DATE V JAN 1 OF THIS YEAR 00030
00030 ANN BD DB EEM.HIRE_DATE 00100 9999
00100 LET PC 980 EQ N 1000 99999
99999 EXIT 99999
|00010| LET|V|JAN 1 OF THIS YEAR|BY|$S|PERIOD-END-DATE | | |00020|
|00020| LET|V|YRS SERVICE AS OF JAN 1|YBT|DB|EEM.HIRE_DATE|V|JAN 1 OF THIS YEAR|00030|
|00030| ANN| | |BD|DB|EEM.HIRE_DATE| | |00100|9999
|00100| LET|PC|980|EQ|N|1000| | |99999|
|99999|EXIT| | | | | | | |99999|
\\
|Line 00010| The beginning of the year is calculated to prevent having to maintain the UserCalc when the year changes.
|Line 00020 |The years of service are calculated based on January 1.
|Line 00030| Determined if the current pay period includes the anniversary of the employee’s hire date.
At line 12 removed 3 lines
Line 00010 The beginning of the year is calculated to prevent having to maintain the UserCalc when the year changes.
Line 00020 The years of service are calculated based on January 1.
Line 00030 Determined if the current pay period includes the anniversary of the employee’s hire date.
At line 21 added 5 lines
----
![Notes|Edit:Internal.YBT_OPERATOR]
[{InsertPage page='Internal.YBT_OPERATOR' default='Click to create a new notes page'}]