Routine: ACHSDNL2

Package	Total	Call Graph
Contract Health Management Information System	3	($$DN,RTRN)^ACHS (,BODY)^ACHSDNL3 (ADDR,SUBADDR)^ACHSDNL5
VA Fileman	3	COMMA^%DTC ^DIWP ^DIWW
Kernel	1	$$FMTE^XLFDT

Package	Total	Caller Graph
Contract Health Management Information System	6	ACHSDAR1 ACHSDAR4 ACHSDFL1 ACHSDNL1 ACHSDNL3 ACHSDNL4

Entry Points

Name	Comments	DBIA/ICR reference
REQDATE	;
END	;
VNAM	;
HEADER	;EP - Print header on letters.
PROV	;
SETCHT	;EP - FROM ACHSDNL3
O	;
ALTREC	;
START	;
OTHER	;
OTHER1	;
DEMO	;
DATE	;
NOT	;
O1	;

External References

Name	Field # of Occurrence
COMMA^%DTC	PROV+8, PROV+9, OTHER+13, OTHER+14, OTHER1+14, OTHER1+15, O1+14
$$DN^ACHS	START+7, DATE+1, DATE+3, DATE+11, DATE+14, DEMO+2, REQDATE+1, PROV+4, PROV+5, PROV+15 , SETCHT+10, SETCHT+17
RTRN^ACHS	END+2
^ACHSDNL3	O1+19
BODY^ACHSDNL3	O+3, O+6, O1+3
ADDR^ACHSDNL5	DATE+2
SUBADDR^ACHSDNL5	DATE+2
^DIWP	HEADER+4
^DIWW	HEADER+5
$$FMTE^XLFDT	DATE+1, DEMO+2, REQDATE+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: START+4
Function Call: WRITE	Prompt: "* OFFICE COPY * " Line Location: START+4
Function Call: WRITE	Prompt: ! Line Location: START+5
Function Call: WRITE	Prompt: "* OFFICE COPY * " Line Location: START+5
Function Call: WRITE	Prompt: ! Line Location: START+7
Function Call: WRITE	Prompt: "DOCUMENT CANCELLED *" Line Location: START+7
Function Call: WRITE	Prompt: !!! Line Location: START+8
Function Call: WRITE	Prompt: !!,?DIWL-1,$$FMTE^XLFDT($$DN^ACHS(0,2)),!! Line Location: DATE+1
Function Call: WRITE	Prompt: !?DIWL-1,ACHDNAME Line Location: DATE+2
Function Call: WRITE	Prompt: !!?DIWL-1,"The following letter was sent to the patient for denial of service:",!! Line Location: DATE+2
Function Call: WRITE	Prompt: ?76-$L(X),X,!! Line Location: DATE+4
Function Call: WRITE	Prompt: !?4,"TO: " Line Location: DATE+27
Function Call: WRITE	Prompt: ?8,ACHDNAMP Line Location: DATE+28
Function Call: WRITE	Prompt: !?8,$P(A,U) Line Location: DATE+30
Function Call: WRITE	Prompt: !?8,$P(A,U,4),"," Line Location: DATE+31
Function Call: WRITE	Prompt: " ",$P($G(^DIC(5,ACHDST,0)),U,2) Line Location: DATE+33
Function Call: WRITE	Prompt: " ",$P(A,U,6),!! Line Location: DATE+34
Function Call: WRITE	Prompt: "(No patient on file)" Line Location: NOT+2
Function Call: WRITE	Prompt: "(No patient on file)" Line Location: NOT+3
Function Call: WRITE	Prompt: !?4,"TO: " Line Location: NOT+15
Function Call: WRITE	Prompt: ?8,ACHDNAMP Line Location: NOT+16
Function Call: WRITE	Prompt: !?8,$P(A,U,2),!?8,$P(A,U,3) Line Location: NOT+17
Function Call: WRITE	Prompt: " ",$P($G(^DIC(5,ACHDST,0)),U,2) Line Location: NOT+19
Function Call: WRITE	Prompt: " ",$P(A,U,5),!! Line Location: NOT+20
Function Call: WRITE	Prompt: !,?DIWL-1,"Re: Patient: ",ACHDNAMP Line Location: DEMO+1
Function Call: WRITE	Prompt: ?42,ACHDCH Line Location: DEMO+1
Function Call: WRITE	Prompt: !?DIWL+3,"Contract Health Services request for services on ",$$FMTE^XLFDT($$DN^ACHS(0,4)),"." Line Location: DEMO+2
Function Call: WRITE	Prompt: !?DIWL+3,"Date request received: ",$$FMTE^XLFDT($$DN^ACHS(0,5)) Line Location: REQDATE+1
Function Call: WRITE	Prompt: !?DIWL+3,"Provider of services: " Line Location: PROV+1
Function Call: WRITE	Prompt: $P($G(^AUTTVNDR($$DN^ACHS(100,2),0)),U),! Line Location: PROV+3
Function Call: WRITE	Prompt: ! Line Location: PROV+7
Function Call: WRITE	Prompt: ?10,"Amount Denied: ",X,"(ACT.)",! Line Location: PROV+8
Function Call: WRITE	Prompt: ?10,"Amount Denied: ",X,"(EST.)",! Line Location: PROV+9
Function Call: WRITE	Prompt: ?DIWL+3,ACHDNAMV,?60,"$",$P($G(^ACHSDEN(DUZ(2),"D",ACHSA,100)),U,8),$P($G(^ACHSDEN(DUZ(2),"D",ACHSA,100)),U,9),! Line Location: PROV+13
Function Call: WRITE	Prompt: ?DIWL+3,ACHDNAMV Line Location: PROV+15
Function Call: WRITE	Prompt: ! Line Location: OTHER+8
Function Call: WRITE	Prompt: !?DIWL+3,"Provider of services: ",$P($G(^AUTTVNDR(Y,0)),U),! Line Location: OTHER+9
Function Call: WRITE	Prompt: ?10,"Amount Denied: ",X,"(ACT.)",! Line Location: OTHER+13
Function Call: WRITE	Prompt: ?10,"Amount Denied: ",X,"(EST.)",! Line Location: OTHER+14
Function Call: WRITE	Prompt: ?10,"Amount Denied: ",X,"(ACT.)",! Line Location: OTHER1+14
Function Call: WRITE	Prompt: ?10,"Amount Denied: ",X,"(EST.)",! Line Location: OTHER1+15
Function Call: WRITE	Prompt: !?DIWL+3,"Other resources: " Line Location: O+10
Function Call: WRITE	Prompt: ", " Condition for execution: Y Line Location: O1+10
Function Call: WRITE	Prompt: X Line Location: O1+10
Function Call: WRITE	Prompt: !,?10,"Other resources paid: ",X Line Location: O1+14
Function Call: WRITE	Prompt: !,?10,"Other resources paid: $0.00" Line Location: O1+15
Function Call: WRITE	Prompt: !?26,ACHSA1 Line Location: O1+18
Function Call: WRITE	Prompt: !?4,"TO: " Line Location: ALTREC+1
Function Call: WRITE	Prompt: !! Line Location: ALTREC+7
Function Call: WRITE	Prompt: @IOF Line Location: END+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACHSDEN - [#9002071]	DATE+8, NOT+3, NOT+4, PROV+7, PROV+16, PROV+17, OTHER+1, OTHER+2, OTHER+7, OTHER+8 , OTHER+12, OTHER1+1, OTHER1+2, OTHER1+7, OTHER1+8, OTHER1+13, O+3, O+6, O1+1, O1+5 , O1+13, ALTREC+3, ALTREC+4, ALTREC+6, SETCHT+19
^ACHSDENR - [#9002072]	ACHSDNL2+12, PROV+6, OTHER+11, OTHER1+12, HEADER+2, HEADER+3, HEADER+4
^AUPNPAT - [#9000001]	SETCHT+11
^AUTNINS - [#9999999.18]	O1+8
^AUTTLOC - [#9999999.06]	SETCHT+26
^AUTTVNDR - [#9999999.11]	PROV+4, PROV+5, OTHER+9
^AZOPBPP(	SETCHT+31
^DIC(4 - [#4]	SETCHT+11
^DIC(5 - [#5]	DATE+33, NOT+19
^DPT - [#2]	DATE+16, DATE+18, DATE+29

Label References

Name	Line Occurrences
ALTREC	DATE+9
DEMO	DATE+26, DATE+35, NOT+14
END	DATE+15, DATE+16
HEADER	ACHSDNL2+16
NOT	DATE+11
O	OTHER1+1, OTHER1+2
O1	O1+11, O1+18
OTHER	PROV+4
OTHER1	OTHER+1, OTHER+2
SETCHT	DATE+24, NOT+12
VNAM	PROV+15, OTHER1+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	O1+5*, O1+8
A	DATE+29, DATE+30, DATE+31, DATE+32, DATE+34, NOT+4, NOT+5, NOT+17, NOT+18, NOT+20 , O+7, O1+1, O1+2, O1+3, O1+5, O1+13, END+5!
>> ACHD	HEADER+4*
>> ACHDADDR	DATE+2
>> ACHDALT	DATE+8*, DATE+9, DATE+26, NOT+14
>> ACHDALTN	ALTREC+4*
ACHDCH	DEMO+1, REQDATE+2!, SETCHT+6, SETCHT+11, SETCHT+12, SETCHT+20, SETCHT+21, SETCHT+27, SETCHT+33
>> ACHDCPAT	DATE+2
>> ACHDLINE	ALTREC+2, ALTREC+3, ALTREC+4, ALTREC+6
ACHDNAM1	VNAM+2*, VNAM+3, VNAM+4!
>> ACHDNAME	DATE+2
>> ACHDNAMP	DATE+18, DATE+19, DATE+28, NOT+6, NOT+7, NOT+16, DEMO+1
ACHDNAMV	START+1~, PROV+15, OTHER1+8, OTHER1+10, VNAM+1, VNAM+2, VNAM+3*
>> ACHDONE	START+5
>> ACHDONFL	DATE+2
>> ACHDST	DATE+32, DATE+33, NOT+18, NOT+19
>> ACHSA	DATE+8, NOT+3, NOT+4, PROV+7, PROV+16, PROV+17, OTHER+1, OTHER+2, OTHER+7, OTHER+8 , OTHER+12, OTHER1+1, OTHER1+2, OTHER1+7, OTHER1+8, OTHER1+13, O+3, O+6, O1+1, O1+5 , O1+13, ALTREC+3, ALTREC+4, ALTREC+6, SETCHT+19
ACHSA1	OTHER+6, OTHER+7, OTHER+8, OTHER+12, OTHER1+6, OTHER1+7, OTHER1+8, OTHER1+13, O1+8*, O1+11 , O1+12, O1+18, END+5!
>> ACHSBPNO	SETCHT+30, SETCHT+31, SETCHT+33
>> ACHSCH	SETCHT+33*
>> ACHSCNT	START+9, OTHER+4, OTHER1+4, O1+4
>> ACHSFAC	SETCHT+26
>> ACHSPG	START+10*
>> ACHSQUIT	END+1
DAT	SETCHT+18~, SETCHT+19*, SETCHT+20
>> DFN	DATE+14*, DATE+15, DATE+16, DATE+18, DATE+29, SETCHT+11, SETCHT+30, SETCHT+31
>> DIWF	ACHSDNL2+15*
>> DIWL	ACHSDNL2+12, ACHSDNL2+13, DATE+1, DATE+2, DEMO+1, DEMO+2, REQDATE+1, PROV+1, PROV+15, OTHER+9 , OTHER1+10, O+10, O1+12
>> DIWR	ACHSDNL2+15*
DTOUT	END+5!
DUOUT	END+5!
DUZ(2	ACHSDNL2+12, DATE+8, NOT+3, NOT+4, PROV+6, PROV+7, PROV+16, PROV+17, OTHER+1, OTHER+2 , OTHER+7, OTHER+8, OTHER+11, OTHER+12, OTHER1+1, OTHER1+2, OTHER1+7, OTHER1+8, OTHER1+12, OTHER1+13 , O+3, O+6, O1+1, O1+5, O1+13, ALTREC+3, ALTREC+4, ALTREC+6, HEADER+2, HEADER+3 , HEADER+4, SETCHT+11, SETCHT+19, SETCHT+26
>> I	START+5, START+7
IOF	END+3
>> T2	ACHSDNL2+12*
TMP	OTHER+12*, OTHER+13, OTHER+14, END+5!
>> TOPM	ACHSDNL2+12, ACHSDNL2+13
U	ACHSDNL2+12, DATE+8, DATE+18, DATE+30, DATE+31, DATE+32, DATE+33, DATE+34, NOT+5, NOT+17 , NOT+18, NOT+19, NOT+20, PROV+5, PROV+6, PROV+8, PROV+9, PROV+16, PROV+17, OTHER+2 , OTHER+8, OTHER+9, OTHER+11, OTHER+13, OTHER+14, OTHER1+2, OTHER1+8, OTHER1+12, OTHER1+14, OTHER1+15 , O+6, O1+5, O1+8, O1+13, HEADER+3, SETCHT+11, SETCHT+20, SETCHT+26, SETCHT+31
>> X	DATE+2, DATE+3, DATE+4, NOT+5, NOT+6, PROV+8, PROV+9, OTHER+13, OTHER+14, OTHER1+14 , OTHER1+15, O1+13, O1+14, O1+15, ALTREC+3, ALTREC+4, ALTREC+5, HEADER+4
>> X2	PROV+8, PROV+9, OTHER+13, OTHER+14, OTHER1+14, OTHER1+15, O1+14*
>> Y	PROV+7, PROV+8, PROV+9, OTHER+8, OTHER+9, OTHER1+13, OTHER1+14, OTHER1+15, O+7, O1+16*

Customize PDF page

Package: Contract Health Management Information System

Routine: ACHSDNL2

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: