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

Package: Clinical Procedures

Routine: MDSTUDW


Information

MDSTUDW ; HOIFO/NCA - Print a List of Procedures With Incomplete Workload ;3/2/09 10:00

Source Information

Source file <MDSTUDW.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
VA FileMan 5 ^%DT  NOW^%DTC  ^DIC  $$GET1^DIQ  ^DIR  
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  $$FMTE^XLFDT  
Registration 2 DEM^VADPT  PID^VADPT6  
PCE Patient Care Encounter 1 ENCEVENT^PXAPI  

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
Clinical Procedures 1 MD PROC W/INCOMPLETE WORKLOAD  

Entry Points

Name Comments DBIA/ICR reference
E1 ; Get Start Date
E2
EN2 ; Print a list of Procedures with incomplete Workload
S1
QUE ; Queue List
EX ; Exit
GETTRAN ; [Procedure] Loop through Results by Date/Time Performed
HDR ; List Header
PAUSE ; Pause For Scroll

External References

Name Field # of Occurrence
^%DT E1+2, E2
NOW^%DTC GETTRAN+5
^%ZIS S1+2
^%ZISC S1+4, QUE+3
^%ZTLOAD QUE+3
^DIC S1+1
$$GET1^DIQ GETTRAN+20, GETTRAN+21, GETTRAN+22
^DIR PAUSE+1
ENCEVENT^PXAPI GETTRAN+10
DEM^VADPT GETTRAN+18
PID^VADPT6 GETTRAN+18
$$FMTE^XLFDT GETTRAN+5, GETTRAN+24

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: E1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: E2+0
Function Call: WRITE
  • Prompt: !!,"***End Date must be on or after Start Date!!!"
  • Line Location: E2+1
Function Call: READ
  • Formatting: !!
  • Prompt: "Select Facility Treating Specialty (or ALL): "
  • Variable: X
  • Timeout: DTIME
  • Line Location: S1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: S1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: S1+2
Function Call: WRITE
  • Prompt: !,"Request Queued",!
  • Line Location: QUE+3
Function Call: WRITE
  • Prompt: !!,"No procedures with incomplete workload found."
  • Line Location: GETTRAN+27
Function Call: WRITE
  • Prompt: !,"PROCEDURE: ",$P(MDLOP,"~",2),!
  • Line Location: GETTRAN+34
Function Call: WRITE
  • Prompt: ?69,$P(Y0,U,5)
  • Line Location: GETTRAN+37
Function Call: WRITE
  • Prompt: !?69,$P(Y0,U,6)
  • Line Location: GETTRAN+38
Function Call: WRITE
  • Prompt: !?69,$P(Y0,U,7)
  • Line Location: GETTRAN+39
Function Call: WRITE
  • Prompt: !,DTP,?73,"Page ",PG,!!?5,"P R O C E D U R E S W I T H I N C O M P L E T E W O R K L O A D",!!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"Visit D/T",?18,"Patient",?50,"Consult #",?62,"TIU #",?69,"MISSING",!,LN
  • Line Location: HDR+5
Routine Call
  • DIC
  • Line Location:
    • S1+1
Routine Call
  • DIR
  • Line Location:
    • PAUSE+1
Routine Call
  • %ZIS
  • Line Location:
    • S1+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(45.7 - [#45.7] Classic Fileman Calls
^MDD(702 - [#702] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^MDD(702 - [#702] GETTRAN+9, GETTRAN+18, GETTRAN+19, GETTRAN+24
^MDD(703.1 - [#703.1] GETTRAN+6, GETTRAN+8
^TMP("MDSTUDL" GETTRAN+42!
^TMP("MDSTUDW" GETTRAN+1!, GETTRAN+25*, GETTRAN+27, GETTRAN+29, GETTRAN+31, GETTRAN+32
^TMP("PXKENC" GETTRAN+11, GETTRAN+12, GETTRAN+13, GETTRAN+14, GETTRAN+15, GETTRAN+16!

Label References

Name Line Occurrences
E1 E1+2
E2 E2, E2+1
EX E1+2, E2
GETTRAN S1+4
HDR GETTRAN+27, GETTRAN+30, GETTRAN+33
PAUSE GETTRAN+35, HDR+1
QUE S1+3
S1 S1+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% GETTRAN+5~
>> %DT E1+2*, E2*
>> %DT("A" E1+2*, E2*
%ZIS S1+2*!, S1+4!
%ZIS("A" S1+2*
%ZIS("B" S1+2*
ANS GETTRAN+2~, GETTRAN+27*, GETTRAN+28*, GETTRAN+29, GETTRAN+31, GETTRAN+33, GETTRAN+35, HDR+1, PAUSE+1*
BID GETTRAN+2~, GETTRAN+18*, GETTRAN+19
DFN GETTRAN+2~, GETTRAN+18*
DIC EN2+1~, S1+1!*
DIC(0 S1+1*
DIR PAUSE+1!
DIR("A" PAUSE+1*
DIR(0 PAUSE+1*
DTIME S1
DTOUT E1+2, E2, EN2+1~, S1+1
DTP GETTRAN+2~, GETTRAN+5*, HDR+3
DUOUT EN2+1~, S1+1
IO S1+4, QUE+3
IO("Q" S1+3, QUE+1!
IOF HDR+2
IOP S1+2!, S1+4!
IOSL GETTRAN+3, GETTRAN+33
IOST GETTRAN+3, HDR+2, PAUSE+1
LN GETTRAN+2~, GETTRAN+4*, HDR+5
MDANOD GETTRAN+2~, GETTRAN+7*, GETTRAN+20*, GETTRAN+21*, GETTRAN+23*, GETTRAN+25, GETTRAN+27*, GETTRAN+31*, GETTRAN+32, GETTRAN+36
MDBNOD GETTRAN+2~, GETTRAN+7*, GETTRAN+19*, GETTRAN+22
MDCHKD GETTRAN+2~, GETTRAN+28*, GETTRAN+34*
MDCHKDT GETTRAN+2~
MDCNOD GETTRAN+2~, GETTRAN+7*, GETTRAN+22*, GETTRAN+25
MDCNST GETTRAN+2~, GETTRAN+19*, GETTRAN+24
MDCOM GETTRAN+2~, GETTRAN+4*, GETTRAN+8*, GETTRAN+9, GETTRAN+18, GETTRAN+19, GETTRAN+20, GETTRAN+21, GETTRAN+22, GETTRAN+24
MDCOMP GETTRAN+2~
MDCT GETTRAN+3~, GETTRAN+28~*
MDDEFN GETTRAN+2~, GETTRAN+22*, GETTRAN+23
MDEDT E1+1~, E2+2*, GETTRAN+6
MDL GETTRAN+2~, GETTRAN+6*
MDL1 GETTRAN+2~, GETTRAN+6*, GETTRAN+8
MDLOP GETTRAN+3~, GETTRAN+27*, GETTRAN+29~*, GETTRAN+31, GETTRAN+32, GETTRAN+34, HDR+4
MDNUM GETTRAN+2~
MDOK GETTRAN+3~, GETTRAN+10*, GETTRAN+11*, GETTRAN+17, GETTRAN+24
MDOK1 GETTRAN+3~, GETTRAN+10*, GETTRAN+12*, GETTRAN+17, GETTRAN+24
MDOK2 GETTRAN+3~, GETTRAN+10*, GETTRAN+13*, GETTRAN+17, GETTRAN+24
MDPNAM GETTRAN+2~, GETTRAN+18*, GETTRAN+19
MDREQ GETTRAN+2~
MDSDT E1+1~, E1+2*, E2+1, GETTRAN+6
MDSP GETTRAN+2~, GETTRAN+20*, GETTRAN+21
MDSPEC EN2+1~, S1*, S1+1*, GETTRAN+21
MDTXT GETTRAN+2~
MDVDT GETTRAN+3~, GETTRAN+15*, GETTRAN+22, GETTRAN+24
MDVS GETTRAN+2~, GETTRAN+14*, GETTRAN+15
MDVST GETTRAN+2~, GETTRAN+9*, GETTRAN+10, GETTRAN+11, GETTRAN+12, GETTRAN+13, GETTRAN+14, GETTRAN+15, GETTRAN+24
MDX GETTRAN+2~
PG GETTRAN+2~, GETTRAN+5*, HDR+2*, HDR+3
>> POP S1+2
S1 GETTRAN+2~, GETTRAN+3*, GETTRAN+35, HDR+1
U GETTRAN+36, GETTRAN+37, GETTRAN+38, GETTRAN+39
VA GETTRAN+18!
VA("BID" GETTRAN+18
VADM GETTRAN+18!
VADM(1 GETTRAN+18
X E1+2, E2, EN2+1~, S1*, GETTRAN+2~
X1 GETTRAN+2~
X2 GETTRAN+2~
>> XQY0 QUE+2
Y E1+2, E2, E2+1, E2+2, EN2+1~, S1+1, HDR+4*, PAUSE+1
Y0 GETTRAN+2~, GETTRAN+32*, GETTRAN+36, GETTRAN+37, GETTRAN+38, GETTRAN+39
Z GETTRAN+2~, GETTRAN+24*, GETTRAN+25
ZTDESC QUE+1!, QUE+2*
ZTDTH QUE+1!
ZTIO QUE+1!
>> ZTREQ QUE+1*
>> ZTRTN QUE+1*
ZTSAVE QUE+1!
ZTSAVE("MDEDT" QUE+1*
ZTSAVE("MDSDT" QUE+1*
ZTSAVE("MDSPEC" QUE+1*
ZTSAVE("ZTREQ" QUE+1*
ZTSK QUE+1!, QUE+3!
ZTUCI QUE+1!
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