Routine: ACHSVDV2

Package	Total	Call Graph
VA Fileman	2	^DIC ^DIE
Contract Health Management Information System	1	$$ZEROTH^ACHS
IHS VA Utilities	1	$$DIR^XBDIR
Kernel	1	$$FMTE^XLFDT

Package

Total

Call Graph

VA Fileman

^DIC ^DIE

Contract Health Management Information System

$$ZEROTH^ACHS

IHS VA Utilities

$$DIR^XBDIR

Kernel

$$FMTE^XLFDT

Package	Total	Caller Graph
Contract Health Management Information System	2	ACHSVDV1 ACHSVDVA

Package

Total

Caller Graph

Contract Health Management Information System

ACHSVDV1 ACHSVDVA

Name	Comments	DBIA/ICR reference
HDR	;
AGRDSP	;EP
AGRSEL	;
A2A	;
A2C	;
A2D	;
A2E	;
AGRDSP1	;
AGRNEW	;ADD NEW AGREEMENT INFORMATION HERE
AGRDSPZ	;
MDY(X)	;

Name	Field # of Occurrence
$$ZEROTH^ACHS	AGRNEW+5
^DIC	AGRNEW+7
^DIE	AGRNEW+13
$$DIR^XBDIR	AGRSEL+2, AGRNEW+2
$$FMTE^XLFDT	ACHSVDV2+10

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"None on file." Line Location: ACHSVDV2+6
Function Call: WRITE	Prompt: !!,"None on file." Line Location: ACHSVDV2+7
Function Call: WRITE	Prompt: !!,"FISCAL YEAR",?16,"A M O U N T",?30,"LAST PMT DATE",!! Line Location: ACHSVDV2+9
Function Call: WRITE	Prompt: ?2,ACHS,?14,"$",$J($FN($P(^(ACHS,0),U,2),",",2),12),?30,$$FMTE^XLFDT($P(^(0),U,3)),! Line Location: ACHSVDV2+10
Function Call: WRITE	Prompt: !,$J(ACHSI,2),?3,ACHSAGTP Line Location: A2A+4
Function Call: WRITE	Prompt: ?8,$P(^(0),U) Line Location: A2A+5
Function Call: WRITE	Prompt: ?8,$E($P(^AUTTVNDR(ACHSPROV,18,R,0),U,1),1,2),$S(ACHSAGTP="BPA":"-A-",ACHSAGTP="PA":"-PA-",ACHSAGTP="RQ":"-R-",1:"") Line Location: A2A+6
Function Call: WRITE	Prompt: $E(X,2,4) Line Location: A2A+8
Function Call: WRITE	Prompt: $E(X,1,4) Line Location: A2A+9
Function Call: WRITE	Prompt: ?27,$$MDY($P(^AUTTVNDR(ACHSPROV,18,R,0),U,8)),?36,$$MDY($P(^AUTTVNDR(ACHSPROV,18,R,0),U,9)) Line Location: A2C+1
Function Call: WRITE	Prompt: ?45,Y,! Line Location: A2C+8
Function Call: WRITE	Prompt: ?45,Y,! Line Location: A2D+7
Function Call: WRITE	Prompt: @IOF Line Location: AGRNEW+4
Function Call: WRITE	Prompt: ! Line Location: AGRNEW+10
Function Call: WRITE	Prompt: !!," #",?3,"Type",?14,"Number",?27,"Eff-Date",?36,"Exp-Date",?45,"MCR",?49,"Description",!?3,"----",?8,"------------------",?27,"--------",?36,"--------",?45,"---",?49,"----------------------------" Line Location: HDR+1
Routine Call	DIE Line Location: AGRNEW+13
Routine Call	DIC Line Location: AGRNEW+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACHSVPMT - [#9002075]	ACHSVDV2+5, ACHSVDV2+7, ACHSVDV2+10
^AUTTVNDR - [#9999999.11]	AGRDSP+1, AGRDSP1+1, A2A+5, A2A+6, A2A+7, A2C+1, A2C+2, A2C+3, A2C+5, A2C+7 , A2D+1, A2D+2, A2D+4, A2D+6, A2E+1, AGRNEW+5*
^XUSEC("ACHSZMGR"	AGRNEW+1

Name	Line Occurrences
$$MDY	A2C+1
A2C	A2A+5, A2A+8
A2D	A2C+3, A2C+5
A2E	A2D+2, A2D+4
AGRDSP	AGRNEW+15
AGRDSP1	A2E+2
AGRDSPZ	AGRDSP1+2
AGRNEW	AGRDSP+1, AGRSEL+4
HDR	AGRDSP+2

Name	Field # of Occurrence
^(	ACHSVDV2+10
^(0	ACHSVDV2+10, A2A+5, A2C+7, A2D+6, A2E+1

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ACHS	ACHSVDV2+10*
ACHSAGRL	AGRDSP+4!
ACHSAGRL(	A2A+1*, AGRSEL+5
>> ACHSAGTP	AGRDSP+1, AGRDSP1+1, A2A+4, A2A+6, A2A+8, AGRNEW+2
>> ACHSBPFL	AGRDSPZ+1
>> ACHSI	AGRDSP+3, A2A+1, A2A+4, AGRSEL+2
ACHSIEN	ACHSVDV2+4~, ACHSVDV2+5*, ACHSVDV2+6, ACHSVDV2+7, ACHSVDV2+10
>> ACHSPAFL	AGRDSPZ+1
>> ACHSPROV	ACHSVDV2+5, AGRDSP+1, AGRDSP1+1, A2A+5, A2A+6, A2A+7, A2C+1, A2C+2, A2C+3, A2C+5 , A2C+7, A2D+1, A2D+2, A2D+4, A2D+6, A2E+1, AGRNEW+5, AGRNEW+6, AGRNEW+9
>> ACHSRQFL	AGRDSPZ+1
>> DA	AGRSEL+1, AGRSEL+5, AGRNEW+4, AGRNEW+9
>> DA(1	AGRNEW+6, AGRNEW+9
>> DIC	AGRNEW+6*, AGRNEW+12
>> DIC("W"	AGRNEW+6*
>> DIC(0	AGRNEW+6*
DIE	AGRNEW+11!, AGRNEW+12*, AGRNEW+14!
DIE("NO^"	AGRNEW+12*
DR	AGRNEW+11!, AGRNEW+12*
>> DTOUT	AGRSEL+3, AGRNEW+3
>> DUOUT	AGRSEL+3, AGRNEW+3
DUZ	AGRNEW+1
DUZ(2	ACHSVDV2+5, ACHSVDV2+7, ACHSVDV2+10
IOF	AGRNEW+4
>> R	AGRDSP+3, AGRDSP1+1, AGRDSP1+2, A2A+1, A2A+5, A2A+6, A2A+7, A2C+1, A2C+2, A2C+3 , A2C+5, A2C+7, A2D+1, A2D+2, A2D+4, A2D+6, A2E+1
U	ACHSVDV2+10, A2A+5, A2A+6, A2A+7, A2C+1, A2C+2, A2C+3, A2C+5, A2C+7, A2D+1 , A2D+2, A2D+4, A2D+6, A2E+1
X	A2A+7, A2A+8, A2A+9, A2C+2, A2C+3, A2C+4, A2D+1*, A2D+2, A2D+3, MDY~ , MDY+1
>> Y	A2C+4, A2C+5, A2C+6, A2C+7, A2C+8, A2D+3, A2D+4, A2D+5, A2D+6, A2D+7 , AGRSEL+2, AGRSEL+4, AGRSEL+5, AGRNEW+2, AGRNEW+4, AGRNEW+8, AGRNEW+9

Customize PDF page

Package: Contract Health Management Information System

Routine: ACHSVDV2

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: