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 |  Marked Items |  All
Print Page as PDF
Routine: MDSTATU

Package: Clinical Procedures

Routine: MDSTATU


Information

MDSTATU ; HOIFO/NCA - Print List of Document Titles Needed ;10/21/04 13:44

Source Information

Source file <MDSTATU.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  $$UP^XLFSTR  
VA FileMan 3 NOW^%DTC  $$FIND1^DIC  UPDATE^DIE  
Registration 1 (IN5,KVAR)^VADPT  

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

Package Total Caller Graph
Clinical Procedures 3 MDCVT  MDCVT LIST OF TIU TITLES  MDCVT1  

Entry Points

Name Comments DBIA/ICR reference
DISP ; Display List of TIU titles need to be created for Medicine procedures
D1 ; Process Display
PAUSE ; Pause For Scroll
DTP ; Printable Date/Time
HDR ; Display Header and Scroll Pause
H1 ; Print Header
SETDEF ; Set default CP Definitions in Conversion Parameter
GETMED(MDMNO,MDTYPE) ; Get the Medicine Procedure name
LOCATP(MDNNO) ; Locate the CP Definition procedure or Add the New Entry
LOCATN(MDNNO) ; Locate the Historical Document Title
HOSP(MDNNO) ; Locate the Hospital Location
MEDTIT ;; [Medicine Historical Document Titles]

External References

Name Field # of Occurrence
NOW^%DTC H1+2
^%ZIS DISP+1
^%ZISC DISP+2, DISP+3
^%ZTLOAD DISP+2
$$FIND1^DIC D1+15, SETDEF+4, LOCATN+5, HOSP+13
UPDATE^DIE SETDEF+21, LOCATP+7
IN5^VADPT HOSP+12
KVAR^VADPT HOSP+12
$$UP^XLFSTR D1+8, SETDEF+12, GETMED+20

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+1
Function Call: WRITE
  • Prompt: !,"Request Queued"
  • Line Location: DISP+2
Function Call: WRITE
  • Prompt: !!,"No Historical TIU titles need to be created."
  • Line Location: D1+17
Function Call: WRITE
  • Prompt: !
  • Line Location: D1+18
Function Call: READ
  • Formatting: !!
  • Prompt: "Press RETURN to continue. "
  • Variable: X
  • Timeout: DTIME
  • Line Location: PAUSE+1
Function Call: WRITE
  • Prompt: !,"Enter a RETURN to Continue."
  • Line Location: PAUSE+1
Function Call: WRITE
  • Prompt: !,DTP,?20,"L I S T O F T I U T I T L E S N E E D E D",?73,"Page ",PG
  • Line Location: H1+3
Function Call: WRITE
  • Prompt: !
  • Line Location: H1+4
Function Call: WRITE
  • Prompt: !,LN,!
  • Line Location: H1+4
Function Call: WRITE
  • Prompt: !,"PROCEDURES",?35,"Titles Needed to be Created"
  • Line Location: H1+5
Function Call: WRITE
  • Prompt: !,"----------",?35,"---------------------------",!
  • Line Location: H1+6
Routine Call
  • DIC
  • Line Location:
    • D1+15
    • SETDEF+4
    • LOCATN+5
    • HOSP+13
Routine Call
  • DIE
  • Line Location:
    • SETDEF+21
    • LOCATP+7
Routine Call
  • %ZIS
  • Line Location:
    • DISP+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(42 - [#42] HOSP+12, HOSP+13
^DPT - [#2] HOSP+13
^MCAR( HOSP+9, HOSP+11
^MCAR(694 - [#694] GETMED+17
^MCAR(697.2 - [#697.2] D1+7, D1+8, SETDEF+11, SETDEF+12, GETMED+8, GETMED+13, GETMED+15, GETMED+18
^MCAR(699 - [#699] GETMED+7
^MCAR(699.5 - [#699.5] GETMED+11, GETMED+12
^MDD(703.9 - [#703.9] D1+3, SETDEF+6, SETDEF+22*, SETDEF+23*
^MDS(702.01 - [#702.01] SETDEF+17, LOCATP+5

Label References

Name Line Occurrences
$$GETMED LOCATP+3, LOCATN+3
D1 DISP+3
DTP H1+3
H1 D1+2
HDR D1+9
PAUSE PAUSE+1, HDR+1

Naked Globals

Name Field # of Occurrence
^( D1+3, SETDEF+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DTP+1*, DTP+2*!, H1+2
%ZIS DISP+1!*, DISP+3!
%ZIS("A" DISP+1*
ANS D1+1~, D1+2*, D1+3, D1+7, D1+9, PAUSE+1*, HDR+1
CNT D1+1~, D1+2*, D1+8*, D1+17
>> DFN HOSP+11*, HOSP+13
DTIME PAUSE+1
DTP D1+1~, DTP+1*, DTP+2*, H1+3*
IO DISP+3
IO("Q" DISP+2
IOF H1+1
IOP DISP+1!, DISP+3!
IOSL D1+2
IOST D1+2, PAUSE+1, H1+1
LN D1+1~, H1+4*
LP D1+1~, D1+3*
MDDIEN SETDEF+1~, SETDEF+19!, LOCATP+1~, LOCATN+1~
MDDIEN(1 SETDEF+22, LOCATP+8
MDERR SETDEF+1~, SETDEF+19!, SETDEF+21, LOCATP+1~, LOCATP+7, LOCATN+1~, HOSP+1~
MDF D1+1~, D1+3*, D1+4, D1+5, D1+6, D1+10, D1+11, D1+12, SETDEF+1~, SETDEF+6*
, SETDEF+7, SETDEF+13, SETDEF+18, SETDEF+23
MDFC SETDEF+1~, SETDEF+7*, SETDEF+8, SETDEF+9, SETDEF+10, SETDEF+23
MDFDA SETDEF+1~, LOCATP+1~, LOCATN+1~
MDFDA( SETDEF+20*, LOCATP+6*
MDFIL D1+1~, D1+2*, D1+15, SETDEF+1~*, SETDEF+4
MDI GETMED+1~, GETMED+5*, GETMED+7, GETMED+11, GETMED+12, GETMED+17, HOSP+1~, HOSP+4*, HOSP+9, HOSP+11
MDK D1+1~, D1+8*, SETDEF+1~, SETDEF+11*, SETDEF+12*
MDL HOSP+1~, HOSP+2*, HOSP+3, HOSP+4, HOSP+9*, HOSP+10, HOSP+12*, HOSP+13*, HOSP+14
MDLL GETMED+1~, GETMED+7*, GETMED+8*, GETMED+9, GETMED+13*, GETMED+14, GETMED+15, GETMED+17*, GETMED+18*, GETMED+19
MDLL1 GETMED+1~, GETMED+7*
MDLL6 GETMED+1~, GETMED+11*, GETMED+13
MDLL8 GETMED+1~, GETMED+12*, GETMED+15
MDLP SETDEF+1~, SETDEF+6*, SETDEF+22, SETDEF+23
MDMF GETMED+1~, GETMED+5*, GETMED+6, GETMED+10, GETMED+16, HOSP+1~, HOSP+4*, HOSP+8, HOSP+9, HOSP+11
MDMNO GETMED~, GETMED+4, GETMED+5, LOCATP+2*, LOCATP+3, LOCATN+2*, LOCATN+3
MDN D1+1~, D1+7*, D1+8, SETDEF+1~, SETDEF+11*, SETDEF+12
MDN1 D1+1~, D1+8*, D1+10, D1+11, D1+12
MDNA GETMED+1~, GETMED+2*, GETMED+3, GETMED+4, GETMED+5, GETMED+9*, GETMED+14*, GETMED+15*, GETMED+19*, GETMED+20*
, GETMED+21
MDNAM SETDEF+1~, SETDEF+11*, SETDEF+12*, SETDEF+13*, SETDEF+14, SETDEF+15*, SETDEF+16*, SETDEF+17, SETDEF+20
MDNM LOCATP+1~, LOCATP+3*, LOCATP+4*, LOCATP+5, LOCATP+6, LOCATN+1~, LOCATN+3*, LOCATN+4
MDNNO LOCATP~, LOCATP+2, LOCATN~, LOCATN+2, HOSP~, HOSP+3, HOSP+4
MDOPT SETDEF+1~, SETDEF+2*, SETDEF+3, SETDEF+5, HOSP+1~, HOSP+5*, HOSP+6, HOSP+7
MDR D1+1~, D1+6*, D1+7, SETDEF+1~, SETDEF+7*, SETDEF+11
MDS SETDEF+1~, SETDEF+3*, SETDEF+4, HOSP+1~, HOSP+6*, HOSP+7, HOSP+8*, HOSP+9
MDT LOCATN+1~, LOCATN+4*, LOCATN+5
MDTAR SETDEF+1~!, HOSP+1~, HOSP+2!
MDTAR( SETDEF+5*, SETDEF+23, HOSP+7*, HOSP+8
MDTIT D1+1~, D1+5*
MDTYPE GETMED~, GETMED+3, GETMED+14, GETMED+15
MDV D1+1~, D1+13*, D1+14*, D1+15, D1+16, LOCATN+1~*, LOCATN+5, HOSP+1~, HOSP+13*
MDW HOSP+1~, HOSP+12*, HOSP+13*
MDW1 HOSP+1~, HOSP+13*
MDX D1+1~, H1+2*, H1+3, SETDEF+1~, SETDEF+2*, HOSP+1~, HOSP+5*
MDY SETDEF+1~, SETDEF+4*, SETDEF+5
PG D1+1~, D1+2*, H1+1, H1+3*
>> POP DISP+1
S1 D1+1~, D1+2*, D1+9
TIT D1+1~, D1+8*, D1+13, D1+16
U D1+4, D1+5, D1+6, D1+8, D1+10, D1+11, D1+12, SETDEF+7, SETDEF+12, SETDEF+13
, SETDEF+18, SETDEF+22, SETDEF+23, GETMED+7, GETMED+9, GETMED+11, GETMED+12, GETMED+14, GETMED+15, GETMED+17
, GETMED+19, HOSP+11, HOSP+12, HOSP+13
>> VAIP("D" HOSP+11*
>> VAIP(5 HOSP+12
X D1+1~, PAUSE+1*
Y LOCATP+1~*, LOCATP+3, LOCATP+5*, LOCATP+8*, LOCATP+9, LOCATN+1~*, LOCATN+3, LOCATN+5*, LOCATN+6
>> ZTDESC DISP+2*
>> ZTDTH DISP+2*
>> ZTIO DISP+2*
>> ZTREQ DISP+2*
>> ZTRTN DISP+2*
>> ZTSAVE("ZTREQ" DISP+2*

Marked Items

Name Field # of Occurrence
$T(MEDTIT+MDX SETDEF+2, HOSP+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All