Routine: GMTSPXU1

Information

GMTSPXU1 ; SLC/SBW - PCE Utilities sub-routines ;21-Jan-2014 14:19;MGH

Source Information

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
DRG Grouper	3	($$ICDD,$$ICDDX,$$ICDOP)^ICDCODE ($$ICDD,$$ICDDX,$$ICDOP)^ICDEX $$CPT^ICPTCOD
VA Fileman	2	^DIR ^DIWP
Health Summary Components	1	$$AICD^BHSUTL

Caller Graph

Caller Graph Total: 3

Package	Total	Caller Graph
Health Summary	3	GMTSPLST GMTSPXOP GMTSPXTP

Entry Points

Name	Comments	DBIA/ICR reference
GETCPT(GMTSCPT)	; Entry point to get CPT data
DSPLST	; Common code for Health Summary MNX Lists
QUIT	; Quit
ORDERPRO(GMPROV,GMLEN)	; Re-order and format providers for visit
LM	; Entry Point - for GMTS Measurement Panel
TXTFMT(GMTSICD,GMTSNARR,GMICL,GMTAB,DIWL,GMTSQTY,GMTSPRIM)	; Formats GMTSICD & GMTSNARR together
GETICDDX(GMTSICD,GMTSICF,GMMOD)	; Entry point to get ICD data
CONT	; Continue
GETICDOP(GMTSICD,GMTSICF,GMMOD)	; Entry point to get ICD0 data

External References

Name	Field # of Occurrence
$$AICD^BHSUTL	GETICDDX+3, GETICDDX+9, GETICDOP+3, GETICDOP+9
^DIR	CONT+3, CONT+4
^DIWP	TXTFMT+9, TXTFMT+13
$$ICDD^ICDCODE	GETICDDX+10, GETICDOP+10
$$ICDDX^ICDCODE	GETICDDX+4
$$ICDOP^ICDCODE	GETICDOP+4
$$ICDD^ICDEX	GETICDDX+9, GETICDOP+9
$$ICDDX^ICDEX	GETICDDX+3
$$ICDOP^ICDEX	GETICDOP+3
$$CPT^ICPTCOD	GETCPT+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"NO ",$P(@(GMTSLST_"0)"),U),"S DEFINED.",! Line Location: DSPLST+2
Function Call: WRITE	Prompt: @IOF,!!,"Existing ",$P(@(GMTSLST_"0)"),U),"S:",! Line Location: DSPLST+3
Function Call: WRITE	Prompt: !,?5,GMTSCNT Line Location: CONT+2
Function Call: WRITE	Prompt: @IOF Line Location: CONT+3
Function Call: WRITE	Prompt: ! Line Location: CONT+4
Routine Call	DIR Line Location: CONT+3 CONT+4

Name	Line Occurrences (* Changed, ! Killed)
^TMP("PXHSV"	ORDERPRO+3, ORDERPRO+4
^UTILITY($J	TXTFMT+4!

Name	Line Occurrences
DSPLST	LM+1
QUIT	CONT+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CODE	GETICDDX+1~, GETICDDX+13, GETICDDX+16, GETICDDX+17, GETICDDX+18, GETICDOP+2~, GETICDOP+13, GETICDOP+16, GETICDOP+17, GETICDOP+18
DESC	GETICDDX+1~, GETICDDX+15, GETICDDX+16, GETICDDX+19, GETICDOP+2~, GETICDOP+15, GETICDOP+16, GETICDOP+19
DIR	DSPLST+1!, CONT+2~, CONT+4!, QUIT+1!
DIR(0	CONT+2, CONT+4
DIWF	TXTFMT+2~
DIWL	TXTFMT~
DIWR	TXTFMT+2~, TXTFMT+3*
GMCNT	ORDERPRO+1~, ORDERPRO+2, ORDERPRO+6, ORDERPRO+7
GMICL	TXTFMT~, TXTFMT+3
GMLEN	ORDERPRO~, ORDERPRO+7
GMMOD	GETICDDX~, GETICDDX+2, GETICDDX+20, GETICDOP~, GETICDOP+1*
GMNODE	ORDERPRO+1~, ORDERPRO+4*, ORDERPRO+5, ORDERPRO+7
GMP	ORDERPRO+1~, ORDERPRO+3*, ORDERPRO+4, ORDERPRO+7
GMPROV	ORDERPRO~
GMPROV(	ORDERPRO+7*
GMTAB	TXTFMT~, TXTFMT+3
GMTSCNT	DSPLST+3, CONT+1, CONT+2, QUIT+1!
GMTSCPT	GETCPT~, GETCPT+1*, GETCPT+2
GMTSICD	GETICDDX~, GETICDDX+2, GETICDDX+3, GETICDDX+4, GETICDDX+5, GETICDDX+6, GETICDDX+7, GETICDDX+8, GETICDDX+11, GETICDDX+12 , GETICDDX+13, GETICDDX+14, GETICDDX+15, GETICDDX+16, GETICDDX+17, GETICDDX+18, GETICDDX+19, GETICDDX+20, GETICDDX+21, GETICDOP~ , GETICDOP+1, GETICDOP+3, GETICDOP+4, GETICDOP+5, GETICDOP+6, GETICDOP+7, GETICDOP+8, GETICDOP+11, GETICDOP+12, GETICDOP+13 , GETICDOP+14, GETICDOP+15, GETICDOP+16, GETICDOP+17, GETICDOP+18, GETICDOP+19, GETICDOP+20*, TXTFMT~, TXTFMT+1, TXTFMT+5
GMTSICF	GETICDDX~, GETICDDX+2, GETICDDX+16, GETICDDX+17, GETICDDX+18, GETICDDX+19, GETICDDX+21, GETICDOP~, GETICDOP+1, GETICDOP+16 , GETICDOP+17, GETICDOP+18, GETICDOP+19, GETICDOP+20
>> GMTSIVD	ORDERPRO+3, ORDERPRO+4
GMTSLST	LM+1*, DSPLST+2, DSPLST+3, CONT+1, QUIT+1!
GMTSNARR	TXTFMT~, TXTFMT+1, TXTFMT+5, TXTFMT+6, TXTFMT+10
GMTSP	ORDERPRO+1~, ORDERPRO+3*, ORDERPRO+4
GMTSPRIM	TXTFMT~, TXTFMT+7, TXTFMT+12
GMTSQTY	TXTFMT~, TXTFMT+8, TXTFMT+11
>> GMTSVDF	ORDERPRO+3, ORDERPRO+4
ICDA	GETICDDX+1~, GETICDOP+2~
ICDA(1	GETICDDX+11, GETICDDX+12, GETICDOP+11, GETICDOP+12
ICDI	GETICDDX+1~, GETICDDX+9, GETICDDX+10, GETICDOP+2~, GETICDOP+9, GETICDOP+10
ICDX	GETICDDX+1~, GETICDDX+3, GETICDDX+4, GETICDDX+5, GETICDDX+6, GETICDDX+7, GETICDDX+8, GETICDDX+9, GETICDDX+10, GETICDOP+2~ , GETICDOP+3, GETICDOP+4, GETICDOP+5, GETICDOP+6, GETICDOP+7, GETICDOP+8, GETICDOP+9, GETICDOP+10
ICPT	GETCPT+1~, GETCPT+2*, GETCPT+3
IOF	DSPLST+3, CONT+3
IOSL	CONT+2
NAME	GETICDDX+1~, GETICDDX+14, GETICDDX+17, GETICDOP+2~, GETICDOP+14, GETICDOP+17
REC	GETICDDX+1~, GETICDOP+2~
REC(	GETICDOP+5, GETICDOP+6, GETICDOP+7, GETICDOP+8, GETICDOP+11, GETICDOP+12, GETICDOP+13, GETICDOP+14, GETICDOP+15
REC(80	GETICDDX+5, GETICDDX+6, GETICDDX+7, GETICDDX+8, GETICDDX+11, GETICDDX+12, GETICDDX+13, GETICDDX+14, GETICDDX+15
U	ORDERPRO+7, DSPLST+2, DSPLST+3
X	TXTFMT+2~, TXTFMT+5, TXTFMT+6, TXTFMT+7, TXTFMT+8, TXTFMT+11, TXTFMT+12, QUIT+1!
Y	CONT+1, CONT+2!, QUIT+1!

Customize PDF page

Package: Health Summary

Routine: GMTSPXU1

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: