Routine: ACHSTXA1

Package	Total	Call Graph
Contract Health Management Information System	7	($$LOC,$$PARM)^ACHS (FYCVT,LINES)^ACHSFU (ERROR,KILLGLBS)^ACHSTX BC^ACHSTX2 ^ACHSTX3 (CANOBJ,KILL)^ACHSTX8 ^ACHSUF
Kernel	2	^%ZISC $$REPEAT^XLFSTR
IHS VA Utilities	1	$$C^XBFUNC

Package

Total

Call Graph

Contract Health Management Information System

($$LOC,$$PARM)^ACHS (FYCVT,LINES)^ACHSFU (ERROR,KILLGLBS)^ACHSTX BC^ACHSTX2 ^ACHSTX3 (CANOBJ,KILL)^ACHSTX8 ^ACHSUF

Kernel

^%ZISC $$REPEAT^XLFSTR

IHS VA Utilities

$$C^XBFUNC

Package	Total	Caller Graph
Contract Health Management Information System	2	ACHSTXAR ACHSYCS

Package

Total

Caller Graph

Contract Health Management Information System

ACHSTXAR ACHSYCS

Name	Comments	DBIA/ICR reference
S8	;
ERR	;
S3	;
S2	;
S7	;
AFACERR	;
S5	;
S4	;
S7A	;
CVTEND1	;

External References

Name	Field # of Occurrence
^%ZISC	ERR+2, AFACERR+2
$$LOC^ACHS	ACHSTXA1+16
$$PARM^ACHS	ACHSTXA1+14, S2+4, S2+6, S2+7, S5+15, S7+3, S8+4
FYCVT^ACHSFU	S8+10
LINES^ACHSFU	ACHSTXA1+8
ERROR^ACHSTX	S8+19, S8+24
KILLGLBS^ACHSTX	ACHSTXA1+13
BC^ACHSTX2	S8+27
^ACHSTX3	CVTEND1+4
CANOBJ^ACHSTX8	S8+20
KILL^ACHSTX8	ERR+2, AFACERR+2
^ACHSUF	ACHSTXA1+11
$$C^XBFUNC	ACHSTXA1+9
$$REPEAT^XLFSTR	ACHSTXA1+9

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!,$$REPEAT^XLFSTR("",80),!,$$C^XBFUNC("RE-EXPORT SELECTED CHS DATA"),!,$$REPEAT^XLFSTR(""),! Line Location: ACHSTXA1+9
Function Call: WRITE	Prompt: !?10,"FACILITY NAME: ",$$LOC^ACHS Line Location: ACHSTXA1+16
Function Call: WRITE	Prompt: !!,7,7,"A DHR RECORD WAS PRODUCED THAT WAS NOT 80 CHARACTERS IN LENGTH:",!!,^(ACHSRCT),!,7,7 Line Location: S8+24
Function Call: WRITE	Prompt: !!,"NUMBER OF RECORDS PROCESSED = ",!! Line Location: S8+25
Function Call: WRITE	Prompt: $J(ACHSRCT,8) Line Location: S8+26
Function Call: WRITE	Prompt: !!,7,7,"DCR REGISTER ERROR YOU MUST CLOSE YOUR REGISTERS FIRST" Line Location: ERR+1
Function Call: WRITE	Prompt: !!,7,7,"AUTHORIZING FACILITY CODE ERROR - JOB CANCELLED" Line Location: AFACERR+1

Name	Line Occurrences (* Changed, ! Killed)
^ACHS(3 - [#9002063]	S2+6, S2+7
^ACHSDATA(	S8+23*, S8+24
^ACHSF - [#9002080]	S4+3, S5+3
^ACHSTXOB(	S8+5*
^ACHSTXPD(	S5+16*
^ACHSTXPG(	S7+4, S7A+2
^ACHSTXPT(	S8+7*
^ACHSTXVN(	S5+18, S8+17
^AUTTLOC - [#9999999.06]	S2+3, S2+4
^AUTTVNDR - [#9999999.11]	S8+21
^TMP("ACHSTXAR"	S3+1, S4+1, S5+1

Name	Line Occurrences
AFACERR	S2+4, S2+5
CVTEND1	S3+2
ERR	S2+1
S3	S4+2
S4	S4+3, S4+4, S5+2
S5	S5+3, S5+5, S8+1, S8+4, S8+28
S7	S5+15
S7A	S7+3
S8	S7A+1

Name	Field # of Occurrence
^(	S8+24
^(0	S4+3, S5+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ACHS	ACHSTXA1+15, S2+6, S2+7*
>> ACHS(	S2+6, S2+7
>> ACHSAFAC	S2+3, S2+4, S2+5
>> ACHSBDT	ACHSTXA1+14, ACHSTXA1+17, S2+2, S3+1*, S3+2, S3+3, S4+1, S5+1, S8+25
ACHSCAN	S8+23, CVTEND1+3!
ACHSCDE	S8+13*, S8+19, S8+23, CVTEND1+3!
ACHSCHSS	ACHSTXA1+10*, ACHSTXA1+12!
ACHSCTY	S5+11, S5+14, S8+13, CVTEND1+3!
ACHSDCR	ACHSTXA1+14*, CVTEND1+3!
ACHSDEST	S5+11*, S5+16, S5+18, S8+7, S8+17, CVTEND1+3!
>> ACHSDIEN	S3+4, S4+1, S4+2, S4+3, S5+1, S5+3, S5+16, S7+4, S7A+2, S8+5
ACHSDOCN	S8+16*, S8+23, CVTEND1+3!
ACHSDOCR	S4+3*, S4+4, S4+5, S5+11, S5+17, S7A+2, S8+7, S8+9, S8+16, CVTEND1+3!
>> ACHSEDT	ACHSTXA1+14, ACHSTXA1+17, S2+1, S3+2
ACHSEFDT	S8+13*, S8+23, CVTEND1+3!
ACHSF638	ACHSTXA1+14*, S2+7, S5+15, S7A+1, S8+4, CVTEND1+3!
>> ACHSFC	S8+11, S8+12
>> ACHSFDT	S2+2, S8+25
ACHSFED	S8+21*, S8+23, CVTEND1+3!
ACHSIPA	S5+13*, S8+23, CVTEND1+3!
>> ACHSLDAT	S3+3*
>> ACHSOBJC	S8+23
ACHSPROV	S5+17*, S5+18, S8+17, S8+21, CVTEND1+3!
>> ACHSRCT	S8+22*, S8+23, S8+24, S8+25, S8+26, CVTEND1+1, CVTEND1+2
>> ACHSROUT	CVTEND1+1, CVTEND1+2
>> ACHSRR	ACHSTXA1+14*
>> ACHSRTYP(	ACHSTXA1+15*
>> ACHSRTYP(2	S8+22*
ACHSSCC	CVTEND1+3!
>> ACHSTIEN	S4+6, S5+1, S5+2, S5+3, S5+16, S7+4, S7A+2, S8+5
>> ACHSTOS	S4+5*, S7+4, S7A+2, S8+23
ACHSTRNR	S5+3*, S5+4, S5+13, S5+14, CVTEND1+3!
ACHSTY	S5+4*, S5+5, S5+11, S5+16, S8+1, S8+13, CVTEND1+3!
>> ACHSX	S8+9*
ACHSXLOC	S8+11, S8+12, S8+16, CVTEND1+3!
>> ACHSY	S8+12
DT	S8+13
DUZ(2	S2+3, S2+6, S2+7, S4+3, S5+3
IOF	ACHSTXA1+9
>> J	ACHSTXA1+14*
U	S2+3, S2+4, S4+4, S4+5, S5+4, S5+11, S5+13, S5+14, S5+17, S7A+2 , S8+7, S8+9, S8+16, S8+21
>> X	S2+4, S5+13
X1	S8+9*, S8+23, CVTEND1+3!

Customize PDF page

Package: Contract Health Management Information System

Routine: ACHSTXA1

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: