Routine: GMTS1

Package	Total	Call Graph
Health Summary	3	(NODATA,NOMATCH,NOSELECT,PDISBLD,TDISBLD)^GMTS2 (DEM,REGDT4,REGDTM4)^GMTSU (CKP,HEADER)^GMTSUP
VA Fileman	1	(C,NOW)^%DTC

Package	Total	Caller Graph
Health Summary	5	GMTS GMTSADHC GMTSDVR GMTSPDX GMTSPL
Automated Information Collection System	1	IBDFN5
Order Entry Results Reporting	1	ORPRS13

Entry Points

Name	Comments	DBIA/ICR reference
EN	; Entry Point to Generate a Summary ; ; Requires: DFN, GMTSTITL, GMTSEG() ; GMTSEGI(), GMTSEGC, DUZ(2) ; ; $I & IO MUST BE VALID, CALLER MUST CLOSE OUTPUT DEVICE ;	ICR #746 Status: Active Usage: Controlled Subscription ICR #2912 Status: Pending Usage: Controlled Subscription
SEGMNT	; Output a Component Type
LASTPG	; Allows User to branch to an earlier component (last page)
START	; Health Summary
EXIT	; Clean up and quit
OUTPUT	; Loop through GMTSEG()

External References

Name	Field # of Occurrence
C^%DTC	SEGMNT+28
NOW^%DTC	OUTPUT+1, SEGMNT+22
NODATA^GMTS2	SEGMNT+43
NOMATCH^GMTS2	SEGMNT+38
NOSELECT^GMTS2	SEGMNT+40
PDISBLD^GMTS2	SEGMNT+37
TDISBLD^GMTS2	SEGMNT+36
DEM^GMTSU	START+6
REGDT4^GMTSU	OUTPUT+5, OUTPUT+6
REGDTM4^GMTSU	OUTPUT+1
CKP^GMTSUP	LASTPG+9
HEADER^GMTSUP	OUTPUT+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !," No data available" Line Location: OUTPUT+12
Function Call: WRITE	Prompt: ! Line Location: LASTPG+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^GMT(142 - [#142]	START+2
^GMT(142.1 - [#142.1]	SEGMNT+3, SEGMNT+39
^XUSEC(	SEGMNT+38

Label References

Name	Line Occurrences
@(	SEGMNT+42
EXIT	OUTPUT+19
LASTPG	OUTPUT+11
OUTPUT	START+7
SEGMNT	OUTPUT+11

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	OUTPUT+1, SEGMNT+22!
%H	SEGMNT+22!
%I	SEGMNT+22!
>> DFN	LASTPG+2, LASTPG+6
DT	SEGMNT+22*
DUZ	SEGMNT+38
GMOOTXT	SEGMNT+1~, SEGMNT+6*
>> GMPAT(	LASTPG+2, LASTPG+6
>> GMPAT(""	LASTPG+6
>> GMPAT(0	LASTPG+2
>> GMPSAP	OUTPUT+18, LASTPG+2, LASTPG+4
GMPXCM	SEGMNT+1~, SEGMNT+6*, SEGMNT+8
GMPXCMOD	SEGMNT+1~, SEGMNT+8*
GMPXHLOC	SEGMNT+1~, SEGMNT+7*
GMPXICDF	SEGMNT+1~, SEGMNT+9*
GMPXNARR	SEGMNT+1~, SEGMNT+7*
GMSEL	SEGMNT+1~, SEGMNT+39*, SEGMNT+40
GMSUPRES	START+1~, START+2, START+3, START+4*
>> GMTS1	OUTPUT+3, SEGMNT+27, SEGMNT+28*, SEGMNT+32
>> GMTS2	OUTPUT+3, SEGMNT+27, SEGMNT+28*, SEGMNT+30
GMTSBEG	START+1~, SEGMNT+30*
GMTSBRK	START+8!
GMTSCKP	START+8!
GMTSCVD	START+8!
GMTSDBL	SEGMNT+1~, SEGMNT+6*, SEGMNT+35, SEGMNT+36, SEGMNT+37
GMTSDLM	START+9!, SEGMNT+10, SEGMNT+12, SEGMNT+14, SEGMNT+15, SEGMNT+16, SEGMNT+17, SEGMNT+18, SEGMNT+20, SEGMNT+27* , SEGMNT+28*, SEGMNT+44!
GMTSDLS	START+9!, SEGMNT+13, SEGMNT+14, SEGMNT+15, SEGMNT+16, SEGMNT+17, SEGMNT+19, SEGMNT+20, SEGMNT+21!
GMTSDTC	START+8!, SEGMNT+22*, SEGMNT+28
>> GMTSDTM	OUTPUT+1*
GMTSE	START+9!, OUTPUT+11*, SEGMNT+3, SEGMNT+39
>> GMTSEG(	OUTPUT+9, OUTPUT+10, OUTPUT+11, SEGMNT+4, SEGMNT+7, SEGMNT+8, SEGMNT+9, SEGMNT+10, SEGMNT+40
>> GMTSEG(0	OUTPUT+12
>> GMTSEGC	OUTPUT+11
GMTSEGH	START+9!, SEGMNT+4*
GMTSEGL	START+9!, SEGMNT+20*
GMTSEGN	START+9!, OUTPUT+8, OUTPUT+9, OUTPUT+10, OUTPUT+11, SEGMNT+4, SEGMNT+7, SEGMNT+8, SEGMNT+9, SEGMNT+10 , SEGMNT+40
GMTSEGR	START+9!, SEGMNT+4*, SEGMNT+5, SEGMNT+42
GMTSEND	START+1~, SEGMNT+32*
GMTSEQ	START+9!, OUTPUT+10*
GMTSHD2	START+8!
GMTSHDR	START+8!, OUTPUT+13, OUTPUT+14, OUTPUT+15*, OUTPUT+16
GMTSICF	START+1~
GMTSLCMP	START+8!
>> GMTSLO	START+5*, LASTPG+7
GMTSLOCK	SEGMNT+1~, SEGMNT+6*, SEGMNT+38
>> GMTSLPG	START+5, LASTPG+9
GMTSN	START+9!, SEGMNT+21!
GMTSNDM	START+9!, SEGMNT+10*, SEGMNT+20
GMTSNPG	START+8!, SEGMNT+41*
>> GMTSOBJ	START+3, START+7, OUTPUT+12, OUTPUT+14, OUTPUT+16, OUTPUT+17, OUTPUT+18, LASTPG+7
>> GMTSOBJ("CONFIDENTIAL"	OUTPUT+16
>> GMTSOBJ("SUPP	RESS COMPONENTS" , START+3, START+4
>> GMTSOBJE	OUTPUT+15, OUTPUT+18
GMTSPG	START+8!
>> GMTSPRM	SEGMNT+37
>> GMTSPX1	OUTPUT+2, OUTPUT+3, OUTPUT+5, SEGMNT+12, SEGMNT+26
>> GMTSPX2	OUTPUT+2, OUTPUT+3, OUTPUT+6, SEGMNT+12, SEGMNT+26
GMTSPXD1	START+1~, OUTPUT+5*
GMTSPXD2	START+1~, OUTPUT+6*
GMTSQ	START+9!
GMTSQIT	START+8!, OUTPUT+8!, OUTPUT+9, OUTPUT+10!, OUTPUT+19, LASTPG+1, LASTPG+8!, SEGMNT+2!
>> GMTSTYP	START+2
GMTSWRIT	SEGMNT+1~, SEGMNT+34, SEGMNT+41, SEGMNT+43*
>> I	LASTPG+7*
IO	START+5
IOF	START+7, OUTPUT+18
IOSL	LASTPG+2, LASTPG+4, LASTPG+6, LASTPG+7
IOST	START+7, OUTPUT+16, OUTPUT+17, LASTPG+1
>> IOT	LASTPG+1
U	START+2, OUTPUT+10, OUTPUT+11, SEGMNT+4, SEGMNT+6, SEGMNT+7, SEGMNT+8, SEGMNT+9, SEGMNT+10, SEGMNT+39 , SEGMNT+42
>> X	OUTPUT+1, OUTPUT+5, OUTPUT+6, SEGMNT+3, SEGMNT+4, SEGMNT+6, SEGMNT+28
X1	SEGMNT+28*!
X2	SEGMNT+28*!
ZTSK	EXIT+1!

Customize PDF page

Package: Health Summary

Routine: GMTS1

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 7

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: