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

Package: Virtual Patient Record

Routine: VPRHST2


Information

VPRHST2 ;OIT/CMF - Monitor SDA upload global ;09/18/18 4:36pm

Source Information

Source file <VPRHST2.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 2 ($$FMTE,$$NOW)^XLFDT  $$REPEAT^XLFSTR  
VA FileMan 1 ^DIR  
Virtual Patient Record 1 ($$CONTNR,$$PATIENT)^VPRHST  

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
Virtual Patient Record 1 VPR HS SDA MONITOR  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- Monitor upload global, write results to screen
RUN(DFN,TYPE) ; -- display list
LOOP
HDR ; -- write header
TOTAL() ; -- select the max# of iterations

External References

Name Field # of Occurrence
^DIR LOOP+12, TOTAL+4
$$CONTNR^VPRHST EN+4
$$PATIENT^VPRHST EN+3
$$FMTE^XLFDT HDR+2
$$NOW^XLFDT HDR+2
$$REPEAT^XLFSTR HDR+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,I,?10,J,?20,VPR(I,J)
  • Line Location: LOOP+6
Function Call: WRITE
  • Prompt: !!,"Press <return> to continue or ^ to exit ..."
  • Line Location: LOOP+8
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: LOOP+9
Function Call: WRITE
  • Prompt: !!,"Current Sequence#: ",$G(^VPR(1,1))
  • Line Location: LOOP+11
Function Call: WRITE
  • Prompt: @IOF,"VPR Global Upload Monitor",?55,$$FMTE^XLFDT($$NOW^XLFDT)
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,"SEQ",?10,"DFN",?20,$S(TYPE(0):TYPE,1:"All containers")
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: " for "_$S(DFN(0):$P(DFN,U,2),1:"all patients")
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",79)
  • Line Location: HDR+5
Routine Call
  • DIR
  • Line Location:
    • LOOP+12
    • TOTAL+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^VPR("AVPR" LOOP+1
^VPR(1 LOOP+11

Label References

Name Line Occurrences
HDR LOOP+2, LOOP+10
LOOP LOOP+14
RUN EN+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN EN+1~, EN+3*, EN+5, RUN~, LOOP+4, HDR+4
DFN(0 EN+2*, EN+3*, LOOP+4, HDR+4
DIR RUN+1~, TOTAL+1~
DIR("?" RUN+5*, TOTAL+3*
DIR("A" RUN+4*, TOTAL+2*
DIR("B" RUN+3*, TOTAL+2*
DIR(0 RUN+3*, TOTAL+2*
DONE RUN+1~, LOOP+2*, LOOP+3, LOOP+9*
DTIME LOOP+9
DTOUT EN+3, EN+4, RUN+1~, LOOP+13, TOTAL+1~, TOTAL+4
DUOUT EN+3, EN+4, RUN+1~, LOOP+13, TOTAL+1~
I RUN+1~, LOOP!, LOOP+3*, LOOP+4, LOOP+5, LOOP+6
IOF HDR+2
J RUN+1~, LOOP!, LOOP+4*, LOOP+5, LOOP+6
K RUN+1~, LOOP!, LOOP+5*
LCNT RUN+1~, LOOP+7*, HDR+5*
TYPE EN+1~, EN+4*, EN+5, RUN~, LOOP+5, HDR+3
TYPE(0 EN+2*, EN+4*, LOOP+5, HDR+3
U LOOP+5, HDR+4
VPR RUN+1~, LOOP!, LOOP+1*
VPR( LOOP+3, LOOP+4, LOOP+5, LOOP+6
X RUN+1~, LOOP+9*, TOTAL+1~
Y RUN+1~, LOOP+13, TOTAL+1~, TOTAL+4*, TOTAL+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All