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

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
3 26-Nov-2021 10:22 3 KB JEscott to previous
2 26-Nov-2021 10:22 3 KB JMyers to previous | to last
1 26-Nov-2021 10:22 2 KB JMyers to last

Page References

Incoming links Outgoing links
BE_SAMPLE_USERCALC
BE_SAMPLE_USERCALC

Version management

Difference between version and

At line 1 changed 3 lines
!!!BE - 401K Maximum
!Requirement
BE - 401K Maximum
Requirement
At line 6 changed 2 lines
!!401K Maximum Amount
401K Maximum Amount
At line 9 changed 2 lines
;Statement
Statement
At line 9 added 14 lines
Set up
IMVR User Variable
Pays this Year Numeric 27
401K Max Prc Numeric 25
401K Max Amt Numeric 9000
IMUC Variables
Pays Remaining Numeric 0
BW Wage Numeric 0
Total Earnings Numeric 0
Max Perc Numeric 0
IPPC Pay Components
9014 401K Max Amt Statistic attached to Stat 401K Max Amt
IDSC Statistic Components
401K Max Amt Replace
At line 13 changed 14 lines
;Set up
|[IMVR]|User Variable|
|Pays this Year|Numeric |27
|401K Max Prc|Numeric |25
|401K Max Amt|Numeric| 9000
|[IMUC]|Variables|
|Pays Remaining|Numeric| 0
|BW |WageNumeric |0
|Total Earnings|Numeric| 0
|Max Perc|Numeric| 0
|[IPPC]|Pay Components |
|9014|401K Max Amt|Statistic attached to Stat 401K Max Amt
|[IDSC]|Statistic Components|
| |401K Max Amt|Replace
UserCalc
At line 28 changed 3 lines
!UserCalc
Product:PR\\
Type:Calculation
Product: PR
Type: Calculation
At line 32 removed 11 lines
||Line||CMD||OT||Operand 1||OPER||OT||Operand2||OT||Operand3||If Goto||Else GoTo
|00010|LET|V|PAYS REMAINING|SUB|$C|PAYS THIS YEAR|DB|PPP.PAY_OF_YEAR|00020|
|00020|LET|V|BW WAGE|WAGE|WB|BW| | |00030|
|00030|LET|V|TOTAL EARNINGS|MLT|V|PAYS REMIANING|V|BW EARNINGS|00040|
|00040|LET|V|TOTAL EARNINGS|ADD|V|TOTAL EARNINGS|EC|GROSS PAY| 00050|
|00050|LET|V|TOTAL EARNINGS|ADD|V|TOTAL EARNINGS|EY|GROSS PAY| 00100|
|00100|LET|V|MAX PERC|MLT|V|TOTAL EARNINGS|$C|401K MAX PRC|00200|
|00200|IF|V|MAX PERC|LT|$C|401K MAX AMT| | |00300|00400
|00300|LET|PC|9014|RDN|V|MAX PRC|N|.01|99999|
|00400|LET|PC|9014|EQ|$C|401K MAX AMT| | |99999|
|99999|EXIT| | | | | | | | |
At line 44 removed 2 lines
!Completion
After publishing this UserCalc, attach it to the Pay Point prior to the 401K Benefit being executed.
At line 47 changed 2 lines
----
!!401K Maximum Deduction
Line CMD OT Operand 1 OPER OT Operand2 OT Operand3 If Goto Else GoTo
00010 LET V PAYS REMAINING SUB $C PAYS THIS YEAR DB PPP.PAY_OF_YEAR 00020
00020 LET V BW WAGE WAGE WB BW 00030
00030 LET V TOTAL EARNINGS MLT V PAYS REMIANING V BW EARNINGS 00040
00040 LET V TOTAL EARNINGS ADD V TOTAL EARNINGS EC GROSS PAY 00050
00050 LET V TOTAL EARNINGS ADD V TOTAL EARNINGS EY GROSS PAY 00100
00100 LET V MAX PERC MLT V TOTAL EARNINGS $C 401K MAX PRC 00200
00200 IF V MAX PERC LT $C 401K MAX AMT 00300 00400
00300 LET PC 9014 RDN V MAX PRC N .01 99999
00400 LET PC 9014 EQ $C 401K MAX AMT 99999
99999 EXIT
At line 43 added 3 lines
Completion
After publishing this UserCalc, attach it to the Pay Point prior to the 401K Benefit being executed.
401K Maximum Deduction
At line 47 added 12 lines
Statement
Determine if the employee deduction for 401K is to be taken fully or if the 401K maximum has been reached.
Set up
IMUC UserCalc
401K Maximum Amount
IMUC Variables
Deduction Numeric 0
Total Deduction Numeric 0
Message Char
Max Amount Char
IPPC Pay Components
3015 401k Deduction
At line 52 changed one line
;Statement:Determine if the employee deduction for 401K is to be taken fully or if the 401K maximum has been reached.
UserCalc
Product BE
Type Function
Return Value Number
At line 54 removed 10 lines
;Set up
|[IMUC] | UserCalc|
| |401K Maximum Amount |
|[IMUC]| Variables|
|Deduction | Numeric| 0
| |Total Deduction Numeric| 0
|Message | Char|
|Max Amount | Char|
|[IPPC] | Pay Components |
|3015 | 401k Deduction |
At line 65 changed 4 lines
;UserCalc
|Product| BE
|Type| Function
|Return Value| Number
Line CMD OT Operand 1 OPER OT Operand2 OT Operand3 If Goto Else GoTo
00010 LET V DEDUCITON EQ $P NUMBER-PARAMETER 00020
00020 LET V TOTAL DEDUCTION ADD PY 3015 V DEDUCTION 00030
00030 LET V MAX AMOUNT CHAR PC 9014 00100
00100 IF PY 3015 GE PC 9014 00110 00200
00110 LET V DEDUCTION EQ N 0 00120
00120 LET V MESSAGE EQ A No 401K taken. EE over max of V MAX AMOUNT 09000
00200 IF V TOTAL DEDUCTION GT PC 9014 00210 99999
00210 LET V DEDUCTION SUB PC 9014 PY 3015 00220
00220 LET V MESSAGE EQ A EE has reached 401K Max Ded of V MAX AMOUNT 00230
00230 LET V MESSAGE EQ V MESSAGE A . 401K Ded. Reduced - PC 3015. 09000
09000 MSG V MESSAGE 99999
99999 RET V DEDUCTION 99999
At line 70 changed 16 lines
||Line||CMD||OT||Operand 1||OPER||OT||Operand2||OT||Operand3||If Goto||Else GoTo
|00010| LET| V| DEDUCTION| EQ| $P| NUMBER-PARAMETER| | |00020|
|00020 |LET| V| TOTAL DEDUCTION |ADD| PY| 3015| V| DEDUCTION| 00030 |
|00030| LET| V| MAX AMOUNT| CHAR| PC| 9014| | |00100|
|00100| IF| PY| 3015| GE| PC| 9014| | |00110|00200
|00110| LET| V| DEDUCTION| EQ| N| 0| | |00120|
|00120| LET|V|MESSAGE|EQ|A|No 401K taken\\EE over max of |V|MAX AMOUNT|09000|
|00200| IF| V| TOTAL DEDUCTION |GT| PC| 9014| | |00210| 99999
|00210| LET| V| DEDUCTION| SUB| PC| 9014| PY| 3015| 00220|
|00220| LET|V|MESSAGE|EQ|A|EE has reached 401K Max Ded of|V|MAX AMOUNT|00230|
|00230| LET|V|MESSAGE|EQ|V|MESSAGE|A|401K Ded. Reduced - PC 3015|09000 |
|09000| MSG|V|MESSAGE| | | | | |99999|
|99999| RET|V|DEDUCTION| | | | | |99999|
;Completion:After publishing this UserCalc attach it to Benefit Component 1010 - Deduction Method.
Completion
After publishing this UserCalc attach it to Benefit Component 1010 - Deduction Method.
At line 87 removed 5 lines
----
![Notes|Edit:Internal.BE_SAMPLE_USERCALC]
[{InsertPage page='Internal.BE_SAMPLE_USERCALC' default='Click to create a new notes page'}]
This page (revision-3) was last changed on 26-Nov-2021 10:22 by JEscottTop