Routine: LRORD3

Information

LRORD3 ;SLC/CJS/DALOI/FHS - MORE LAZY ACCESSION LOGGING ;2/6/91 13:01 [ 04/10/2003 9:46 AM ]

Package	Total	Call Graph
VA Fileman	2	(,IX)^DIC YN^DICN

Package	Total	Caller Graph
Lab Service	9	LRMIBL LRORD LRORD1 LRORD1GU LRORD2 LRORDD LRORDGUI LRQCLOG LRWU1
IHS Changes To Lab	1	BLRORD1

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Variable: % Line Location: LRORD3+3
Function Call: WRITE	Prompt: !,"Answer 'Y' or 'N': " Line Location: LRORD3+3
Function Call: WRITE	Prompt: !!?10," Sorry ** No Lab collect sample Defined for this test ",$C(7),! Line Location: GS+1
Function Call: WRITE	Prompt: !,?5,"The Lab Will collect ",X,!?5,"IS THIS THE CORRECT SAMPLE ? YES // " Line Location: GS+4
Function Call: WRITE	Prompt: !!?15,$C(7),"LAB CAN ONLY COLLECT THIS TYPE SAMPLE " Line Location: GS+4
Function Call: WRITE	Prompt: !!,"For other samples use the WARD COLLECT OR SEND PATIENT options",! Line Location: GS+5
Function Call: WRITE	Prompt: ! Line Location: GS+14
Function Call: WRITE	Prompt: !,I," ",$P(^LAB(62,LRCS(I),0),U)," ",$P(^(0),U,3) Line Location: GS+14
Function Call: READ	Prompt: "Choose one: " Formatting: ! Timeout: DTIME Variable: X Line Location: GS+15
Function Call: WRITE	Prompt: !,"Unknown is not allowed." Line Location: W18A+3
Function Call: WRITE	Prompt: !,"Same specimen/source for the rest of the order" Line Location: G4+4
Routine Call	DIC Line Location: GSNO+2 W18A+2
Routine Call	DIC Line Location: W18A+2

FileNo	Call Tags
^LAB(61 - [#61]	Classic Fileman Calls
^LAB(62 - [#62]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^LAB(60 - [#60]	GS+1, GS+4, GS+6, GS+10, GS+12
^LAB(62 - [#62]	GS+4, GS+10, GS+14, G2+1
^TMP("LRSTIK"	GSS+2

Name	Field # of Occurrence
%	%, GS+3!, GS+4, GS+6, GS+11, G4+2!, G4+4
>> BLRGUI	GSS+2, GS+1, GS+4, GS+6, GS+10, GS+11, GS+14, GS+15, GSNO+2, W18A+1 , W18A+3, G3+1, G4+4
>> D	W18A*
DIC	GSNO+2!, W18A, W18A+2!
DIC(0	GSNO+2, W18A
DTIME	%, GS+15, W18A+1
>> DTOUT	W18A+2
>> DUOUT	W18A+2
>> I	GS+14*
>> J	GS+10, GS+12
>> LRBLEND	G4
>> LRCS(	GS+12*, GS+14, G2
>> LRCS(1	GS+6, GS+10, GSNO+1, GSNO+2
>> LRCSN	GS+6, GS+10, GS+12, GS+13, GS+14, GS+15, GSNO+1*, G2
>> LREND	W18A+2*
>> LRFLOG	G4+1
>> LRLABKY	W18A+3, G4+2
>> LRLWC	GS+1, GS+4, GS+6, GS+7, G4+3
>> LROT	G2*, G3+1
>> LRSAME	GS+2, GS+10, GS+11, GSNO+1, G4, G4+4*
>> LRSAMP	GS+1, GS+2, G2*, G2+1, G3+1, G4, G4+4
>> LRSPEC	GS+1, GS+2, G2+1, G3, G3+1, G4, G4+4
>> LRSSX	GSS+2
>> LRTSTS	GS+1, GS+4, GS+6, GS+10, GS+12
>> LRUNKNOW	W18A+3
>> LRUNQ	GS+6, GS+10, GS+11
U	GSS+2, GS+1, GS+2, GS+4, GS+6, GS+10, GS+14, G2+1, G4+1, G4+4
>> X	GS+4, GS+10, GS+15, W18A+1, W18A+2
>> Y	GS+6, GSNO+2, G2, W18A+2, W18A+3, G3