Routine: BARTRNS4

Information

BARTRNS4 ; IHS/SD/SDR - Transaction Summary/Detail Report ; 03/10/2009

Source Information

Source file <BARTRNS4.m>

Call Graph

Call Graph Total: 4

Package	Total	Call Graph
IHS Accounts Receivable	2	EOP^BARUTL $$EN^BARVDF
VA Fileman	2	NOW^%DTC $$GET1^DIQ

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
IHS Accounts Receivable	1	BARTRNS1

Entry Points

Name	Comments	DBIA/ICR reference
TSI	;;OTHER;;TRIBAL SELF INSURED
HDB	; EP
PRINT	;
SEP	;;OTHER;;STATE EXCHANGE PLAN
FPL	;;MEDICAID;;FPL 133 PERCENT
C	;;OTHER;;CHAMPUS
D	;;MEDICAID;;MEDICAID FI
G	;;OTHER;;GUARANTOR
F	;;PRIVATE INSURANCE;;FRATERNAL ORGANIZATION
I	;;OTHER;;INDIAN PATIENT
H	;;PRIVATE INSURANCE;;HMO
K	;;MEDICAID;;CHIP (KIDSCARE)
M	;;PRIVATE INSURANCE;;MEDICARE SUPPL.
N	;;OTHER;;NON-BENEFICIARY (NON-INDIAN)
P	;;PRIVATE INSURANCE;;PRIVATE INSURANCE
R	;;MEDICARE;;MEDICARE FI
T	;;OTHER;;THIRD PARTY LIABILITY
W	;;OTHER;;WORKMEN'S COMP
V	;;VETERAN;;VETERANS MEDICAL BENEFITS
MD	;;MEDICARE;;MCR PART D
MC	;;MEDICARE;;MCR PART C
MH	;;MEDICARE;;MEDICARE HMO
MMC	;;MEDICARE;;MCR MANAGED CARE

External References

Name	Field # of Occurrence
NOW^%DTC	HDB+9
EOP^BARUTL	PRINT+4, PRINT+50
$$EN^BARVDF	HDB+3
$$GET1^DIQ	PRINT+22, PRINT+73

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"LOCATION^ALLOWANCE CAT^INSURER TYPE^INSURER^BILL COUNT^TOTAL BILL AMOUNT^TOTAL PAYMENTS^ADJ TYPE IEN^ADJUSTMENT TYPE^TOTAL ADJUSTMENTS" Line Location: PRINT+6
Function Call: WRITE	Prompt: !,BARREC_U_U Line Location: PRINT+35
Function Call: WRITE	Prompt: !,BARREC_U_U Line Location: PRINT+43
Function Call: WRITE	Prompt: !,"LOCATION^ALLOWANCE CAT^INSURER TYPE^INSURER^BILL^DOS^APPROVAL DT^TOTAL BILL AMT^TOTAL PAYMENTS^#DAYS (DOS-APPR.DT)^ADJUSTMENT DT^ADJUSTMENT TYPE^ADJUSTMENT AMT^#DAYS (APPR.DT-ADJ.DT)" Line Location: PRINT+51
Function Call: WRITE	Prompt: !,"LOCATION^ALLOWANCE CAT^INSURER TYPE^INSURER^BILL^DOS^APPROVAL DT^TOTAL BILL AMT^TOTAL PAYMENTS^#DAYS (DOS-APPR.DT)^ADJUSTMENT DT^ADJ TYPE IEN^ADJUSTMENT TYPE^ADJUSTMENT AMT^#DAYS (APPR.DT-ADJ.DT)" Line Location: PRINT+54
Function Call: WRITE	Prompt: !,BARREC_U_U_U_U Line Location: PRINT+85
Function Call: WRITE	Prompt: !,BARREC_BARDTAIL Line Location: PRINT+87
Function Call: WRITE	Prompt: !,BARREC_U_U_U_U Line Location: PRINT+88
Function Call: WRITE	Prompt: $$EN^BARVDF("IOF"),! Line Location: HDB+3
Function Call: WRITE	Prompt: ?($S($D(BAR(132)):34,$D(BAR(180)):68,1:8)),"WARNING: Confidential Patient Information, Privacy Act Applies",! Line Location: HDB+4
Function Call: WRITE	Prompt: BAR("LINE"),! Line Location: HDB+7
Function Call: WRITE	Prompt: BAR("HD",0),?$S($D(BAR(132)):102,$D(BAR(180)):150,1:51) Line Location: HDB+8
Function Call: WRITE	Prompt: $P(Y,":",1,2) Line Location: HDB+12
Function Call: WRITE	Prompt: !,BAR("LINE") Line Location: HDB+15

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^BARAC(2906 - [#90050.02]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUTTLOC - [#9999999.06]	PRINT+17, PRINT+68
^DD("DD"	HDB+11
^TMP($J	PRINT+2, PRINT+6, PRINT+8, PRINT+10, PRINT+16, PRINT+25, PRINT+26, PRINT+32, PRINT+33, PRINT+42 , PRINT+44, PRINT+48, PRINT+53, PRINT+57, PRINT+59, PRINT+65, PRINT+67, PRINT+78, PRINT+81, PRINT+83 , PRINT+90

Label References

Name	Line Occurrences
HDB	PRINT+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	HDB+10
>> BAR("ADJ TYP"	, PRINT+41, PRINT+42, PRINT+44
>> BAR("ADJ"	PRINT+30, PRINT+33, PRINT+44
>> BAR("ADJIEN"	PRINT+30, PRINT+32, PRINT+33, PRINT+42, PRINT+44
>> BAR("HD"	HDB+8, HDB+14
>> BAR("INS"	PRINT+15, PRINT+16, PRINT+22, PRINT+25, PRINT+26, PRINT+32, PRINT+33, PRINT+42, PRINT+44, PRINT+64* , PRINT+65*, PRINT+67, PRINT+73, PRINT+78, PRINT+81, PRINT+83, PRINT+90
>> BAR("ITYP"	PRINT+9, PRINT+10, PRINT+11, PRINT+16, PRINT+25, PRINT+26, PRINT+32, PRINT+33, PRINT+42, PRINT+44 , PRINT+58, PRINT+59, PRINT+60, PRINT+65, PRINT+67, PRINT+78, PRINT+81, PRINT+83, PRINT+90
>> BAR("LINE"	HDB+5!, HDB+6*, HDB+7, HDB+15, HDB+16!
>> BAR("LOC"	PRINT+7, PRINT+8, PRINT+10, PRINT+16, PRINT+17, PRINT+25, PRINT+26, PRINT+32, PRINT+33, PRINT+42 , PRINT+44, PRINT+56, PRINT+57, PRINT+59, PRINT+65, PRINT+67, PRINT+68, PRINT+78, PRINT+81, PRINT+83 , PRINT+90
>> BAR("PRIVACY"	HDB+4
>> BAR("TMPLVL"	HDB+13, HDB+14
>> BAR(132	HDB+4, HDB+8
>> BAR(133	HDB+6
>> BAR(180	HDB+4, HDB+6, HDB+8
>> BARACNT	PRINT+31, PRINT+43, PRINT+45, PRINT+82, PRINT+83, PRINT+86, PRINT+90
>> BARBILL	PRINT+66, PRINT+67, PRINT+75, PRINT+78, PRINT+81, PRINT+83, PRINT+90
>> BARDET	PRINT+87
>> BARDTAIL	PRINT+78*, PRINT+79, PRINT+87
>> BARO("ALLC"	PRINT+18, PRINT+24, PRINT+69, PRINT+75
>> BARO("INS"	PRINT+22, PRINT+23, PRINT+24, PRINT+73, PRINT+74, PRINT+75
>> BARO("ITYP"	PRINT+19, PRINT+24, PRINT+70, PRINT+75
>> BARO("LOC"	PRINT+17, PRINT+24, PRINT+68, PRINT+75
>> BARREC	PRINT+24, PRINT+25, PRINT+43, PRINT+75, PRINT+79, PRINT+87, PRINT+88
>> BARY("RTYP"	PRINT+2, PRINT+48
U	PRINT+17, PRINT+24, PRINT+43, PRINT+44, PRINT+68, PRINT+75, PRINT+88, PRINT+90
>> Y	HDB+10*, HDB+12

Customize PDF page

Package: IHS Accounts Receivable

Routine: BARTRNS4

Call Graph Total: 4

Caller Graph Total: 1