Routine: DGENRPC2

Package	Total	Call Graph
Registration	5	($$FINDCUR,$$GET)^DGENA ($$CATEGORY,$$EXTCAT)^DGENA4 ($$GET,$$NAME,$$PREF)^DGENPTA ($$EXT,$$GETINST)^DGENU $$LOWER^VALM1
Kernel	3	^%ZISC $$FMTE^XLFDT $$LJ^XLFSTR
VA Fileman	1	^DIR

Package	Total	Caller Graph
Registration	1	DGENRPC1

Entry Points

Name	Comments	DBIA/ICR reference
PAUSE	;
STATUS(STATUS)	;
GETPAT	;
SUMMARY	;
HEADER	;
PATIENTS	;
DATE(DATE)	;
LJ(STRING,LENGTH)	;
PRINT	;
LINE(LINE)	;

External References

Name	Field # of Occurrence
^%ZISC	PRINT+20
$$FINDCUR^DGENA	GETPAT+11
$$GET^DGENA	GETPAT+13, PATIENTS+29
$$CATEGORY^DGENA4	GETPAT+12
$$EXTCAT^DGENA4	SUMMARY+13, PATIENTS+13
$$GET^DGENPTA	PATIENTS+30
$$NAME^DGENPTA	GETPAT+15
$$PREF^DGENPTA	GETPAT+19
$$EXT^DGENU	GETPAT+16, HEADER+21, PATIENTS+33, PATIENTS+34, STATUS+4
$$GETINST^DGENU	GETPAT+21
^DIR	PAUSE+6
$$LOWER^VALM1	STATUS+4
$$FMTE^XLFDT	HEADER+11, DATE+1
$$LJ^XLFSTR	LJ+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: PRINT+9
Function Call: WRITE	Prompt: !,LINE Line Location: LINE+15
Function Call: WRITE	Prompt: @IOF Line Location: HEADER+4
Function Call: WRITE	Prompt: !,"Enrollments by Status, Priority, and Preferred Facility" Line Location: HEADER+5
Function Call: WRITE	Prompt: ?100,"Page ",PAGE Line Location: HEADER+6
Function Call: WRITE	Prompt: ! Line Location: HEADER+9
Function Call: WRITE	Prompt: $S(SECTION="SUMMARY":" <<< SUMMARY STATISTICS >>>",1:" <<< PATIENT LISTING >>>") Line Location: HEADER+10
Function Call: WRITE	Prompt: ?100,"Run Date: "_$$FMTE^XLFDT(DT) Line Location: HEADER+11
Function Call: WRITE	Prompt: ! Line Location: HEADER+12
Function Call: WRITE	Prompt: $$EXT^DGENU("STATUS",STATUS)_"," Line Location: HEADER+21
Function Call: WRITE	Prompt: PRIORITY_", " Line Location: HEADER+29
Function Call: WRITE	Prompt: !,LINE,! Line Location: HEADER+32
Function Call: WRITE	Prompt: ! Line Location: PAUSE+4
Function Call: WRITE	Prompt: !! Line Location: SUMMARY+34
Routine Call	DIR Line Location: PAUSE+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT("AENRC"	GETPAT+6, GETPAT+8
^TMP($J	PRINT+2!, PRINT+21!, GETPAT+25, GETPAT+26, GETPAT+28*, SUMMARY+6, SUMMARY+8, SUMMARY+12, SUMMARY+15, SUMMARY+16 , SUMMARY+21, SUMMARY+22, PATIENTS+7, PATIENTS+9, PATIENTS+11, PATIENTS+16, PATIENTS+18, PATIENTS+20, PATIENTS+22, PATIENTS+24 , PATIENTS+26

Label References

Name	Line Occurrences
$$DATE	PATIENTS+32, PATIENTS+35, PATIENTS+36
$$LJ	GETPAT+24, SUMMARY+8, SUMMARY+9, SUMMARY+13, SUMMARY+18, PATIENTS+9, PATIENTS+13, PATIENTS+31, PATIENTS+32, PATIENTS+33 , PATIENTS+34, PATIENTS+35, PATIENTS+36
$$STATUS	SUMMARY+18
GETPAT	PRINT+7
HEADER	PRINT+12, PRINT+16, LINE+7, LINE+12
LINE	SUMMARY+7, SUMMARY+8, SUMMARY+9, SUMMARY+13, SUMMARY+18, SUMMARY+23, SUMMARY+24, SUMMARY+26, SUMMARY+30, SUMMARY+31 , SUMMARY+35, PATIENTS+8, PATIENTS+9, PATIENTS+12, PATIENTS+13, PATIENTS+14, PATIENTS+37
PATIENTS	PRINT+17
PAUSE	PRINT+18, LINE+4
SUMMARY	PRINT+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CATEGORY	GETPAT+9~, GETPAT+12, GETPAT+25, GETPAT+26, GETPAT+28, SUMMARY+11, SUMMARY+12, SUMMARY+13, SUMMARY+15, SUMMARY+16 , SUMMARY+21, SUMMARY+22, PATIENTS+3~, PATIENTS+10, PATIENTS+11*, PATIENTS+13, PATIENTS+16, PATIENTS+18, PATIENTS+20, PATIENTS+22 , PATIENTS+24, PATIENTS+26
COUNT	SUMMARY+3~, SUMMARY+16, SUMMARY+17, SUMMARY+18, SUMMARY+22, SUMMARY+23, SUMMARY+24
CRT	PRINT+1~, PRINT+5*, PRINT+9, PRINT+18, LINE+3, LINE+10
DATE	DATE~, DATE+1
DFN	GETPAT+4~, GETPAT+7, GETPAT+8, GETPAT+11, GETPAT+12, GETPAT+15, GETPAT+19, PATIENTS+3~, PATIENTS+23, PATIENTS+24 , PATIENTS+26
DGENR	GETPAT+9~, GETPAT+13, PATIENTS+3~, PATIENTS+29
DGENR("DATE"	GETPAT+28, PATIENTS+35
DGENR("DFN"	GETPAT+28, PATIENTS+30
DGENR("END"	PATIENTS+36
DGENR("PRIORITY"	GETPAT+23, GETPAT+27, PATIENTS+34
DGENR("STATUS"	GETPAT+14, GETPAT+25, GETPAT+26, GETPAT+28, PATIENTS+33
DGENR("SUBGRP"	GETPAT+16*, GETPAT+23, PATIENTS+34
DGENRIEN	GETPAT+9~, GETPAT+11, GETPAT+13, GETPAT+28, PATIENTS+3~, PATIENTS+27, PATIENTS+28, PATIENTS+29
>> DGENRP("FACILITY"	GETPAT+22
>> DGENRP("LIST"	PRINT+14, GETPAT+27, HEADER+13
>> DGENRP("PRIORITY"	GETPAT+27, HEADER+24, HEADER+29
>> DGENRP("STATUS"	GETPAT+27, HEADER+16, HEADER+21
DGINST	GETPAT+9~, GETPAT+21
DGINST("NAME"	GETPAT+24
DGINST("STANUM"	GETPAT+24, GETPAT+28
DGPAT	PATIENTS+3~, PATIENTS+30
DGPAT("DOB"	PATIENTS+32
DGPAT("NAME"	PATIENTS+31
DGPAT("PID"	PATIENTS+31
DGPFH	GETPAT+9~
DGPFH("EFFDATE"	GETPAT+20*, GETPAT+28
DGPFH("PREFAC"	GETPAT+20*, GETPAT+21
DIR	PAUSE+3~
DIR(0	PAUSE+5*
>> DIRUT	PAUSE+7
DT	HEADER+11
EFFDATE	GETPAT+9~
ENRDATE	PATIENTS+3~, PATIENTS+21, PATIENTS+22, PATIENTS+24, PATIENTS+26
FACNAME	GETPAT+9~, GETPAT+10, GETPAT+24, GETPAT+25, GETPAT+26, GETPAT+28
GRNDTOTL	SUMMARY+3~, SUMMARY+5, SUMMARY+29, SUMMARY+35
I	PATIENTS+3~, PATIENTS+11*, PATIENTS+12
IO	PRINT+8
IOF	PRINT+9, LINE+6, LINE+11, HEADER+4
IOSL	LINE+3, LINE+10, PAUSE+4
IOST	PRINT+5
LENGTH	LJ~, LJ+1
LINE	LINE~, LINE+8, LINE+13, LINE+15, HEADER+3~, HEADER+31, HEADER+32, SUMMARY+3~, PATIENTS+3~, PATIENTS+31 , PATIENTS+32, PATIENTS+33, PATIENTS+34, PATIENTS+35, PATIENTS+36*, PATIENTS+37
NODE	PATIENTS+3~, PATIENTS+26*, PATIENTS+27
PAGE	PRINT+1~, PRINT+4, PRINT+9, PRINT+10, HEADER+6, HEADER+7*
PATNAME	GETPAT+9~, GETPAT+15, GETPAT+17, GETPAT+28, PATIENTS+3~, PATIENTS+19, PATIENTS+20*, PATIENTS+22, PATIENTS+24, PATIENTS+26
PREFAC	GETPAT+9~, GETPAT+19, GETPAT+20, GETPAT+21, GETPAT+22, GETPAT+24, SUMMARY+3~, SUMMARY+4, SUMMARY+6, SUMMARY+8 , SUMMARY+12, SUMMARY+15, SUMMARY+16, SUMMARY+21, SUMMARY+22, SUMMARY+30, SUMMARY+31, PATIENTS+3~, PATIENTS+5, PATIENTS+7 , PATIENTS+9, PATIENTS+11, PATIENTS+16, PATIENTS+18, PATIENTS+20, PATIENTS+22, PATIENTS+24, PATIENTS+26
PRIORITY	HEADER+27~, HEADER+28, HEADER+29, SUMMARY+3~, SUMMARY+20, SUMMARY+21, SUMMARY+22, SUMMARY+23, SUMMARY+24, PATIENTS+3~ , PATIENTS+17, PATIENTS+18, PATIENTS+20, PATIENTS+22, PATIENTS+24, PATIENTS+26
PRISUB	GETPAT+9~, GETPAT+23*, GETPAT+26, GETPAT+28
QUIT	PRINT+1~, PRINT+3, PRINT+18, LINE+5, PAUSE+7, SUMMARY+6, SUMMARY+7, SUMMARY+8, SUMMARY+9, SUMMARY+12 , SUMMARY+15, SUMMARY+19, SUMMARY+21, SUMMARY+25, SUMMARY+27, SUMMARY+28, SUMMARY+32, SUMMARY+33, SUMMARY+36, PATIENTS+7 , PATIENTS+8, PATIENTS+9, PATIENTS+11, PATIENTS+12, PATIENTS+14, PATIENTS+16, PATIENTS+18, PATIENTS+20, PATIENTS+22, PATIENTS+24 , PATIENTS+38, PATIENTS+39
SECTION	PRINT+1~, PRINT+11, PRINT+15, HEADER+10, HEADER+13, HEADER+30
STATS	PRINT+1~
STATUS	GETPAT+4~, GETPAT+5, GETPAT+6, GETPAT+8, GETPAT+12, GETPAT+14, GETPAT+27, HEADER+19~, HEADER+20, HEADER+21 , SUMMARY+3~, SUMMARY+14, SUMMARY+15, SUMMARY+16, SUMMARY+18, SUMMARY+21, SUMMARY+22, PATIENTS+3~, PATIENTS+15, PATIENTS+16 , PATIENTS+18, PATIENTS+20, PATIENTS+22, PATIENTS+24, PATIENTS+26, STATUS~, STATUS+3, STATUS+4
STRING	LJ~, LJ+1
TOTAL	SUMMARY+3~, SUMMARY+10, SUMMARY+17, SUMMARY+29, SUMMARY+30, SUMMARY+31
X	PAUSE+3~
Y	PAUSE+3~, PAUSE+7
>> ZTQUEUED	PRINT+19
>> ZTREQ	PRINT+19*

Customize PDF page

Package: Registration

Routine: DGENRPC2

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: