Routine: BARDRST1

Package	Total	Call Graph
IHS Accounts Receivable	3	$$TEXTCK^BARDRST WHD^BARRHD PAZ^BARRUTL
VA Fileman	1	^DIR

Entry Points

Name	Comments	DBIA/ICR reference
PRINT	;EP for writing data
XIT	;
HDB	;
HD	;

External References

Name	Field # of Occurrence
$$TEXTCK^BARDRST	PRINT+51, PRINT+52, PRINT+53, PRINT+55, PRINT+56
WHD^BARRHD	HDB+3
PAZ^BARRUTL	HD+1
^DIR	PRINT+134

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$P(^DIC(4,BAR("L"),0),U)," (cont)" Line Location: PRINT+25
Function Call: WRITE	Prompt: "NO VISIT TYP" Line Location: PRINT+31
Function Call: WRITE	Prompt: $E($P(^ABMDVTYP(BAR("V"),0),U),1,12) Line Location: PRINT+32
Function Call: WRITE	Prompt: "NO CLINIC" Line Location: PRINT+35
Function Call: WRITE	Prompt: !?2 Line Location: PRINT+48
Function Call: WRITE	Prompt: !,"^" Line Location: PRINT+49
Function Call: WRITE	Prompt: "NO VISIT TYP"_$$TEXTCK^BARDRST() Line Location: PRINT+51
Function Call: WRITE	Prompt: $E($P(^ABMDVTYP(BAR("V"),0),U),1,12)_$$TEXTCK^BARDRST() Line Location: PRINT+52
Function Call: WRITE	Prompt: "NO CLINIC"_$$TEXTCK^BARDRST() Line Location: PRINT+55
Function Call: WRITE	Prompt: !,?10,"END OF REPORT",! Line Location: PRINT+100
Function Call: WRITE	Prompt: "TOTAL COVERED INPATIENT DAYS ",+$GET(BAR(BAR("L"),"COVD")) Line Location: PRINT+125
Function Call: WRITE	Prompt: "^TOTAL COVERED INPATIENT DAYS^",+$GET(BAR(BAR("L"),"COVD")) Line Location: PRINT+126
Function Call: WRITE	Prompt: !,?17,"======",?25,"======",?29,"==========",?42,"==========",?67,"==========" Line Location: PRINT+138
Function Call: WRITE	Prompt: !?10,"Total:",?20,$J($FN(BAR("NLN"),",",0),5) Line Location: PRINT+140
Function Call: WRITE	Prompt: ?29,$J($FN(BAR("NLB"),",",2),13) Line Location: PRINT+141
Function Call: WRITE	Prompt: ?41,$J($FN(BAR("NLP"),",",2),13) Line Location: PRINT+142
Function Call: WRITE	Prompt: ?55,$J($FN(BAR("NLA"),",",2),12) Line Location: PRINT+143
Function Call: WRITE	Prompt: ?67,$J($FN(BAR("NLU"),",",2),13) Line Location: PRINT+145
Function Call: WRITE	Prompt: !,?17,"======",?25,"======",?29,"==========",?42,"==========",?67,"==========" Line Location: PRINT+150
Function Call: WRITE	Prompt: !?10,"Total:",?20,$J($FN(BAR("NLN"),",",0),5) Line Location: PRINT+152
Function Call: WRITE	Prompt: ?29,$J($FN(BAR("NLB"),",",2),13) Line Location: PRINT+153
Function Call: WRITE	Prompt: ?41,$J($FN(BAR("NLP"),",",2),13) Line Location: PRINT+154
Function Call: WRITE	Prompt: ?55,$J($FN(BAR("NLA"),",",2),12) Line Location: PRINT+155
Function Call: WRITE	Prompt: ?67,$J($FN(BAR("NLU"),",",2),13) Line Location: PRINT+157
Function Call: WRITE	Prompt: !,"^======^======^==========^==========^==========" Line Location: PRINT+160
Function Call: WRITE	Prompt: !,"^^Total:^",$J($FN(BAR("NLN"),",",0),5) Line Location: PRINT+162
Function Call: WRITE	Prompt: "^",$J($FN(BAR("NLB"),",",2),13) Line Location: PRINT+163
Function Call: WRITE	Prompt: "^",$J($FN(BAR("NLP"),",",2),13) Line Location: PRINT+164
Function Call: WRITE	Prompt: "^",$J($FN(BAR("NLA"),",",2),12) Line Location: PRINT+165
Function Call: WRITE	Prompt: "^",$J($FN(BAR("NLU"),",",2),13) Line Location: PRINT+167
Routine Call	DIR Line Location: PRINT+134

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDVTYP - [#9002274.8]	PRINT+52
^DIC(4 - [#4]	PRINT+20, PRINT+25
^DIC(40.7 - [#40.7]	PRINT+56
^TMP($J	XIT+1!

Label References

Name	Line Occurrences
HD	PRINT+19, PRINT+25
HDB	PRINT+15
XIT	PRINT+18, PRINT+24, PRINT+136, PRINT+169

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BAR(	PRINT+18, PRINT+24, PRINT+58, PRINT+59, PRINT+61, PRINT+62, PRINT+63, PRINT+66, PRINT+67, PRINT+68 , PRINT+69, PRINT+71, PRINT+72, PRINT+73, PRINT+74, PRINT+76, PRINT+77, PRINT+78, PRINT+79, PRINT+80 , PRINT+81, PRINT+82, PRINT+83, PRINT+84, PRINT+86, PRINT+125, PRINT+126
>> BAR("A"	PRINT+21, PRINT+82, PRINT+111, PRINT+121
>> BAR("B"	PRINT+21, PRINT+78, PRINT+109, PRINT+119
>> BAR("C"	PRINT+21, PRINT+84, PRINT+112, PRINT+122
>> BAR("I"	HDB+2*
>> BAR("L"	PRINT+6, PRINT+8, PRINT+16, PRINT+18, PRINT+20, PRINT+24, PRINT+25, PRINT+58, PRINT+59, PRINT+61 , PRINT+62, PRINT+63, PRINT+66, PRINT+67, PRINT+68, PRINT+69, PRINT+71, PRINT+72, PRINT+73, PRINT+74 , PRINT+76, PRINT+77, PRINT+78, PRINT+79, PRINT+80, PRINT+81, PRINT+82, PRINT+83, PRINT+84, PRINT+86 , PRINT+125, PRINT+126
>> BAR("N"	PRINT+21, PRINT+76, PRINT+106, PRINT+116
>> BAR("NL"	PRINT+18*, PRINT+136
>> BAR("NLA"	PRINT+83*, PRINT+143, PRINT+155, PRINT+165
>> BAR("NLB"	PRINT+79*, PRINT+141, PRINT+153, PRINT+163
>> BAR("NLN"	PRINT+77*, PRINT+140, PRINT+152, PRINT+162
>> BAR("NLP"	PRINT+81*, PRINT+142, PRINT+154, PRINT+164
>> BAR("NLU"	PRINT+17, PRINT+86, PRINT+145, PRINT+157, PRINT+167
>> BAR("P"	PRINT+21, PRINT+80, PRINT+110, PRINT+120
>> BAR("PG"	PRINT+1, HDB+1
>> BAR("V"	PRINT+23, PRINT+24, PRINT+51, PRINT+52, PRINT+53, PRINT+55, PRINT+56, PRINT+58, PRINT+59, PRINT+61 , PRINT+62, PRINT+63, PRINT+66, PRINT+67, PRINT+68, PRINT+69, PRINT+71, PRINT+72, PRINT+73, PRINT+74 , PRINT+76, PRINT+77, PRINT+78, PRINT+79, PRINT+80, PRINT+81, PRINT+82, PRINT+83, PRINT+84, PRINT+86
>> BAR(0	PRINT+14!
>> BAR(1	PRINT+4!, PRINT+5, PRINT+8, PRINT+9, PRINT+10!, PRINT+11
>> BARTEXT	PRINT+48, PRINT+49, PRINT+57, PRINT+60, PRINT+65, PRINT+70, PRINT+104, PRINT+114, PRINT+125, PRINT+126 , PRINT+149, PRINT+159, HDB+12, HDB+19
BARTMP	PRINT+7!, PRINT+12!
BARTMP(1	PRINT+8*, PRINT+11
>> BARTMPLN	HDB+17, HDB+18, HDB+24, HDB+25
>> BARY("SORT"	PRINT+50, HDB+13, HDB+15, HDB+20, HDB+22
DIR	PRINT+132!, PRINT+135!
DIR(0	PRINT+133*
>> DIROUT	PRINT+18, PRINT+19, PRINT+24, PRINT+25, HD+2
>> DTOUT	PRINT+18, PRINT+19, PRINT+24, PRINT+25, HD+2
>> DUOUT	PRINT+18, PRINT+19, PRINT+24, PRINT+25, HD+2
IO("S"	PRINT+131
IOSL	PRINT+19, PRINT+25
IOST	PRINT+131
U	PRINT+20, PRINT+25, PRINT+52, PRINT+56, PRINT+58, PRINT+59, PRINT+61, PRINT+62, PRINT+63, PRINT+66 , PRINT+67, PRINT+68, PRINT+69, PRINT+71, PRINT+72, PRINT+73, PRINT+74, PRINT+76, PRINT+77, PRINT+78 , PRINT+79, PRINT+80, PRINT+81, PRINT+82, PRINT+83, PRINT+84, PRINT+86, HDB+20, HDB+21, HDB+22 , HDB+23
>> UNDUP	PRINT+22, PRINT+63, PRINT+108, PRINT+118

Customize PDF page

Package: IHS Accounts Receivable

Routine: BARDRST1

Information

Source Information

Call Graph

Call Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: