Routine: LRHDR

Information

LRHDR ;DALOI/CJS/RLM-HEALTH DEPARTMENT REPORT ;2/19/91 10:37

Source file <LRHDR.m>

Package	Total	Call Graph
Kernel	4	^%ZIS ^%ZISC ^%ZTLOAD ($$FMTE,$$NOW)^XLFDT
VA FileMan	2	^%DT EN^DIQ
Lab Service	1	(DD,PT)^LRX
Registration	1	(ADD,KVAR)^VADPT

Name	Line Occurrences
Function Call: WRITE	Prompt: !!!,?5,$P(^LAB(61.2,LRBUG,0),"^",1),! Line Location: LIST+0
Function Call: WRITE	Prompt: !,PNM,?25," ",SSN,?39," ",Y,?55," ",SEX," ",$$FMTE^XLFDT($$NOW^XLFDT,"") Line Location: PATIENT+1
Routine Call	%ZIS Line Location: DATE+1

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^LAB(61.2 - [#61.2]	LIST
^LR - [#63]	PATIENT
^LR("AD"	DISPLAY, LIST

Name	Field # of Occurrence
^(	LIST
^(0	PATIENT

Name	Field # of Occurrence
%DT	DATE*!
%ZIS	DATE+1*!
DA	END!, PATIENT+4*
DFN	END!, PATIENT*, PATIENT+4
DIC	DATE+1!, DISPLAY*
DOB	END!, PATIENT*
DR	END!, DISPLAY*
I	END!, DISPLAY, LIST, PATIENT+3~
IO	DATE+3, DQ
IO("Q"	END!, DATE+2
ION	DATE+2
LRACC	END!, LIST*
LRBUG	END!, DISPLAY*, LIST
LRDFN	END!, LIST*, PATIENT
>> LRDPA	PATIENT
LRDPF	END!, PATIENT*, PATIENT+2
LRDT	END!, DATE*, DISPLAY, LIST
LRIDT	END!
LRIO	END!
LRPGM	END!
LRTIME	END!
N	PATIENT+3~
PNM	END!, PATIENT+1
POP	END!, DATE+1
SEX	END!, PATIENT+1
SSN	END!, PATIENT+1
U	PATIENT
>> VA200	PATIENT*
>> VADM(3	PATIENT
>> VAPA(8	PATIENT+4
X	PATIENT+3~
Y	DATE, PATIENT*, PATIENT+1, PATIENT+3~
ZTDESC	END!, DATE+2*
ZTIO	END!, DATE+2*
>> ZTQUEUED	DQ
>> ZTREQ	DQ*
ZTRTN	END!, DATE+2*
ZTSAVE	END!
ZTSAVE("LRDT"	DATE+2*
ZTSK	END!, DATE+2