Routine: AMQQRMFF

Information

AMQQRMFF ; IHS/CMI/THL - ASCII FLAT FILE MAKER ;

Source file <AMQQRMFF.m>

Package	Total	Call Graph
PCC Medical Query	1	$$KEYCHECK^AMQQUTIL

Name	Comments	DBIA/ICR reference
MLIST
M1
TEXT	;
LIST
LSET
EXIT
OUTPUT	; ENTRY POINT FOR PRODUCING A FLAT FILE OUTPUT
TRANS
CHECK

Name	Field # of Occurrence
$$KEYCHECK^AMQQUTIL	CHECK

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Sorry, you do not hold a Q-Man programmer access key. Request denied!",*7 Line Location: CHECK+1
Function Call: WRITE	Prompt: !!,"Sorry, this option is only available on systems which use Micronetics MUMPS",!,"Request denied!",*7 Line Location: CHECK+2
Function Call: WRITE	Prompt: !!,"Sorry, this option available for searches that have a subject dealing with",!,"patients.",*7 Line Location: CHECK+3
Function Call: WRITE	Prompt: @IOF,!,?20,"*** EXPORT ASCII FILE ***",!!! Line Location: CHECK+4
Function Call: WRITE	Prompt: !,X Line Location: CHECK+5
Function Call: WRITE	Prompt: %,!! Line Location: OUTPUT+7
Function Call: WRITE	Prompt: AMQQFFS,! Line Location: LSET+1

Name	Line Occurrences (* Changed, ! Killed)
^AMQQ(1 - [#9009071]	OUTPUT+5, TRANS+2
^AUPNPAT - [#9000001]	LIST+2
^AUTTLOC - [#9999999.06]	LIST+3
^DD("OS" - [#.7]	CHECK+2
^DPT - [#2]	LIST, LIST+1
^UTILITY("AMQQ"	OUTPUT+5, LIST+4, LSET, MLIST, MLIST+1!, M1+1

Name	Field # of Occurrence
^(	OUTPUT+5, LSET, MLIST, M1+1
^(1	TRANS+2

Name	Field # of Occurrence
%	CHECK, CHECK+1, EXIT!, OUTPUT+1~, OUTPUT+3, OUTPUT+5*, OUTPUT+7, TRANS+2~, MLIST+1!
A	OUTPUT+1~, MLIST+1!, M1+1*
>> AMQP(	LSET, M1+1*
>> AMQP(0	LIST, LIST+1, LIST+2
>> AMQQCCLS	CHECK+3
AMQQFFAG	MLIST*, MLIST+1!, M1+1
>> AMQQFFF	CHECK+6, OUTPUT+2, OUTPUT+6
AMQQFFI	OUTPUT+1~, LSET, M1+1
>> AMQQFFS	LIST+1, LIST+2, LIST+3, LSET, LSET+1, M1+2*
AMQQFFX	OUTPUT+1~, M1, M1+1
AMQQFFZ	OUTPUT+1~, LIST+2*, M1+2
AMQQHOLD	MLIST*, MLIST+1!
>> AMQQMUFV	M1
>> AMQQMULL	LIST+4, MLIST, MLIST+1
>> AMQQMUNV	M1+1
>> AMQV("OPTION"	CHECK+7*
DT	TRANS+1
DUZ(2	LIST+2, LIST+3
I	CHECK+5*, OUTPUT+1~, MLIST+1!
IOF	CHECK+4
U	OUTPUT+5, LIST+1, LIST+2, LIST+3, LSET, TRANS+2, M1+1
X	CHECK+5, OUTPUT+1~, OUTPUT+4, OUTPUT+5, LSET, TRANS, TRANS+1*, MLIST+1!
Y	OUTPUT+1~, OUTPUT+5, LSET, TRANS+1, TRANS+2, MLIST+1!, M1+1*
Z	OUTPUT+1~

Name	Field # of Occurrence
$T(TEXT+I	CHECK+5