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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PRSASR

Package: PAID

Routine: PRSASR


Information

PRSASR ;HISC/MGD,WOIFO/JAH/PLT - Supervisor Certification ;02/05/2005

Source Information

Source file <PRSASR.m>

Call Graph

Call Graph

Call Graph Total: 17

Package Total Call Graph
PAID 14 (AUTOPINI,ONE)^PRS8  CERT^PRS8VW  F1^PRSADP1  ^PRSAENT  ^PRSAES  WARNSUP^PRSAOTT  FILEOTW^PRSAOTTF  (ED,LD,PTP,VCS)^PRSASR1  
$$TWE^PRSATE0  ^PRSATPE  ^PRSATPF  ^PRSAUTL  ($$ASK,$$AVAILREC,UNLOCK)^PRSLIB00  ($$CD8B,$$RSHR)^PRSU1B2  
Kernel 2 ENDR^%ZISS  KILL^XUSCLEAN  
VA FileMan 1 (C,NOW)^%DTC  

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: 1

Package Total Caller Graph
PAID 1 PRSA SUP REV  

Entry Points

Name Comments DBIA/ICR reference
P0 ;PDT = string of pay period dates with format - Sun 29-Sep-96^
T0
T1 ;if supervisor signs off then update all records in tmp
CHK ; Check for needed approvals
LD ; Check for changes to the Labor Distribution Codes made during the pay
; period.
OK ;Prompt Supervisor to release timecard. If yes, store in ^TMP(.
O1
PROC ; Set Approval, file any exceptions & update 8B string
HDR ; Display Header
HDR2 ; Display Header don't quit
EX ; clean up variables & unlock any leftover time card nodes
TLSUP() ;get next supervisor who certifies other supervisors
SSN() ;get ssn of supervisor to be certified by this supervisor.
DFN() ;get internal entry number of supvisor of other T&L 2b approved
TOURERR(DTE,X9,XF) ;DISPLAY TOUR & ERRORS

External References

Name Field # of Occurrence
C^%DTC PRSASR+26
NOW^%DTC PRSASR+23, T1+3
ENDR^%ZISS PRSASR+16, TOURERR+3
AUTOPINI^PRS8 T1+7, OK+8
ONE^PRS8 CHK+26
CERT^PRS8VW CHK+26
F1^PRSADP1 TOURERR+4
^PRSAENT CHK+5, PROC+3
^PRSAES T1+2
WARNSUP^PRSAOTT CHK+31
FILEOTW^PRSAOTTF PROC+17
ED^PRSASR1 CHK+18
LD^PRSASR1 LD+2
PTP^PRSASR1 PROC+25
VCS^PRSASR1 CHK+14
$$TWE^PRSATE0 PROC+22
^PRSATPE TOURERR+4
^PRSATPF PROC+11
^PRSAUTL PRSASR+22
$$ASK^PRSLIB00 T0+2, CHK+19, CHK+20, HDR+1, HDR2+2
$$AVAILREC^PRSLIB00 P0+21, P0+30
UNLOCK^PRSLIB00 OK+9, PROC+29, EX+5
$$CD8B^PRSU1B2 CHK+36
$$RSHR^PRSU1B2 CHK+36
KILL^XUSCLEAN EX+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $E(IOST,1,2)="C-"
  • Line Location: PRSASR+20
Function Call: WRITE
  • Prompt: !?26,"VA TIME & ATTENDANCE SYSTEM"
  • Line Location: PRSASR+20
Function Call: WRITE
  • Prompt: !?27,"SUPERVISORY CERTIFICATION"
  • Line Location: PRSASR+21
Function Call: WRITE
  • Prompt: $C(7),!!,MIDPP
  • Line Location: PRSASR+25
Function Call: WRITE
  • Prompt: !!,"No records have been selected for certification."
  • Line Location: T0+1
Function Call: WRITE
  • Prompt: !,IORVON,"Serious error; cannot release.",IORVOFF
  • Line Location: CHK+19
Function Call: WRITE
  • Prompt: !,?3,"WARNING: The total scheduled recess hours for this pay period does not match the total RS/RN posted."
  • Line Location: CHK+36
Function Call: WRITE
  • Prompt: !,?3,"Warning: The entire tour for day# ",PRSWOC," is posted RECESS. The On-Call will be paid unless posted UNAVAILABLE."
  • Line Location: CHK+37
Function Call: WRITE
  • Prompt: !!,IORVON,"Release to Payroll?",IORVOFF," "
  • Line Location: OK+3
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: OK+4
Function Call: WRITE
  • Prompt: $C(7)," Answer YES or NO"
  • Line Location: OK+5
Function Call: WRITE
  • Prompt: !,@IOF,?2,$P(X,U,1)
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?68,$E(X),"XX-XX-",$E(X,6,9)
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?6,"Date",?16,"TW",?20,"Scheduled Tour",?40,"Tour Exceptions",?63,IORVON,"Tour Errors",IORVOFF
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !?2
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,@IOF,?2,$P(X,U,1)
  • Line Location: HDR2+3
Function Call: WRITE
  • Prompt: ?68,$E(X),"XX-XX-",$E(X,6,9)
  • Line Location: HDR2+3
Function Call: WRITE
  • Prompt: !,?6,"Date",?16,"TW",?20,"Scheduled Tour",?40,"Tour Exceptions",?63,IORVON,"Tour Errors",IORVOFF
  • Line Location: HDR2+4
Function Call: WRITE
  • Prompt: !?2
  • Line Location: HDR2+5
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR2+5
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>44
  • Line Location: TOURERR+10
Function Call: WRITE
  • Prompt: ?45,$P(Y2(K),U,2)
  • Line Location: TOURERR+10
Function Call: WRITE
  • Prompt: ?(IOM-(ERRLEN+1)),IORVON
  • Line Location: TOURERR+16
Function Call: WRITE
  • Prompt: " ",$P(ER(K),U,1),IORVOFF
  • Line Location: TOURERR+18

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRSPC - [#450] P0+30, CHK+4, CHK+26, HDR+2, HDR2+3
^PRSPC("ATL" P0+21
^PRSPC("SSN" DFN+2
^PRST(455.5 - [#455.5] CHK+4, TLSUP+1
^PRST(458 - [#458] PRSASR+24, PRSASR+26, P0+7, CHK+2, CHK+13, CHK+17, LD+2, PROC+6*, PROC+8, PROC+20*
, PROC+22*
^TMP($J P0+7!, T0, T1+4, T1+6, CHK+32*, OK+6*, OK+10!, PROC+11, PROC+14, PROC+15
, PROC+16, PROC+30!, EX+3, EX+6!, TOURERR+19*
^VA(200 - [#200] CHK+4, SSN+1
^XUSEC("PRSA SIGN" CHK+3

Label References

Name Line Occurrences
$$DFN P0+30
$$SSN P0+30
$$TLSUP P0+30
CHK P0+21, P0+30
EX PRSASR+22, PRSASR+25, PRSASR+26, P0+30, T0+2, T1+8
HDR CHK+5, CHK+10, CHK+14, CHK+18
HDR2 TOURERR+6, TOURERR+13
O1 CHK+10
OK OK+5
PROC T1+4
T0 P0+21, P0+30
T1 T0
TOURERR CHK+10

Naked Globals

Name Field # of Occurrence
^( T1+4, PROC+11
^(1 P0+7
^(2 PROC+8*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PRSASR+24, T1+3
>> A1 PROC+6
>> APDT PRSASR+24*, T1+3*, PROC+6, PROC+8
>> C0 CHK+26*
>> CKS P0+20*, P0+29*, CHK+4
>> DAY PRSASR+24*, PRSASR+25, PRSASR+26, CHK+10*, PROC+11*, TOURERR+19
>> DFN P0+21*, P0+30*, T1+4*, T1+6*, T1+7, CHK+2, CHK+3, CHK+4, CHK+13, CHK+17
, CHK+26, CHK+31, CHK+32, CHK+36, LD+2, OK+6, OK+8, OK+10, PROC+6, PROC+8
, PROC+11, PROC+14, PROC+15, PROC+16, PROC+17, PROC+20, PROC+22, PROC+25, PROC+28, PROC+30
, HDR+2, HDR2+3, TOURERR+19
DT PRSASR+24*, PRSASR+26
DTE TOURERR~
DTIME OK+4
DUMMY PRSASR+18~, T0+2*
DUZ CHK+3, PROC+6, PROC+8
>> EDUZ CHK+4*
EMPREC EX+1~, EX+2*, EX+3*, EX+4
>> ENT CHK+5
>> ER TOURERR+12
>> ER( TOURERR+12, TOURERR+14, TOURERR+17, TOURERR+18, TOURERR+19
ERRLEN TOURERR+2~, TOURERR+14*, TOURERR+15, TOURERR+16
>> ESOK T1+2, T1+5
>> FATAL TOURERR+12
>> GLOB P0+21, P0+30, OK+9, PROC+28*, PROC+29, EX+4*, EX+5
>> HDR CHK+5*, HDR+1, HDR+2*
HOLD HDR2+1~, HDR2+2*
>> I HDR+4*, HDR2+5*
IOBOFF PRSASR+15~
IOBON PRSASR+15~
IOF PRSASR+20, HDR+2, HDR2+3
IOINHI PRSASR+15~
IOINORM PRSASR+15~
IOM TOURERR+15, TOURERR+16
IORVOFF PRSASR+15~, CHK+19, OK+3, HDR+3, HDR2+4, TOURERR+2~, TOURERR+18
IORVON PRSASR+15~, CHK+19, OK+3, HDR+3, HDR2+4, TOURERR+2~, TOURERR+16
IOSL CHK+10, CHK+14, CHK+18, TOURERR+6, TOURERR+13
IOST PRSASR+20
>> K PROC+11*, TOURERR+5*, TOURERR+7, TOURERR+8, TOURERR+9, TOURERR+10, TOURERR+12*, TOURERR+14, TOURERR+17, TOURERR+18
, TOURERR+19
MIDPP PRSASR+18~, PRSASR+19*, PRSASR+25
NN P0+20*, P0+21*, CHK+26~
O8 CHK+29~, CHK+31, CHK+32, PROC+15*, PROC+17
OA CHK+29~, CHK+31, CHK+32, PROC+16*, PROC+17
OTERR CHK+29~, CHK+31, CHK+32
>> PDT P0+7*, CHK+10
>> PDTI P0+7*, PROC+11
>> PPE CHK+31
>> PPI PRSASR+24*, PRSASR+26*, P0+7, T1+7, CHK+2, CHK+13, CHK+17, CHK+26, CHK+36, LD+2
, OK+8, PROC+6, PROC+8, PROC+17, PROC+20, PROC+22, PROC+25, PROC+28, EX+4
PRSENT CHK+1~, CHK+5*, CHK+35
>> PRSTLV PRSASR+22*
PRSWOC CHK+1~, CHK+37
>> PY CHK+26*
>> QT P0+7*, P0+21, P0+30, CHK+10, CHK+14, CHK+18, CHK+19*, CHK+20*, CHK+26*, OK+4*
, HDR+1*
RESP PRSASR+15~, TOURERR+2~
>> SSN P0+30*, CHK+4*, DFN+2
>> STAT CHK+2*
>> TLE P0+21, P0+30, CHK+4, TLSUP+1
>> TLI PRSASR+22, CHK+4
U PRSASR+24, PRSASR+26, P0+30, CHK+2, CHK+4, CHK+10, CHK+32, CHK+36, OK+4, PROC+6
, PROC+8, PROC+11, PROC+15, PROC+16, PROC+20, PROC+22, HDR+2, HDR2+3, SSN+1, TOURERR+9
, TOURERR+10, TOURERR+14, TOURERR+17, TOURERR+18
>> USR CHK+3
>> VA2 P0+30*, TLSUP+1, SSN+1
>> VAL T1+4*, CHK+31, CHK+36, OK+6, PROC+20
WK CHK+29~, CHK+30*, CHK+31, CHK+32, PROC+14*, PROC+15, PROC+16, PROC+17
>> X PRSASR+16*, PRSASR+26, OK+4*, OK+5, OK+6, HDR+2*, HDR2+3*, TOURERR+3*
>> X1 PRSASR+26*, PROC+11*
>> X2 PRSASR+26*, PROC+11*
X9 CHK+9*, CHK+10, TOURERR~, TOURERR+15, TOURERR+19*
XF CHK+9*, CHK+10, CHK+19, TOURERR~, TOURERR+12*, TOURERR+19
>> Y PRSASR+24*
>> Y1( TOURERR+5, TOURERR+8
>> Y2( TOURERR+5, TOURERR+9, TOURERR+10
>> Y3 TOURERR+11
>> Z P0+30*, CHK+13*, CHK+14, CHK+17*, CHK+18
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All