Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ACRFPR

Package: Commitment Register

Routine: ACRFPR


Information

ACRFPR ;IHS/DSD/THL,AEF - PAYROLL DATA; [ 09/23/2005 9:44 AM ]

Source Information

Source file <ACRFPR.m>

Call Graph

Call Graph Total: 3

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

Caller Graph

Caller Graph Total: 1

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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All