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 |  Local Variables  | All
Print Page as PDF
Routine: PRSALD

Package: PAID

Routine: PRSALD


Information

PRSALD ;HISC/MGD-Labor Distribution Codes Edit ;06/28/2003

Source Information

Source file <PRSALD.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
PAID 3 ^PRSAUTL  OT^PRSDUTIL  UNLOCK^PRSLIB00  
VA FileMan 2 (,IX)^DIC  YN^DICN  
Kernel 1 KILL^XUSCLEAN  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
PAID 2 PRSA SUP LABOR-EDIT  PRSA TL LABOR-EDIT  

Entry Points

Name Comments DBIA/ICR reference
PAY ; Payroll Entry
P1
TL ; Timekeeper Entry. Select T & L Unit
LASTPP ; Get Last PP received in 459
NME ; Select individual employee
EX ; Clean up variables and Exit
POST ; Edit & Post Labor Distribution Codes
D2 ; Select All or individual employee
LOOP ; Loop through all employees in selected T & L
PP ; Select Pay Period
LDOUT ; Convert LABOR DIST CODE EDITED BY field into its external format.

External References

Name Field # of Occurrence
^DIC P1+1
IX^DIC NME+1, PP+2
YN^DICN D2+2
^PRSAUTL TL+2
OT^PRSDUTIL POST+14
UNLOCK^PRSLIB00 NME+2, LOOP+4
KILL^XUSCLEAN EX+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: P1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: NME+1
Function Call: WRITE
  • Prompt: @IOF,$P(PRSREC,U),?26,"VA TIME & ATTENDANCE SYSTEM"
  • Line Location: POST+7
Function Call: WRITE
  • Prompt: ?68,$S(PRSTLV=2&Y:$E(Y)_"XX-XX-"_$E(Y,6,9),PRSTLV=7&Y:$E(Y,1,3)_"-"_$E(Y,4,5)_"-"_$E(Y,6,9),1:"XXX-XX-XXXX")
  • Line Location: POST+7
Function Call: WRITE
  • Prompt: !,"Station: ",$P(PRSREC,U,8),?28,"Labor Distribution Codes",?71,"T&L: ",$P(PRSREC,U,8)
  • Line Location: POST+8
Function Call: WRITE
  • Prompt: !,?21,$G(PPE)
  • Line Location: POST+9
Function Call: WRITE
  • Prompt: !!,?12,"CODE",?24,"PERCENT",?40,"COST CENTER",?59,"FUND CTRL PT",!,PRSDSH
  • Line Location: POST+10
Function Call: WRITE
  • Prompt: ?8,PRSCNT,?12,$P(PRSREC,U,2),?25,$P(PRSREC,U,3),?43,$P(PRSREC,U,4),?64,$P(PRSREC,U,5)
  • Line Location: POST+11
Function Call: WRITE
  • Prompt: !!!
  • Line Location: POST+12
Function Call: WRITE
  • Prompt: ?12,PRSCNT,?14,$P(PRSREC,U,4),?21
  • Line Location: POST+13
Function Call: WRITE
  • Prompt: PRSREC
  • Line Location: POST+16
Function Call: WRITE
  • Prompt: !!,PRSLIN,!!!,"END OF DISPLAY, HIT RETURN TO QUIT"
  • Line Location: POST+17
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: POST+18
Function Call: WRITE
  • Prompt: !!,"Would you like to edit the Labor Codes in alphabetical order"
  • Line Location: D2+1
Function Call: WRITE
  • Prompt: !!,"Answer YES if you want all RECORDs brought up for which no data"
  • Line Location: D2+3
Function Call: WRITE
  • Prompt: !,"has been entered."
  • Line Location: D2+4
Routine Call
  • DIC
  • Line Location:
    • P1+1
Routine Call
  • DIC
  • Line Location:
    • NME+1
    • PP+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRSPC - [#450] Classic Fileman Calls
^PRST(458 - [#458] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRSPC - [#450] P1+2, POST+6, POST+11, POST+13
^PRSPC("ATL" LOOP+2, LOOP+3
^PRST(458 - [#458] LASTPP+5, LASTPP+6, PP+5
^PRST(459 - [#459] LASTPP+2, LASTPP+3
^VA(200 - [#200] LDOUT+9

Label References

Name Line Occurrences
D2 D2+4
EX P1+1, TL+2, NME+2, D2+2, LOOP+4, LOOP+5
LOOP D2+2
NME NME+2, D2+2
P1 P1+4
POST P1+3, NME+2, LOOP+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EX+1!, D2+2*
D NME+1*, EX+1!, PP+1*
DA EX+1!, POST+2*, POST+11, POST+13
DDSFILE EX+1!
DFN P1+1*, P1+2, NME+1*, NME+2, EX+1!, POST+1, POST+2, POST+6, LOOP+3*
DIC P1!*, P1+1!, NME+1!*, PP+1*
DIC("A" P1*, NME+1*
DIC("S" NME+1*
DIC(0 P1*, NME+1*, PP+1*
DR EX+1!
GLOB NME+2*, EX+1!, LOOP+4*
IOF POST+7, POST+18
LP EX+1!, D2+2*, LOOP+1*, LOOP+4
NN EX+1!, LOOP+1*, LOOP+2*, LOOP+3
PP TL+1~, LASTPP+1*, LASTPP+2*, LASTPP+3
PPE TL+1~, LASTPP+3*, LASTPP+5, LASTPP+6*, POST+9, PP+4*, PP+5*
PPERIOD PAY+1~
PPI TL+1~, LASTPP+4*, LASTPP+5*, LASTPP+6, PP+4*, PP+5
PRSCNT PAY+1~, POST+11*, POST+13*
PRSDSH PAY+1~, POST+2*, POST+10
PRSLIN PAY+1~, POST+2*, POST+17
PRSQUIT PAY+1~, POST+17*
PRSREC PAY+1~, POST+6*, POST+7, POST+8, POST+11*, POST+13*, POST+14, POST+15*, POST+16
PRSTLV PAY+2*, TL+1~, TL+2*, POST+7
SUB454 POST+14*, POST+15!
TLE P1+2*, NME+1, EX+1!, LOOP+2, LOOP+3
TLI TL+1~, TL+2
U POST+7, POST+8, POST+11, POST+13, POST+14
Y P1+1, NME+1, EX+1!, POST+7*, POST+14*, POST+15, PP+3, PP+4, LDOUT+2, LDOUT+3*
, LDOUT+4*, LDOUT+5*, LDOUT+6*, LDOUT+7*, LDOUT+8, LDOUT+9*, LDOUT+10*
ZS EX+1!
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 |  Local Variables  | All