Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

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.

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRSPC - [#450] Classic Fileman Calls
^PRST(458 - [#458] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call