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

Package: PAID

Routine: PRSPSAP1


Information

PRSPSAP1 ;WOIFO/JAH - part time physician, supervisory approvals ;10/22/04

Source Information

Source file <PRSPSAP1.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
PAID 5 ($$GETTOUR,$$INCESRS)^PRSPESR3  $$GETACT^PRSPSAP  MARKCNT^PRSPSAP1  MARK^PRSPSAP3  (DISPLAY,ESRDTS)^PRSPSAPU  
VA FileMan 2 $$EXTERNAL^DILFD  ^DIR  

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

Package Total Caller Graph
PAID 4 PRSPSAP  PRSPSAP1  PRSPSAP3  PRSPSAPU  

Entry Points

Name Comments DBIA/ICR reference
HDRESR(PRSIEN,PPI,LINES) ; Display a Supervisor Header
; PRSIEN - users 450 number
; PPI - what pay period
COLHDRS ; JUST THE COLUMN HEADERS
PUSH(PPI,PRSIEN,PRSD,CNT) ; ADD record to approval list
; set up a xref on the day. This enables quick access to the
; day number when the pick list has 4 items spread over the
; pay period. (e.g. the first item is day 4, the 2nd item
; is day 12, etc.)
GETESR(ESR,PPI,PRSIEN,PRSD) ; GET ESR RELATED DATA
; RETURN DATA IN ESR ARRAY BY REFERENCE
ASALIST(OUT) ; ADD record to approval list
HDROPT ; MAIN OPTION HEADING
ANYACT(ACTCNT) ; RETURN NUMBER OF ESR DAILY ACTIONS TO UPDATE
; THIS IS A COUNT OF ALL THE RESUBMITS AND APPROVES
MARKCNT(MC,PRSIEN,PPI) ; return items marked AND total items in MC array
; MC = items marked with any status
; MC(1) = available items to mark count
MOVEON(PRSIEN,PPI) ; return users choice (MOVE ON OR REDISPLAY CURR PTP)
; return 0 for abort
; if the number of days available for approval matches the number
; of days that have some status marked then we will not ask the
; user whether they want to move on or not.

External References

Name Field # of Occurrence
$$EXTERNAL^DILFD GETESR+15
^DIR MOVEON+17
$$GETTOUR^PRSPESR3 GETESR+8
$$INCESRS^PRSPESR3 HDRESR+12
$$GETACT^PRSPSAP ASALIST+20
MARKCNT^PRSPSAP1 MOVEON+8
MARK^PRSPSAP3 ASALIST+30
DISPLAY^PRSPSAPU ASALIST+18
ESRDTS^PRSPSAPU ASALIST+19

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF," VA TIME & ATTENDANCE SYSTEM"
  • Line Location: HDRESR+14
Function Call: WRITE
  • Prompt: !,PPTXT,?20,"Supervisory Review for Part Time Physicians in "_TL
  • Line Location: HDRESR+15
Function Call: WRITE
  • Prompt: !,$E(NM,1,30),?32,SSN,?56,INCD
  • Line Location: HDRESR+16
Function Call: WRITE
  • Prompt: !
  • Line Location: HDRESR+17
Function Call: WRITE
  • Prompt: !
  • Line Location: HDRESR+18
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDRESR+18
Function Call: WRITE
  • Prompt: !,"Item",?8,"Date",?17,"Scheduled Tour",?36,"Work/Leave Posted"
  • Line Location: COLHDRS+1
Function Call: WRITE
  • Prompt: ?61,"Hours",?67,"Meal",?73,"Status"
  • Line Location: COLHDRS+2
Function Call: WRITE
  • Prompt: !?26,"VA TIME & ATTENDANCE SYSTEM",!?TAB,TITLE
  • Line Location: HDROPT+5
Routine Call
  • DIR
  • Line Location:
    • MOVEON+17

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
458.02 EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRSPC - [#450] HDRESR+5, PUSH+8
^PRST(457.1 - [#457.1] GETESR+18
^PRST(458 - [#458] HDRESR+9, GETESR+4, GETESR+5, GETESR+6, GETESR+9, GETESR+10, GETESR+13, GETESR+17, GETESR+20
^TMP($J PUSH+9*, PUSH+10*, PUSH+11*, ASALIST+8, ASALIST+9, ASALIST+12, ANYACT+6, ANYACT+8, ANYACT+10, ANYACT+11
, MARKCNT+8, MARKCNT+9

Label References

Name Line Occurrences
$$MOVEON ASALIST+22
COLHDRS HDRESR+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACT ASALIST+2~, ASALIST+7*, ASALIST+20*, ASALIST+22, ASALIST+24, ASALIST+28, ASALIST+30, ANYACT+3~, ANYACT+11*, ANYACT+12
, ANYACT+13, ANYACT+14, MARKCNT+4~, MARKCNT+9*, MARKCNT+11
ACTCNT ANYACT~, ANYACT+4*, ANYACT+12*, ANYACT+13*
ACTCNT("A" ANYACT+4*, ANYACT+12*
ACTCNT("B" ANYACT+4*, ANYACT+14*
ACTCNT("N" ANYACT+4*, ANYACT+15*
ACTCNT("R" ANYACT+4*, ANYACT+13*
>> C0 HDRESR+5*, HDRESR+6, HDRESR+7, HDRESR+8
CNT PUSH~, PUSH+11
CO HDRESR+3~
CT MOVEON+6~, MOVEON+8, MOVEON+9
CT(1 MOVEON+9
DIR MOVEON+10~
DIR("?" MOVEON+13*, MOVEON+14*, MOVEON+15*
DIR("A" MOVEON+16*
DIR(0 MOVEON+12*
DIRUT MOVEON+10~, MOVEON+19
ESR GETESR~
ESR("ML" GETESR+18*
ESR("RMK" GETESR+17*
ESR("STAT" GETESR+20*
ESR("TOD" GETESR+7*
ESR("TOD2" GETESR+9*
ESR("TODEXT" GETESR+8*
ESR("WORK" GETESR+10*, GETESR+11, GETESR+16*
ESRDTS ASALIST+2~, ASALIST+19, ASALIST+20
>> I HDRESR+18*
INCD HDRESR+3~, HDRESR+12*, HDRESR+13*, HDRESR+16
IOF HDRESR+14, HDROPT+1
IOM HDRESR+18, HDROPT+4
IOST HDROPT+1
LINES HDRESR~, HDRESR+19*
LSGN GETESR+3~, GETESR+13*, GETESR+14*, GETESR+15
MC MARKCNT~, MARKCNT+5*, MARKCNT+12*
MC(1 MARKCNT+5*, MARKCNT+11*
METHOD GETESR+3~, GETESR+15*, GETESR+16
MOVEON ASALIST+2~, ASALIST+16*, ASALIST+17, ASALIST+22*, ASALIST+24*, MOVEON+6~, MOVEON+7*, MOVEON+9, MOVEON+11*, MOVEON+18*
, MOVEON+19*, MOVEON+20
NM HDRESR+3~, HDRESR+6*, HDRESR+16, PUSH+6~, PUSH+8*, PUSH+10, ASALIST+2~, ASALIST+7*, ASALIST+8*, ASALIST+9
OUT ASALIST~, ASALIST+2~, ASALIST+6*, ASALIST+8, ASALIST+10*, ASALIST+12, ASALIST+24*
PPE HDRESR+3~, HDRESR+9*, HDRESR+10*, HDRESR+11
PPI HDRESR~, HDRESR+9, HDRESR+12, PUSH~, PUSH+9, PUSH+11, GETESR~, GETESR+4, GETESR+5, GETESR+6
, GETESR+9, GETESR+10, GETESR+13, GETESR+17, GETESR+20, ASALIST+2~, ASALIST+11*, ASALIST+12*, ASALIST+18, ASALIST+19
, ASALIST+20, ASALIST+22, ASALIST+30, ANYACT+3~, ANYACT+7*, ANYACT+8*, ANYACT+10, ANYACT+11, MARKCNT~, MARKCNT+6
, MARKCNT+8, MARKCNT+9, MOVEON~, MOVEON+8
PPTXT HDRESR+3~, HDRESR+11*, HDRESR+15
PRSD PUSH~, PUSH+9, PUSH+11, GETESR~, GETESR+4, GETESR+5, GETESR+6, GETESR+8, GETESR+9, GETESR+10
, GETESR+13, GETESR+17, GETESR+20, ASALIST+2~, ANYACT+3~, ANYACT+9*, ANYACT+10*, ANYACT+11, MARKCNT+4~, MARKCNT+7*
, MARKCNT+8*, MARKCNT+9
PRSIEN HDRESR~, HDRESR+4, HDRESR+5, HDRESR+12, PUSH~, PUSH+8, PUSH+9, PUSH+10, PUSH+11, GETESR~
, GETESR+4, GETESR+5, GETESR+6, GETESR+8, GETESR+9, GETESR+10, GETESR+13, GETESR+17, GETESR+20, ASALIST+2~
, ASALIST+9*, ASALIST+10, ASALIST+12, ASALIST+18, ASALIST+19, ASALIST+20, ASALIST+22, ASALIST+30, ANYACT+3~, ANYACT+5*
, ANYACT+6*, ANYACT+8, ANYACT+10, ANYACT+11, MARKCNT~, MARKCNT+6, MARKCNT+8, MARKCNT+9, MOVEON~, MOVEON+8
PRSN1 GETESR+3~, GETESR+4*, GETESR+8
PRSN4 GETESR+3~, GETESR+5*, GETESR+8
SSN HDRESR+3~, HDRESR+7*, HDRESR+16
TAB HDROPT+2~, HDROPT+4*, HDROPT+5
TITLE HDROPT+2~, HDROPT+3*, HDROPT+4, HDROPT+5
TL HDRESR+3~, HDRESR+8*, HDRESR+15
TOD GETESR+3~, GETESR+6*, GETESR+7, GETESR+8, GETESR+18
U HDRESR+6, HDRESR+7, HDRESR+9, PUSH+8, GETESR+6, GETESR+9, GETESR+11, GETESR+13, GETESR+17, GETESR+18
, MARKCNT+11
>> Y MOVEON+18
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