Routine: ACHSTXF

Package	Total	Call Graph
Contract Health Management Information System	6	($$PARM,RTRN)^ACHS (FYCVT,LINES)^ACHSFU (ERROR,KILLGLBS)^ACHSTX ^ACHSTX3 (CANOBJ,KILL)^ACHSTX8 ^ACHSUF
Kernel	1	^%ZISC

Package

Total

Call Graph

Contract Health Management Information System

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

Kernel

^%ZISC

Package	Total	Caller Graph
Contract Health Management Information System	2	ACHSTX ACHSTXF1

Package

Total

Caller Graph

Contract Health Management Information System

ACHSTX ACHSTXF1

Entry Points

Name	Comments	DBIA/ICR reference
AFACERR	;
S8	;
ERR	;
S3	;Begin loop through transaction index
S2	;
S1	;Set beginning date AND ein of prev export
S7	;EP; FROM RE-EXPORT SINGLE TRANSACTIONS OR BATCHES - ACHSTXF1
S6	;
S5	;Skip special transaction documents
S4	;skip pay documents
SET(%)	;
CVTEND1	;

External References

Name	Field # of Occurrence
^%ZISC	ERR+2, AFACERR+2
$$PARM^ACHS	S2+3, S8+19
RTRN^ACHS	ERR+2
FYCVT^ACHSFU	S7+7
LINES^ACHSFU	ACHSTXF+6
ERROR^ACHSTX	S7+16, S8+11
KILLGLBS^ACHSTX	ACHSTXF+11
^ACHSTX3	CVTEND1+6
CANOBJ^ACHSTX8	S7+17
KILL^ACHSTX8	ERR+2, AFACERR+2
^ACHSUF	ACHSTXF+9

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!,ACHS(""),!?30,"EXPORT CHS DATA FOR UFMS",!,ACHS(""),! Line Location: ACHSTXF+7
Function Call: WRITE	Prompt: !!,7,7,"A DHR RECORD WAS PRODUCED THAT WAS NOT 161 CHARACTERS IN LENGTH:",!!,^(ACHSRCT),!,7,7 Line Location: S8+11
Function Call: WRITE	Prompt: !!,"NUMBER OF RECORDS PROCESSED = ",!! Line Location: S8+12
Function Call: WRITE	Prompt: $J(ACHSRCT,8) Line Location: S8+13
Function Call: WRITE	Prompt: !!,7,7,"ERROR THE UFMS EXPORT START DATE MUST BE ENTERED IN THE CHS PARAMETERS" Line Location: ERR+1
Function Call: WRITE	Prompt: !!,7,7,"AUTHORIZING FACILITY CODE ERROR - JOB CANCELLED" Line Location: AFACERR+1
Function Call: WRITE	Prompt: $J(ACHSRCT,8) Line Location: CVTEND1+1
Function Call: WRITE	Prompt: $J(ACHSRCT,8) Line Location: SET+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACHSCTYP - [#9002068.1]	S7+14
^ACHSDATA(	S8+6, S8+9, S8+11, SET+2*
^ACHSF - [#9002080]	ACHSTXF+12, S1+1, S1+2, S2+3, S3+1, S4+1, S5+1, S5+2, S6+2, S6+4 , S6+5, S7+4, S7+13, S7+14, S8+3
^ACHSTXOB(	S8+17*
^ACHSTXPD(	S8+20*
^ACHSTXPG(	S8+19*
^ACHSTXPT(	S8+15*
^ACHSTXST - [#9002070]	S6+9, S6+10, S6+11
^ACHSTXST("C"	S1+4
^ACHSTXVN(	S8+16*
^AUTTLOC - [#9999999.06]	S2+2, S2+3
^AUTTVNDR - [#9999999.11]	S7+19, S7+20, S7+21, S7+23
^TMP("ACHSTX"	S8+18*

Name	Line Occurrences
AFACERR	S2+3, S2+4
CVTEND1	S3+2
ERR	S1+3
S3	S4+2
S4	S4+2, S5+2
S5	S5+2, S6+3
S6	S6+4, S6+5, S6+12, S8+22

Name	Field # of Occurrence
^(	S8+11
^(0	S6+4, S6+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	SET~, SET+1*, SET+2
>> ACHS("*"	ACHSTXF+7
ACHS2FY	S5+4, S8+2, S8+3*, S8+9, CVTEND1+4!
>> ACHSAFAC	S2+2, S2+3, S2+4
>> ACHSARCO	S5+4, S7+13, S8+6
>> ACHSBDT	ACHSTXF+12, S1+1, S1+2, S1+3, S1+4, S1+5, S2+2, S3+1*, S3+2, S3+3 , S4+1, S5+1, S6+2, S8+12
ACHSCAN	S8+9, CVTEND1+5!
ACHSCDE	S5+4, S7+11, S7+16, S8+6, CVTEND1+5!
>> ACHSCFY	S8+2
ACHSCHSS	ACHSTXF+8*, ACHSTXF+10!
ACHSCTY	S5+3, S7+2, S7+3*, S7+11, CVTEND1+5!
ACHSCTYP	S5+4, S7+14, S7+15*, S8+6, CVTEND1+4!
ACHSDCR	ACHSTXF+12*, CVTEND1+5!
ACHSDEST	S5+3, S7+2, S8+9, S8+14, S8+15, S8+16, S8+20, CVTEND1+5!
ACHSDFY	S5+3, S7+6, S7+12, S8+3, CVTEND1+4!
ACHSDOCN	S5+3, S7+12, S8+6, CVTEND1+5!
ACHSDOCR	S5+3, S6+4, S7+2, S7+4, S7+5, S7+6, S7+12, S7+18, S8+3, S8+15 , S8+19, CVTEND1+5!
ACHSDOCT	S5+3, S6+5, S7+1, S7+3, CVTEND1+5!
ACHSDR3	S5+3, S7+4, CVTEND1+5!
ACHSDUNS	S5+4, S7+23, S8+9, CVTEND1+4!
>> ACHSEDT	ACHSTXF+13*, S2+2, S3+2
ACHSEFDT	S7+10*, S8+6, CVTEND1+5!
ACHSEIN	S5+4, S7+20, S7+21, S7+22, S8+9, CVTEND1+4!
ACHSF638	ACHSTXF+12*, S8+19, CVTEND1+5!
>> ACHSFC	S7+8, S7+9
>> ACHSFDT	S2+2, S3+3, S8+12*
ACHSFED	S5+4, S7+19, S8+9, CVTEND1+4!
ACHSIPA	S5+3, S7+1, S8+9, CVTEND1+5!
>> ACHSLDAT	S2+2*
ACHSOBJC	S8+9, CVTEND1+4!
>> ACHSPEX	ACHSTXF+12, S1+4, S6+9, S6+10, S6+11
ACHSPROV	S5+4, S7+18, S7+19, S7+20, S7+21, S7+23, S8+16, CVTEND1+5!
>> ACHSRCT	S3+3, S8+4, S8+6, S8+9, S8+11, S8+12, S8+13, CVTEND1+1, CVTEND1+2, CVTEND1+3 , SET+2, SET+3
>> ACHSREEX	S8+21
>> ACHSROUT	CVTEND1+2, CVTEND1+3
>> ACHSRR	ACHSTXF+12*
>> ACHSRTYP(8	S8+5*
ACHSSKIP	S6+1, S6+10, S6+11, S6+12, CVTEND1+4!
ACHSTOS	S5+3, S7+4, S8+6, S8+19, CVTEND1+4!
ACHSTY	S3+4, S4+1, S4+2, S5+1, S6+2, S7+2, S8+20, CVTEND1+4!
ACHSX	S7+5*, CVTEND1+4!
ACHSXLOC	S5+4, S7+8, S7+9*, S7+12, S8+9, CVTEND1+4!
>> ACHSY	S7+9
DA	S5+5, S6+2, S6+3, S6+5, S6+11, S8+17, S8+18, S8+19, S8+20, CVTEND1+4!
DT	ACHSTXF+13, S7+10
DUZ(2	ACHSTXF+12, S1+1, S1+2, S1+4, S2+2, S2+3, S3+1, S4+1, S5+1, S5+2 , S6+2, S6+4, S6+5, S6+9, S6+10, S6+11, S7+4, S7+13, S7+14, S8+3
>> I	S7+22, S7+23
IOF	ACHSTXF+7
>> J	ACHSTXF+12*
>> P	S4+3, S5+1, S5+2, S6+2, S6+4, S6+5, S6+9, S6+10, S7+4, S8+17 , S8+18, S8+19, S8+20
U	ACHSTXF+12, S1+1, S1+2, S2+2, S2+3, S5+2, S6+11, S7+1, S7+2, S7+3 , S7+4, S7+5, S7+6, S7+12, S7+13, S7+14, S7+18, S7+19, S7+20, S7+21 , S7+23, S8+3, S8+15, S8+19
>> X	S2+3, S7+1, S7+14, S7+22, S7+23*
X1	S5+3, S7+6, S8+6, CVTEND1+4!
>> Y	S6+10*, S6+11

Customize PDF page

Package: Contract Health Management Information System

Routine: ACHSTXF

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: