Routine: ACHSPOST

Package	Total	Call Graph
Contract Health Management Information System	8	^ACHSCONV ^ACHSPOS1 ^ACHSPOS2 ^ACHSPOS4 ^ACHSPOS5 ^ACHSPOS6 START^ACHSPOSM ^ACHSXREF
VA Fileman	3	(NOW,YX)^%DTC ^DIC ^DIK
DRG Grouper	1	$$CPT^ICPTCOD
Kernel	1	$$FMTE^XLFDT
Uncategorized	1	^%ET

Entry Points

Name	Comments	DBIA/ICR reference
KTMP	;
END	;
DOCCPT	;
DDCHECK	;
KEYASS	;
PULLCPT	;
CLEANUP	;
OPTS	;
DEFCPT	;
SET(NUM)	;
MAIL	;
ERROR
DIVCHK	;EP from ACHSPOS4
DENCPT	;

External References

Name	Field # of Occurrence
NOW^%DTC	END+2
YX^%DTC	ACHSPOST+13, ACHSPOST+75, DIVCHK+1, DIVCHK+34, KEYASS+1, SET+1, END+4, DOCCPT+1, DOCCPT+34, DEFCPT+2 , DEFCPT+30, DENCPT+2, DENCPT+31
^%ET	ERROR+1
^ACHSCONV	ACHSPOST+63
^ACHSPOS1	ACHSPOST+52
^ACHSPOS2	ACHSPOST+55
^ACHSPOS4	ACHSPOST+57
^ACHSPOS5	ACHSPOST+59
^ACHSPOS6	ACHSPOST+61
START^ACHSPOSM	ACHSPOST+16, ACHSPOST+19, ACHSPOST+44, MAIL+2
^ACHSXREF	ACHSPOST+72
^DIC	KEYASS+16, KEYASS+17
^DIK	DOCCPT+26, DEFCPT+23, DENCPT+24, CLEANUP+9
$$CPT^ICPTCOD	DOCCPT+20, DEFCPT+17, DENCPT+18, CLEANUP+6
$$FMTE^XLFDT	ACHSPOST+24, END+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"ACHSPOST IS DEPENDENT ON ACHSPRE!!" Line Location: ACHSPOST+19
Function Call: WRITE	Prompt: !!,"Beginning CHS 3.1 Post Init at ",$$FMTE^XLFDT(NOW),!! Line Location: ACHSPOST+24
Function Call: WRITE	Prompt: !!,LINE Line Location: ACHSPOST+32
Function Call: WRITE	Prompt: !!,LINE Line Location: ACHSPOST+46
Function Call: WRITE	Prompt: !!,LINE Line Location: DIVCHK+5
Function Call: WRITE	Prompt: !!,"The following is a list of active facilities that have been" Line Location: DIVCHK+6
Function Call: WRITE	Prompt: !,"assigned to active users. You may want to review this list" Line Location: DIVCHK+7
Function Call: WRITE	Prompt: !,"to determine whether these are correct or not." Line Location: DIVCHK+8
Function Call: WRITE	Prompt: !!,"If the 'CHS DENIAL FACILITY' file does NOT exist, the install" Line Location: DIVCHK+10
Function Call: WRITE	Prompt: !,"will create an entry in the 'CHS DENIAL FACILITY' file so" Line Location: DIVCHK+11
Function Call: WRITE	Prompt: !,"denials can be entered for these facilities. Otherwise the" Line Location: DIVCHK+12
Function Call: WRITE	Prompt: !,"Site Manager will have to enter new denial facilities as" Line Location: DIVCHK+13
Function Call: WRITE	Prompt: !,"required." Line Location: DIVCHK+14
Function Call: WRITE	Prompt: !! Line Location: DIVCHK+15
Function Call: WRITE	Prompt: !!,"FACILITY IEN",?15,"FACILITY NAME" Line Location: DIVCHK+26
Function Call: WRITE	Prompt: !,"------------",?15,"-------------" Line Location: DIVCHK+27
Function Call: WRITE	Prompt: !!,LINE Line Location: DIVCHK+33
Function Call: WRITE	Prompt: !,"PERSON DEACTIVATED! KEY NOT ADDED" Line Location: KEYASS+15
Function Call: WRITE	Prompt: !,"PERSON ALREADY HAS NEW KEY! ASSIGNING OLD KEY" Line Location: KEYASS+16
Function Call: WRITE	Prompt: !,"PERSON ALREADY HAS NEW KEY! ASSIGNING OLD KEY" Line Location: KEYASS+17
Function Call: WRITE	Prompt: !!,"CHS 3.1 Post-Init Complete ",$$FMTE^XLFDT(%) Line Location: END+3
Routine Call	DIC Line Location: KEYASS+16 KEYASS+17

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ICPT - [#81]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACHSDEF - [#9002066]	DEFCPT+7, DEFCPT+9, DEFCPT+11, DEFCPT+12
^ACHSDEN - [#9002071]	DENCPT+7, DENCPT+9, DENCPT+11, DENCPT+12
^ACHSF - [#9002080]	DOCCPT+6, DOCCPT+9, DOCCPT+12, DOCCPT+13
^ACHSINST(	ACHSPOST+14, ACHSPOST+16, ACHSPOST+19, ACHSPOST+76, DIVCHK+2, DIVCHK+24, DIVCHK+29, DIVCHK+35, KEYASS+19, SET+2* , END+5, ERROR, DOCCPT+2, DOCCPT+35, DOCCPT+36, DEFCPT+3, DEFCPT+31, DEFCPT+32, DENCPT+3, DENCPT+32 , DENCPT+33*
^DD(	ACHSPOST+42
^DD(9002061	DDCHECK+3
^DD(9002062	DDCHECK+4
^DD(9002063	DDCHECK+5
^DD(9002064	DDCHECK+6
^DD(9002064.1	DDCHECK+7
^DD(9002065	DDCHECK+8
^DD(9002066	DDCHECK+9
^DD(9002066.5	DDCHECK+10
^DD(9002067	DDCHECK+11
^DD(9002068	DDCHECK+12
^DD(9002069	DDCHECK+13
^DD(9002070	DDCHECK+14
^DD(9002071	DDCHECK+15
^DD(9002072	DDCHECK+16
^DD(9002072.1	DDCHECK+17
^DD(9002073	DDCHECK+18
^DD(9002073.1	DDCHECK+19
^DD(9002074	DDCHECK+20
^DD(9002075	DDCHECK+21
^DD(9002076	DDCHECK+22
^DD(9002077	DDCHECK+23
^DD(9002078	DDCHECK+24
^DD(9002079	DDCHECK+25
^DD(9002080	DDCHECK+26
^DIC(19.1 - [#19.1]	KEYASS+3, KEYASS+5
^DIC(4 - [#4]	DIVCHK+23, DIVCHK+24, DIVCHK+30
^ICPT - [#81]	CLEANUP+3
^TMP($J	KTMP+1!
^VA(200 - [#200]	DIVCHK+17, DIVCHK+18, DIVCHK+19, DIVCHK+21, KEYASS+8, KEYASS+10, KEYASS+11, KEYASS+12, KEYASS+16, KEYASS+17 , KEYASS+19

Label References

Name	Line Occurrences
DDCHECK	ACHSPOST+33
DEFCPT	PULLCPT+5
DENCPT	PULLCPT+4
DIVCHK	ACHSPOST+28
DOCCPT	PULLCPT+3
KEYASS	ACHSPOST+65
KTMP	END+2
SET	DDCHECK+3, DDCHECK+4, DDCHECK+5, DDCHECK+6, DDCHECK+7, DDCHECK+8, DDCHECK+9, DDCHECK+10, DDCHECK+11, DDCHECK+12 , DDCHECK+13, DDCHECK+14, DDCHECK+15, DDCHECK+16, DDCHECK+17, DDCHECK+18, DDCHECK+19, DDCHECK+20, DDCHECK+21, DDCHECK+22 , DDCHECK+23, DDCHECK+24, DDCHECK+25, DDCHECK+26

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	END+3
>> %H	ACHSPOST+13, ACHSPOST+75, DIVCHK+1, DIVCHK+34, KEYASS+1, SET+1, END+4, DOCCPT+1, DOCCPT+34, DEFCPT+2 , DEFCPT+30, DENCPT+2, DENCPT+31*
ACHD	ACHSPOST+22~
ACHDPT	ACHSPOST+22~
ACHDX	ACHSPOST+22~
ACHDY	ACHSPOST+22~
ACHDZ	ACHSPOST+22~
>> ACHSDIV	DIVCHK+20, DIVCHK+21, DIVCHK+23, DIVCHK+24, DIVCHK+28, DIVCHK+29, DIVCHK+30, DIVCHK+31
>> ACHSDNM	DIVCHK+30*, DIVCHK+31
>> ACHSPERS	DIVCHK+16, DIVCHK+17, DIVCHK+18, DIVCHK+19, DIVCHK+21
>> ACHSVERS	ACHSPOST+9, ACHSPOST+14, ACHSPOST+16, ACHSPOST+19, ACHSPOST+76, DIVCHK+2, DIVCHK+24, DIVCHK+29, DIVCHK+35, KEYASS+19 , SET+2, END+5, ERROR, PULLCPT+1, DOCCPT+2, DOCCPT+35, DOCCPT+36, DEFCPT+3, DEFCPT+31, DEFCPT+32 , DENCPT+3, DENCPT+32, DENCPT+33
>> CODE	DOCCPT+15*, DOCCPT+20
>> CPTCNT	DOCCPT+4, DOCCPT+21, DOCCPT+36
>> CPTCODE	CLEANUP+2, CLEANUP+3, CLEANUP+6, CLEANUP+8
>> CPTINFO	DOCCPT+13*, DOCCPT+14, DOCCPT+15
>> CPTMULT	DOCCPT+11, DOCCPT+12, DOCCPT+13, DOCCPT+24
>> CURDATE	KEYASS+2*, KEYASS+15
DA	ACHSPOST+22~, DOCCPT+24, DEFCPT+21, DENCPT+22, CLEANUP+8
DA(1	KEYASS+16, KEYASS+17, DOCCPT+23, DOCCPT+25, DEFCPT+20, DEFCPT+22, DENCPT+21*, DENCPT+23
DA(2	DOCCPT+22, DEFCPT+19, DENCPT+20*
DD	ACHSPOST+22~
>> DEFCNT	DEFCPT+5, DEFCPT+18, DEFCPT+32
>> DEFCPT	DEFCPT+12*, DEFCPT+13, DEFCPT+17
>> DEFDOC	DEFCPT+8, DEFCPT+9, DEFCPT+11, DEFCPT+12, DEFCPT+20
>> DENCNT	DENCPT+5, DENCPT+19, DENCPT+33
>> DENCPT	DENCPT+12*, DENCPT+13, DENCPT+18
>> DENDOC	DENCPT+8, DENCPT+9, DENCPT+11, DENCPT+12, DENCPT+21
DIC	ACHSPOST+22~, KEYASS+16, KEYASS+17
DIC(0	KEYASS+16, KEYASS+17
DIE	ACHSPOST+22~
DIK	ACHSPOST+22~, DOCCPT+25, DEFCPT+22, DENCPT+23, CLEANUP+7
>> DLAYGO	KEYASS+16, KEYASS+17
DO	ACHSPOST+22~
>> DOCCNT	DOCCPT+9*
>> DOCUMENT	DOCCPT+8, DOCCPT+9, DOCCPT+12, DOCCPT+13, DOCCPT+23
DR	ACHSPOST+22~
>> ERRLIST	DDCHECK+2*
>> ERRLIST(	ACHSPOST+41, DDCHECK+7, DDCHECK+10, DDCHECK+17, DDCHECK+19
>> ERRLIST(9002061	DDCHECK+3*
>> ERRLIST(9002062	DDCHECK+4*
>> ERRLIST(9002063	DDCHECK+5*
>> ERRLIST(9002064	DDCHECK+6*
>> ERRLIST(9002065	DDCHECK+8*
>> ERRLIST(9002066	DDCHECK+9*
>> ERRLIST(90020667	DDCHECK+11*
>> ERRLIST(9002068	DDCHECK+12*
>> ERRLIST(9002069	DDCHECK+13*
>> ERRLIST(9002070	DDCHECK+14*
>> ERRLIST(9002071	DDCHECK+15*
>> ERRLIST(9002072	DDCHECK+16*
>> ERRLIST(9002073	DDCHECK+18*
>> ERRLIST(9002074	DDCHECK+20*
>> ERRLIST(9002075	DDCHECK+21*
>> ERRLIST(9002076	DDCHECK+22*
>> ERRLIST(9002077	DDCHECK+23*
>> ERRLIST(9002078	DDCHECK+24*
>> ERRLIST(9002079	DDCHECK+25*
>> ERRLIST(9002080	DDCHECK+26*
>> ERROR	ACHSPOST+16, ACHSPOST+19, ACHSPOST+36, ACHSPOST+44, DDCHECK+1, DDCHECK+3, DDCHECK+4, DDCHECK+5, DDCHECK+6, DDCHECK+7 , DDCHECK+8, DDCHECK+9, DDCHECK+10, DDCHECK+11, DDCHECK+12, DDCHECK+13, DDCHECK+14, DDCHECK+15, DDCHECK+16, DDCHECK+17 , DDCHECK+18, DDCHECK+19, DDCHECK+20, DDCHECK+21, DDCHECK+22, DDCHECK+23, DDCHECK+24, DDCHECK+25, DDCHECK+26, MAIL+1 , MAIL+2
>> FACILITY	DOCCPT+5, DOCCPT+6, DOCCPT+9, DOCCPT+12, DOCCPT+13, DOCCPT+22, DOCCPT+25, DEFCPT+6, DEFCPT+7, DEFCPT+9 , DEFCPT+11, DEFCPT+12, DEFCPT+19, DEFCPT+22, DENCPT+6, DENCPT+7, DENCPT+9, DENCPT+11, DENCPT+12, DENCPT+20 , DENCPT+23
>> FILE	ACHSPOST+40, ACHSPOST+41, ACHSPOST+42, ACHSPOST+43
>> FILENAME	ACHSPOST+42*, ACHSPOST+43
>> LINE	ACHSPOST+10*, ACHSPOST+32, ACHSPOST+46, DIVCHK+5, DIVCHK+33
>> MULT	DEFCPT+10, DEFCPT+11, DEFCPT+12, DEFCPT+21, DENCPT+10, DENCPT+11, DENCPT+12, DENCPT+22
>> NKEYNUM	KEYASS+5*, KEYASS+6, KEYASS+16
>> NOW	ACHSPOST+13, ACHSPOST+14, ACHSPOST+16, ACHSPOST+19, ACHSPOST+24, ACHSPOST+75, ACHSPOST+76, DIVCHK+1, DIVCHK+2, DIVCHK+34 , DIVCHK+35, KEYASS+1, SET+1, SET+2, END+4, END+5, DOCCPT+1, DOCCPT+2, DOCCPT+34, DOCCPT+35 , DEFCPT+2, DEFCPT+3, DEFCPT+30, DEFCPT+31, DENCPT+2, DENCPT+3, DENCPT+31*, DENCPT+32
NUM	SET~, SET+2
>> OKEYNUM	KEYASS+3*, KEYASS+10, KEYASS+17
>> PERSIEN	KEYASS+7, KEYASS+8, KEYASS+10, KEYASS+11, KEYASS+12, KEYASS+16, KEYASS+17, KEYASS+19
>> TERMDT	KEYASS+12, KEYASS+13, KEYASS+15
U	ACHSPOST+8, ACHSPOST+19, DIVCHK+18, DIVCHK+19, DIVCHK+23, DIVCHK+24, DIVCHK+30, KEYASS+11, KEYASS+12, KEYASS+19 , DDCHECK+3, DDCHECK+4, DDCHECK+5, DDCHECK+6, DDCHECK+7, DDCHECK+8, DDCHECK+9, DDCHECK+10, DDCHECK+11, DDCHECK+12 , DDCHECK+13, DDCHECK+14, DDCHECK+15, DDCHECK+16, DDCHECK+17, DDCHECK+18, DDCHECK+19, DDCHECK+20, DDCHECK+21, DDCHECK+22 , DDCHECK+23, DDCHECK+24, DDCHECK+25, DDCHECK+26, PULLCPT+2, DOCCPT+15, DOCCPT+20, DEFCPT+12, DEFCPT+17, DENCPT+12 , DENCPT+18, CLEANUP+6
>> X	KEYASS+2, KEYASS+16, KEYASS+17
>> XPDABORT	ACHSPOST+16, ACHSPOST+19
>> Y	ACHSPOST+13, ACHSPOST+75, DIVCHK+1, DIVCHK+34, KEYASS+1, SET+1, END+4, DOCCPT+1, DOCCPT+34, DEFCPT+2 , DEFCPT+30, DENCPT+2, DENCPT+31

Customize PDF page

Package: Contract Health Management Information System

Routine: ACHSPOST

Information

Source Information

Call Graph

Call Graph Total: 14

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items