Routine: ACHSPCC1

Package	Total	Call Graph
Contract Health Management Information System	4	($$AOP,$$LOC)^ACHS ^ACHSPCC3 (ENTRETRN,JOBABEND)^ACHSPCC4 ^ACHSPCCR
IHS VA Utilities	2	$$DIR^XBDIR $$C^XBFUNC
Kernel	2	(,HOME)^%ZIS $$FMTE^XLFDT

Package	Total	Caller Graph
Contract Health Management Information System	2	ACHSACO ACHSAREA SP/EX

Entry Points

Name	Comments	DBIA/ICR reference
RJEPCC	;;Default RJE # for ITS (Parklawn) Missing
RJEBCS	;;Default RJE # for the Fiscal Intemediary Missing
ERR(X)	;
EFFD	;
PCC	;;COMPUTER CENTER entry Missing for ITS (Parklawn)
CPFXERR	;
BCS	;;COMPUTER CENTER entry Missing for the Fiscal Intemediary

Name	Field # of Occurrence
^%ZIS	EFFD+7
HOME^%ZIS	ACHSPCC1+4, EFFD+9
$$AOP^ACHS	ACHSPCC1+35
$$LOC^ACHS	ERR+2
^ACHSPCC3	EFFD+15
ENTRETRN^ACHSPCC4	CPFXERR+2
JOBABEND^ACHSPCC4	ACHSPCC1+9, ACHSPCC1+15, ACHSPCC1+37, ACHSPCC1+38, EFFD+2, EFFD+9, ERR+3
^ACHSPCCR	EFFD+13
$$DIR^XBDIR	ACHSPCC1+37, EFFD+1
$$C^XBFUNC	ACHSPCC1+29
$$FMTE^XLFDT	ACHSPCC1+8, EFFD+1

Name	Line Occurrences
Function Call: WRITE	Prompt: !?10,"CHS FACILITY FILES ALREADY PROCESSED ON ",$$FMTE^XLFDT($P(^ACHSPCC("ODF-POST"),U,1)),!!?10,"JOB CANCELLED" Line Location: ACHSPCC1+8
Function Call: WRITE	Prompt: *7,!,"ACCOUNTING POINT NUMBER is missing from RPMS SITE file...",! Line Location: ACHSPCC1+14
Function Call: WRITE	Prompt: !,$$C^XBFUNC("AREA PREFIX="_$E(ACHSPFX,2,3)),! Line Location: ACHSPCC1+29
Function Call: WRITE	Prompt: !,"Your CHS FACILITY DHR Transactions Should be TRANSMITTED to:" Line Location: ACHSPCC1+33
Function Call: WRITE	Prompt: !?10,"(1) United Finacial Management System for Federal Facilities" Line Location: ACHSPCC1+34
Function Call: WRITE	Prompt: !?10,$S($$AOP^ACHS(2,3)="Y":"(2) Fiscal Intermediary",1:" ") Line Location: ACHSPCC1+35
Function Call: WRITE	Prompt: *7," CAN'T BE FUTURE DATE" Line Location: EFFD+3
Function Call: WRITE	Prompt: ! Line Location: EFFD+5
Function Call: WRITE	Prompt: *7,!!?12," CAN NUMBER PREFIX NOT CORRECTLY DEFINED FOR THIS FACILITY",!,"PREFIX = '",ACHSPFX,"'",!!?35,"JOB CANCELLED",!! Line Location: CPFXERR+1
Function Call: WRITE	Prompt: *7,!!?10,$P($T(@X),";",3) Line Location: ERR+1
Function Call: WRITE	Prompt: !?10,"In IHS COMMUNICATIONS PARAMETERS file for ",$$LOC^ACHS Line Location: ERR+2
Routine Call	%ZIS Line Location: ACHSPCC1+4 EFFD+9
Routine Call	%ZIS Line Location: EFFD+7

Name	Line Occurrences (* Changed, ! Killed)
^ACHSPCC("ODF-POST"	ACHSPCC1+6, ACHSPCC1+8
^AUTTAREA - [#9999999.21]	ACHSPCC1+11
^AUTTLOC - [#9999999.06]	ACHSPCC1+11
^AUTTSITE(1	ACHSPCC1+12
^AUTTTEL - [#9999999.71]	ACHSPCC1+17, ACHSPCC1+19, ACHSPCC1+21, ACHSPCC1+22, ACHSPCC1+23, ACHSPCC1+24

Name	Line Occurrences
CPFXERR	ACHSPCC1+26, ACHSPCC1+27, ACHSPCC1+28
EFFD	EFFD+3
ERR	ACHSPCC1+18, ACHSPCC1+20, ACHSPCC1+21, ACHSPCC1+23, ACHSPCC1+25

Name	Field # of Occurrence
^(0	ACHSPCC1+11

Name	Field # of Occurrence
%ZIS	EFFD+6*, EFFD+8!
%ZIS("A"	EFFD+6*
>> ACHSAPN	ACHSPCC1+12*, ACHSPCC1+13
>> ACHSAREA	ACHSPCC1+11*
>> ACHSCCTR	EFFD+10*
>> ACHSCT2	EFFD+13*
>> ACHSEFDT	EFFD+1, EFFD+2, EFFD+3, EFFD+4
>> ACHSFIRN	ACHSPCC1+24*, ACHSPCC1+25
>> ACHSFLG	EFFD+14
>> ACHSHASH	EFFD+13*
>> ACHSIO	ACHSPCC1+5*
>> ACHSPFX	ACHSPCC1+11*, ACHSPCC1+26, ACHSPCC1+27, ACHSPCC1+28, ACHSPCC1+29, CPFXERR+1
>> ACHSPRN	ACHSPCC1+19*, ACHSPCC1+20
>> ACHSPTRD	EFFD+10*
DT	EFFD+1, EFFD+3
>> DTOUT	ACHSPCC1+38, EFFD+2
>> DUOUT	ACHSPCC1+38, EFFD+2
DUZ(2	ACHSPCC1+11, ACHSPCC1+17, ACHSPCC1+19, ACHSPCC1+21, ACHSPCC1+22, ACHSPCC1+23, ACHSPCC1+24
IO	ACHSPCC1+5, EFFD+10
IO(0	ACHSPCC1+7, ACHSPCC1+30, ACHSPCC1+36
>> POP	EFFD+9
U	ACHSPCC1+8, ACHSPCC1+11, ACHSPCC1+12, ACHSPCC1+19, ACHSPCC1+24
X	ACHSPCC1+11, ACHSPCC1+17, ACHSPCC1+18, ACHSPCC1+19, ACHSPCC1+22*, ACHSPCC1+23, ACHSPCC1+24, ERR~
>> Y	EFFD+4

Name	Field # of Occurrence
$T(@X	ERR+1