Routine: LRMIEDZ3

Information

LRMIEDZ3 ; IHS/DIR/FJE - MICROBIOLOGY EDIT ROUTINE CONT. 7/21/87 11:01 ;

Source file <LRMIEDZ3.m>

Package	Total	Call Graph
VA Fileman	3	^%DT NOW^%DTC YN^DICN
Lab Service	1	DD^LRX

Package	Total	Caller Graph
Automated Lab Instruments	2	LAMIAUT4 LAMIVTL4
Lab Service	1	LRMIEDZ2

Name	Comments	DBIA/ICR reference
COMP
POST
DEL
STORE
TIME	;from LRMIEDZ2	ICR #5488 Status: Withdrawn Usage: Private

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$P(^LAB(60,LRTS,0),U)," completed: " Line Location: COMP+0
Function Call: READ	Timeout: DTIME Variable: X Line Location: COMP+1
Function Call: WRITE	Prompt: !," Sure you want to delete" Line Location: DEL+0
Function Call: WRITE	Prompt: !,"This will set the test back to 'incomplete' status." Line Location: DEL+0
Function Call: WRITE	Prompt: !,$C(7),"Date must not be in the future.",! Line Location: STORE+0
Function Call: WRITE	Prompt: !,$P(^LAB(60,+LRTS(J),0),U) Line Location: POST+1
Function Call: WRITE	Prompt: !," Have the same edit template.",!," Are all complete" Line Location: POST+3

Name	Line Occurrences (* Changed, ! Killed)
^LAB(60 - [#60]	COMP, POST+1
^LRO(68 - [#68]	COMP, DEL+1!, STORE+1, POST+3, POST+4*

Name	Field # of Occurrence
^(0	POST+4*

Name	Field # of Occurrence
>> %	DEL, DEL+1, STORE, POST+3, POST+4
%DT	TIME+1, TIME+3!, COMP+3
DTIME	COMP+1
DUZ	STORE+1, POST+4
>> I	TIME+1, DEL, POST, POST+1, POST+3*
>> J	POST+1, POST+4
>> K	POST+1*, POST+2
>> LRAA	COMP, DEL+1, STORE+1, POST+3, POST+4
>> LRAD	COMP, DEL+1, STORE+1, POST+3, POST+4
>> LRAN	COMP, DEL+1, STORE+1, POST+3, POST+4
>> LREND	TIME+1, COMP+1
>> LRFIFO	TIME+1
>> LRI	POST*, POST+1, POST+4
>> LRSAME	TIME+2
>> LRTS	COMP, DEL+1, STORE+1, POST, POST+3
>> LRTS(	POST, POST+1, POST+4
>> LRTX(	POST+1, POST+4
U	TIME+1, TIME+2, COMP, COMP+1, COMP+2, DEL+1, STORE+1, POST+1, POST+3, POST+4
>> X	TIME+1, TIME+2, COMP+1, COMP+2, COMP+3
>> Y	TIME+1, COMP, COMP+1, DEL+1, STORE, STORE+1, POST+3, POST+4