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

Package: Health Summary

Routine: GMTSOBU


Information

GMTSOBU ; SLC/KER - HS Object - Utility ; 01/06/2003

Source Information

Source file <GMTSOBU.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Health Summary 1 $$EN2^GMTSUMX  
Kernel 1 $$UP^XLFSTR  
Registration 1 $$SITE^VASITE  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Health Summary 1 GMTSOBI  

Entry Points

Name Comments DBIA/ICR reference
YNH ; Yes No Help
EDN(X) ; Edit Health Summary Type Name
NN(X) ; New Name
TX(R,T,L) ; Get Text (Routine/Tag/Line)
REN ; Rename Health Summary Type
OIEN(X) ; Object IEN
CKT(X) ; Check New Title is Unique
ROK(X) ; Routine Ok
DEL(X) ; Delete Routine X
LNH ; Length Help
EDT(X,Y) ; Edit Health Summary Type Title
TWX(X) ; Get HS Title IEN from Word Index
WER2 ; Write Error Text
NWX(X) ; Get HS Name IEN from Word Index
EHST(X) ; Existing Health Summary Type
TIEN(X) ; Type IEN
WER ; Write Error
BOX(X) ; Get HS Object IEN from B Index
ER1 ; Health Summary Object Exist
ER2 ; Health Summary Type Exist
ER3 ; Health Summary Title Exist
TRIM(X) ; Trim Spaces
CKN(X) ; Check New Name is Unique

External References

Name Field # of Occurrence
^DIR EHST+16, REN+5, EDN+8, EDT+8
$$EN2^GMTSUMX EDT+2, EDT+3
$$SITE^VASITE OIEN+1
$$UP^XLFSTR BOX+3, NWX+1, NWX+3, TWX+1, TWX+3, TRIM+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," Error:"
  • Line Location: WER+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EHST+5
Function Call: WRITE
  • Prompt: !
  • Line Location: EHST+16
Function Call: WRITE
  • Prompt: !
  • Line Location: REN+5
Function Call: WRITE
  • Prompt: !," Enter either 'Y' or 'N'."
  • Line Location: YNH+1
Function Call: WRITE
  • Prompt: !," This response must have at least 3 characters and no more than 30"
  • Line Location: LNH+1
Function Call: WRITE
  • Prompt: !," characters and must not contain embedded uparrow."
  • Line Location: LNH+2
Routine Call
  • DIR
  • Line Location:
    • EHST+16
    • REN+5
    • EDN+8
    • EDT+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("DEL" DEL+1
^GMT(142 - [#142] TIEN+2, TIEN+3, NWX+2, NWX+3, TWX+2, TWX+3
^GMT(142.5 - [#142.5] OIEN+2, BOX+2, BOX+3

Label References

Name Line Occurrences
$$EDN REN+6
$$EDT REN+7
$$NN EDN+4, EDT+4
$$NWX EHST+7, EDN+4, CKN+1
$$ROK DEL+1
$$TIEN EHST+21
$$TRIM WER2+1, WER2+2, WER2+3, EHST+9, EHST+10, EHST+11, EHST+12, EHST+13, EHST+14, EHST+15
, EDN+4, EDT+4, NN+5, NN+7
$$TWX EDT+4, CKT+1
$$TX EHST+3
REN EHST+21
WER ER1+1, ER2+1, ER3+1
WER2 EHST+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR EHST+2~, REN+1~, EDN+1~, EDT+1~
DIR("?" EHST+16*, REN+4*, EDN+7*, EDT+7*
DIR("??" EHST+16*, REN+4*, EDN+7*, EDT+7*
DIR("A" EHST+11*, EHST+15*, REN+2*, EDN+3*, EDT+5*
DIR("B" EHST+16*, REN+3*, EDN+5*, EDT+5*
DIR(0 EHST+16*, REN+3*, EDN+6*, EDT+6*
DIROUT EHST+2~, REN+1~, EDN+1~, EDT+1~
DTOUT EHST+2~, REN+1~, EDN+1~, EDT+1~
DUOUT EHST+2~, REN+1~, EDN+1~, EDT+1~
GMTS EHST+1~, EHST+17*, EHST+19, EHST+24
>> GMTSDAT EHST+21*, EHST+24
GMTSEDAT EHST+1~, EHST+7*, EHST+19*, EHST+21*, EHST+22, EHST+24*
>> GMTSETTL EHST+21, REN+1*, REN+7*
GMTSETYP EHST+21, REN+1*, REN+6*, REN+7*, EDN+1~, EDN+2*, EDT+1~
GMTSEX ROK+2~*, TX+1~*
GMTSI TIEN+1~*, TIEN+2*, TIEN+3, BOX+1~, BOX+2*, BOX+3, NWX+1~, NWX+2*, NWX+3, TWX+1~
, TWX+2*, TWX+3
GMTSIEN TIEN+1~*, TIEN+3*, TIEN+4, OIEN+1~, OIEN+2*, OIEN+3
GMTSIT OIEN+1~*, OIEN+2
GMTSLN ER1+1~, ER2+1~, ER3+1~, WER2+1*, WER2+2*, WER2+3*, EHST+1~, EHST+9*, EHST+10*, EHST+11*
, EHST+12, EHST+13*, EHST+14*, EHST+15*
GMTSN BOX+1~*, BOX+2, BOX+3, NWX+1~*, NWX+2, NWX+3, TWX+1~*, TWX+2, TWX+3
GMTSNA REN+1~, EDN+1~, EDT+1~
GMTSNI NN+1~, NN+2*, NN+4*, NN+6, NN+7
GMTSNN REN+1~, EDN+1~, EDN+4*, EDN+5, NN+1~, NN+2*, NN+3, NN+4
GMTSNS NN+1~, NN+3*, NN+4*, NN+5*, NN+6*, NN+7
GMTSNT REN+1~, EDT+1~, EDT+3*, EDT+4*, EDT+5
GMTSO BOX+1~, BOX+2*, BOX+3*, BOX+4
GMTSOBJ ER1+1, ER2+1, ER3+1, EHST+1~, EHST+3*, EHST+4
GMTSON EDN+1~, EDN+2*, EDN+3, EDN+4
GMTSOT EDT+1~, EDT+2*, EDT+3
>> GMTSQIT ER1+1*, ER2+1*, ER3+1*, EHST+17*, EHST+19*, EHST+22*, EHST+24*
GMTSRTN EHST+1~, EHST+3*
GMTST NWX+1~, NWX+2*, NWX+3*, NWX+4, TWX+1~, TWX+2*, TWX+3*, TWX+4
>> GMTSTE EHST+24*
GMTSTT EDT+1~, EDT+2*, EDT+3
>> GMTSTTL ER3+1, EHST+21*, REN+7
GMTSTXT ER1+1~*, ER2+1~*, ER3+1~*, WER2+1, WER2+2*, WER2+3*, EHST+1~, EHST+5*, EHST+6*, EHST+8*
, EHST+9, EHST+11, EHST+12*, EHST+13, EHST+15, ROK+2~, TX+1~
GMTSTY EDT+1~, EDT+2*
GMTSTYP ER2+1, ER3+1, EHST+1~, EHST+3*, EHST+4, EHST+5, EHST+7, EHST+8, EHST+21*, EHST+24
, REN+6
GMTSW NWX+1~, NWX+2*, TWX+1~, TWX+2*
GMTSX BOX+1~, BOX+3*, NWX+1~, NWX+3*, TWX+1~, TWX+3*
L TX~, TX+1
R TX~, TX+1
T TX~, TX+1
X EHST~, EHST+17*, EHST+19, EHST+22*, EHST+24*, EHST+25, REN+1~, EDN~, EDN+2, EDN+8*
, EDN+9, EDT~, EDT+2, EDT+8*, EDT+9, CKN~, CKN+1*, CKT~, CKT+1*, TIEN~
, TIEN+4*, OIEN~, OIEN+3*, OIEN+4, BOX~, BOX+1, BOX+4*, BOX+5, NWX~, NWX+1
, NWX+4*, NWX+5, TWX~, TWX+1, TWX+4*, TWX+5, NN~, NN+2, NN+7*, NN+8
, DEL~, DEL+1*, ROK~, ROK+1*, ROK+2, TX+1*, TX+2, TRIM~, TRIM+1*, TRIM+2*
, TRIM+3*, TRIM+4
Y EHST+2~, EHST+17, REN+1~, REN+5, EDN+1~, EDN+8, EDT~, EDT+2, EDT+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All