Routine: ACHSBUG3

Package	Total	Call Graph
Contract Health Management Information System	5	^ACHSAV INIT^ACHSRP2 ^ACHSUD ^ACHSUF A0A^ACHSUSC
IHS VA Utilities	1	$$DIR^XBDIR
VA Fileman	1	^DIE

Package	Total	Caller Graph
Contract Health Management Information System	1	ACHS EDIT AUTH DATES

Name	Comments	DBIA/ICR reference
SEARCH	;
EDIT(L,D)	;
EOJ	;
HELP(L)	;EP - Display text at label L. Probably called from DIR.
HELPC3	;EP
DISPLAY(L,D)	;
SEL	;
SETENVRN(L)	;
LOOP	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !,ACHSMIS3," documents processed." Line Location: EOJ+1
Function Call: WRITE	Prompt: !,*7,"AUTH BEGINNING DATE exists for this document." Line Location: SEL+4
Function Call: WRITE	Prompt: ! Line Location: HELP+1
Function Call: WRITE	Prompt: !?4,$P($T(@L+%),";",3) Line Location: HELP+2
Routine Call	DIE Line Location: EDIT+4

Name	Line Occurrences (* Changed, ! Killed)
^ACHSF - [#9002080]	SEARCH+1, SEL+4
^ACHSF("B"	SEARCH+1

Name	Field # of Occurrence
^(	SEARCH+1

Name	Field # of Occurrence
>> %	HELP+2*
ACHSADJ	DISPLAY+8*, DISPLAY+10!
>> ACHSDIEN	DISPLAY+5*, SEL+2, SEL+3, SEL+4, SEL+5
ACHSDOIT	EOJ+2~, EOJ+3, EOJ+4, SETENVRN+1~, SETENVRN+2, SETENVRN+3, DISPLAY+1~, DISPLAY+2*, DISPLAY+3
ACHSDUZ2	ACHSBUG3+9~, ACHSBUG3+11*, EOJ+3
ACHSERR	ACHSBUG3+9~, SETENVRN+7
ACHSFLAG	ACHSBUG3+9~, LOOP+1*, LOOP+2, LOOP+3
ACHSMIS3	ACHSBUG3+9~, ACHSBUG3+11, SEARCH+1, EOJ+1
ACHSSIG	DISPLAY+6!
>> ACHSTIEN	DISPLAY+5*
ACHSVIEW	ACHSBUG3+9~, ACHSBUG3+11*
D	ACHSBUG3+9~, SEARCH+1*, SEARCH+2, SETENVRN+5~, DISPLAY~, DISPLAY+5, DISPLAY+6!, EDIT~, EDIT+2, EDIT+3!
DA	EDIT+1~, EDIT+2*, EDIT+4
DIE	EDIT+1~, EDIT+2*, EDIT+4
>> DIRUT	SEL+4
DR	EDIT+1~, EDIT+2*
>> DTOUT	SEARCH+1
>> DUOUT	SEARCH+1
DUZ(2	ACHSBUG3+11, SEL+3, SEL+4, SEL+5
L	ACHSBUG3+9~, ACHSBUG3+11, SEARCH+1, SEARCH+2, SETENVRN~, SETENVRN+2, SETENVRN+4!, DISPLAY~, DISPLAY+2, DISPLAY+6! , EDIT~, EDIT+2, EDIT+3!, HELP~
U	SEL+4
>> X	SEL+4*

Name	Field # of Occurrence
$T(@L+%	HELP+2
$T(@L+%+1	HELP+2

Information