Routine: ACHSPAZ

Package	Total	Call Graph
Contract Health Management Information System	3	($$DOC,$$PARM,FMT)^ACHS READ^ACHSFU ^ACHSPAA
IHS VA Utilities	2	$$DIR^XBDIR $$EXTSET^XBFUNC
VA Fileman	2	^%DT ^DIR
Kernel	1	$$FMTE^XLFDT

Package

Total

Call Graph

Contract Health Management Information System

($$DOC,$$PARM,FMT)^ACHS READ^ACHSFU ^ACHSPAA

IHS VA Utilities

$$DIR^XBDIR $$EXTSET^XBFUNC

VA Fileman

^%DT ^DIR

Kernel

$$FMTE^XLFDT

Package	Total	Caller Graph
Contract Health Management Information System	1	ACHSPA

Package

Total

Caller Graph

Contract Health Management Information System

ACHSPA

Entry Points

Name	Comments	DBIA/ICR reference
SRC	; 3P source
END	;
DIR(ACHS,ACHS1)	; ( <DIR(0)> , <DIR("B")> )
A7H	; EOBR Obligation type
A3A	; Set O/P visit to Hospital node
A1	;
A8	;
A3	;
A2	;
A5	;
A4	;
A7	;
A6	;
A7G	; EOBR Services
A7F	; EOBR Remittance number
A7E	; EOBR Check number
A7D	; EOBR Control Number
A7C	; EOBR pay date
A7A	; Pay indicator: Final/Interim

External References

Name	Field # of Occurrence
^%DT	A1+8
$$DOC^ACHS	A3A+4, A3A+6, A7A+2, A7C+8
$$PARM^ACHS	A7C+2, A7D+2
FMT^ACHS	A7+2, A7+11
READ^ACHSFU	A1+3, A7+3
^ACHSPAA	A4+2
^DIR	A8+5, DIR+5
$$DIR^XBDIR	A2+1, A3+1, A5+1, A8+11
$$EXTSET^XBFUNC	A7A+3, A7G+1, A7H+1
$$FMTE^XLFDT	A1+2, A7C+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Date Of Service: " Line Location: A1+1
Function Call: WRITE	Prompt: $$FMTE^XLFDT(ACHSSVDT),"// " Line Location: A1+2
Function Call: WRITE	Prompt: !," Enter The Date The Patient First Received Treatment" Line Location: A1+5
Function Call: WRITE	Prompt: !!,"Must enter Date of Service" Line Location: A1+6
Function Call: WRITE	Prompt: *7,!,"SERVICE date is before ORDER date.",! Line Location: A1+10
Function Call: WRITE	Prompt: " Required" Line Location: A5+3
Function Call: WRITE	Prompt: !!,"Enter Amount Paid by all Third Parties: " Line Location: A7+1
Function Call: WRITE	Prompt: "//" Line Location: A7+2
Function Call: WRITE	Prompt: !," Enter difference between total bill and amount paid by IHS" Line Location: A7+6
Function Call: WRITE	Prompt: " (" Line Location: A7+9
Function Call: WRITE	Prompt: ")" Line Location: A7+12
Function Call: WRITE	Prompt: *7," Required" Line Location: A7A+5
Function Call: WRITE	Prompt: *7," Required" Line Location: A7C+6
Function Call: WRITE	Prompt: *7," Required" Line Location: A7D+6
Function Call: WRITE	Prompt: *7," Required" Line Location: A7E+4
Function Call: WRITE	Prompt: *7," Required" Line Location: A7F+4
Function Call: WRITE	Prompt: *7," Required" Line Location: A7G+4
Function Call: WRITE	Prompt: *7," Required" Line Location: A7H+4
Function Call: WRITE	Prompt: !!,"* Document Paid *" Line Location: A8+14
Function Call: WRITE	Prompt: !!,"* Document added to Check-print list. *" Line Location: A8+15
Function Call: WRITE	Prompt: ! Line Location: DIR+1
Routine Call	DIR Line Location: A8+5 DIR+5

Name	Line Occurrences (* Changed, ! Killed)
^ACHS(3 - [#9002063]	A3A+4
^ACHS(7 - [#9002067]	A8+15*
^ACHSF - [#9002080]	A3A+7, A3A+10, A7A+1, A8+9, A8+10, A8+15
^AUTNINS - [#9999999.18]	SRC+1
^AUTTVNDR - [#9999999.11]	A3A+6
^AUTTVTYP - [#9999999.34]	A3A+6

Label References

Name	Line Occurrences
A1	A1+5, A1+6, A1+9, A2+3, A3+3, A8+12
A2	A1+10
A3	A1+6, A1+12, A3A+9, A4+4, A8+12
A4	A3A+4, A3A+6, A5+2
A5	A5+3, A7+5, SRC+4, A7A+4, A7C+5, A7D+5, A7E+3, A7F+3, A7G+3, A7H+3
A6	A4+6, A7+6
A7A	A6+1, A7A+5
A7C	A7A+2, A7C+6
A7D	A7D+6
A7E	A7E+4
A7F	A7F+4
A7G	A7G+4
A7H	A7H+4
A8	A7C+2, A7C+8, A7D+2
DIR	A3A+7, SRC+2, A7A+3, A7C+3, A7D+3, A7E+1, A7F+1, A7G+1, A7H+1
END	A1+4, A2+2, A3+2, A3A+8, A4+3, A5+2, A7+4, SRC+3, A7A+4, A7C+4 , A7D+4, A7E+2, A7F+2, A7G+2, A7H+2, A8+12
SRC	A7+7

Name	Field # of Occurrence
^(0	A3A+6, A8+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	A3A+6*
>> %DT	A1+7*
ACHS	DIR~, DIR+3
ACHS1	DIR~, DIR+4
>> ACHS3RDP	ACHSPAZ+3, A6+1, A7+2, A7+7, A7+8*, A7+10
>> ACHS3RDS	ACHSPAZ+3, A6+1, SRC+1, SRC+2, SRC+5
>> ACHSADDT	ACHSPAZ+3*
>> ACHSCHK	ACHSPAZ+3, A7E+1, A7E+5
>> ACHSCTL	ACHSPAZ+3, A7D+3, A7D+7
>> ACHSDIDT	ACHSPAZ+3*
>> ACHSDIEN	A3A+7, A3A+10, A8+15
>> ACHSDITY	ACHSPAZ+3*
>> ACHSF638	A7A+1*, A7C+2, A7D+2, A8+2
>> ACHSFULP	ACHSPAZ+3, A4+6, A5+1*, A5+3, A6+1
>> ACHSOB	ACHSPAZ+3, A7H+1, A7H+5
>> ACHSODT	A1+10
>> ACHSPACC	ACHSPAZ+3, A8+6
>> ACHSPDAT	A7C+2, A7C+3, A7C+7, A7D+2*
>> ACHSPIND	A7A+2, A7A+3, A7A+6
>> ACHSPSQN	A8+9*, A8+10
>> ACHSQUIT	A1+4
>> ACHSREM	ACHSPAZ+3, A7F+1, A7F+5
>> ACHSSET	A8+13*
>> ACHSSV	ACHSPAZ+3, A7G+1, A7G+5
>> ACHSSVDT	ACHSPAZ+3, A1+2, A1+6, A1+9, A1+10, A1+11
>> ACHSTDA	A3A+7, A3A+10
ACHSVAMT	ACHSPAZ+3*, A4+6, END+1!
>> ACHSWKLD	ACHSPAZ+3, A3+1, A3+4
DIR	A8+7!, DIR+2!, DIR+6!
DIR("A"	A8+4*
DIR("B"	DIR+4*
DIR(0	A8+3, DIR+3
DIRUT	DIR+2!
DT	A7C+2, A7D+2
DTOUT	A2+2, A3+2, A3A+8, A4+3, A5+2, A7+4, SRC+3, A7A+4, A7C+4, A7D+4 , A7E+2, A7F+2, A7G+2, A7H+2, A8+12, DIR+2!
DUOUT	A2+3, A3+3, A3A+9, A4+4, A5+2, A7+5, SRC+4, A7A+4, A7C+5, A7D+5 , A7E+3, A7F+3, A7G+3, A7H+3, A8+12, DIR+2!
DUZ(2	A3A+4, A3A+7, A3A+10, A7A+1, A8+9, A8+10, A8+15
U	A3A+4, A3A+6, A3A+7, A3A+10, SRC+1, A7A+1, A8+15
>> X	A1+7, A7+2, A7+10*
X2	END+1!
X3	END+1!
>> Y	A1+5, A1+6, A1+7, A1+9, A1+10, A1+11, A2+1, A2+3, A3+1, A3+4 , A3A+10, A7+6, A7+7, A7+8, SRC+5, A7A+5, A7A+6, A7C+6, A7C+7, A7D+6 , A7D+7, A7E+4, A7E+5, A7F+4, A7F+5, A7G+4, A7G+5, A7H+4, A7H+5, A8+6 , A8+11*, A8+12

Customize PDF page

Package: Contract Health Management Information System

Routine: ACHSPAZ

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: