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

Package: PAID

Routine: PRSPSAP


Information

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

Source Information

Source file <PRSPSAP.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
PAID 6 ^PRSAUTL  ($$ASK,$$AVAILREC)^PRSLIB00  (ANYACT,ASALIST,GETESR,HDROPT,MARKCNT,PUSH)^PRSPSAP1  TRANSACT^PRSPSAP2  ($$ONEPTP,DAY,GETDAY)^PRSPSAPU  $$ESIGC^PRSPUT2  
Kernel 1 SIG^XUSESIG  
VA FileMan 1 ^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: 2

Package Total Caller Graph
PAID 2 PRSP ESR SAP  PRSPSAP1  

Entry Points

Name Comments DBIA/ICR reference
MAIN ;
BLDLST(OUT,TLE,NN) ; BUILD LIST OF ALL APPROVAL ACTIONS FOR SINGLE EMPLOYEE
SUMMARY(AA) ;
GETACT(ESRDTS,PRSIEN,PPI) ; return user choice of # (1-ACTCNT) or action
; return 0 for ^ at first action prompt
; return null for no response (user hit return)
; return -1 if ^ at 2nd prompt (action on single day prompt)

External References

Name Field # of Occurrence
^DIR GETACT+39, GETACT+64
^PRSAUTL MAIN+8
$$ASK^PRSLIB00 MAIN+4
$$AVAILREC^PRSLIB00 BLDLST+15
ANYACT^PRSPSAP1 MAIN+29
ASALIST^PRSPSAP1 MAIN+26
GETESR^PRSPSAP1 GETACT+49
HDROPT^PRSPSAP1 MAIN+5
MARKCNT^PRSPSAP1 GETACT+7
PUSH^PRSPSAP1 BLDLST+22
TRANSACT^PRSPSAP2 MAIN+38
$$ONEPTP^PRSPSAPU MAIN+12
DAY^PRSPSAPU GETACT+51
GETDAY^PRSPSAPU GETACT+60
$$ESIGC^PRSPUT2 MAIN+4
SIG^XUSESIG MAIN+32

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: MAIN+4
Function Call: WRITE
  • Prompt: @IOF,!!!,?10,"TIMECARD AND ESR WERE NOT UPDATED."
  • Line Location: MAIN+36
Function Call: WRITE
  • Prompt: @IOF,!!!,"Supervisory Action Summary"
  • Line Location: SUMMARY+1
Function Call: WRITE
  • Prompt: !!,$J(AA,6)," actions require your electronic signature before being"
  • Line Location: SUMMARY+2
Function Call: WRITE
  • Prompt: !,?(6-$L(AA))," committed to the database."
  • Line Location: SUMMARY+3
Function Call: WRITE
  • Prompt: !,$J(AA("A"),6)," ESR record marked for approval. (signature required)"
  • Line Location: SUMMARY+4
Function Call: WRITE
  • Prompt: !,$J(AA("R"),6)," ESR records marked for resubmission. (signature required)"
  • Line Location: SUMMARY+5
Function Call: WRITE
  • Prompt: !,$J(AA("B"),6)," ESR records explicitly bypassed."
  • Line Location: SUMMARY+6
Function Call: WRITE
  • Prompt: !,$J(AA("N"),6)," ESR records with no action."
  • Line Location: SUMMARY+7
Function Call: WRITE
  • Prompt: !
  • Line Location: GETACT+51
Routine Call
  • DIR
  • Line Location:
    • GETACT+39
    • GETACT+64

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRSPC - [#450] MAIN+16
^PRSPC("ATL" MAIN+21, BLDLST+3
^PRST(458 - [#458] BLDLST+5, BLDLST+6, BLDLST+20
^TMP($J MAIN+1!, MAIN+41!

Label References

Name Line Occurrences
BLDLST MAIN+17, MAIN+22
SUMMARY MAIN+31

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AA SUMMARY~, SUMMARY+2, SUMMARY+3
AA("A" SUMMARY+4
AA("B" SUMMARY+6
AA("N" SUMMARY+7
AA("R" SUMMARY+5
ACT GETACT+4~, GETACT+52*, GETACT+65
ANYACT MAIN+2~, MAIN+29, MAIN+30, MAIN+31
APRWHO MAIN+2~, MAIN+12*, MAIN+13, MAIN+15, MAIN+16
AVAIL MAIN+2~, BLDLST+1~, BLDLST+15*, BLDLST+16
COUNT GETACT+50~*, GETACT+51
COUNT(1 GETACT+50*
CT GETACT+4~, GETACT+7, GETACT+8, GETACT+10, GETACT+14, GETACT+21, GETACT+43, GETACT+47
CT(1 GETACT+14
DAYLNS GETACT+48~, GETACT+51, GETACT+60
DAYLNS( GETACT+62, GETACT+63
DCNT MAIN+2~, BLDLST+1~, BLDLST+19*, BLDLST+21*, BLDLST+22
DFN BLDLST+1~, BLDLST+9*
DIR GETACT+4~, GETACT+48~
DIR("?" GETACT+17*, GETACT+24*, GETACT+25*, GETACT+26*, GETACT+27*, GETACT+28*, GETACT+33*, GETACT+34*, GETACT+35*, GETACT+36*
, GETACT+38*, GETACT+55*, GETACT+56*, GETACT+57*, GETACT+58*, GETACT+59*, GETACT+63*
DIR("A" GETACT+16*, GETACT+23*, GETACT+32*, GETACT+54*
DIR(0 GETACT+15*, GETACT+22*, GETACT+31*, GETACT+53*
DIRUT GETACT+4~, GETACT+44, GETACT+48~, GETACT+66
ESR GETACT+48~, GETACT+49, GETACT+51, GETACT+60
ESRDTS GETACT~, GETACT+60
ESRDTS( GETACT+11, GETACT+49, GETACT+51
GLOB BLDLST+1~, BLDLST+15
HPL GETACT+48~, GETACT+61*, GETACT+62*, GETACT+63
>> I GETACT+10*, GETACT+11
IOF MAIN+36, SUMMARY+1
NN MAIN+16*, MAIN+17, MAIN+20*, MAIN+21*, MAIN+22, BLDLST~, BLDLST+3
NUMS GETACT+4~, GETACT+9*, GETACT+11*, GETACT+15, GETACT+22
OUT MAIN+2~, MAIN+4*, MAIN+17, MAIN+21, MAIN+22, MAIN+25*, MAIN+26, BLDLST~, BLDLST+3, BLDLST+5
, BLDLST+15
>> PICK GETACT+40*, GETACT+43*, GETACT+44*, GETACT+47, GETACT+49, GETACT+50, GETACT+52, GETACT+60, GETACT+65*, GETACT+66*
, GETACT+67
PPE BLDLST+1~, BLDLST+4*, BLDLST+5*, BLDLST+6, BLDLST+20
PPI BLDLST+1~, BLDLST+6*, BLDLST+22, GETACT~, GETACT+7, GETACT+49, GETACT+51, GETACT+60
PRSD BLDLST+1~, BLDLST+19*, BLDLST+20*, BLDLST+22
PRSIEN MAIN+2~, BLDLST+1~, BLDLST+2*, BLDLST+3*, BLDLST+5, BLDLST+9, BLDLST+20, BLDLST+22, GETACT~, GETACT+7
, GETACT+49, GETACT+51, GETACT+60
PRSTLV MAIN+2~, MAIN+7*
TLE MAIN+2~, MAIN+12, MAIN+17, MAIN+21, MAIN+22, BLDLST~, BLDLST+3
TLI MAIN+2~, MAIN+9
U MAIN+16, GETACT+11
>> X1 MAIN+35
>> Y GETACT+40, GETACT+41, GETACT+65
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All