Routine: DGENRPB2

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

Package

Total

Call Graph

Registration

($$FINDCUR,$$GET)^DGENA $$CATEGORY^DGENA4 ($$GET,$$PREF)^DGENPTA ($$EXT,$$GETINST)^DGENU $$LOWER^VALM1

Kernel

^%ZISC $$FMTE^XLFDT $$LJ^XLFSTR

VA Fileman

^DIR

Package	Total	Caller Graph
Registration	1	DGENRPB1

Package

Total

Caller Graph

Registration

DGENRPB1

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

External References

Name	Field # of Occurrence
^%ZISC	PRINT+15
$$FINDCUR^DGENA	GETPAT+9
$$GET^DGENA	GETPAT+10, PRNTPATS+16
$$CATEGORY^DGENA4	GETPAT+11
$$GET^DGENPTA	PRNTPATS+17
$$PREF^DGENPTA	GETPAT+14
$$EXT^DGENU	STATUS+3
$$GETINST^DGENU	GETPAT+16
^DIR	PAUSE+5
$$LOWER^VALM1	STATUS+3
$$FMTE^XLFDT	HEADER+5, HEADER+6, 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: !,"Pending Applications For Enrollment - Enrollment Category is ""In Process""" Line Location: HEADER+4
Function Call: WRITE	Prompt: !,"Date Range: "_$$FMTE^XLFDT(DGENBEG)_" to "_$$FMTE^XLFDT(DGENEND) Line Location: HEADER+5
Function Call: WRITE	Prompt: ?50," Run Date: "_$$FMTE^XLFDT(DT) Line Location: HEADER+6
Function Call: WRITE	Prompt: ! Line Location: HEADER+7
Function Call: WRITE	Prompt: !,"AppDt",?17,"Name",?64,"PatientID",?81,"DOB" Line Location: HEADER+8
Function Call: WRITE	Prompt: !,LINE Line Location: HEADER+10
Function Call: WRITE	Prompt: ! Line Location: PAUSE+4
Routine Call	DIR Line Location: PAUSE+5

Name	Line Occurrences (* Changed, ! Killed)
^DPT("AENRC"	GETPAT+6, GETPAT+8
^TMP($J	PRINT+2!, PRINT+16!, GETPAT+18*, PRNTPATS+5, PRNTPATS+7, PRNTPATS+9, PRNTPATS+13, PRNTPATS+15

Label References

Name	Line Occurrences
$$DATE	PRNTPATS+18, PRNTPATS+19
$$LJ	GETPAT+18, PRNTPATS+18, PRNTPATS+19
$$STATUS	PRNTPATS+11
GETPAT	PRINT+7
HEADER	PRINT+10, LINE+7, LINE+12
LINE	PRNTPATS+6, PRNTPATS+7, PRNTPATS+10, PRNTPATS+11, PRNTPATS+20
PAUSE	PRINT+13, LINE+4
PRNTPATS	PRINT+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
APP	PRNTPATS+3~, PRNTPATS+12, PRNTPATS+13, PRNTPATS+15, PRNTPATS+18
CRT	PRINT+1~, PRINT+5*, PRINT+9, PRINT+13, LINE+3, LINE+10
DATE	DATE~, DATE+1
DFN	GETPAT+4~, GETPAT+7, GETPAT+8, GETPAT+9, GETPAT+11, GETPAT+14
>> DGENBEG	GETPAT+17, HEADER+5
>> DGENEND	GETPAT+17, HEADER+5
>> DGENINST(	GETPAT+17
>> DGENINST("ALL"	GETPAT+17
DGENR	GETPAT+4~, GETPAT+10, PRNTPATS+3~, PRNTPATS+16
DGENR("APP"	GETPAT+17, GETPAT+18
DGENR("DFN"	PRNTPATS+17
DGENR("STATUS"	GETPAT+18
DGENRIEN	GETPAT+4~, GETPAT+9, GETPAT+10, GETPAT+18, PRNTPATS+3~, PRNTPATS+14, PRNTPATS+15*, PRNTPATS+16
DGINST	GETPAT+13~, GETPAT+16
DGINST("NAME"	GETPAT+18
DGINST("STANUM"	GETPAT+18
DGPAT	PRNTPATS+3~, PRNTPATS+17
DGPAT("DOB"	PRNTPATS+19
DGPAT("NAME"	PRNTPATS+18
DGPAT("PID"	PRNTPATS+19
DGPFH	GETPAT+13~
DGPFH("EFFDATE"	GETPAT+15*, GETPAT+18
DGPFH("PREFAC"	GETPAT+15*, GETPAT+16
DIR	PAUSE+3~
DIR(0	PAUSE+5*
>> DIRUT	PAUSE+6
DT	HEADER+6
EFFDATE	GETPAT+4~
I	GETPAT+4~
IO	PRINT+8
IOF	PRINT+9, LINE+6, LINE+11
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+9, HEADER+10, PRNTPATS+3~, PRNTPATS+18, PRNTPATS+19* , PRNTPATS+20
PAGE1	PRINT+1~, PRINT+4, PRINT+9
PREFAC	GETPAT+13~, GETPAT+14, GETPAT+15, GETPAT+16, GETPAT+17, PRNTPATS+3~, PRNTPATS+4, PRNTPATS+5, PRNTPATS+7, PRNTPATS+9 , PRNTPATS+13, PRNTPATS+15
QUIT	PRINT+1~, PRINT+3, PRINT+13, LINE+5, PAUSE+6, PRNTPATS+5, PRNTPATS+6, PRNTPATS+7, PRNTPATS+10, PRNTPATS+11 , PRNTPATS+13, PRNTPATS+15
STATS	PRINT+1~
STATUS	GETPAT+4~, GETPAT+5, GETPAT+6, GETPAT+8, PRNTPATS+3~, PRNTPATS+8, PRNTPATS+9, PRNTPATS+11, PRNTPATS+13, PRNTPATS+15 , STATUS~, STATUS+3
STRING	LJ~, LJ+1
X	PAUSE+3~
Y	PAUSE+3~, PAUSE+6
>> ZTQUEUED	PRINT+14
>> ZTREQ	PRINT+14*

Customize PDF page

Package: Registration

Routine: DGENRPB2

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: