Routine: ACHSBRF

Package	Total	Call Graph
Contract Health Management Information System	2	$$LOCK^ACHS SB1^ACHSFU
IHS VA Utilities	1	$$DIR^XBDIR
VA Fileman	1	WAIT^DICD

Package

Total

Call Graph

Contract Health Management Information System

$$LOCK^ACHS SB1^ACHSFU

IHS VA Utilities

$$DIR^XBDIR

VA Fileman

WAIT^DICD

Package	Total	Caller Graph
Contract Health Management Information System	1	ACHSUUP

Package

Total

Caller Graph

Contract Health Management Information System

ACHSUUP

Entry Points

Name	Comments	DBIA/ICR reference
DATES	;
FIX(ACHSFY,ACHSREG)	;EP - Fix the Acct Balances and YTD obligated.
VARS	;
FY	; ----- Display FYs, ask FY.
BDT(F,R)	; Given FY and Reg #, return the Beginning date of the Register.
START	; ; ----- Initialize vars.
EXIT	;
EDT(F,R)	; Given FY and Reg #, return the Ending date of the Register.
REG	; ----- Ask Register.

Name	Field # of Occurrence
$$LOCK^ACHS	DATES+68, DATES+77
SB1^ACHSFU	FY+3
WAIT^DICD	DATES+8
$$DIR^XBDIR	FY+5, REG+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"FY DOES NOT EXIST." Line Location: FY+7
Function Call: WRITE	Prompt: !!,"REGISTER DOES NOT EXIST." Line Location: REG+3
Function Call: WRITE	Prompt: !,"Checking transactions for FY ",ACHSFY,", Register ",ACHSREG,"." Line Location: DATES+6
Function Call: WRITE	Prompt: "." Line Location: DATES+14
Function Call: WRITE	Prompt: !,"YTD Amount is ",$FN($P($G(^ACHS(9,DUZ(2),ACHSFY,0)),U,3),",",2)," and should be ",$FN(ACHS,",",2),"." Line Location: DATES+64
Function Call: WRITE	Prompt: !!,"FILE IN USE BY ANOTHER USER, TRY LATER.........." Line Location: DATES+68
Function Call: WRITE	Prompt: !!,"UPDATING ACCOUNT BALANCES FOR THE REGISTERS." Line Location: DATES+69
Function Call: WRITE	Prompt: !,"UPDATING YTD OBLIGATED." Line Location: DATES+74
Function Call: WRITE	Prompt: !,"Done." Line Location: DATES+78

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACHS(9 - [#9002069]	REG+1, REG+3, DATES+46, DATES+51, DATES+58, DATES+61, DATES+64, DATES+70, DATES+71, DATES+75 , BDT+1, EDT+1
^ACHSF - [#9002080]	DATES+11, DATES+12, DATES+14, DATES+15, DATES+16, DATES+21, DATES+24, DATES+28, BDT+2

Name	Line Occurrences
$$BDT	DATES+1
$$EDT	DATES+2
DATES	VARS+5
EXIT	DATES+68
FY	FY+7
REG	REG+3
START	FIX+3
VARS	START+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	VARS+3, VARS+7, DATES+34, DATES+35, DATES+48, DATES+54, DATES+55, DATES+56, DATES+57, DATES+58 , DATES+59, DATES+63, DATES+73*
>> ACHS	DATES+62, DATES+63, DATES+64, DATES+72, DATES+73, DATES+75
ACHSAMT	VARS+1~, DATES+21, DATES+24, DATES+28, DATES+31, DATES+35
ACHSBDT	VARS+1~, DATES+1, DATES+11, DATES+12, DATES+14, DATES+15
ACHSDCR	VARS+1~
ACHSDCR(	VARS+3, DATES+35, DATES+48, DATES+54*, DATES+55, DATES+56, DATES+59
ACHSDIEN	VARS+1~, DATES+12, DATES+14, DATES+15, DATES+16, DATES+21, DATES+24, DATES+28
ACHSDOCR	VARS+1~, DATES+16, DATES+18, DATES+34, DATES+43
ACHSEDT	VARS+1~, DATES+2*, DATES+11
ACHSFLG	START+2, VARS+5, FIX+1~, FIX+2*
ACHSFY	START+3~, FY+5*, FY+7, REG+1, REG+3, DATES+1, DATES+2, DATES+6, DATES+18, DATES+46 , DATES+51, DATES+61, DATES+64, DATES+70, DATES+71, DATES+75, FIX~
>> ACHSFYWK(	VARS+7, FY+7
ACHSMAX	VARS+1~, VARS+7*, FY+5
ACHSMIN	VARS+1~, VARS+7*, FY+5
ACHSRCOR	VARS+1~, DATES+43, DATES+48, DATES+54, DATES+63, DATES+70, DATES+73
ACHSREG	START+3~, REG+1*, REG+3, DATES+1, DATES+2, DATES+6, DATES+46, DATES+51, DATES+61, DATES+70 , DATES+71, FIX~
ACHSROUT	VARS+1~, DATES+51*, DATES+54
ACHSRPRV	VARS+1~, DATES+43, DATES+46, DATES+48
ACHSTIEN	VARS+1~, DATES+14, DATES+15, DATES+21
ACHSTOTL	VARS+1~, DATES+43, DATES+56, DATES+61
ACHSTYPE	VARS+1~, DATES+11, DATES+12, DATES+13, DATES+14, DATES+15, DATES+24, DATES+28, DATES+31
DT	EDT+3
>> DTOUT	FY+6, REG+2
>> DUOUT	FY+6, REG+2
DUZ(2	VARS+7, FY+7, REG+1, REG+3, DATES+11, DATES+12, DATES+14, DATES+15, DATES+16, DATES+21 , DATES+24, DATES+28, DATES+46, DATES+51, DATES+58, DATES+61, DATES+64, DATES+70, DATES+71, DATES+75 , BDT+1, BDT+2, EDT+1
F	BDT~, BDT+1, BDT+2, EDT~, EDT+1
R	BDT~, BDT+1, EDT~, EDT+1
U	REG+1, DATES+18, DATES+21, DATES+24, DATES+28, DATES+34, DATES+48, DATES+54, DATES+58, DATES+63 , DATES+64, DATES+73, DATES+75, BDT+1, BDT+2, EDT+1
>> X	EDT+1*, EDT+2

Customize PDF page

Package: Contract Health Management Information System

Routine: ACHSBRF

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: