Routine: INHVAMR

Information

INHVAMR ;JSH; 27 May 94 09:34; VA gateway/MDIS Receiver

Source file <INHVAMR.m>

Package	Total	Call Graph
IHS Generic Interface System	2	$$NEW^INHD ENR^INHE
VA Fileman	2	^DIE ^DIK

Name	Comments	DBIA/ICR reference
RECEIVE	;Receiver
NOCON
LP1	;Look for a message using the APS cross reference
DEST	;The following tags are used to determine destination
DEL	;Delete entry
LOOP	;Restart at top of queue
WAIT	;Wait for new messages to appear in the queue
STORE	;store in UIF
MP	;Mark as processed

Name	Line Occurrences (* Changed, ! Killed)
^INRHB("RUN"	LOOP+1, LP1+1
^INVAMI(	LP1+1, LP1+4, LP1+5, LP1+7, LP1+8, NOCON, DEL+3, MP+3
^INVAMI("APS"	LP1+2

Name	Field # of Occurrence
^(	LP1+7, LP1+8

Name	Field # of Occurrence
>> %	LP1+7, LP1+8
>> %1	LP1+7*, LP1+8
>> %2	LP1+8*
>> ACK	LP1+10, NOCON+3, STORE+4
>> DA	DEL+1, MP+1
>> DEST	LP1+10, NOCON+3, NOCON+4, STORE+4
>> DIE	MP+1*
>> DIK	DEL+1*
>> DR	MP+1*
>> IN	LOOP+1, LP1+1, LP1+2, LP1+4, LP1+5, LP1+7, LP1+8, LP1+9, LP1+12, LP1+14 , NOCON, NOCON+4, STORE+1, STORE+6, DEL+1, DEL+3, MP+1, MP+3
>> INBPN	LOOP+1, LP1+1, LP1+9, LP1+12, LP1+14, NOCON+4, STORE+1, STORE+6
INDATA	LP1+6!
INDATA(	LP1+7, LP1+8
INDATA(1	STORE+1
INDATA(2	LP1+9, LP1+10, LP1+14
>> ING	LP1+6*
>> MESSID	STORE+1, STORE+2, STORE+4
>> SYSTEM	RECEIVE+4*
U	LP1+5, LP1+14, NOCON+4, STORE+1
>> X	LP1+14, NOCON+4, STORE+4, STORE+6
>> XX	NOCON*

Name	Field # of Occurrence
$T(@$PIECE^2;4(5)	NOCON+3