Routine: GMRCSTLA

Information

GMRCSTLA ;SLC/JFR,WAT - DRIVER FOR LOCAL CSLT COMPL RATE ;

Package	Total	Call Graph
Consult Request Tracking	5	SERV1^GMRCASV ^GMRCSPD ENOR^GMRCSTLA (DELTOT,ONESTAT,PRTTOT)^GMRCSTLB LISTDATE^GMRCSTU1
Kernel	4	^%ZISC ($$FMTE,$$HTE)^XLFDT $$REPEAT^XLFSTR EN^XUTMDEVQ
VA FileMan	1	^DIR

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 2

Package	Total	Caller Graph
Consult Request Tracking	2	GMRC RPT LOCAL COMPLETE RATE GMRCSTLA

Entry Points

Name	Comments	DBIA/ICR reference
EN
ENOR(RETURN,GMRCSVC,GMRCDT1,GMRCDT2,GMRCSTAT,GMRCARRN)	;Entry point
PRNTQ
HEAD(PAGE)	; print header
EXIT

External References

Name	Field # of Occurrence
^%ZISC	PRNTQ+40
^DIR	EN+9, EN+20, PRNTQ+19, PRNTQ+34
SERV1^GMRCASV	ENOR+23, PRNTQ+4
^GMRCSPD	EN+14
ENOR^GMRCSTLA	PRNTQ+12
DELTOT^GMRCSTLB	ENOR+64, ENOR+88, ENOR+97
ONESTAT^GMRCSTLB	ENOR+73
PRTTOT^GMRCSTLB	ENOR+62, ENOR+86, ENOR+95
LISTDATE^GMRCSTU1	ENOR+27
$$FMTE^XLFDT	PRNTQ+7
$$HTE^XLFDT	HEAD+2
$$REPEAT^XLFSTR	PRNTQ+28, HEAD+4
EN^XUTMDEVQ	EN+31

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: EN+24
Function Call: WRITE	Prompt: !,$J("",23)_"Local Consult Completion Rates" Line Location: PRNTQ+6
Function Call: WRITE	Prompt: !,$J("",40-($L(TEMP)/2)+.5)_TEMP,! Line Location: PRNTQ+9
Function Call: WRITE	Prompt: !!,"No records to print" Line Location: PRNTQ+11
Function Call: WRITE	Prompt: !!,"No records to print",! Line Location: PRNTQ+14
Function Call: WRITE	Prompt: ^TMP("GMRCR",$J,GMRCFMT,IDX,0),! Line Location: PRNTQ+24
Function Call: WRITE	Prompt: !!!,$$REPEAT^XLFSTR("-",IOM-5) Line Location: PRNTQ+28
Function Call: WRITE	Prompt: !,"Consult services with no activity meeting the criteria of this report in",!,"the specified date range:",! Line Location: PRNTQ+29
Function Call: WRITE	Prompt: ?4,IDX,! Line Location: PRNTQ+39
Function Call: WRITE	Prompt: @IOF Line Location: HEAD+1
Function Call: WRITE	Prompt: "Local Consult Completion Rates",?40,$$HTE^XLFDT($H) Line Location: HEAD+2
Function Call: WRITE	Prompt: ?73,"Page: ",PAGE,! Line Location: HEAD+3
Function Call: WRITE	Prompt: $$REPEAT^XLFSTR("-",IOM-2),! Line Location: HEAD+4
Routine Call	DIR Line Location: EN+9 EN+20 PRNTQ+19 PRNTQ+34

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^GMR(123.5 - [#123.5]	ENOR+20, ENOR+95, ENOR+97
^TMP(	EXIT!
^TMP("GMRCR"	ENOR+17!, ENOR+34!, ENOR+42*, PRNTQ+13, PRNTQ+16, PRNTQ+24
^TMP("GMRCRINDEX"	ENOR+34!
^TMP("GMRCSLIST"	ENOR+45, ENOR+46, ENOR+47, ENOR+48, ENOR+67, PRNTQ+10
^TMP("GMRCTOT"	ENOR+34!, ENOR+49, ENOR+50, ENOR+51, ENOR+52, ENOR+53, ENOR+54, ENOR+55, ENOR+56, ENOR+76* , ENOR+78, ENOR+80, ENOR+82*, PRNTQ+26, PRNTQ+31

Label References

Name	Line Occurrences
EXIT	EN+15, EN+21, EN+33, PRNTQ+10, PRNTQ+41
HEAD	PRNTQ+5, PRNTQ+22, PRNTQ+27, PRNTQ+37

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ARR	EXIT*, EXIT+1!
DIR	EN+2~, EN+18!, PRNTQ+19~, PRNTQ+34~
DIR("??"	EN+7*
DIR("A"	EN+8, EN+19
DIR(0	EN+7, EN+19, PRNTQ+19, PRNTQ+34
DIROUT	EN+2~
DIRUT	EN+2~
DTOUT	EN+2~
DUOUT	EN+2~
GMRCARRN	ENOR~, ENOR+17, ENOR+34, ENOR+38, ENOR+42, ENOR+61, ENOR+62, ENOR+63, ENOR+64, ENOR+73 , ENOR+85, ENOR+86, ENOR+87, ENOR+88, ENOR+94, ENOR+95, ENOR+96, ENOR+97
GMRCD	ENOR+30~
GMRCDA	ENOR+29~
GMRCDG	EN+2~, EN+11, ENOR+16~, ENOR+22, PRNTQ+12
GMRCDLA	ENOR+31~
GMRCDT	ENOR+30~
GMRCDT1	EN+2~, ENOR~, ENOR+25*, ENOR+26, ENOR+27, ENOR+73, PRNTQ+7, PRNTQ+8, PRNTQ+12
GMRCDT2	EN+3~, ENOR~, ENOR+26*, ENOR+27, ENOR+73, PRNTQ+7, PRNTQ+12
GMRCEDT1	ENOR+16~, ENOR+27
GMRCEDT2	ENOR+16~, ENOR+27
GMRCFMT	EN+3~, EN+22*, PRNTQ+12, PRNTQ+13, PRNTQ+16, PRNTQ+24, PRNTQ+25
GMRCGRP	EN+3~, ENOR+16~
GMRCHEAD	ENOR+16~
GMRCIDD	ENOR+32~
GMRCIRF	ENOR+32~
GMRCIRFN	ENOR+32~
GMRCLOC	ENOR+31~
GMRCPG	PRNTQ+2~, PRNTQ+3, PRNTQ+5, PRNTQ+22, PRNTQ+27, PRNTQ+37*
GMRCPT	ENOR+30~
GMRCPTN	ENOR+31~
GMRCPTSN	ENOR+31~
GMRCQUT	EN+1!, EN+15, PRNTQ+2~, PRNTQ+16, PRNTQ+20, PRNTQ+21, PRNTQ+23, PRNTQ+25, PRNTQ+31, PRNTQ+35 , PRNTQ+36, PRNTQ+38
GMRCRDT	ENOR+32~
GMRCSAVE	EN+3~, EN+31
GMRCSAVE("GMRCDG"	EN+26*
GMRCSAVE("GMRCDT1"	EN+27*
GMRCSAVE("GMRCDT2"	EN+28*
GMRCSAVE("GMRCFMT"	EN+25*
GMRCSAVE("GMRCSVNM"	EN+29*
GMRCST	ENOR+32~
GMRCSTAT	ENOR~, ENOR+72
GMRCSVC	EN+2~, ENOR~, ENOR+19, ENOR+20, ENOR+22, ENOR+46, ENOR+49, ENOR+50, ENOR+51, ENOR+52 , ENOR+53, ENOR+54, ENOR+55, ENOR+56, ENOR+70, ENOR+76, ENOR+78, ENOR+80, ENOR+82, ENOR+86 , ENOR+88
GMRCSVCG	ENOR+30~, ENOR+48*, ENOR+58, ENOR+60
GMRCSVCP	ENOR+31~, ENOR+47*, ENOR+86, ENOR+88
GMRCSVNM	EN+2~, EN+11*
GMRCTMP	EN+2~, PRNTQ+2~, PRNTQ+12
GMRCXDT	ENOR+31~
GROUPER	ENOR+29~, ENOR+36, ENOR+58, ENOR+60, ENOR+62, ENOR+64, ENOR+66, ENOR+69, ENOR+70, ENOR+74 , ENOR+93, ENOR+95, ENOR+97
GROUPER(	ENOR+58, ENOR+60, ENOR+62, ENOR+64, ENOR+70*, ENOR+76, ENOR+78, ENOR+80, ENOR+82, ENOR+95 , ENOR+97
GROUPER(0	ENOR+37*
GRP	ENOR+32~, ENOR+74*, ENOR+76, ENOR+78, ENOR+80, ENOR+82
IDX	PRNTQ+2~, PRNTQ+15, PRNTQ+16, PRNTQ+24, PRNTQ+30, PRNTQ+31, PRNTQ+39
INDEX	ENOR+29~, ENOR+43, ENOR+45, ENOR+46, ENOR+47, ENOR+48, ENOR+67, ENOR+73
IOF	EN+24, HEAD+1
IOM	PRNTQ+28, HEAD+4
IOSL	PRNTQ+17, PRNTQ+27, PRNTQ+32
IOST	PRNTQ+18, PRNTQ+33
LINETEMP	ENOR+30~
LOOP	ENOR+29~, ENOR+72*
PAGE	HEAD~, HEAD+3
RETURN	ENOR~, ENOR+18*
STATUS	ENOR+29~, ENOR+72*, ENOR+73
STR	ENOR+39~, ENOR+40, ENOR+41, ENOR+42
STS	ENOR+30~
TEMP	ENOR+30~, PRNTQ+2~, PRNTQ+7, PRNTQ+8, PRNTQ+9
U	EN+11
VALMBCK	EN+3~, ENOR+16~
VALMCNT	ENOR+16~
X	EN+18!
Y	EN+6~, EN+10, EN+11, EN+18!, EN+21, EN+22, PRNTQ+20, PRNTQ+35

Customize PDF page

Package: Consult Request Tracking

Routine: GMRCSTLA

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: