Routine: GMTSRS2

Package	Total	Call Graph
VA Fileman	3	^DIC IX1^DIK ^DIR
Health Summary	2	(DIS,INA,RES)^GMTSRS2B EN^GMTSRS4

Package	Total	Caller Graph
Health Summary	2	GMTSRM3 GMTSRS

Entry Points

Name	Comments	DBIA/ICR reference
LKS	; Lookup HS Component Structure
SS(X)	; Screen for Structure
EN	; Main Entry Point
CONT	; Continue
RSI	; Resequence Selection Items
FMT	; Format of Type
LKS2	; Re-prompt for Component
LKT2	; Re-prompt
ASK(ARY,NEXT,X)	; Ask for order of Selection Items
MAX(ARY,X)	; Maximum # Items
DTE(X)	; Display Type Error
VER2	; Verified
RESEQ(ARY)	; Resequence - .ARY
ST(X)	; Screen for Type
DCE(X)	; Display Component Error
LKT	; Lookup HS Type
VER(INA,OPA,GMTST,GMTSS)	; Verify Resequence
HDR	; Header

External References

Name	Field # of Occurrence
^DIC	LKT2+3, LKT2+6, LKS2+4, LKS2+7
IX1^DIK	VER2+5
^DIR	ASK+10, VER+14, CONT+2
DIS^GMTSRS2B	RESEQ+5
INA^GMTSRS2B	RSI+6
RES^GMTSRS2B	RESEQ+3
EN^GMTSRS4	RESEQ+10

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: RSI+5
Function Call: WRITE	Prompt: !,"Can not resequence, no selection items found." Line Location: RSI+9
Function Call: WRITE	Prompt: !,"Resequencing not required (1 item)" Line Location: RSI+10
Function Call: WRITE	Prompt: !,"Selection items not resequenced (sequence not fully specified)" Line Location: RSI+13
Function Call: WRITE	Prompt: !,"Resequence selection items:",! Line Location: RESEQ+4
Function Call: WRITE	Prompt: ! Line Location: ASK+10
Function Call: WRITE	Prompt: !,"No changes in the Selection Item sequence." Line Location: VER+7
Function Call: WRITE	Prompt: !,GMTSTR Line Location: VER+13
Function Call: WRITE	Prompt: ?42,$E(GMTSNN,1,36) Line Location: VER+13
Function Call: WRITE	Prompt: !,"Selection items not resequenced" Line Location: VER+14
Function Call: WRITE	Prompt: ! Line Location: CONT+2
Function Call: WRITE	Prompt: !!,?8,"Old Sequence",?42,"New Sequence",!,?8,"------------------------",?42,"------------------------" Line Location: HDR+1
Function Call: WRITE	Prompt: !,"Resequence the Selection Items of a Health Summary Type.",! Line Location: LKT+2
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 selection items." Line Location: DTE+7
Function Call: WRITE	Prompt: !!," Can not resequence, selected Health Summary Type only has",!," one (1) selection item.",! Line Location: DTE+8
Function Call: WRITE	Prompt: !!," <Health Summary Type>" Line Location: FMT+1
Function Call: WRITE	Prompt: !," <Health Summary Commponent> i.e., 'PCE HEALTH FACTORS SELECTED'" Line Location: FMT+2
Function Call: WRITE	Prompt: !," <Selection Items> i.e., TOBACCO USE",! Line Location: FMT+3
Function Call: WRITE	Prompt: !!," No Health Summary Component selected.",! Line Location: DCE+1
Function Call: WRITE	Prompt: !!," Health Summary Component not found.",! Line Location: DCE+2
Function Call: WRITE	Prompt: !!," Health Summary Component does not have selection items." Line Location: DCE+3
Function Call: WRITE	Prompt: !!," Can not resequence, selected Health Summary Component ",!," only has one (1) selection item.",! Line Location: DCE+4
Routine Call	DIC Line Location: LKT2+3 LKT2+6 LKS2+4 LKS2+7
Routine Call	DIR Line Location: ASK+10 VER+14 CONT+2

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+1!, VER2+4, VER2+6, ST+3, ST+8, ST+9, ST+10, ST+11, SS+4, SS+5 , SS+7
^XUSEC(	ST+6
^XUSEC("GMTSMGR"	ST+5

Label References

Name	Line Occurrences
$$ASK	RESEQ+11
$$MAX	RSI+7, RSI+12, RESEQ+1, ASK+1
CONT	VER+11
DCE	LKS2+5
DTE	LKT2+4
FMT	DTE+7, DCE+3
HDR	VER+10, CONT+3
LKS	EN+1
LKS2	LKS2+5
LKT	EN+1
LKT2	LKT2+4
RESEQ	RSI+11
RSI	EN+2
VER	RSI+14
VER2	VER+3, VER+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ARY	RSI+1~, RSI+5!, RSI+6, RSI+7, RSI+11, RESEQ~, RESEQ+1, RESEQ+3, RESEQ+5, RESEQ+11 , RESEQ+12!, ASK~, ASK+1, ASK+11!, MAX~
ARY(	RESEQ+2, RESEQ+3, RESEQ+15, RESEQ+16!, RESEQ+18!, RESEQ+23, RESEQ+24!, RESEQ+26!, MAX+1
ARY(0	RESEQ+7, MAX+2
DA	EN+1~, VER2+5~*, LKS+2~
DA(1	EN+2, RSI+6, RSI+14, LKS2+1, LKS2+7
DA(2	EN+2*, RSI+6, RSI+14
DIC	RSI+1~, CONT+1~, LKT+1~, LKT2+1, LKT2+6~, LKS+2~, LKS2+1, LKS2+7~
DIC("A"	LKT2+2, LKS2+3
DIC("S"	LKT2+1, LKS2+2
DIC(0	LKT2+1, LKT2+6, LKS2+2, LKS2+7
DIK	RSI+1~, VER2+5~*, CONT+1~
DIR	RSI+1~, ASK+1~, VER+1~, CONT+1~, LKT+1~, LKS+2~
DIR("?"	ASK+5, ASK+6, ASK+7, ASK+8, ASK+9*
DIR("A"	ASK+4, ASK+10, VER+14, CONT+2
DIR("B"	ASK+10, VER+14
DIR(0	ASK+4, VER+14, CONT+2*
DIROUT	RSI+1~, ASK+1~, ASK+11, VER+1~, CONT+1~, LKT+1~, LKT2+3, LKS+2~, LKS2+4
DIRUT	RSI+1~, ASK+1~, ASK+11, VER+1~, CONT+1~, LKT+1~, LKT2+3, LKS+2~, LKS2+4
DTOUT	RSI+1~, ASK+1~, ASK+11, VER+1~, CONT+1~, LKT+1~, LKT2+3, LKS+2~, LKS2+4
DUOUT	RSI+1~, ASK+1~, ASK+11, VER+1~, CONT+1~, LKT+1~, LKT2+3, LKS+2~, LKS2+4
DUZ	ST+5, ST+6
GMTS0	RESEQ+1~, RESEQ+14~, RESEQ+15, RESEQ+16, RESEQ+17, RESEQ+22~, RESEQ+23, RESEQ+24, RESEQ+25
GMTS1	RSI+1~, RESEQ+1~, RESEQ+14~, RESEQ+15, RESEQ+16, RESEQ+18, RESEQ+22~, RESEQ+23, RESEQ+24, RESEQ+26
>> GMTSA1	RESEQ+19, RESEQ+20, RESEQ+27
GMTSAC	RSI+2~, RESEQ+1~, RESEQ+2, RESEQ+3
GMTSAI	RSI+2~, RESEQ+1~, RESEQ+2, RESEQ+3
GMTSC	RSI+2~, VER+1~, VER+4, VER+10, VER+13, VER2+2, VER2+3, VER2+4, VER2+6
GMTSCHG	RSI+2~, VER+1~, VER+4, VER+6, VER+7
GMTSCOL	RSI+2~, RESEQ+7~, RESEQ+9*, RESEQ+10
GMTSCT	VER+1~, VER+8, VER+11, HDR+1*
GMTSERR	EN+1~, RSI+2~, LKT+1~, LKT2+1, LKT2+4, ST+2, ST+3, ST+7, ST+8, ST+13 , LKS+2~, LKS2+1, LKS2+5, SS+3, SS+4, SS+5, SS+9*
GMTSF	RSI+2~, ASK+1~, ASK+2*, ASK+3
GMTSHDR	RSI+2~, RESEQ+7~, RESEQ+8*, RESEQ+10
GMTSI	RSI+2~, RESEQ+1~, RESEQ+13, RESEQ+14, RESEQ+21, RESEQ+22, ASK+1~, ASK+2, MAX+1~, VER+1~ , VER+4, VER+5, VER+6, VER+8, VER+9, VER2+2, VER2+3, CONT+3, ST+10~, ST+11 , SS+2~, SS+6, SS+7
GMTSI1	RSI+3~, VER+1~, VER+2*, VER2+1, VER2+4, VER2+6
GMTSI2	RSI+3~, VER+1~, VER+2*, VER2+1, VER2+4, VER2+5, VER2+6
GMTSIN	RSI+3~, RESEQ+1~, RESEQ+14~, RESEQ+15, RESEQ+16, RESEQ+18, RESEQ+22~, RESEQ+23, RESEQ+24, RESEQ+26
GMTSINM	RSI+3~, RSI+7*, RSI+8, RSI+10, RSI+13
GMTSKEY	RSI+3~, ST+1~, ST+4*, ST+6, SS+2~
GMTSLOCK	RSI+3~, ST+1~, ST+5, ST+6, SS+2~
GMTSMAX	RSI+3~, RSI+12, RSI+13, RSI+14, RESEQ+1~, RESEQ+4, RESEQ+5, RESEQ+6, RESEQ+7, RESEQ+9 , ASK+1~*, ASK+2, ASK+4
GMTSMGR	RSI+4~, ST+1~, ST+5*, SS+2~
GMTSN0	ST+1~, ST+3, ST+4, ST+7, SS+2~, SS+4
GMTSNN	VER+1~, VER+6, VER+9, VER+13
GMTSNODE	RESEQ+7~, RESEQ+8*, RESEQ+10
GMTSNXT	RESEQ+1~, RESEQ+11, RESEQ+12, RESEQ+13, RESEQ+14, RESEQ+20, RESEQ+21, RESEQ+22
GMTSNXT(	RESEQ+20
GMTSO	RSI+1~, RSI+4~, ST+1~, ST+2, ST+9, ST+11, ST+12, ST+13, SS+2~, SS+3 , SS+6, SS+7, SS+8, SS+9
GMTSON	RSI+4~, VER+1~, VER+5, VER+6, VER+9, VER+12*, VER+13
GMTSOP	RSI+4~, RESEQ+1~, RESEQ+14~, RESEQ+17, RESEQ+18, RESEQ+22~, RESEQ+25, RESEQ+26
GMTSPIE	RSI+4~, RESEQ+7~, RESEQ+8*, RESEQ+10
GMTSRO	RSI+4~, RSI+9, RSI+10, RSI+13, RESEQ+4, RESEQ+5, RESEQ+6, ASK+3, VER+3, VER+7*
GMTSROOT	RSI+4~, RESEQ+7~, RESEQ+8*, RESEQ+10
GMTSS	EN+1~, EN+2, RSI+4~, VER~, VER+2, ST+1~, ST+9, ST+10, ST+11, SS+2~
GMTST	EN+1~, EN+2, RSI+5~, VER~, VER+2, LKS+1, LKS2+1, SS+1, SS+4, SS+5 , SS+7
GMTSTR	VER+1~, VER+13*
GMTSU	RSI+5~, ST+1~, ST+4*, SS+2~
GMTSVAL	RSI+5~, VER+1~, VER2+3*, VER2+4
GMTSY	RSI+5~, ST+1~, ST+2, ST+3, ST+8, ST+9, ST+10, ST+11, SS+2~, SS+3 , SS+4, SS+5, SS+7
INA	RSI+1~, RSI+5!, RSI+14, VER~
INA(	VER+4, VER+5, VER+8, VER+9, CONT+3
NEXT	ASK~, ASK+12*
OPA	RSI+1~, RSI+5!, RSI+12, RSI+14, VER~
OPA(	RESEQ+17, RESEQ+18, RESEQ+25, RESEQ+26, VER+6, VER+9, VER2+2, VER2+3
OPA(" "	RESEQ+17, RESEQ+25
X	EN+1~, RSI+1~, ASK~, ASK+3, ASK+11, ASK+13, MAX~, MAX+1, MAX+2, VER+1~ , LKT2+6~, ST~, ST+13, DTE~, DTE+1, DTE+2, DTE+3, DTE+4, DTE+5, DTE+6 , DTE+7, DTE+8, LKS2+7~, SS~, SS+9, DCE~, DCE+1, DCE+2, DCE+3, DCE+4
Y	EN+1~, RSI+1~, ASK+1~, ASK+12, ASK+13, VER+1~, VER+14, LKT2+3, LKT2+5, LKT2+6 , ST+2, LKS2+4, LKS2+6, LKS2+7, SS+3

Customize PDF page

Package: Health Summary

Routine: GMTSRS2

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: