Routine: BARDMRE

Package	Total	Call Graph
IHS Accounts Receivable	3	^BARDMBS CYDAY^BARDMRU (INSTYP,PAR,RRDT,RTRN,ZIS)^BARDMU
VA Fileman	3	^DIE $$GET1^DIQ ^DIR
IHS VA Utilities	2	^XBDBQUE $$VAL^XBDIQ1
Kernel	2	^%ZIS ^%ZISC
IHS Patient	1	$$GETMBI^AUPNMBI

Package

Total

Call Graph

IHS Accounts Receivable

^BARDMBS CYDAY^BARDMRU (INSTYP,PAR,RRDT,RTRN,ZIS)^BARDMU

VA Fileman

^DIE $$GET1^DIQ ^DIR

IHS VA Utilities

^XBDBQUE $$VAL^XBDIQ1

Kernel

^%ZIS ^%ZISC

IHS Patient

$$GETMBI^AUPNMBI

Package	Total	Caller Graph
IHS Accounts Receivable	4	BAR DM REP ERRORS BARDMLP BARDMLPR BARDMRU

Package

Total

Caller Graph

IHS Accounts Receivable

BAR DM REP ERRORS BARDMLP BARDMLPR BARDMRU

Entry Points

Name	Comments	DBIA/ICR reference
PRVT	;EP
ADD2ERR(X)	;
INSCHK1	;
CALC(BARCALL)	;
ZIS	;
RR	;EP
ERR	;
MCD	;EP
PAID(BARDM,BARDMC)	;SET THE PRINT QUEUED STATUS TO NOT QUEUED AND BILL STATUS TO PAID
ST	;
A1	;
XIT	;
HDR	;
PRINT	;
INSCHK	;CHECK INSURANCE
MCR	;EP
POLCHK	;TEST FOR POLICY NO, POLICY HOLDER AND POLICY HOLDER DOB

External References

Name	Field # of Occurrence
^%ZIS	XIT+2
^%ZISC	XIT+3
$$GETMBI^AUPNMBI	MCR+7, RR+7
^BARDMBS	CALC+5
CYDAY^BARDMRU	A1+23
INSTYP^BARDMU	A1+25
PAR^BARDMU	ST+3
RRDT^BARDMU	ST+5
RTRN^BARDMU	PRINT+10
ZIS^BARDMU	ZIS+1
^DIE	PAID+3, PAID+6
$$GET1^DIQ	INSCHK1+7, INSCHK1+8, INSCHK1+9, INSCHK1+10, INSCHK1+11
^DIR	PRINT+7, PRINT+18
^XBDBQUE	ZIS+6
$$VAL^XBDIQ1	A1+13, A1+24

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Report for Errors in Letters to be printed" Line Location: ST+2
Function Call: WRITE	Prompt: !,"MISSING DATA IN ^BARBL(",DUZ(2),",",BARBIEN Line Location: A1+12
Function Call: WRITE	Prompt: !,"Bill status of ",$P(^BARBL(DUZ(2),BARBIEN,0),U,1)," changed. Flagging DL as PAID." Line Location: A1+21
Function Call: WRITE	Prompt: !!," There are not any queued Letters with Errors",!! Line Location: PRINT+2
Function Call: WRITE	Prompt: ! Line Location: PRINT+10
Function Call: WRITE	Prompt: !,$P(^TMP("BARDME",$J,BARL,BARL1),U),?8,$P(^(BARL1),U,2),?30,$E($P(^(BARL1),U,3),1,29),?60,$P(^(BARL1),U,4) Line Location: PRINT+12
Function Call: WRITE	Prompt: !! Line Location: PRINT+13
Function Call: WRITE	Prompt: @IOF,!,BARRDT,?23,"DEBT MANAGEMENT LETTER ERROR REPORT" Line Location: HDR+2
Function Call: WRITE	Prompt: !,"A/R PARENT LOCATION: ",BARPNM,! Line Location: HDR+4
Function Call: WRITE	Prompt: "=" Line Location: HDR+5
Function Call: WRITE	Prompt: !?2,"HRN",?8,"BILL NUMBER",?30,"A/R ACCOUNT",?61,"ERROR" Line Location: HDR+6
Function Call: WRITE	Prompt: ! Line Location: HDR+7
Function Call: WRITE	Prompt: "-" Line Location: HDR+7
Routine Call	DIE Line Location: PAID+3 PAID+6
Routine Call	DIR Line Location: PRINT+7 PRINT+18
Routine Call	%ZIS Line Location: XIT+2

FileNo	Call Tags
^AUTNINS - [#9999999.18]	GET1^DIQ
^AUTTINTY - [#9999999.181]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDBILL(	A1+18, INSCHK+2, INSCHK+3, INSCHK+5, INSCHK+6, INSCHK+9, INSCHK+10, INSCHK1+1, INSCHK1+2, INSCHK1+3 , INSCHK1+4, INSCHK1+7, INSCHK1+8, INSCHK1+9, INSCHK1+10, INSCHK1+11, MCD+2, MCD+3, PRVT+2, PRVT+3
^AUPN3PPH - [#9000003.1]	PRVT+8, PRVT+9, PRVT+10
^AUPNMCD - [#9000004]	MCD+5, MCD+7, MCD+8
^AUPNMCR - [#9000003]	MCR+2, MCR+4, MCR+8
^AUPNPAT - [#9000001]	POLCHK+4
^AUPNPRVT - [#9000006]	PRVT+3, PRVT+5, PRVT+6
^AUPNRRE - [#9000005]	RR+2, RR+4, RR+8
^AUTNINS - [#9999999.18]	INSCHK+1
^BARBL(	A1+15, A1+16, A1+20, A1+21, A1+28, POLCHK+3
^BARDM(	A1+1, A1+2, A1+4, A1+7, A1+8, A1+9
^DPT - [#2]	POLCHK+5
^TMP("BARDME"	XIT+1!, CALC+4!, A1+28, INSCHK+1, INSCHK+2, INSCHK+3, INSCHK+11, INSCHK1+13, ERR+1, ERR+2 , ERR+3, ERR+4, ERR+5, PRINT+2, PRINT+8, PRINT+11, PRINT+12
^VA(200 - [#200]	A1+11

Label References

Name	Line Occurrences
A1	CALC+7
ADD2ERR	A1+28, INSCHK+1, INSCHK+2, INSCHK+3, INSCHK+11, INSCHK1+13
ERR	INSCHK1+1, INSCHK1+2, INSCHK1+3, INSCHK1+4, INSCHK1+7, INSCHK1+8, INSCHK1+9, INSCHK1+10, INSCHK1+11
HDR	PRINT+1, PRINT+10
INSCHK	POLCHK+7
INSCHK1	INSCHK+7, INSCHK+10
MCD	INSCHK1+3, INSCHK1+10
MCR	INSCHK1+1, INSCHK1+7
PAID	A1+22
POLCHK	A1+27
PRVT	INSCHK1+4, INSCHK1+9, INSCHK1+11
RR	INSCHK1+2, INSCHK1+8
XIT	ZIS+2, ZIS+7
ZIS	ST+6

Name	Field # of Occurrence
^(	PRINT+12
^(0	A1+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BARBIEN	A1+9*, A1+12, A1+15, A1+16, A1+20, A1+21, A1+28, POLCHK+3
>> BARBILN	A1+13, A1+14, A1+28, INSCHK+1, INSCHK+2, INSCHK+3, INSCHK+11, INSCHK1+13, ERR+1, ERR+2 , ERR+3, ERR+4
BARC	XIT+4!
BARCALL	CALC~, A1+23
BARCT	XIT+4!, CALC+6, PRINT+8, PRINT+9, ADD2ERR+1
>> BARCTQ	CALC+6*, CALC+7, A1+1, A1+4
BARCYCLE	XIT+4!, CALC+7*, A1+1, A1+4, A1+23
>> BARD3P	A1+15*, A1+18, INSCHK+2, INSCHK+3, INSCHK+5, INSCHK+6, INSCHK+9, INSCHK+10, INSCHK1+1, INSCHK1+2 , INSCHK1+3, INSCHK1+4, INSCHK1+7, INSCHK1+8, INSCHK1+9, INSCHK1+10, INSCHK1+11, MCD+2, MCD+3, PRVT+2 , PRVT+3
>> BARD3PD	A1+16*, A1+18, INSCHK+2, INSCHK+3, INSCHK+5, INSCHK+6, INSCHK+9, INSCHK+10, INSCHK1+1, INSCHK1+2 , INSCHK1+3, INSCHK1+4, INSCHK1+7, INSCHK1+8, INSCHK1+9, INSCHK1+10, INSCHK1+11, MCD+2, MCD+3, PRVT+2 , PRVT+3
>> BARDAC	A1+15*, A1+24
>> BARDACG	POLCHK+2, POLCHK+7
>> BARDACI	INSCHK+1, INSCHK+5, INSCHK+6, INSCHK+10
>> BARDI	A1+24*, A1+26, A1+28, INSCHK+1, INSCHK+2, INSCHK+3, INSCHK+11, INSCHK1+13, ERR+1, ERR+2 , ERR+3, ERR+4
>> BARDINS	MCD+2, MCD+3, MCD+4, MCD+5, MCD+7, MCD+8
>> BARDINS(	A1+26
>> BARDITY	A1+26
>> BARDLQ	PRINT+8, PRINT+10
BARDM	A1+1*, A1+2, A1+4, A1+8, A1+9, A1+13, A1+22, A1+28, PAID~, PAID+1 , PAID+5, INSCHK+1, INSCHK+2, INSCHK+3, INSCHK+11, INSCHK1+13, ERR+1, ERR+2, ERR+3, ERR+4 , ERR+5
BARDM("INS"	POLCHK+6*
BARDM("INS_TX"	POLCHK+6*
BARDM("MEMBER"	POLCHK+6, MCR+7, MCR+8, MCD+8, RR+7, RR+8, PRVT+6*, ERR+4
BARDM("PAT_IEN"	POLCHK+1, POLCHK+3, POLCHK+4, POLCHK+5, MCR+2, MCR+4, MCR+7, MCR+8, RR+2, RR+4 , RR+7, RR+8, PRVT+3, PRVT+5, PRVT+6
BARDM("POL_DOB"	POLCHK+6, MCR+4, MCD+7, RR+4, PRVT+9*, ERR+3
BARDM("POL_HOLDER"	POLCHK+6, MCR+2, MCD+5, RR+2, PRVT+8*, ERR+1
BARDM("POL_HOLDER_IEN"	PRVT+5*, PRVT+7, PRVT+8, PRVT+9, PRVT+10
BARDM("POL_NUM"	POLCHK+6, MCR+3, MCD+6, RR+3, PRVT+10*, ERR+2
BARDMC	A1+3, A1+4, A1+22, PAID~, PAID+1
>> BARERRCT	CALC+3, A1+28, INSCHK+1, INSCHK+2, INSCHK+3, INSCHK+11, INSCHK1+13, ERR+5
>> BARHRN	A1+28, POLCHK+1, POLCHK+4, INSCHK+1, INSCHK+2, INSCHK+3, INSCHK+11, INSCHK1+13, ERR+1, ERR+2 , ERR+3, ERR+4
>> BARINS	PRVT+2, PRVT+3, PRVT+4, PRVT+5, PRVT+6
BARL	XIT+4!, INSCHK+6, INSCHK+9, INSCHK+10, INSCHK1+1, INSCHK1+2, INSCHK1+3, INSCHK1+4, INSCHK1+7, INSCHK1+8 , INSCHK1+9, INSCHK1+10, INSCHK1+11, MCD+2, PRVT+2, PRINT+8*, PRINT+11, PRINT+12
BARL1	XIT+4!, PRINT+11*, PRINT+12
BARL2	XIT+4!
>> BARLQ	A1+23
>> BARMIN	POLCHK+1*
>> BAROPT	ZIS+4, HDR+3
>> BARPAT	POLCHK+1, POLCHK+5
>> BARPG	HDR+1*, HDR+3
>> BARPNM	HDR+4
>> BARPPF	A1+6, A1+8, A1+14
>> BARQ	ST+4
>> BARQUIT	ZIS+2
>> BARRDT	HDR+2
>> BARRPT	ST+1*, ADD2ERR+1
>> BARSEQ	ST+1*
>> BARTC	A1+6, A1+7, A1+8
BARTST	XIT+4!, INSCHK+4, INSCHK+8, INSCHK+9, INSCHK+11, INSCHK1+9, INSCHK1+10, INSCHK1+11, INSCHK1+13, MCR+1* , MCD+1, MCD+4, RR+1, PRVT+1, PRVT+4*
>> BMCQ	ST+1, PRINT+2
>> CY	A1+23*
DA	PAID+1, PAID+4!, PAID+5, PAID+7!, PRINT+3!, PRINT+14!
DA(1	PAID+1*
DIC	PRINT+3!, PRINT+14!
DIE	PAID+1, PAID+4!, PAID+5, PAID+7!
DIR	XIT+4!, PRINT+3!, PRINT+14!
DIR("A"	PRINT+6, PRINT+17
DIR(0	PRINT+5, PRINT+16
DR	PAID+2, PAID+4!, PAID+5, PAID+7!, PRINT+3!, PRINT+14!
DT	MCR+7, RR+7
DUZ	A1+11
DUZ(2	A1+1, A1+2, A1+4, A1+7, A1+8, A1+9, A1+12, A1+15, A1+16, A1+20 , A1+21, A1+28, PAID+1, PAID+5, POLCHK+3, POLCHK+4
>> I	HDR+5, HDR+7
IO("S"	XIT+2, PRINT+4, PRINT+15
IOF	HDR+2
>> IOP	XIT+2*
>> IOS	XIT+2
IOSL	PRINT+10
IOST	PRINT+4, PRINT+15
U	A1+2, A1+9, A1+11, A1+15, A1+16, A1+20, A1+21, A1+28, POLCHK+3, POLCHK+4 , POLCHK+5, INSCHK+1, INSCHK+2, INSCHK+3, INSCHK+10, INSCHK+11, INSCHK1+1, INSCHK1+2, INSCHK1+3, INSCHK1+4 , INSCHK1+7, INSCHK1+8, INSCHK1+9, INSCHK1+10, INSCHK1+11, INSCHK1+13, MCR+2, MCR+4, MCR+8, MCD+2 , MCD+3, MCD+5, MCD+7, MCD+8, RR+2, RR+4, RR+8, PRVT+2, PRVT+3, PRVT+5 , PRVT+6, PRVT+8, PRVT+9, PRVT+10, ERR+1, ERR+2, ERR+3, ERR+4, PRINT+12
X	ADD2ERR~
>> XBIOP	ZIS+4*
>> XBNS	ZIS+3*
>> XBRC	ZIS+3*
>> XBRP	ZIS+4, ZIS+5
>> XBRX	ZIS+3*

Customize PDF page

Package: IHS Accounts Receivable

Routine: BARDMRE

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: