Routine: ACHSALUP

Package	Total	Call Graph
Contract Health Management Information System	1	($$FYSEL,$$LOCK,FMT,RTRN)^ACHS
IHS VA Utilities	1	$$DIR^XBDIR
VA Fileman	1	^DIE

Package	Total	Caller Graph
Contract Health Management Information System	2	ACHSALUP ACHSBOP

Entry Points

Name	Comments	DBIA/ICR reference
QUIT	;
END	;
H	;EP - From DIR via HELP^ACHS().
UPDATE	;
INITIALS(ACHSFYAL)	;EP - Update Initial Register Values
L2	;
L1	;
DIE(DR,Z)	;EP - Edit Document fields.
NOUPD	;

Name	Field # of Occurrence
$$FYSEL^ACHS	L1+1
$$LOCK^ACHS	UPDATE+1, UPDATE+5, INITIALS+8, INITIALS+10
FMT^ACHS	L2+7
RTRN^ACHS	QUIT+2
^DIE	INITIALS+9
$$DIR^XBDIR	L2+1, L2+8, INITIALS+5

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Allowance for this FISCAL YEAR Does NOT Exist -- Please Try Another Year" Line Location: L1+3
Function Call: WRITE	Prompt: !!,"YTD allowance for ",ACHSFYAL," is:",$J("$ "_$FN(X,",",2),20) Line Location: L1+5
Function Call: WRITE	Prompt: !," Unobligated Balance is:",$J("$ "_$FN(X,",",2),20) Line Location: L1+7
Function Call: WRITE	Prompt: !!,"For Fiscal Year ",ACHSFYAL," the new Allowance is " Line Location: L2+4
Function Call: WRITE	Prompt: *7," ??" Line Location: L2+6
Function Call: WRITE	Prompt: " " Line Location: L2+7
Function Call: WRITE	Prompt: !!,7,?10,"*** ALLOWANCE NOT UPDATED ****" Line Location: NOUPD+1
Function Call: WRITE	Prompt: !!?20,"**** ALLOWANCE UPDATED ****" Line Location: UPDATE+6
Function Call: WRITE	Prompt: *7,!!,"Your Initial Balance values don't = your Advice of Allowance (That's OK)." Line Location: INITIALS+3
Function Call: WRITE	Prompt: ! Line Location: DIE+1
Routine Call	DIE Line Location: INITIALS+9

Name	Line Occurrences (* Changed, ! Killed)
^ACHS(9 - [#9002069]	L1+3, L1+4, L1+6, UPDATE+2, UPDATE+3, UPDATE+4*, INITIALS+2, INITIALS+3

Name	Field # of Occurrence
>> %	DIE+1*
>> ACHS	L2+5*
ACHSCAOA	L2+7*, UPDATE+2, QUIT+1!
>> ACHSDIEN	DIE+2
ACHSFYAL	L1+1*, L1+2, L1+3, L1+4, L1+5, L1+6, L2+4, UPDATE+2, UPDATE+3, UPDATE+4 , END+1, QUIT+1!, INITIALS~, INITIALS+2, INITIALS+3, INITIALS+7
DA	INITIALS+6~, INITIALS+7, DIE+2
DA(1	INITIALS+7, DIE+2
DIE	INITIALS+6~, INITIALS+7, DIE+2
DR	INITIALS+6~, INITIALS+7*, DIE~
DT	UPDATE+3
>> DTOUT	L1+2, L2+2
>> DUOUT	L1+2, L2+2
DUZ	UPDATE+4
DUZ(2	L1+3, L1+4, L1+6, UPDATE+2, UPDATE+3, UPDATE+4, INITIALS+2, INITIALS+3, INITIALS+7, DIE+2
>> F	L2+5*
U	L1+4, L1+6, UPDATE+2, UPDATE+3, UPDATE+4, INITIALS+2, INITIALS+3
X	L1+4, L1+5, L1+6, L1+7, L2+7, INITIALS+2, INITIALS+4!
>> X2	L2+7*
Y	L2+1, L2+2, L2+3, L2+5, L2+6, L2+7, INITIALS+1, INITIALS+2*, INITIALS+3, INITIALS+4!
Z	DIE~, DIE+1