Routine: BARRADJ3

Package	Total	Call Graph
IHS Accounts Receivable	2	(HD,HDB)^BARRADJ2 EOP^BARUTL
Kernel	1	$$CJ^XLFSTR

Entry Points

Name	Comments	DBIA/ICR reference
SORT	;
HD4	;
HD3	;
HD2	;
HD1	;
SUMM	; EP
ACCT	;
TRANS	;

External References

Name	Field # of Occurrence
HD^BARRADJ2	ACCT+2
HDB^BARRADJ2	SUMM+4
EOP^BARUTL	SUMM+17
$$CJ^XLFSTR	SUMM+16

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $$CJ^XLFSTR("* NO DATA TO PRINT FOR "_$P($G(^DIC(4,DUZ(2),0)),U)_" *",IOM) Line Location: SUMM+16
Function Call: WRITE	Prompt: !!,"A/R Entry Clerk: ",$P(^VA(200,BAR("AR"),0),U) Line Location: SUMM+20
Function Call: WRITE	Prompt: !?52,BAREQUAL Line Location: SUMM+26
Function Call: WRITE	Prompt: !,"REPORT TOTAL" Line Location: SUMM+27
Function Call: WRITE	Prompt: ?52,$J($FN(GRANBILL,",",2),10) Line Location: SUMM+28
Function Call: WRITE	Prompt: ?67,$J($FN(GRANTRAN,",",2),10) Line Location: SUMM+29
Function Call: WRITE	Prompt: !,?52,BARDASH Line Location: TRANS+5
Function Call: WRITE	Prompt: !,"Transaction Tot:" Line Location: TRANS+6
Function Call: WRITE	Prompt: ?52,$J($FN($P(BAR("DATA"),U,6),",",2),10) Line Location: TRANS+7
Function Call: WRITE	Prompt: ?67,$J($FN($P(TRANSAMT,U,7),",",2),10) Line Location: TRANS+9
Function Call: WRITE	Prompt: !," Clinic Tot:" Line Location: SORT+8
Function Call: WRITE	Prompt: !," Visit Tot:" Line Location: SORT+9
Function Call: WRITE	Prompt: ?52,$J($FN(SORTBTOT,",",2),10) Line Location: SORT+14
Function Call: WRITE	Prompt: ?67,$J($FN(SORTTTOT,",",2),10) Line Location: SORT+15
Function Call: WRITE	Prompt: ! Line Location: ACCT+3
Function Call: WRITE	Prompt: ! Line Location: ACCT+3
Function Call: WRITE	Prompt: ! Line Location: ACCT+4
Function Call: WRITE	Prompt: ! Line Location: ACCT+4
Function Call: WRITE	Prompt: ! Line Location: ACCT+5
Function Call: WRITE	Prompt: ! Line Location: ACCT+5
Function Call: WRITE	Prompt: ! Line Location: ACCT+6
Function Call: WRITE	Prompt: ! Line Location: ACCT+6
Function Call: WRITE	Prompt: ?52,$J($FN($P(BAR("DATA"),U,6),",",2),10) Line Location: ACCT+13
Function Call: WRITE	Prompt: ?67,$J($FN($P(BAR("DATA"),U,7),",",2),10) Line Location: ACCT+15
Function Call: WRITE	Prompt: !?10,"Visit Location.......: ",BAR("L") Line Location: HD1+1
Function Call: WRITE	Prompt: !?10,"Transaction Type.....: " Line Location: HD2+1
Function Call: WRITE	Prompt: BAR("B") Line Location: HD2+4
Function Call: WRITE	Prompt: !?10,"Collection Batch Item: ",BAR("IT") Line Location: HD3+1
Function Call: WRITE	Prompt: !?10 Line Location: HD4+1
Function Call: WRITE	Prompt: "Clinic Type..........: " Line Location: HD4+3
Function Call: WRITE	Prompt: "NO CLINIC" Line Location: HD4+4
Function Call: WRITE	Prompt: $P(^DIC(40.7,BAR("S"),0),U) Line Location: HD4+5
Function Call: WRITE	Prompt: "Visit Type...........: " Line Location: HD4+7
Function Call: WRITE	Prompt: "NO VISIT TYPE" Line Location: HD4+8
Function Call: WRITE	Prompt: $P($G(^ABMDVTYP(BAR("S"),0)),U) Line Location: HD4+9

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDVTYP - [#9002274.8]	HD4+9
^BARCOL(	HD2+2, HD2+3
^DIC(4 - [#4]	SUMM+16
^DIC(40.7 - [#40.7]	HD4+5
^TMP($J	SUMM+15, SUMM+19, SUMM+22, SUMM+24, TRANS+3, SORT+2, ACCT+7
^VA(200 - [#200]	SUMM+20

Label References

Name	Line Occurrences
HD1	ACCT+3
HD2	ACCT+4, HD1+4
HD3	ACCT+5, HD2+7
HD4	ACCT+6, HD3+4
SORT	TRANS+3
TRANS	SUMM+24

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADJTBTOT	SUMM+9!
ADJTTTOT	SUMM+10!
ARBTOT	SUMM+9!
ARTTOT	SUMM+10!
>> BAR("0TOTG"	ACCT+25
>> BAR("0TOTH"	ACCT+25*
>> BAR("1TOTA"	HD1+3*
>> BAR("1TOTB"	HD1+3*
>> BAR("1TOTC"	HD1+3*
>> BAR("1TOTD"	HD1+3*
>> BAR("1TOTE"	HD1+3*
>> BAR("1TOTF"	HD1+3*
>> BAR("1TOTG"	HD1+3*
>> BAR("2TOTA"	HD2+6*
>> BAR("2TOTB"	HD2+6*
>> BAR("2TOTC"	HD2+6*
>> BAR("2TOTD"	HD2+6*
>> BAR("2TOTE"	HD2+6*
>> BAR("2TOTF"	HD2+6*
>> BAR("2TOTG"	HD2+6*
>> BAR("3TOTA"	HD3+3*
>> BAR("3TOTB"	HD3+3*
>> BAR("3TOTC"	HD3+3*
>> BAR("3TOTD"	HD3+3*
>> BAR("3TOTE"	HD3+3*
>> BAR("3TOTF"	HD3+3*
>> BAR("3TOTG"	HD3+3*
>> BAR("4TOTA"	HD4+11*
>> BAR("4TOTB"	HD4+11*
>> BAR("4TOTC"	HD4+11*
>> BAR("4TOTD"	HD4+11*
>> BAR("4TOTE"	HD4+11*
>> BAR("4TOTF"	HD4+11*
>> BAR("4TOTG"	HD4+11*
>> BAR("ADJCAT"	TRANS+1*, TRANS+3, SORT+2, ACCT+5, ACCT+7
>> BAR("AR"	SUMM+18, SUMM+19, SUMM+20, SUMM+22, SUMM+24, TRANS+3, SORT+2, ACCT+7
>> BAR("B"	HD2+2, HD2+4
>> BAR("COL"	SUMM+1, SUMM+2
>> BAR("DATA"	TRANS+7, TRANS+8, SORT+5, SORT+6, ACCT+7*, ACCT+13, ACCT+14, ACCT+15, ACCT+22
>> BAR("DUZ"	SUMM+21, SUMM+22, SUMM+24, TRANS+3, SORT+2, ACCT+7
>> BAR("F1"	SUMM+19, SUMM+22, SUMM+24, SUMM+25, TRANS+3, TRANS+4, SORT+2, SORT+3, ACCT+1, ACCT+2
>> BAR("HD"	SUMM+3*
>> BAR("IT"	HD3+1, HD3+2
>> BAR("L"	SUMM+23, SUMM+24, TRANS+3, SORT+2, ACCT+3, ACCT+7, HD1+1, HD1+2
>> BAR("OADJCAT"	ACCT+5
>> BAR("OAR"	SUMM+18*
>> BAR("OIT"	HD3+2*
>> BAR("OL"	SUMM+23, ACCT+3, HD1+2
>> BAR("OSORT"	ACCT+6, HD4+10*
>> BAR("OTRANS"	ACCT+4, HD2+5*
>> BAR("S"	HD4+4, HD4+5, HD4+8, HD4+9
>> BAR("SORT"	SORT+1, SORT+2, ACCT+7, HD4+10
>> BAR("SSORT"	ACCT+6
>> BAR("TRANS"	TRANS+2, TRANS+3, SORT+2, ACCT+4, ACCT+7, HD2+2, HD2+3, HD2+5
>> BARDASH	SUMM+5*, TRANS+5, SORT+4
>> BAREQUAL	SUMM+6*, SUMM+26
>> BARV	ACCT+20*, ACCT+21
>> BARV2	ACCT+21*, ACCT+22, ACCT+23
>> BARY("SORT"	SORT+8, HD4+2, HD4+6
DUZ(2	SUMM+16, HD2+2, HD2+3
>> GRANBILL	SUMM+13*, SUMM+28
>> GRANTRAN	SUMM+14*, SUMM+29
I	ACCT+16*, ACCT+20, ACCT+24!
IOM	SUMM+16
IOSL	ACCT+2
SORTBTOT	SUMM+9!, SORT+5*, SORT+14
SORTTTOT	SUMM+10!, SORT+7*, SORT+15
>> TRANAMT	TRANS+8, SORT+6, SORT+7, ACCT+14*
TRANBTOT	SUMM+9!
>> TRANSAMT	TRANS+9
TRANTTOT	SUMM+10!
U	SUMM+16, SUMM+20, TRANS+7, TRANS+8, TRANS+9, SORT+5, SORT+6, ACCT+13, ACCT+14, ACCT+15 , ACCT+22, HD2+2, HD2+3, HD4+5, HD4+9
VLOCBTOT	SUMM+9!
VLOCTTOT	SUMM+10!
X	ACCT+18*, ACCT+20, ACCT+23, ACCT+24!
Y	ACCT+17, ACCT+19, ACCT+22, ACCT+24!

Customize PDF page

Package: IHS Accounts Receivable

Routine: BARRADJ3

Information

Source Information

Call Graph

Call Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: