Routine: ACHSBOP

Package	Total	Call Graph
Contract Health Management Information System	5	($$FYSEL,$$LOC,NOW,RTRN)^ACHS INITIALS^ACHSALUP SLV^ACHSFU CKB^ACHSUUP ^ACHSVAR
IHS VA Utilities	3	$$DIR^XBDIR $$C^XBFUNC EN^XBVK
Kernel	2	^%ZIS ^%ZISC
VA Fileman	1	COMMA^%DTC

Package

Total

Call Graph

Contract Health Management Information System

($$FYSEL,$$LOC,NOW,RTRN)^ACHS INITIALS^ACHSALUP SLV^ACHSFU CKB^ACHSUUP ^ACHSVAR

IHS VA Utilities

$$DIR^XBDIR $$C^XBFUNC EN^XBVK

Kernel

^%ZIS ^%ZISC

VA Fileman

COMMA^%DTC

Package	Total	Caller Graph
Contract Health Management Information System	2	ACHSOP ACHSOV

Package

Total

Caller Graph

Contract Health Management Information System

ACHSOP ACHSOV

Name	Comments	DBIA/ICR reference
END	;
SBD	;
FY	;
A1	;
A2	;
A1A	;EP - From option to display balances.
B1	;
B2	;
SBH	;
HAT	;

External References

Name	Field # of Occurrence
COMMA^%DTC	A2+12, A2+13, SBD+2, SBD+3, SBH+8
^%ZIS	ACHSBOP+4
^%ZISC	HAT+3
$$FYSEL^ACHS	FY+1
$$LOC^ACHS	A1+3
NOW^ACHS	FY+8
RTRN^ACHS	B1+2
INITIALS^ACHSALUP	END+1
SLV^ACHSFU	ACHSBOP+4
CKB^ACHSUUP	FY+7
^ACHSVAR	HAT+1
$$DIR^XBDIR	B2+3
$$C^XBFUNC	A1+3
EN^XBVK	HAT+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,*7,"FY '",+Y,"' does not exist for this facility." Line Location: FY+4
Function Call: WRITE	Prompt: @IOF,!,$$C^XBFUNC($$LOC^ACHS),!,$$C^XBFUNC("CHS REGISTER BALANCES"),!?80-$L(ACHSTIME)/2,ACHSTIME Line Location: A1+3
Function Call: WRITE	Prompt: ?48,"Un-Obligated Balance" Line Location: A2+5
Function Call: WRITE	Prompt: ! Line Location: A2+8
Function Call: WRITE	Prompt: ?18,"---------------",?35,"----------------",?57,"----------------" Line Location: A2+9
Function Call: WRITE	Prompt: ?26,"----------------" Line Location: A2+10
Function Call: WRITE	Prompt: !,"TOTAL" Line Location: A2+11
Function Call: WRITE	Prompt: ?18,X Line Location: A2+12
Function Call: WRITE	Prompt: ?35,X Line Location: A2+12
Function Call: WRITE	Prompt: ?35,X Line Location: A2+12
Function Call: WRITE	Prompt: ?27,X Line Location: A2+13
Function Call: WRITE	Prompt: ?50,X Line Location: A2+13
Function Call: WRITE	Prompt: !,"**** THE REGISTERS ARE OUT OF BALANCE!" Line Location: B1+1
Function Call: WRITE	Prompt: @IOF Line Location: B1+4
Function Call: WRITE	Prompt: !?1,$P(ACHSRGNM,U,K) Line Location: SBD+1
Function Call: WRITE	Prompt: ?18,X Line Location: SBD+2
Function Call: WRITE	Prompt: ?35,X Line Location: SBD+2
Function Call: WRITE	Prompt: ?35,X Line Location: SBD+2
Function Call: WRITE	Prompt: ?27,X Line Location: SBD+3
Function Call: WRITE	Prompt: !!!?12,"Fiscal Year ",ACHSACFY,?44,"Register Number ",$E(ACHSACFY,4),"-",$E(1000+ACHSACWK,2,4),! Line Location: SBH+1
Function Call: WRITE	Prompt: !,"Last document issued: ",ACHSACN,?44,"Advice of Allow: " Line Location: SBH+7
Function Call: WRITE	Prompt: ?63,X,! Line Location: SBH+8
Function Call: WRITE	Prompt: !?1,"Register" Line Location: SBH+9
Function Call: WRITE	Prompt: ?18,"Initial Balance",?35,"Obligated Amount",?57,"Current Balance" Line Location: SBH+10
Function Call: WRITE	Prompt: ?26,"Obligated Amount" Line Location: SBH+11
Function Call: WRITE	Prompt: !?1,"---------" Line Location: SBH+12
Function Call: WRITE	Prompt: ?18,"---------------",?35,"----------------",?57,"----------------" Line Location: SBH+12
Function Call: WRITE	Prompt: ?26,"----------------" Line Location: SBH+13
Routine Call	%ZIS Line Location: ACHSBOP+4

Name	Line Occurrences (* Changed, ! Killed)
^ACHS(9 - [#9002069]	FY+4, A1+5, A1+7, A1+10, A1+13, A1+15, SBH+3, SBH+4, SBH+8

Name	Line Occurrences
A1	B2+3
A1A	FY+4
END	B1+3
HAT	ACHSBOP+5, FY+2
SBD	A2+4
SBH	A2+2

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %ZIS	ACHSBOP+3*
>> ACHS("ZL"	A1+7
>> ACHSACFY	FY+1*, FY+5, A1+7, A1+10, A1+13, A1+15, END+1, SBH+1, SBH+3, SBH+4 , SBH+6, SBH+8
>> ACHSACN	SBH+2, SBH+4, SBH+5, SBH+6, SBH+7
>> ACHSACWK	FY+5, A1+7, A1+15, SBH+1
>> ACHSCNC	B1+1
>> ACHSFC	SBH+6
>> ACHSFYWK(	FY+4, FY+5
>> ACHSIO	ACHSBOP+3*, B1+3, END+1
>> ACHSPPC	A1A+3, B2+2
>> ACHSPPO	A1+2
>> ACHSRGNM	A1+5*, SBD+1
>> ACHSTIME	A1+3
B	A1+4, A1+13, A1+17, HAT+2!, SBD+2
C	HAT+2!
D	HAT+2!
DT	A1+7
>> DTOUT	FY+2
>> DUOUT	FY+2
DUZ(2	FY+4, FY+5, A1+5, A1+7, A1+10, A1+13, A1+15, SBH+3, SBH+4, SBH+8
F	A1+16, A1+17, A2+5, A2+9, A2+12, HAT+2!, SBD+2, SBH+10
I	A1+17*, HAT+2!
IO	ACHSBOP+3, A1+1, B1+3, END+1
IO("S"	ACHSBOP+4, A1A+3, A1+2, B1+3, B2+2, END+1
IO(0	A1A+2, B2+1
IOF	A1+3, B1+4
J	HAT+2!
K	A2+4*, HAT+2!, SBD+1, SBD+2, SBD+3
N	HAT+2!
>> POP	ACHSBOP+5
S	A1+4, A1+10, A2+12, A2+13, HAT+2!
U	A1+17, A2+12, A2+13, SBD+1, SBD+2, SBD+3, SBH+8
W	A1+4, A1+15, HAT+2!, SBD+2, SBD+3
X	A2+12, A2+13, HAT+2!, SBD+2, SBD+3, SBH+8*
X2	A1A+1!, A2+12*, HAT+2!
X3	A1A+1!, A1+6*, HAT+2!
Y	FY+4, HAT+2!
>> ZTQUEUED	END+1

Customize PDF page

Package: Contract Health Management Information System

Routine: ACHSBOP

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: