Routine: ACHSTXX

Information

ACHSTXX ; IHS/ITSC/PMF - EXPORT DATA (1/9) ; [ 10/16/2001 8:16 AM ]

Source file <ACHSTXX.m>

Package	Total	Call Graph
Contract Health Management Information System	8	($$LOCK,$$PARM)^ACHS LINES^ACHSFU ^ACHSR1 ^ACHSTX11 ^ACHSTX1R ^ACHSTX2R ^ACHSUF ^ACHSVAR
IHS VA Utilities	1	EN^XBVK
Kernel	1	^%ZISC

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"User terminated this function - no export performed" Line Location: STOP+1
Function Call: WRITE	Prompt: !,"Register not closed" Line Location: STOP+2
Function Call: WRITE	Prompt: !,"Authorizing facility number invalid" Line Location: STOP+3
Function Call: WRITE	Prompt: !,"No data for facility" Line Location: STOP+4
Function Call: WRITE	Prompt: !,"DHR record not 80 chars" Line Location: STOP+5
Function Call: WRITE	Prompt: !,"Abnormal end of function" Line Location: STOP+7

Name	Line Occurrences (* Changed, ! Killed)
^ACHSXPRT(	STOP+11!, INIT+5!

Name	Field # of Occurrence
%DT	END+15!
ACHSCRTN	END+15!, INIT+9*
>> ACHSF638	INIT+10*
>> ACHSPCC	END+9
>> ACHSPPC	END+9
>> ACHSRCT	INIT+9*
>> ACHSREEX	ACHSTXX+15*, ACHSTXX+39, ACHSTXX+40, ACHSTXX+41
ACHSYAYA	INIT+5*, INIT+6!
DA	END+15!
DFN	END+15!
DIC	END+15!
DIE	END+15!
DOLRH	END+15!, STOP+11, INIT+11*
DR	END+15!
DTOUT	INIT+12!
DUOUT	END+15!, INIT+12!
DX	END+15!
DY	END+15!
IO(0	END+10
LIST	END+15!
NUM	END+15!
OK	END+16!
RET	END+16!
ROUT	END+16!
STOP	END+6, END+16!, STOP+1, STOP+2, STOP+3, STOP+4, STOP+5, INIT+8*
TNUM	END+16!
VNDEINSX	END+16!
W	END+16!
X	END+16!
X1	END+16!
XBDT	END+16!
XBF	END+16!
XBGL	END+16!
XBTIT	END+16!
Y	END+16!
Z	END+16!