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

Package: Health Summary

Routine: GMTSRS1


Information

GMTSRS1 ; SLC/KER - Component Structure Resequence ; 02/11/2003

Source Information

Source file <GMTSRS1.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 3 ^DIC  IX1^DIK  ^DIR  
Health Summary 1 (DIS,INA,RES)^GMTSRS1B  

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
Health Summary 1 GMTSRS  

Entry Points

Name Comments DBIA/ICR reference
EN ; Main Entry Point
RCS ; Resequence Component Structure - Needs DA array
RESEQ(ARY) ; Resequence - .ARY
ASK(ARY,X) ; Ask for order of Components
MAX(ARY,X) ; Maximum # Components
VER(INA,OPA,GMTST) ; Verify Resequence
VER2
LKT ; Lookup HS Type
LKT2 ; Re-prompt for Type
ST(X) ; Screen for Type - Assumes Y
DTE(X) ; Display Type Error

External References

Name Field # of Occurrence
^DIC LKT2+3, LKT2+6
IX1^DIK EN+4, VER2+8
^DIR ASK+7, VER+12
DIS^GMTSRS1B RESEQ+4
INA^GMTSRS1B RCS+1
RES^GMTSRS1B RESEQ+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Resequence the Components of a Health Summary Type.",!
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !,"Health Summary Type not selected ",!
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,"Can not resequence, no components found."
  • Line Location: RCS+2
Function Call: WRITE
  • Prompt: !,"Resequencing not required (1 component)"
  • Line Location: RCS+3
Function Call: WRITE
  • Prompt: !,"Component structure not resequenced (sequence not fully specified)"
  • Line Location: RCS+5
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+7
Function Call: WRITE
  • Prompt: !,"No changes in the Health Summary Component sequence."
  • Line Location: VER+7
Function Call: WRITE
  • Prompt: !,$J(GMTSC,5),?8,GMTSON,?40,GMTSNN
  • Line Location: VER+11
Function Call: WRITE
  • Prompt: !
  • Line Location: VER+12
Function Call: WRITE
  • Prompt: !,"Components not resequenced"
  • Line Location: VER+13
Function Call: WRITE
  • Prompt: !!," No Health Summary Type selected.",!
  • Line Location: DTE+1
Function Call: WRITE
  • Prompt: !!," Health Summary Type not found.",!
  • Line Location: DTE+2
Function Call: WRITE
  • Prompt: !!," Can not resequence AD HOC Health Summary Type.",!
  • Line Location: DTE+3
Function Call: WRITE
  • Prompt: !!," Health Summary Type LOCKED",!
  • Line Location: DTE+4
Function Call: WRITE
  • Prompt: !!," Can not resequence a Health Summary Type you do not own.",!
  • Line Location: DTE+5
Function Call: WRITE
  • Prompt: !!," Can not resequence a Nationally exported Health Summary Type.",!
  • Line Location: DTE+6
Function Call: WRITE
  • Prompt: !!," Health Summary Type does not have any components."
  • Line Location: DTE+7
Function Call: WRITE
  • Prompt: !!," Can not resequence, selected Health Summary Type only has",!," one (1) component.",!
  • Line Location: DTE+8
Routine Call
  • DIC
  • Line Location:
    • LKT2+3
    • LKT2+6
Routine Call
  • DIR
  • Line Location:
    • ASK+7
    • VER+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMT(142 - [#142] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMT(142 - [#142] VER2!, VER2+3!, VER2+6, VER2+7*, ST+3, ST+8, ST+9
^XUSEC( ST+6
^XUSEC("GMTSMGR" ST+5

Label References

Name Line Occurrences
$$ASK RESEQ+5
$$MAX RCS+2, RCS+5, RESEQ+2, ASK+2
DTE LKT2+4
LKT EN+3
LKT2 LKT2+4
RCS EN+4
RESEQ RCS+4
VER RCS+6
VER2 VER+1, VER+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARY RCS+1~!, RCS+2, RCS+4, RESEQ~, RESEQ+2, RESEQ+4, RESEQ+5, RESEQ+7!, ASK~, ASK+2
, ASK+8!, MAX~
ARY( RESEQ+9, RESEQ+11, RESEQ+12, RESEQ+13, RESEQ+14!, MAX+1
DA EN+1~, EN+4!*, VER+3~, VER2+2*, VER2+5*, VER2+6*, VER2+8!*
DA(1 EN+4*, RCS+1, RCS+6, VER2+2*
DA(2 VER2*, VER2+6, VER2+7
DIC LKT+1~, LKT2+1*, LKT2+6~*
DIC("A" LKT2+2*
DIC("S" LKT2+1*
DIC(0 LKT2+1*, LKT2+6*
DIK EN+1~, EN+4*, VER+3~, VER2+8*
DIR ASK+1~, VER+3~, LKT+1~
DIR("A" ASK+6*, ASK+7*, VER+12*
DIR("B" ASK+7*, VER+12*
DIR(0 ASK+5*, VER+12*
DIROUT ASK+1~, ASK+8, VER+3~, LKT+1~, LKT2+3
DIRUT ASK+1~, ASK+8, VER+3~, LKT+1~, LKT2+3
DTOUT ASK+1~, ASK+8, VER+3~, LKT+1~, LKT2+3
DUOUT ASK+1~, ASK+8, VER+3~, LKT+1~, LKT2+3
DUZ ST+5, ST+6
GMTS RESEQ+1~, RESEQ+9*, RESEQ+10
GMTS0 RESEQ+1~, RESEQ+8~, RESEQ+9*, RESEQ+10
GMTS1 RESEQ+1~, RESEQ+8~
GMTS3 VER+3~, VER2+6*, VER2+7
GMTS4 VER+3~, VER2+6*, VER2+7
GMTSC RESEQ+1~, RESEQ+11*, RESEQ+13*, VER+2~, VER+4*, VER+10*, VER+11
GMTSCHG VER+2~, VER+4*, VER+6*, VER+7
GMTSERR EN+1~, LKT+1~, LKT2+1*, LKT2+4, ST+2*, ST+3*, ST+7*, ST+8*, ST+11*
GMTSEX VER+2~, VER2+2*, VER2+5*
GMTSF ASK+1~, ASK+3*, ASK+4
GMTSI RESEQ+1~, RESEQ+7*, RESEQ+8, ASK+1~, ASK+3*, MAX+1~*, VER+2~, VER+4*, VER+5*, VER+6
, VER+8*, VER+9
GMTSI1 VER+2~, VER+4*, VER2+1*, VER2+2, VER2+3, VER2+4, VER2+5
GMTSI2 VER+2~, VER2+4*, VER2+5
GMTSIN RESEQ+1~, RESEQ+8~*, RESEQ+9, RESEQ+11, RESEQ+12, RESEQ+13, RESEQ+14
GMTSINM RCS+1~, RCS+2*, RCS+3, RCS+5
GMTSKEY ST+1~, ST+4*, ST+6
GMTSLOCK ST+1~, ST+5*, ST+6*
GMTSMAX RCS+1~, RCS+5*, RCS+6, RESEQ+1~, RESEQ+2*, RESEQ+3, RESEQ+4, ASK+1~, ASK+2*, ASK+3
, ASK+5, ASK+6
GMTSMGR ST+1~, ST+5*
GMTSN0 ST+1~, ST+3*, ST+4, ST+7
GMTSNN VER+2~, VER+6*, VER+9*, VER+11
GMTSNXT RESEQ+1~, RESEQ+5*, RESEQ+6*, RESEQ+7, RESEQ+8
GMTSO ST+1~, ST+2*, ST+9*, ST+10*, ST+11
GMTSON VER+2~, VER+6*, VER+9*, VER+11
GMTSOP RESEQ+1~, RESEQ+8~, RESEQ+10*, RESEQ+13
>> GMTSRO RESEQ+3, RESEQ+4, ASK+4, VER+1, VER+7
GMTSS EN+1~, RESEQ+1~, RESEQ+11*, RESEQ+12, RESEQ+13, ST+1~, ST+9*
GMTST EN+1~, EN+4*, RCS+1~, VER~, VER+4, VER2, VER2+3, VER2+8
GMTSU ST+1~, ST+4*
GMTSVAL VER+2~
GMTSY ST+1~, ST+2*, ST+3, ST+8, ST+9
INA RCS+1~!, RCS+6, VER~
INA( VER+5, VER+6, VER+8, VER+9
OPA RCS+1~!, RCS+5, RCS+6, VER~
OPA( RESEQ+10*, RESEQ+13*, VER+6, VER+9, VER2+1, VER2+2, VER2+3, VER2+4, VER2+5
OPA(" " RESEQ+10
X EN+1~, ASK~, ASK+4*, ASK+8*, ASK+9*, MAX~, MAX+1*, MAX+2, VER+3~, LKT2+6~*
, ST~, ST+11*, DTE~, DTE+1, DTE+2, DTE+3, DTE+4, DTE+5, DTE+6, DTE+7
, DTE+8
Y EN+1~, EN+3, EN+4, ASK+1~, ASK+9, VER+3~, VER+13, LKT2+3*, LKT2+5, LKT2+6
, ST+2
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