Routine: ACHSDREA

Information

ACHSDREA ; IHS/ITSC/TPF/PMF - LIST ACTIVE DENIAL REASONS ;

Source file <ACHSDREA.m>

Package	Total	Call Graph
Kernel	3	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD
VA Fileman	2	^DIWP ^DIWW
Contract Health Management Information System	1	($$C,$$LOC,NOW,RTRN)^ACHS

Package	Total	Caller Graph
Contract Health Management Information System	1	ACHS DEN REASONS

Name	Line Occurrences
Function Call: WRITE	Prompt: !!! Line Location: ACHSDREA+4
Function Call: WRITE	Prompt: !!?5,$P($G(^ACHSDENS(ACHSDX,0)),U),!! Line Location: GO+6
Function Call: WRITE	Prompt: !! Line Location: RTXT+4
Function Call: WRITE	Prompt: !?10,"OPTION: ",?10,ACHSDROP Line Location: OPT+5
Function Call: WRITE	Prompt: @IOF,$$C^ACHS(ACHSDHDR,IOM),!,$$C^ACHS(ACHSDFAC,IOM),!,$$C^ACHS(ACHSTIME,IOM) Line Location: HDR+3
Routine Call	%ZIS Line Location: ACHSDREA+7
Routine Call	%ZIS Line Location: ACHSDREA+6

Name	Line Occurrences (* Changed, ! Killed)
^ACHSDENS - [#9002073]	GO+1, GO+2, GO+3, GO+6, RTXT+1, RTXT+4, OPT+1, OPT+3, OPT+4, OPT+7

Name	Field # of Occurrence
>> %ZIS	ACHSDREA+5*
ACHSDFAC	START+1~, START+3*, HDR+3
ACHSDHDR	START+1~, START+3*, HDR+3
ACHSDO	START+1~, RTXT+5, OPT+1, OPT+2, OPT+3, OPT+4, OPT+7
ACHSDOT	START+1~, OPT+6, OPT+7
ACHSDROP	START+1~, OPT+3*, OPT+5
ACHSDT	START+1~, GO+7, RTXT+1
ACHSDX	START+1~, START+5, GO+1, GO+2, GO+3, GO+6, RTXT+1, RTXT+4, OPT+1, OPT+3 , OPT+4, OPT+7
>> ACHSQUIT	GO+5, RTXT+3, OPT+9, HDR+2
ACHSTIME	START+1~, START+3*, HDR+3
DIW	START+1~
DIWF	START+1~, START+5*
DIWL	START+1~, GO+7, OPT+6
DIWR	START+1~, START+5*
DT	GO+3
IO	START+4
IO("Q"	ACHSDREA+8
IOF	HDR+3
IOM	START+5, HDR+3
IOSL	RTXT+3, OPT+9
>> POP	ACHSDREA+7
U	GO+3, GO+6, OPT+3, OPT+4
>> X	GO+7, RTXT+1, OPT+6, OPT+7
>> ZTDESC	ACHSDREA+9*
>> ZTRTN	ACHSDREA+9*

Name	Field # of Occurrence
$T(ACHSDREA	ACHSDREA+9, START+3