Routine: DG53P621

Information

DG53P621 ;BAY/JAT - Patient File reporting; 6/7/04 7:13pm ; 10/8/04 11:25am

Package	Total	Call Graph
Kernel	4	(,HOME)^%ZIS ^%ZISC (,$$S)^%ZTLOAD ($$FMTE,$$NOW)^XLFDT
VA Fileman	2	C^%DTC ^DIR

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Nbr records with abnormal SSN: "_COUNT Line Location: READFILE+15
Function Call: WRITE	Prompt: !!,"* COUNT OF BAD PATIENT RECORDS: ",COUNT," *",!! Line Location: PRINT+8
Function Call: WRITE	Prompt: @IOF,!,DGDDT,?15,"DG5.3621 List of abnormal SSNs",?70,"Page:",$J(DGPG,5),! Line Location: HEAD+5
Function Call: WRITE	Prompt: X,! Line Location: HEAD+5
Function Call: WRITE	Prompt: ! Line Location: HEAD+6
Function Call: WRITE	Prompt: !,?2,"DFN",?13,"ZERO NODE",! Line Location: HEAD+7
Function Call: WRITE	Prompt: X,! Line Location: HEAD+8
Routine Call	%ZIS Line Location: DEVICE+17
Routine Call	DIR Line Location: PRINT+16 HEAD+2
Routine Call	%ZIS Line Location: DEVICE+10

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	READFILE+3, READFILE+5, READFILE+7, READFILE+8, READFILE+9
^XTMP("DG53P621"	REPORT+2!, REPORT+4, STORE+2, PRINT+10, PRINT+12

Name	Field # of Occurrence
%ZIS	DEVICE+7~, DEVICE+9*
COUNT	READFILE+1~, READFILE+2, READFILE+15, STORE+1, PRINT+6, PRINT+8
DFN	READFILE+1~, READFILE+2, READFILE+3, READFILE+5, READFILE+7, READFILE+8, READFILE+9, STORE+2, PRINT+9, PRINT+10 , PRINT+12, PRINT+13
DGDDT	PRINT+2~, PRINT+3*, HEAD+5
DGPG	PRINT+2~, PRINT+4, PRINT+16, HEAD+2, HEAD+4, HEAD+5
DGQUIT	PRINT+2~, PRINT+4, PRINT+10, PRINT+15, PRINT+16, HEAD+1, HEAD+2, HEAD+3
DGSSN	READFILE+1~, READFILE+11*, READFILE+12
DGZERO	READFILE+1~, READFILE+9, READFILE+10, READFILE+11, STORE+2, PRINT+12, PRINT+13
DIR	PRINT+16!, HEAD+2!
DIR(0	PRINT+16, HEAD+2
DT	REPORT+3, REPORT+4
IO	PRINT+1
IO("Q"	DEVICE+12
IOF	HEAD+5
IOP	DEVICE+7~
IOSL	PRINT+11
IOST	PRINT+16, HEAD+2
OK	DEVICE+7~, DEVICE+8, DEVICE+11, DEVICE+12, DEVICE+18*, DEVICE+19
POP	DEVICE+7~, DEVICE+11
U	READFILE+7, READFILE+10, READFILE+11
X	REPORT+4, HEAD+5!, HEAD+8
X1	REPORT+1~, REPORT+3*
X2	REPORT+1~, REPORT+3*
>> Y	PRINT+16, HEAD+2
ZTDESC	DEVICE+13~, DEVICE+14*
>> ZTQUEUED	ENTER+4, PRINT+15, PRINT+17, HEAD+1
ZTREQ	ENTER+4, DEVICE+13~, PRINT+17
ZTRTN	DEVICE+13~, DEVICE+14*
>> ZTSK	DEVICE+16
ZTSKM	DEVICE+13~
ZTSTOP	DEVICE+13~, HEAD+1*