Routine: ACHSDN4

Package	Total	Call Graph
Contract Health Management Information System	3	($$DIR,$$DN,$$LOCK)^ACHS $$DIE^ACHSDN ($$REASCK,OTHREA1,OTHREAO,OTHREAS,REAOPT)^ACHSDN2
VA Fileman	2	^DIE ^DIR
Kernel	1	$$REPEAT^XLFSTR

Package

Total

Call Graph

Contract Health Management Information System

($$DIR,$$DN,$$LOCK)^ACHS $$DIE^ACHSDN ($$REASCK,OTHREA1,OTHREAO,OTHREAS,REAOPT)^ACHSDN2

VA Fileman

^DIE ^DIR

Kernel

$$REPEAT^XLFSTR

Package	Total	Caller Graph
Contract Health Management Information System	1	ACHSDNDP

Package

Total

Caller Graph

Contract Health Management Information System

ACHSDNDP

Entry Points

Name	Comments	DBIA/ICR reference
OPTSET	;SET OPTION
OTHREAS	; --- List other Denial Reasons
END	;
OTHR1	;
OTHSET	;SET OTHER DENIAL REASON
PRMSET	;PRIMARY DENIAL REASON SET
ADD	;ADD OTHER DENIAL REASON
OTHER	;EDIT OTHER DENIAL REASON
PRMDEL	;PRIM DEL OTHER TYPE ;ACHS3.121 NEW SECTION
PRIM	;
REA	;
TOF	;

External References

Name	Field # of Occurrence
$$DIR^ACHS	OTHR1+2
$$DN^ACHS	TOF+3
$$LOCK^ACHS	OTHSET+6, OTHSET+8
$$DIE^ACHSDN	PRMSET+5
$$REASCK^ACHSDN2	PRIM+7, OTHER+7
OTHREA1^ACHSDN2	OTHER+9
OTHREAO^ACHSDN2	OPTSET+1
OTHREAS^ACHSDN2	ADD+2
REAOPT^ACHSDN2	PRIM+9
^DIE	PRMDEL+8, OTHSET+7
^DIR	REA+13
$$REPEAT^XLFSTR	TOF+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,$$REPEAT^XLFSTR("=",79),!?30,"DENIAL REASONS EDIT",!,$$REPEAT^XLFSTR("=",79),!!,"PRIMARY DENIAL REASON: ",! Line Location: TOF+2
Function Call: WRITE	Prompt: !!,7,7,"No Primary Denial Reason Has Been Entered, But is required" Line Location: TOF+12
Function Call: WRITE	Prompt: !!,"OTHER DENIAL REASONS: ",! Line Location: OTHREAS+1
Function Call: WRITE	Prompt: !!,"OTHER DENIAL REASONS: ",! Line Location: OTHREAS+4
Function Call: WRITE	Prompt: ?15,$P($G(^ACHSDENS(ACHDOTR,20,ACHDROPT,0)),U) Line Location: OTHREAS+8
Function Call: WRITE	Prompt: !,"Please enter a number from 1 to ",ACHDCNT,"." Line Location: OTHR1+5
Function Call: WRITE	Prompt: !!?5,"Must have a Primary Denial Reason." Line Location: PRIM+2
Function Call: WRITE	Prompt: !?5,"Denial Option did not change." Line Location: PRIM+10
Function Call: WRITE	Prompt: !!?3,"Denial Reason List:" Line Location: REA+2
Function Call: WRITE	Prompt: !?5,CT,". ",$P(^ACHSDENS(X,0),U) Line Location: REA+5
Function Call: WRITE	Prompt: !,"No active Denial Reasons" Line Location: REA+8
Function Call: WRITE	Prompt: ! Line Location: REA+9
Function Call: WRITE	Prompt: !! Line Location: ADD+1
Routine Call	DIE Line Location: PRMDEL+8 OTHSET+7
Routine Call	DIR Line Location: REA+13

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACHSDEN - [#9002071]	TOF+8, TOF+9, TOF+10, OTHREAS+3, OTHREAS+6, OTHREAS+9, OTHREAS+10, OTHREAS+11, REA+21, PRMDEL+1 , PRMDEL+4
^ACHSDENS - [#9002073]	TOF+4, TOF+5, TOF+6, TOF+8, TOF+11, OTHREAS+7, OTHREAS+8, OTHREAS+9, OTHREAS+12, PRIM+6 , OTHER+6, REA+3, REA+4, REA+5, REA+6, REA+11, PRMSET+4

Name	Line Occurrences
@(	OTHR1+7
END	OTHR1+3
OPTSET	OTHER+8
OTHER	OTHER+7
OTHR1	OTHR1+5
OTHREAS	TOF+4
OTHSET	OTHER+3, OTHER+7, REA+20
PRIM	TOF+12, PRIM+7
PRMDEL	REA+18
PRMSET	PRIM+7
REA	PRIM+1, OTHER+1
TOF	TOF+13, OTHR1+8

Name	Field # of Occurrence
^(0	OTHREAS+6, REA+21*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	OTHR1+2, OTHR1+3, OTHR1+4, OTHR1+5, OTHR1+6, OTHR1+7
>> ACHDCNT	OTHREAS+2, OTHREAS+4, OTHREAS+5, OTHREAS+7, OTHREAS+13, OTHR1+5, REA+19
>> ACHDENR	PRIM+4, PRMSET+1, PRMSET+3, PRMSET+4, PRMSET+5
>> ACHDENS(	REA+6*, REA+17
>> ACHDOPTR	TOF+1*
>> ACHDOREO	PRIM+6, OTHER+6
>> ACHDORNM	PRIM+5, OTHER+2, REA+19*, OTHSET+4
>> ACHDOTR	OTHREAS+6, OTHREAS+7, OTHREAS+8, OTHREAS+9, OTHREAS+12, OTHREAS+13, PRIM+4, PRIM+6, PRIM+7, OTHER+5* , OTHER+6, OTHER+7
>> ACHDR	OTHR1+6*, REA+11, REA+18, REA+19
ACHDREA	TOF+13!, OTHREAS+2, OTHREAS+3, OTHREAS+6, OTHREAS+9, OTHREAS+10, OTHREAS+11, OTHREAS+13, END+1!
ACHDREA(	OTHREAS+13*, OTHR1+5, PRIM+5, PRIM+7, OTHER+2, OTHER+7, REA+7, REA+11, REA+19
ACHDREA(1	TOF+7*
>> ACHDRED	OTHR1+6*, PRIM+5, PRIM+7, OTHER+2, OTHER+7, REA+7, REA+11, REA+19
>> ACHDREDT	REA+7*, REA+12, REA+18, REA+19
>> ACHDROPT	OTHREAS+6*, OTHREAS+8, OTHREAS+9, OTHREAS+13
>> ACHSA	TOF+8, TOF+9, TOF+10, OTHREAS+3, OTHREAS+6, OTHREAS+9, OTHREAS+10, OTHREAS+11, REA+21, PRMDEL+1 , PRMDEL+2, PRMDEL+4, PRMDEL+6, OTHSET+1, OTHSET+3
>> ACHSDREA	PRMSET+4*
>> ACHSREF	PRMSET+3
>> ACHSREF(1114	PRMSET+3*
ALT	ACHSDN4+4~
>> CT	REA+1, REA+5, REA+6, REA+7, REA+8, REA+10
DA	PRMDEL+7, PRMDEL+9!, OTHSET+4, OTHSET+9!
DA(1	PRMDEL+6, OTHSET+3
DA(2	PRMDEL+5, OTHSET+2
DAT	ACHSDN4+4~
DIE	PRMDEL+2, PRMDEL+9!, OTHSET+1, OTHSET+9!
DIR	REA+23!
DIR("A"	REA+11*
DIR("B"	REA+12*
DIR(0	REA+10*
DR	PRMDEL+3, PRMDEL+9!, OTHSET+5, OTHSET+9!
DT	REA+4
>> DTOUT	OTHR1+3
>> DUOUT	OTHR1+3, PRIM+8, PRMSET+6, OTHSET+6, OTHSET+8*
DUZ(2	TOF+8, TOF+9, TOF+10, OTHREAS+3, OTHREAS+6, OTHREAS+9, OTHREAS+10, OTHREAS+11, REA+21, PRMDEL+1 , PRMDEL+2, PRMDEL+4, PRMDEL+5, OTHSET+1, OTHSET+2
IOF	TOF+2
>> L	PRMDEL+4*, PRMDEL+7
>> R1	TOF+9, TOF+10, OTHREAS+10, OTHREAS+11
>> R2	TOF+10, TOF+11, OTHREAS+11, OTHREAS+12
SS	ACHSDN4+4~
TMP	END+1!, REA+16, REA+17, REA+22
U	TOF+5, TOF+6, TOF+7, TOF+8, TOF+10, TOF+11, OTHREAS+6, OTHREAS+7, OTHREAS+8, OTHREAS+9 , OTHREAS+11, OTHREAS+12, OTHREAS+13, PRIM+5, PRIM+6, PRIM+7, OTHER+2, OTHER+6, OTHER+7, REA+4 , REA+5, REA+6, REA+7, REA+11, REA+19, REA+21, PRMSET+4
>> X	TOF+3, TOF+4, TOF+5, TOF+6, TOF+7, TOF+8, TOF+11, PRIM+2, PRIM+4, OTHER+3 , OTHER+5, REA+1, REA+3, REA+4, REA+5, REA+6, REA+7, REA+19, OTHSET+5
>> X1	TOF+3*, TOF+6, TOF+7, TOF+8
>> Y	OTHR1+4, OTHR1+5, OTHR1+6, PRIM+4, PRIM+10, OTHER+5, REA+8, REA+17, REA+18, REA+19 , REA+22*, PRMSET+1, PRMSET+6

Customize PDF page

Package: Contract Health Management Information System

Routine: ACHSDN4

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: