Routine: BARRAMR2

Package	Total	Call Graph
IHS Accounts Receivable	3	WHD^BARRHD PAZ^BARRUTL EOP^BARUTL
VA Fileman	1	DD^%DT

Package	Total	Caller Graph
IHS Accounts Receivable	2	BARRAMR BARRAMR3

Entry Points

Name	Comments	DBIA/ICR reference
SUB2	;
SUB3	;
DETAIL	; EP ; Print Detail
TOT	;
HDB	; EP ; Page and column header
HD	; EP
SUB	;

External References

Name	Field # of Occurrence
DD^%DT	DETAIL+27
WHD^BARRHD	HDB+4
PAZ^BARRUTL	HD+1
EOP^BARUTL	DETAIL+16

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!!!!?25,"* NO DATA TO PRINT *" Line Location: DETAIL+15
Function Call: WRITE	Prompt: ! Line Location: DETAIL+36
Function Call: WRITE	Prompt: !?5,"Visit Location: ",$P(BAR("TXT"),U) Line Location: DETAIL+37
Function Call: WRITE	Prompt: ! Line Location: DETAIL+44
Function Call: WRITE	Prompt: !?10," Clinic: " Line Location: DETAIL+46
Function Call: WRITE	Prompt: "NO CLINIC" Line Location: DETAIL+47
Function Call: WRITE	Prompt: $P(^DIC(40.7,$P(BAR("TXT"),U,2),0),U) Line Location: DETAIL+48
Function Call: WRITE	Prompt: !?10,"Visit Type: " Line Location: DETAIL+50
Function Call: WRITE	Prompt: "NO VISIT TYPE" Line Location: DETAIL+51
Function Call: WRITE	Prompt: $P(^ABMDVTYP($P(BAR("TXT"),U,2),0),U) Line Location: DETAIL+52
Function Call: WRITE	Prompt: ! Line Location: DETAIL+59
Function Call: WRITE	Prompt: !?15,"A/R Account: ",$P(BAR("TXT"),U,3),! Line Location: DETAIL+60
Function Call: WRITE	Prompt: !,$E($P(BAR("TXT"),U,4),1,18) Line Location: DETAIL+62
Function Call: WRITE	Prompt: ?20,$P(BAR("B"),U) Line Location: DETAIL+63
Function Call: WRITE	Prompt: ?38,BAR("DOS") Line Location: DETAIL+64
Function Call: WRITE	Prompt: ?51,$J($FN($P(BAR("B"),U,13),",",2),13) Line Location: DETAIL+65
Function Call: WRITE	Prompt: ?65,$J($FN($P(BAR("B"),U,15),",",2),13) Line Location: DETAIL+66
Function Call: WRITE	Prompt: !,BAR("DASH") Line Location: HDB+7
Function Call: WRITE	Prompt: !?51,"-------------",?65,"-------------" Line Location: SUB+2
Function Call: WRITE	Prompt: !,"Visit location" Line Location: SUB+3
Function Call: WRITE	Prompt: ?20,"Count: ",$J(BAR("CNT1"),4) Line Location: SUB+4
Function Call: WRITE	Prompt: ?40,"Total:" Line Location: SUB+5
Function Call: WRITE	Prompt: ?51,$J($FN(BAR("ATOT1"),",",2),13) Line Location: SUB+6
Function Call: WRITE	Prompt: ?65,$J($FN(BAR("BTOT1"),",",2),13) Line Location: SUB+7
Function Call: WRITE	Prompt: !?51,"-------------",?65,"-------------" Line Location: SUB2+2
Function Call: WRITE	Prompt: !,"Clinic Type" Line Location: SUB2+3
Function Call: WRITE	Prompt: !,"Visit Type" Line Location: SUB2+4
Function Call: WRITE	Prompt: ?20,"Count: ",$J(BAR("CNT2"),4) Line Location: SUB2+5
Function Call: WRITE	Prompt: ?40,"Total:" Line Location: SUB2+6
Function Call: WRITE	Prompt: ?51,$J($FN(BAR("ATOT2"),",",2),13) Line Location: SUB2+7
Function Call: WRITE	Prompt: ?65,$J($FN(BAR("BTOT2"),",",2),13) Line Location: SUB2+8
Function Call: WRITE	Prompt: !?51,"-------------",?65,"-------------" Line Location: SUB3+2
Function Call: WRITE	Prompt: !,"A/R Account" Line Location: SUB3+3
Function Call: WRITE	Prompt: ?20,"Count: ",$J(BAR("CNT3"),4) Line Location: SUB3+4
Function Call: WRITE	Prompt: ?40,"Total:" Line Location: SUB3+5
Function Call: WRITE	Prompt: ?51,$J($FN(BAR("ATOT3"),",",2),13) Line Location: SUB3+6
Function Call: WRITE	Prompt: ?65,$J($FN(BAR("BTOT3"),",",2),13) Line Location: SUB3+7
Function Call: WRITE	Prompt: !?51,"=============",?65,"=============" Line Location: TOT+2
Function Call: WRITE	Prompt: !,"Report Totals" Line Location: TOT+3
Function Call: WRITE	Prompt: ?20,"Count: ",$J(BAR("CNT"),4) Line Location: TOT+4
Function Call: WRITE	Prompt: ?40,"Total:" Line Location: TOT+5
Function Call: WRITE	Prompt: ?51,$J($FN(BAR("ATOT"),",",2),13) Line Location: TOT+6
Function Call: WRITE	Prompt: ?65,$J($FN(BAR("BTOT"),",",2),13) Line Location: TOT+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDVTYP - [#9002274.8]	DETAIL+52
^BARBL(	DETAIL+21, DETAIL+23
^DIC(40.7 - [#40.7]	DETAIL+48

Label References

Name	Line Occurrences
HD	DETAIL+19
HDB	DETAIL+5
SUB	DETAIL+35, DETAIL+80
SUB2	DETAIL+35, DETAIL+43, DETAIL+80
SUB3	DETAIL+35, DETAIL+43, DETAIL+58, DETAIL+80
TOT	DETAIL+80

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BAR	DETAIL+13, DETAIL+14, DETAIL+18, DETAIL+20
>> BAR("ACCT"	DETAIL+9, DETAIL+38, DETAIL+53, DETAIL+55, DETAIL+56, DETAIL+61
>> BAR("AMT"	DETAIL+24*
>> BAR("ATOT"	DETAIL+8, DETAIL+71, TOT+6, TOT+8*
>> BAR("ATOT1"	DETAIL+8, DETAIL+72, SUB+6, SUB+8*
>> BAR("ATOT2"	DETAIL+8, DETAIL+73, SUB2+7, SUB2+9*
>> BAR("ATOT3"	DETAIL+8, DETAIL+74, SUB3+6, SUB3+8*
>> BAR("B"	DETAIL+21*, DETAIL+22, DETAIL+24, DETAIL+25, DETAIL+63, DETAIL+65, DETAIL+66, DETAIL+71, DETAIL+72, DETAIL+73 , DETAIL+74, DETAIL+75, DETAIL+76, DETAIL+77, DETAIL+78
>> BAR("B1"	DETAIL+23*, DETAIL+26
>> BAR("BAL"	DETAIL+25*, DETAIL+30
>> BAR("BTOT"	DETAIL+7, DETAIL+75, TOT+7, TOT+8*
>> BAR("BTOT1"	DETAIL+7, DETAIL+76, SUB+7, SUB+8*
>> BAR("BTOT2"	DETAIL+7, DETAIL+77, SUB2+8, SUB2+9*
>> BAR("BTOT3"	DETAIL+7, DETAIL+78, SUB3+7, SUB3+8*
>> BAR("CNT"	DETAIL+6, DETAIL+67, TOT+1, TOT+4, TOT+8*
>> BAR("CNT1"	DETAIL+6, DETAIL+68, SUB+1, SUB+4, SUB+8*
>> BAR("CNT2"	DETAIL+6, DETAIL+69, SUB2+1, SUB2+5, SUB2+9*
>> BAR("CNT3"	DETAIL+6, DETAIL+70, SUB3+1, SUB3+4, SUB3+8*
>> BAR("COL"	DETAIL+2*, HDB+5
>> BAR("DASH"	HDB+6*, HDB+7
>> BAR("DOS"	DETAIL+26, DETAIL+27, DETAIL+28, DETAIL+64
>> BAR("F1"	DETAIL+18, DETAIL+19, DETAIL+32, DETAIL+34, DETAIL+42, DETAIL+57, DETAIL+79, HD+2*
>> BAR("HD"	DETAIL+3, DETAIL+4, DETAIL+30
>> BAR("I"	HDB+3*
>> BAR("L"	DETAIL+10, DETAIL+31, DETAIL+33, DETAIL+39
>> BAR("PG"	HDB+2*
>> BAR("SORT"	DETAIL+11, DETAIL+38, DETAIL+40, DETAIL+41, DETAIL+54*
>> BAR("TXT"	DETAIL+20*, DETAIL+21, DETAIL+23, DETAIL+31, DETAIL+37, DETAIL+39, DETAIL+40, DETAIL+47, DETAIL+48, DETAIL+51 , DETAIL+52, DETAIL+54, DETAIL+55, DETAIL+60, DETAIL+61, DETAIL+62
>> BAR("Z"	DETAIL+12*, DETAIL+13, DETAIL+18
>> BAR(132	HDB+6
>> BARY("SORT"	DETAIL+45, SUB2+3
>> DIROUT	HD+2
>> DTOUT	HD+2
>> DUOUT	HD+2
DUZ(2	DETAIL+21, DETAIL+23
IOSL	DETAIL+19
U	DETAIL+21, DETAIL+23, DETAIL+24, DETAIL+25, DETAIL+26, DETAIL+31, DETAIL+37, DETAIL+39, DETAIL+40, DETAIL+47 , DETAIL+48, DETAIL+51, DETAIL+52, DETAIL+54, DETAIL+55, DETAIL+60, DETAIL+61, DETAIL+62, DETAIL+63, DETAIL+65 , DETAIL+66, DETAIL+71, DETAIL+72, DETAIL+73, DETAIL+74, DETAIL+75, DETAIL+76, DETAIL+77, DETAIL+78
>> Y	DETAIL+27*, DETAIL+28

Customize PDF page

Package: IHS Accounts Receivable

Routine: BARRAMR2

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: