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

Package: Health Summary

Routine: GMTSULT5


Information

GMTSULT5 ; SLC/KER - HS Type Lookup (User Input) ; 01/06/2003

Source Information

Source file <GMTSULT5.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 3 ^DIC  $$GET1^DIQ  ^DIR  
Health Summary 1 ($$DICS,LIST)^GMTSULT2  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Health Summary 1 GMTSULT  

Entry Points

Name Comments DBIA/ICR reference
IN2C ; Ask to Continue Listing
GHT ; General Help Text
GDISV ; Get Default Value (Spacebar-Return)
INPUT(X) ; Get User's Input
IN1 ; Single Question Mark Help ? for User Input
IN2 ; Double Question Mark Help ? with listing
DEF(X) ; Default
INPT(X) ; Input Transform

External References

Name Field # of Occurrence
^DIC GDISV+2
$$GET1^DIQ GDISV+2
^DIR INPUT+7
$$DICS^GMTSULT2 IN2+9, GDISV+3
LIST^GMTSULT2 INPT+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,DIR("A")
  • Line Location: INPUT+6
Function Call: WRITE
  • Prompt: !!,"Choose from:"
  • Line Location: IN2+2
Function Call: WRITE
  • Prompt: !,?3,GMTSTR
  • Line Location: IN2+13
Function Call: WRITE
  • Prompt: !,?3,"""^"" TO STOP:"
  • Line Location: IN2C+1
Function Call: WRITE
  • Prompt: !,?5,"Answer with Health Summary Type name, title, owner or hospital"
  • Line Location: GHT+1
Function Call: WRITE
  • Prompt: !,?5,"location using the summary. Your response must be at least 2"
  • Line Location: GHT+2
Function Call: WRITE
  • Prompt: !,?5,"characters and no more than 30 characters and must not contain"
  • Line Location: GHT+3
Function Call: WRITE
  • Prompt: !,?5,"an embedded uparrow"
  • Line Location: GHT+4
Routine Call
  • DIC
  • Line Location:
    • GDISV+2
Routine Call
  • DIR
  • Line Location:
    • INPUT+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMT(142 - [#142] INPUT+9, IN1+4, IN2+5, IN2+6, IN2+7, IN2+8, IN2+11, DEF+2, DEF+3, DEF+4
, DEF+5, DEF+7, INPT+4
^TMP("GMTSULT" INPT+5!, INPT+7!
^TMP("GMTSULT2" INPT+5!, INPT+7!

Label References

Name Line Occurrences
GDISV INPUT+1, IN1+3, DEF+7, INPT+4
GHT IN1+5, IN2+14
IN2C IN2+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%A IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%A0 IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%B IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%B1 IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%B2 IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%B3 IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%BA IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%BU IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%C IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%D1 IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%D2 IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%DT IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%E IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%G IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%H IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%I IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%J IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%J1 IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%K IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%M IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%N IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%P IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%S IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%T IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%W IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%W0 IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%X IN1+1~, IN2+1~, GDISV+1~, INPT+1~
%Y IN1+1~, IN2+1~, GDISV+1~, INPT+1~
DIC GDISV+1~, GDISV+2*
DIC(0 GDISV+2*
DINUM GDISV+1~
DIR INPUT+1~
DIR("?" INPUT+3*
DIR("??" INPUT+3*
DIR("A" INPUT+4*, INPUT+5*, INPUT+6
DIR("B" INPUT+6
DIR(0 INPUT+2*
DIRUT INPUT+7!
DLAYGO GDISV+1~
DTOUT INPUT+7, INPUT+8, GDISV+1~
DUOUT INPUT+8, GDISV+1~
DUZ GDISV+2
GMTSB INPUT+1~
GMTSC IN2+3~, IN2+4*, IN2+13*, IN2C+2*
GMTSCT IN2+3~, IN2+4*, IN2+6, IN2+7
GMTSD INPUT+1~, INPUT+5*, IN1+4*, DEF+3*, DEF+5*, DEF+7*, INPT+4*
>> GMTSDEF INPUT+8*
>> GMTSDIC0 INPUT+9, IN1+2, DEF+2, DEF+6, INPT+3, INPT+6
>> GMTSDICA INPUT+4
>> GMTSDICB INPUT+5, INPUT+7, INPUT+8
>> GMTSDICS IN2+9, GDISV+3
GMTSDISV INPUT+1~*, INPUT+9, IN1+4, DEF+7, GDISV+1*, GDISV+4*, INPT+4
GMTSHS IN2+3~, IN2+4*, IN2+5*, IN2+6*, IN2+7
GMTSI INPT+2~
GMTSIEN IN2+3~, IN2+5*, IN2+7*, IN2+8, IN2+9, IN2+11
GMTSINPT INPT+2~, INPT+5*
>> GMTSLGO INPT+6
GMTSOK IN2+3~, IN2+8*, IN2+9*, GDISV+1~, GDISV+2*, GDISV+3*
GMTSPL IN2+3~, IN2+4*, IN2+13
GMTSRR IN2+3~, IN2+6*, IN2+13*
GMTST IN2+3~, IN2+4*, IN2+6, IN2+7, IN2+14, IN2C+2*, IN2C+3*, INPT+2~*, INPT+6
GMTSTL IN2+3~, IN2+8*, IN2+11*, IN2+12
GMTSTR IN2+3~, IN2+8*, IN2+10*, IN2+12*, IN2+13
GMTSTT IN2+3~, IN2+5*, IN2+6
IOSL IN2+4
U IN1+4, IN2+8, IN2+11, DEF+3, DEF+5, DEF+7, INPT+4
X INPUT~, INPUT+6*, INPUT+7, INPUT+8*, INPUT+9*, INPUT+10, IN1+2, IN1+4*, IN2+9, IN2C+1~*
, IN2C+2, IN2C+3, DEF~, DEF+1*, DEF+2, DEF+3*, DEF+4, DEF+5*, DEF+6, DEF+7*
, DEF+8, GDISV+1~, GDISV+2*, GDISV+3, INPT~, INPT+2*, INPT+3, INPT+4*, INPT+5*, INPT+6*
, INPT+7
Y INPUT+1~, INPUT+8*, INPUT+9, IN1+4*, DEF+3*, DEF+5*, DEF+7*, GDISV+1~, GDISV+3*, GDISV+4
, INPT+4*
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