Routine: ACHSWFRS

Package	Total	Call Graph
Contract Health Management Information System	6	$$C^ACHS SLV^ACHSFU (,$$FY)^ACHSVAR DCIS^ACHSWDCS RPT^ACHSWDR ^ACHSWVEN
Kernel	3	^%ZIS ^%ZISC $$VERSION^%ZOSV
IHS VA Utilities	1	^XBGSAVE

Package	Total	Caller Graph
Contract Health Management Information System	2	ACHSRPTDCISERROR ACHSTX DCIS/WEB FRS

Entry Points

Name	Comments	DBIA/ICR reference
A	; Main loop. Check end date.
SENDFILE	; Send file
C	;
B	; Get IEN.
KILL2	;
REP	;
ST	;EP FOR REPORT ONLY
FYSEL	; Identify fiscal years for data export
START	;
KILL	; Do ERPT, kill vars, quit
REM	; --- Remove the intended Host File ---
PRINT	;
DCIS	; ----DCIS SECTION ---

External References

Name	Field # of Occurrence
^%ZIS	REP+4
^%ZISC	REP+44
$$VERSION^%ZOSV	REM+4
$$C^ACHS	REP+2
SLV^ACHSFU	REP+6
^ACHSVAR	ST+6, START+3, KILL2+4
$$FY^ACHSVAR	FYSEL+2
DCIS^ACHSWDCS	DCIS+4
RPT^ACHSWDR	REP+40
^ACHSWVEN	C+35
^XBGSAVE	SENDFILE+12

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACHS(2 - [#9002062]	C+39
^ACHS(9 - [#9002069]	REP+19
^ACHSF - [#9002080]	REP+15, REP+17, A+1, B+1, C+1, C+2, C+3, C+7, C+11, C+12 , C+13, C+14, C+15, C+16, C+33, C+38, C+42
^AUTTAREA - [#9999999.21]	PRINT+1
^AUTTLOC - [#9999999.06]	REP+18, REP+24, REP+25, START+1, PRINT+1, C+30
^AUTTSITE - [#9999999.39]	REP+36
^AUTTSITE(0	REP+35
^AUTTVNDR - [#9999999.11]	C+4
^DPT - [#2]	C+8
^TMP($J	ST+4!, ST+5, REP+41!, C+23, C+24, DCIS+7*

Label References

Name	Line Occurrences
A	B+2, C+1
B	C+4, C+10, C+23, DCIS+8
FYSEL	START+4
KILL	PRINT+2, A+2
KILL2	REP+1, REP+42
PRINT	START+5
SENDFILE	REP+39
START	REP+38

Naked Globals

Name	Field # of Occurrence
^("PA"	C+11
^("ZA"	C+12
^(0	REP+25, C+1, C+2, C+3, C+4, C+8, C+15, C+16, C+39
^(1	REP+36, C+30
^(11	C+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	FYSEL+2*
ACHS	C+13*, C+14, C+15, C+16, KILL2+2!
ACHS("$"	C+3, C+11, C+12, C+15, C+25, C+27
ACHS("$PCAN"	C+3, C+16
ACHS0	REP+25*, REP+26, REP+30!
ACHS13	KILL+4!
ACHSACFY	KILL+3!, KILL2+2!
ACHSAFF	REP+23, REP+29, REP+31, KILL+6!
ACHSBDT	FYSEL+2*, KILL+3!
ACHSBLNK	C+3*, C+9, KILL+1!
ACHSBM	KILL2+2!
ACHSCAN	C+38*, C+39, KILL+5!
ACHSCDFN	KILL+7!
>> ACHSCFY	REP+19, START+2, REM+2
ACHSCMD	REM+3, REM+4, REM+5*, REM+6, KILL+3!
ACHSCNU	KILL2+2!
ACHSCNX	PRINT+3*, KILL+1!
ACHSCNX("$"	PRINT+3*
ACHSCTYP	KILL+7!
ACHSDATA	C+34!*, DCIS+7, KILL+5!
ACHSDEST	C+42*, DCIS+7, KILL+6!
ACHSDFY	C+2*, DCIS+4, KILL+5!
ACHSDIEN	A+3, B+1, B+2, C+1, C+2, C+3, C+7, C+11, C+12, C+13 , C+14, C+15, C+16, C+33, C+38, C+42, KILL+2!
ACHSDNU	PRINT+4, A+1, A+2, B+1, KILL+1!
ACHSDOC	C+5, C+22, C+23, C+24, DCIS+7, KILL+1!, KILL+5!
ACHSDOC1	C+2*, C+5, KILL+1!
ACHSDOC2	C+2*, C+5, KILL+1!
ACHSDOS	C+14*, KILL+1!
ACHSEDT	FYSEL+2, FYSEL+3, KILL+3!
ACHSEIN	C+4*, KILL+1!
ACHSERR	PRINT+2, KILL+3!
ACHSERR(	A+3*
ACHSFAC	REP+14, REP+15, REP+16, REP+17, REP+18, REP+19, REP+24, REP+25, START+1, PRINT+1 , A+1, B+1, C+1, C+2, C+3, C+7, C+11, C+12, C+13, C+14 , C+15, C+16, C+30, C+33, C+38, C+42, KILL2+1!
ACHSFAX	KILL+6!
ACHSFC	PRINT+1*, C+5, KILL+3!
ACHSFILE	KILL+5!
ACHSFLG	KILL2+2!
ACHSFLG1	ACHSWFRS+10*, REP+1, REP+16, REP+39, REP+40, REM+1, KILL2+3!
>> ACHSFY	START+2*, FYSEL+1, FYSEL+2
ACHSFYDT	KILL+4!
ACHSFYI	C+38, C+39, DCIS+7, KILL+5!
ACHSFYS	START+2*, KILL2+1!
ACHSFYWK	KILL+4!
ACHSLN	KILL2+2!
ACHSLOC	KILL2+2!
ACHSNAME	C+6!, C+8, C+9, C+10, KILL+2!
ACHSOBJ	C+2*, KILL+5!
ACHSOPEN	PRINT+3*, KILL+2!
ACHSOPEN("$"	PRINT+3*
ACHSORDT	C+3*, DCIS+4, KILL+3!
ACHSP	REP+26*, REP+30!
ACHSP1	REP+27, REP+28, REP+30!
ACHSP2	REP+27, REP+30!
ACHSP3	REP+28, REP+30!
ACHSPG	KILL2+2!
ACHSPIID	KILL2+2!
ACHSPPC	REP+43, REP+45!
ACHSPPO	REP+40, REP+45!
ACHSPSD	C+30*, DCIS+7, KILL+5!
ACHSPUB	REP+36*, REP+37, REM+3, KILL+6!
ACHSQ	REP+45!
ACHSREC	DCIS+1*, DCIS+7, KILL+7!
ACHSRTYP	KILL+7!
ACHSSTS	C+1*, C+25, C+26, C+27, DCIS+4, KILL+2!
ACHSTIME	KILL2+2!
ACHSTMP	REP+23!, REP+30!
ACHSTMP(	REP+29
ACHSTMP(""	REP+29
ACHSTMP(9999999	REP+23, REP+28
ACHSTOS	C+3*, KILL+2!
ACHSTOT	C+25, C+26, C+27*, DCIS+7, KILL+4!
ACHSTOTP	PRINT+3*, KILL+2!
ACHSTOTP("$"	PRINT+3*
ACHSTST	KILL+7!
ACHSUSR	KILL2+2!
ACHSVC	KILL+7!
ACHSVCL	KILL+7!
ACHSVDFN	C+2, C+4, C+33, C+35, KILL+2!, KILL+6!
ACHSVER	ST+2!*, DCIS+7, KILL2+1!
ACHSVFAX	KILL2+3!
ACHSVNDR	C+4*, KILL+1!
ACHSWFY	FYSEL+1*, REM+2, PRINT+4, A+2, KILL+4!
>> ACHSX	REM+6*
ASUFAC	START+1*, REM+3, SENDFILE+2, KILL2+3!
C	KILL2+1!
DA	REP+23!, REP+24, REP+25, REP+29*, REP+30!, KILL+4!
DFN	REP+35, REP+36, C+7, C+8, KILL+2!
DT	REP+27, FYSEL+3
DUZ(2	REP+16
I	A+3*, KILL2+1!
IO	REP+44
IO("S"	REP+6, REP+40, REP+43
IO(0	REP+44
IOF	REP+2
J	REP+26*, REP+30!
>> POP	REP+1, REP+5
U	FYSEL+2, PRINT+1, C+1, C+2, C+3, C+4, C+7, C+8, C+14, C+15 , C+16, C+25, C+33, C+42, DCIS+7
X	KILL+7!, KILL2+3!
X1	SENDFILE+1~, KILL2+3!
X2	KILL+2!
X3	PRINT+4*, KILL+2!
XBCON	SENDFILE+1~, SENDFILE+9*
XBE	SENDFILE+1~, SENDFILE+6*
XBF	SENDFILE+1~, SENDFILE+5*
XBFLT	SENDFILE+1~, SENDFILE+7*
XBFN	SENDFILE+1~, SENDFILE+2*
XBGL	SENDFILE+1~, SENDFILE+3*
XBMED	SENDFILE+1~, SENDFILE+8*
XBQ	SENDFILE+1~, SENDFILE+11*
XBQSHO	SENDFILE+1~, SENDFILE+4*
XBS1	SENDFILE+1~, SENDFILE+10*
ZISHC	KILL+4!
ZISHDA1	KILL+4!
>> ZTQUEUED	KILL2+4
ZTSK	PRINT+2!

Customize PDF page

Package: Contract Health Management Information System

Routine: ACHSWFRS

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: