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

Package: Health Summary

Routine: GMTSUP1


Information

GMTSUP1 ; SLC/JER,KER - Utilities for Paging HS ; 09/21/2001

Source Information

Source file <GMTSUP1.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Kernel 1 DISP^XQORM1  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Health Summary 4 GMTSADH  GMTSADH3  GMTSADHC  GMTSADOR  

Entry Points

Name Comments DBIA/ICR reference
RETURN ; Return to Health Summary without Jump
HELP ; Offers help to confused individuals
LIST1 ; Lists component information
LIST ; List components
STAR ; Writes * to indicate added component when called by GMTSUP
; for HST other than AD HOC
HELP2 ; Help for "^^"-jump
HELP1 ; Writes part of help prompt
SCRNLNTH ; Checks screen length
RJUMP ; XQOR for "^^"-jump is no longer supported

External References

Name Field # of Occurrence
^DIR SCRNLNTH+4
DISP^XQORM1 HELP+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Jumping not allowed.",!
  • Line Location: RJUMP+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: "These components have been selected for Ad Hoc.",!
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: "These components are part of ",GMTSTITL," Health Summary Type",!,"or have been temporarily added. Added components are indicated by *.",!
  • Line Location: HELP+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HELP+4
Function Call: WRITE
  • Prompt: "These components may be temporarily added (use ""=C"" to change limits)."
  • Line Location: HELP+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP1+1
Function Call: WRITE
  • Prompt: "To leave display order and jump to a different component, select any component",!
  • Line Location: HELP1+2
Function Call: WRITE
  • Prompt: "from the above list, or select any additional component to be temporarily",!
  • Line Location: HELP1+3
Function Call: WRITE
  • Prompt: "added to the display. Add ""=C"" to component to change limits or selection",!
  • Line Location: HELP1+4
Function Call: WRITE
  • Prompt: "items. EXAMPLE: LO=C",!!
  • Line Location: HELP1+5
Function Call: WRITE
  • Prompt: "Enter: ?? to see additional components.",!
  • Line Location: HELP1+6
Function Call: WRITE
  • Prompt: ?7,"??? to see HELP for ""^^""-jump.",!
  • Line Location: HELP1+7
Function Call: WRITE
  • Prompt: ?7,"<RET> to continue display.",!
  • Line Location: HELP1+8
Function Call: WRITE
  • Prompt: ?7,"+ to proceed to next component.",!
  • Line Location: HELP1+9
Function Call: WRITE
  • Prompt: ?7,"- to return to preceeding component.",!
  • Line Location: HELP1+10
Function Call: WRITE
  • Prompt: ?7,"^ to quit present patient's summary.",!
  • Line Location: HELP1+11
Function Call: WRITE
  • Prompt: ?7,"^^ to quit and return to menu.",!!
  • Line Location: HELP1+12
Function Call: WRITE
  • Prompt: ?22,"Navigation OUTSIDE of Health Summary",!!
  • Line Location: HELP2+1
Function Call: WRITE
  • Prompt: "You may also enter ""^^"" followed by the name, partial name or synonym for",!
  • Line Location: HELP2+2
Function Call: WRITE
  • Prompt: "any of a variety of options OUTSIDE of Health Summary to which you can",!
  • Line Location: HELP2+3
Function Call: WRITE
  • Prompt: "jump. Partial matches will allow you to select from a subset of options.",!!
  • Line Location: HELP2+4
Function Call: WRITE
  • Prompt: "For example: ^^? will list ALL available options.",!
  • Line Location: HELP2+5
Function Call: WRITE
  • Prompt: ?14,"^^PN will show you all of the PROGRESS NOTES options, or",!
  • Line Location: HELP2+6
Function Call: WRITE
  • Prompt: ?14,"^^OR will show you all of the ORDER ENTRY options.",!!
  • Line Location: HELP2+7
Function Call: WRITE
  • Prompt: "You may also order a wide variety of LABORATORY tests using this syntax.",!
  • Line Location: HELP2+8
Function Call: WRITE
  • Prompt: "e.g., ^^CHEM 7 will allow you to ADD an order for that test.",!!
  • Line Location: HELP2+9
Function Call: WRITE
  • Prompt: !
  • Condition for execution: GMI#2
  • Line Location: LIST1+2
Function Call: WRITE
  • Prompt: ?$S(GMI#2:0,1:40)
  • Line Location: LIST1+2
Function Call: WRITE
  • Prompt: $P(CREC,U,4),?$S(GMI#2:8,1:48),$E($S($L($P(GMTSEG(GMI),U,5)):$P(GMTSEG(GMI),U,5),$L($P(CREC,U,9)):$P(CREC,U,9),1:$P(CREC,U)),1,24)
  • Line Location: LIST1+2
Function Call: WRITE
  • Prompt: $S($D(^GMT(142,TYP,1,"C",$P(GMTSEG(GMI),U,2))):" ",1:"*")
  • Line Location: STAR+2
Routine Call
  • DIR
  • Line Location:
    • SCRNLNTH+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMT(142 - [#142] STAR+2
^GMT(142.1 - [#142.1] LIST1+1

Label References

Name Line Occurrences
HELP1 HELP+3, HELP+4
HELP2 HELP+6
LIST HELP+3, HELP+4
LIST1 LIST+2
RETURN RJUMP+1
SCRNLNTH HELP1+1, HELP1+2, HELP1+3, HELP1+4, HELP1+5, HELP1+6, HELP1+7, HELP1+8, HELP1+9, HELP1+10
, HELP1+11, HELP1+12, HELP2+1, HELP2+2, HELP2+3, HELP2+4, HELP2+5, HELP2+6, HELP2+7, HELP2+8
, HELP2+9, LIST+2
STAR LIST1+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CREC LIST1+1~*, LIST1+2
DIR SCRNLNTH+1~
DIR(0 SCRNLNTH+3*
>> DTOUT HELP+3, HELP+4, LIST+2, SCRNLNTH+4
DUOUT LIST+1~, LIST+2, SCRNLNTH+4
FLG HELP+3*!, HELP+4*!, LIST1+2
GMDFN RJUMP+1~
GMI LIST+1~, LIST+2*, LIST1+1, LIST1+2, STAR+2
GMQUIT HELP+1~, HELP1+1, HELP1+2, HELP1+3, HELP1+4, HELP1+5, HELP1+6, HELP1+7, HELP1+8, HELP1+9
, HELP1+10, HELP1+11, HELP1+12, HELP2+1, HELP2+2, HELP2+3, HELP2+4, HELP2+5, HELP2+6, HELP2+7
, HELP2+8, HELP2+9, SCRNLNTH+4*, SCRNLNTH+5
GMTSAV RJUMP+1~, RETURN+1
>> GMTSEG( LIST+2, LIST1+1, LIST1+2, STAR+2
>> GMTSTITL HELP+4
>> GMTSTYP HELP+3, HELP+4
IOF HELP+2, SCRNLNTH+5
IOSL SCRNLNTH+2
>> TYP HELP+3, HELP+4, STAR+2
U LIST1+1, LIST1+2, STAR+2
>> X HELP+3, HELP+4, HELP+5, HELP+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All