Routine: SRHLVOOR

Information

SRHLVOOR ;B'HAM ISC/DLR - Surgery Interface Outgoing ORU message ; [ 06/02/98 9:04 AM ]

Source file <SRHLVOOR.m>

Package	Total	Call Graph
Surgery	3	PID^SRHLVUO OBR^SRHLVUO4 STATUS^SROERR0
Health Level Seven	1	(EN,INIT,KILL)^HLTRANS

Package	Total	Caller Graph
Surgery	1	SRHLOORU

Name	Comments	DBIA/ICR reference
SEND	;
CHECK	;checks ^XTMP for duplicate modification messages
SEG	;segments
START	;
INIT
EXIT	;
DISPLAY	;screen message to user
MSG(CASE,SRSTATUS,SREVENT)	;send ORU message

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Sending an observation result message for case #",CASE Line Location: DISPLAY+1

Name	Line Occurrences (* Changed, ! Killed)
^HL(770 - [#770]	START+4
^HL(771 - [#771]	INIT, INIT+1, START+4
^SRO(133.2 - [#133.2]	INIT+3, INIT+4
^TMP("HLS"	START+2!, START+10, CHECK+3, CHECK+5, CHECK+8
^XTMP("SRHL7"	CHECK+2, CHECK+4, CHECK+5, CHECK+6, CHECK+7!, CHECK+8

Name	Field # of Occurrence
CASE	MSG~, SEG+4, DISPLAY+1, CHECK+2, CHECK+4, CHECK+5, CHECK+6, CHECK+7, CHECK+8
DT	CHECK+7
HLCOMP	START+3~, START+8*
>> HLDAP	INIT*, INIT+1
>> HLECH	START+7*, START+8
>> HLFS	START+7*
HLMTN	START+6*, SEND+2!
>> HLNDAP	START+6*
>> HLQ	START+7*
HLREP	START+3~, START+8*
HLSDT	START+6*, SEND+2!, CHECK+3, CHECK+5, CHECK+8
HLSUB	START+3~, START+8*
>> OBRCHK	SEG+3*, SEG+5
OUT	START+3~, START+11, START+12, SEG+5
PRT	START+3~, START+4, START+5
SREVENT	MSG~
SRI	START+3~, START+4*, SEG+1, SEG+3, SEG+4, SEG+5
SRNAP	START+1~, START+4*, CHECK+2, CHECK+4, CHECK+5, CHECK+6, CHECK+7, CHECK+8
SRSTATUS	MSG~, INIT+5, INIT+6
SRX	START+3~, START+4*, START+6
U	INIT+1, INIT+4
UPDATE	START+3~, START+4, START+11, SEND+1, CHECK+3, CHECK+4, CHECK+5, CHECK+6*, CHECK+7
X	CHECK+1~, CHECK+3, CHECK+4, CHECK+5, CHECK+6, CHECK+8