Routine: ACRFPR

Package	Total	Call Graph
Commitment Register	3	(DDS,DIC,DIE,DIK,DIR,FILE,IX)^ACRFDIC $$NAME2^ACRFUTL1 PAUSE^ACRFWARN

Package	Total	Caller Graph
Commitment Register	1	ACRFPAY

Entry Points

Name	Comments	DBIA/ICR reference
PN1
PDAT	;EP;TO REVIEW EMPLOYEE DATA
E11
CAN	;SELECT CAN NUMBER
FILE
EDATA	;FIND EMPLYEE PAYROLL INFO FOR THE PAY PERIOD
NEW	;
DATA	;FIND EMPLOYEES AND EDIT PAYROLL INFO
SELECT	;SELECT TYPE OF ACTION AND EMPLOYEES
PIH
PINFO	;EP;TO ENTER PERSONNEL INFO
EN1	;EDIT PERSONNEL DATA
E1	;EDIT EACH ENTRY
EN
R1	;REMOVE ENTRIES
CONFIRM	;CONFIRM PAYROLL DATA
NEWPAY	;CREATE PAY ENTRY FOR NEW PAY PERIOD AND NEW DEPARTMENT ACCOUNT
ADD	;
WHICH
PI1
EMPLH	;EMPLOYEE LIST HEAD
EDIT	;
PPSUM	;PAYPERIOD SUMMARY
REMOVE
PPCAN	;PAY PERIOD CAN
EXIT
EMPLIST
D1

External References

Name	Field # of Occurrence
DDS^ACRFDIC	PI1+9
DIC^ACRFDIC	PI1+4
DIE^ACRFDIC	E1+13, E11+3, PI1+10
DIK^ACRFDIC	R1+6
DIR^ACRFDIC	EN1+6, EN1+11, EN1+16, EN1+21, EN1+27, SELECT+4, WHICH+3, REMOVE+7, NEW+12, NEW+17 , NEW+21, NEW+26, NEW+31, CONFIRM+5
FILE^ACRFDIC	FILE+7, NEWPAY+9, PN1+4
IX^ACRFDIC	CAN+6
$$NAME2^ACRFUTL1	D1+4, E1+3, NEW+9
PAUSE^ACRFWARN	CAN+14, EMPLIST+16

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: EN1+1
Function Call: WRITE	Prompt: !?10,"PAYROLL DATA ENTRY UTILITY" Line Location: EN1+2
Function Call: WRITE	Prompt: !! Line Location: EN1+5
Function Call: WRITE	Prompt: !!,"NEXT" Line Location: CAN+19
Function Call: WRITE	Prompt: ?35,$J($FN(ACR(1),"P",2),8),?44,$J(ACROH,3),?49,$J($FN(ACROT,"P",2),7),?58,$J(ACRBH,3),?62,$J($FN(ACR(1)+ACR(2),"P",2),10),?72,$J($FN(ACR(2),"P",2),7) Line Location: EMPLIST+15
Function Call: WRITE	Prompt: !!,?35,"GROSS",?44,"OVERTIME",?58,"BASE",?63,"NET",?72,"FRINGE" Line Location: EMPLH+3
Function Call: WRITE	Prompt: !,"NO.",?4,"SSN",?14,"EMPLOYEE",?35,"PAY",?44,"HRS",?49,"PAY",?58,"HRS",?63,"EXPEND",?72,"BENEFITS" Line Location: EMPLH+4
Function Call: WRITE	Prompt: !,"---",?4,"---------",?14,"--------------------",?35,"--------",?44,"----",?49,"-------",?58,"----",?63,"--------",?72,"-------" Line Location: EMPLH+5
Function Call: WRITE	Prompt: @IOF Line Location: PPSUM+1
Function Call: WRITE	Prompt: !?4,"Payroll Control NO.: ",ACRCN Line Location: PPSUM+2
Function Call: WRITE	Prompt: !?4,"Payroll Period.....: ",ACRPPN Line Location: PPSUM+3
Function Call: WRITE	Prompt: !?4,"Pay Period Ends....: " Line Location: PPSUM+4
Function Call: WRITE	Prompt: Y,?$X+3 Line Location: PPSUM+5
Function Call: WRITE	Prompt: !?4,"Fiscal Year........: ",ACRFY Line Location: PPSUM+6
Function Call: WRITE	Prompt: !?4,"Payroll CAN........: ",ACRCAN Line Location: PPCAN+1
Function Call: WRITE	Prompt: ! Line Location: SELECT+3
Function Call: WRITE	Prompt: !!,"Edit existing data for: ",$$NAME2^ACRFUTL1(ACRAUDA) Line Location: E1+3
Function Call: WRITE	Prompt: !," For Fiscal Year: ",ACRFY," Pay Period: ",ACRPPN," Control NO.: ",ACRCN Line Location: E1+4
Function Call: WRITE	Prompt: ! Line Location: WHICH+2
Function Call: WRITE	Prompt: ! Line Location: REMOVE+6
Function Call: WRITE	Prompt: !!,"PAYROLL DATA FOR: ",@ACRON,$$NAME2^ACRFUTL1(ACRAUDA),@ACROF,! Line Location: NEW+9
Function Call: WRITE	Prompt: ! Line Location: CONFIRM+4
Function Call: WRITE	Prompt: @IOF Line Location: PIH+0
Function Call: WRITE	Prompt: !?20,"Enter Employee Personnel Information",!! Line Location: PIH+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ACRAU - [#9002185.3]	Classic Fileman Calls
^ACRLOCB - [#9002188]	Classic Fileman Calls
^ACROBL - [#9002189]	Classic Fileman Calls
^ACRSS - [#9002193]	Classic Fileman Calls
^ACRDOC - [#9002196]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACRAU - [#9002185.3]	NEW+3, NEW+25
^ACRAU("CAN"	CAN+12, D1+2
^ACRDOC("B"	NEWPAY+2
^ACRLOCB - [#9002188]	CAN+9
^ACRSS - [#9002193]	EDATA+6, EDATA+7, E11+2
^ACRSS("PR"	EDATA+4, E1+7, R1+3, ADD+5
^AUTTCAN - [#9999999.57]	CAN+10
^DD("DD"	PPSUM+5
^TMP("ACRPR"	EXIT+1!, D1+8*, D1+9, EMPLIST+4, EMPLIST+6, EMPLIST+10
^VA(200 - [#200]	D1+6

Label References

Name	Line Occurrences
ADD	SELECT+7
CAN	EN1+30
CONFIRM	NEW+34
D1	DATA+1
DATA	CAN+15
E1	EDIT+4
E11	E1+14
EDATA	EMPLIST+14
EDIT	SELECT+6
EMPLH	EMPLIST, EMPLIST+16
EMPLIST	D1+10
EN1	EN+1
EXIT	EN
FILE	NEW+36
NEW	ADD+6
NEWPAY	CAN+11, NEWPAY+10
PI1	PINFO+1
PIH	PI1+3
PN1	PN1+5
PPCAN	EMPLH+2, NEW+7
PPSUM	CAN+18, EMPLH+1, NEW+6
R1	REMOVE+10
REMOVE	SELECT+8
SELECT	D1+12
WHICH	EDIT+1, REMOVE

Naked Globals

Name	Field # of Occurrence
^("DT"	E11+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACR	EMPLIST+13!
ACR(1	EMPLIST+15, EDATA+8, NEW+14, FILE+5, FILE+6
ACR(2	EMPLIST+15, EDATA+9, NEW+32, FILE+6
ACRAU	EXIT!, D1+4, D1+5, D1+8, NEW+1, NEW+2
ACRAUDA	D1~, D1+1, D1+2, D1+4, D1+6, D1+8, EDATA+1, EDATA+4, EDIT+4, E1+1 , E1+3, E1+7, R1+3, ADD+3, ADD+4, ADD+5, NEW+2, NEW+3, NEW+9, NEW+25 , FILE+4
ACRBH	EMPLIST+13!, EMPLIST+15, EDATA+8, NEW+27, FILE+5
ACRBY	EXIT!
ACRCAN	EXIT!, CAN+10*, PPCAN+1
ACRCANDA	EXIT!, CAN+9*, CAN+10, CAN+12, D1+2, FILE+4
ACRCDATE	EXIT!, EN1+18*, PPSUM+5, NEW+5, NEWPAY+8
ACRCN	EXIT!, EN1+8*, EDATA+4, PPSUM+2, E1+4, E1+7, R1+3, ADD+5, FILE+4, NEWPAY+1 , NEWPAY+8, PN1+3
ACRDATE	EXIT!, NEW+3, NEW+4, NEW+5*, FILE+4
ACRDOC	EXIT!, NEWPAY+1*, NEWPAY+2, NEWPAY+5
ACRDOCDA	EXIT!, EMPLIST+14, FILE+4, NEWPAY+2, NEWPAY+3, NEWPAY+4!, NEWPAY+11, PN1, PN1+3
ACRFY	EXIT!, EN1+29*, EDATA+4, PPSUM+6, E1+4, E1+7, R1+3, ADD+5, FILE+4, NEWPAY+1 , NEWPAY+8, PN1+3
ACRGP	EXIT!
ACRI	EXIT!, ADD+1, ADD+2, ADD+3, NEW+1
ACRJ	EXIT!, D1+1, EMPLIST+2, EMPLIST+5, EMPLIST+6, EMPLIST+7, EMPLIST+8, EMPLIST+11, EMPLIST+12, EDATA+1 , EDATA+2~, EDATA+3, EDATA+5, EDATA+8, EDATA+9, EDIT+3~, EDIT+4, E1+5~, E1+6, E1+8 , E1+11, REMOVE+9~, REMOVE+10, NEW+36, FILE, FILE+5, FILE+6
ACRLBDA	EXIT!, CAN+8*, CAN+9, FILE+4, NEWPAY+8, PN1+3
ACRMAX	EXIT!, EMPLIST+7*, WHICH
ACRNE	EXIT!
>> ACROBJDA	FILE+3*, FILE+4
ACRODATE	EXIT!, EN1+23*, EN1+26, PPSUM+5, NEW+4, NEWPAY+8
>> ACROF	NEW+9
ACROH	EXIT!, EMPLIST+13!, EMPLIST+15, EDATA+8, NEW+18, FILE+5
>> ACRON	NEW+9
ACROP	EXIT!
ACROT	EMPLIST+13!, EMPLIST+15, EDATA+8, NEW+22, FILE+5
ACROUT	EXIT!, EN1+30, CAN+17, DATA+1, PINFO+1, PINFO+2!
ACRPPN	EXIT!, EN1+13*, PPSUM+3, E1+4, FILE+4, PN1+3
ACRQUIT	EXIT!, EN1+7, EN1+12, EN1+28, EN1+30, EN1+31!, CAN+7, CAN+16!, DATA+1, DATA+2! , D1+11, EMPLIST+4, EMPLIST+10, EMPLIST+16, SELECT+5, ADD+2, ADD+7!, NEW+35!, CONFIRM+6, PINFO+1 , PINFO+2!, PI1+5*
ACRSCREN	PI1+10!
ACRSS2	EXIT!, EDATA+7*, EDATA+8
ACRSSDA	EDATA+2~, EDATA+3, EDATA+4, EDATA+6, EDATA+7, E1+5~, E1+6, E1+7, E1+9, E11 , E11+2, R1+1~, R1+2, R1+3, R1+4, FILE+8*
ACRSSDT	EXIT!, EDATA+6*, EDATA+8, EDATA+9
ACRSSN	EXIT!, D1+6, D1+7, D1+8, EMPLIST+1!, EMPLIST+3, EMPLIST+4, EMPLIST+6, EMPLIST+9, EMPLIST+10* , EMPLIST+12
ACRSSN(	EMPLIST+6*, EMPLIST+12, EDATA+1, EDIT+4, ADD+2, ADD+3, NEW+1
ACRX	EXIT!, EDIT+4, REMOVE+10, FILE+6*
ACRXX	EXIT!, EDIT+2, EDIT+4, WHICH+5*, REMOVE+1, REMOVE+4, REMOVE+10
ACRY	EXIT!
>> D	CAN+5*
>> DA	E1+9, E11, R1+4, PI1+6
>> DIC	CAN+1, FILE+1, NEWPAY+6, PN1+1, PI1*
>> DIC("A"	CAN+3, PI1+2
>> DIC("DR"	FILE+4, FILE+5, FILE+6, NEWPAY+8, PN1+3*
>> DIC("S"	CAN+4*
>> DIC(0	CAN+2, FILE+2, NEWPAY+7, PN1+2, PI1+1*
>> DIE	E1+10, E11+1, PI1+7*
>> DIK	R1+5*
>> DIR("A"	EN1+4, EN1+10, EN1+15, EN1+20, EN1+25, SELECT+2, WHICH+1, REMOVE+3, REMOVE+4, NEW+11 , NEW+16, NEW+20, NEW+24, NEW+30, CONFIRM+2*
>> DIR("B"	EN1+26, REMOVE+5, NEW+25, CONFIRM+3
>> DIR(0	EN1+3, EN1+9, EN1+14, EN1+19, EN1+24, SELECT+1, WHICH, REMOVE+2, NEW+10, NEW+15 , NEW+19, NEW+23, NEW+29, CONFIRM+1
>> DR	E1+11, E1+12, E11+2, PI1+8
DT	NEWPAY+8, PN1+3
DUZ	PN1+3
IOF	EN1+1, PPSUM+1, PIH
IOSL	EMPLIST+16
U	CAN+9, CAN+10, D1+6, D1+8, EMPLIST+6, EMPLIST+12, EDATA+8, EDATA+9, E11+2, NEW+3 , NEW+25
>> X	FILE, NEWPAY+5, PN1*
>> Y	EN1+7, EN1+8, EN1+12, EN1+13, EN1+17, EN1+18, EN1+22, EN1+23, EN1+28, EN1+29 , CAN+7, CAN+8, PPSUM+5*, SELECT+5, SELECT+6, SELECT+7, SELECT+8, WHICH+4, WHICH+5, REMOVE+8 , NEW+13, NEW+14, NEW+18, NEW+22, NEW+27, NEW+28, NEW+32, NEW+33, FILE+8, CONFIRM+6 , NEWPAY+10, NEWPAY+11, PN1+5, PI1+5, PI1+6

Customize PDF page

Package: Commitment Register

Routine: ACRFPR

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: