Routine: BARDYSV3

Package	Total	Call Graph
VA Fileman	4	^%DT NOW^%DTC $$GET1^DIQ ^DIR
IHS Accounts Receivable	3	($$ASKFNAME,SENDFILE)^BARDYSV4 (TRANS,VISITS)^BARDYSV5 $$VALI^BARVPM
Patient Care Component Reports	1	$$LOCENC^APCLV

Package	Total	Caller Graph
IHS Accounts Receivable	2	BAR OMB REPORT BARDYSV4

Name	Comments	DBIA/ICR reference
BILLS(BARBEG,BAREND)	;EP - Find 3P Bills for this period
BDATA	;EP - Set 3P Bill data
INTERACT	;EP - INTERACTIVE EP
BREC	;EP - BUILD BILL REC
LSTMNTH(TODAY)	;EP - COMPY
INIT	;EP - Initialize
BATCH(BARBEG,BAREND)	;EP - ENTER FOR TASKED JOB
ASKBEG	;EP - ASK BEGIN DATE
ASKEND	;EP - ASK END DATE
IHS(DUZ2)	;EP - RETURN TRUE IF IHS AFFILIATION

Name	Field # of Occurrence
^%DT	BATCH+5
NOW^%DTC	ASKEND+8, ASKEND+25, BATCH+6, BATCH+15
$$LOCENC^APCLV	BILLS+42
$$ASKFNAME^BARDYSV4	ASKEND+22, BATCH+13
SENDFILE^BARDYSV4	ASKEND+24, BATCH+14
TRANS^BARDYSV5	ASKEND+14, BATCH+11
VISITS^BARDYSV5	ASKEND+11, BATCH+8
$$VALI^BARVPM	BDATA+8
$$GET1^DIQ	IHS+3, BILLS+50, BILLS+63, BILLS+68, BILLS+69, BDATA+6, BDATA+13, BDATA+14, BDATA+15, BDATA+16 , BDATA+17, BDATA+19
^DIR	INTERACT+1, ASKBEG+5, ASKEND+4, ASKEND+7, ASKEND+20

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"THIS REPORT IS NOT INTENDED FOR NON-IHS FACILITIES!!" Line Location: INTERACT+1
Function Call: WRITE	Prompt: ! Line Location: INTERACT+1
Function Call: WRITE	Prompt: !,"BEGIN DATE CAN NOT BE GREATER THAN ENDING DATE!" Line Location: ASKEND+7
Function Call: WRITE	Prompt: !! Line Location: ASKEND+10
Function Call: WRITE	Prompt: !,BARTMP Line Location: ASKEND+17
Function Call: WRITE	Prompt: !,"DESTINATION FILE: ",BARFILE Line Location: ASKEND+23
Routine Call	DIR Line Location: INTERACT+1 ASKBEG+5 ASKEND+4 ASKEND+7 ASKEND+20

FileNo	Call Tags
^AUPNVSIT - [#9000010]	GET1^DIQ
^ABMDBILL(2906 - [#9002274.4]	GET1^DIQ
^BARBL(2906 - [#90050.01]	GET1^DIQ
9999999.0611	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^ABMDBILL(	BILLS+7, BILLS+8, BILLS+9, BILLS+37, BILLS+41, BDATA+2
^ABMDTXST - [#9002274.6]	BDATA+18
^AUPNVSIT - [#9000010]	BILLS+66
^AUTTLOC - [#9999999.06]	IHS+2
^BARBL(	BILLS+14, BILLS+16, BILLS+17, BILLS+33, BDATA+3
^BAROMB(	INIT+4!
^BAROMB($J	ASKEND+15, BREC+1, BREC+14*, INIT+1!
^BARTMP("BARDYSV3"	ASKEND+9, ASKEND+21, ASKEND+26, ASKEND+35, ASKEND+36, ASKEND+37, BATCH+3, BATCH+7, BATCH+12, BATCH+19 , BATCH+20, BATCH+21, BILLS+10, BILLS+20, BILLS+21, BILLS+25, BILLS+26, BILLS+29, BILLS+57, BILLS+58 , BDATA+9, BREC+15, BREC+16, BREC+17, BREC+18, INIT+3, INIT+5!, INIT+7*

Name	Line Occurrences
$$IHS	INTERACT+1
$$LSTMNTH	BATCH+4
ASKBEG	ASKEND+5, ASKEND+15
ASKEND	ASKEND+7
BDATA	BILLS+70
BILLS	ASKEND+12, BATCH+9
BREC	BILLS+71
INIT	INTERACT+3, BATCH+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	ASKEND+9, ASKEND+21, ASKEND+26, ASKEND+35, ASKEND+36, ASKEND+37, BATCH+7, BATCH+12, BATCH+19, BATCH+20 , BATCH+21
>> %DT	BATCH+5*
>> ACTINS	BDATA+19*, BREC+8
>> AFFIL	IHS+3*, IHS+4
BARBEG	BATCH~, BATCH+2~, BATCH+4, BATCH+5, BATCH+7, BATCH+8, BATCH+9, BATCH+11, BATCH+13, BILLS~ , BILLS+3
>> BARBLIEN	BILLS+16, BILLS+17, BILLS+20, BILLS+26, BILLS+28, BILLS+29, BILLS+33, BDATA+4
>> BARDEP	BILLS+69*, BREC+12
BAREND	BATCH~, BATCH+2~, BATCH+4, BATCH+5, BATCH+7, BATCH+8, BATCH+9, BATCH+11, BATCH+13, BILLS~ , BILLS+4
>> BARFILE	ASKEND+22, ASKEND+23, ASKEND+24, BATCH+13, BATCH+14
>> BARMRG	BILLS+67*, BREC+10
>> BARMY	BILLS+64*, BREC+2
>> BARTMP	ASKEND+16*, ASKEND+17, ASKEND+21
>> BARVDA	BILLS+61, BILLS+62, BREC+14
>> BARVDEL	BILLS+68*, BREC+11
>> BARVLOC	BILLS+42, BILLS+43, BILLS+52, BILLS+56, BREC+1, BREC+2, BREC+14, BREC+18
BEGDATE	ASKBEG+1~, ASKBEG+7*, ASKEND+7, ASKEND+9, ASKEND+11, ASKEND+12, ASKEND+14, ASKEND+22
>> BEGIN	LSTMNTH+12, LSTMNTH+14, BILLS+3, BILLS+8, BILLS+14
>> BILL3P	BDATA+2*, BDATA+3
>> BILLAMT	BDATA+16*, BREC+6
>> BILLAPP	BDATA+15*, BREC+5
>> BILLAR	BDATA+3*
>> BILLEXP	BDATA+17, BDATA+18, BREC+7
>> BILLIEN	BILLS+25*, BILLS+26, BILLS+29, BILLS+37, BILLS+41, BILLS+47, BILLS+56, BDATA+1, BDATA+2, BREC+1 , BREC+2, BREC+3, BREC+14
>> BILLNUM	BDATA+14*, BREC+4
>> BILLREC	BREC+3, BREC+4, BREC+5, BREC+6, BREC+7, BREC+8, BREC+9, BREC+10, BREC+11, BREC+12 , BREC+13*, BREC+14, BREC+17
>> BILLSTA	BDATA+13*, BREC+9
>> BLLARIEN	BDATA+4*, BDATA+6
CNT	BILLS+2~, BILLS+8, BILLS+13~, BILLS+14, BILLS+15
>> D	BATCH+4, BATCH+5
D0	BDATA+5~, BDATA+6*
DAYS	LSTMNTH+1~
DIR	INTERACT+1!, ASKBEG+2!, ASKEND+1!, ASKEND+7!, ASKEND+18!
DIR("A"	ASKBEG+4, ASKEND+3
DIR(0	INTERACT+1, ASKBEG+3, ASKEND+2, ASKEND+7, ASKEND+19*
>> DIRUT	ASKBEG+6, ASKEND+5
DT	BATCH+4, BATCH+5
>> DTOUT	ASKBEG+6, ASKEND+5
>> DUOUT	ASKBEG+6, ASKEND+5
DUZ(2	INTERACT+1, ASKEND+9, ASKEND+21, ASKEND+26, ASKEND+35, ASKEND+36, ASKEND+37, BATCH+12, BATCH+19, BATCH+20 , BATCH+21, BILLS+14, BILLS+16, BILLS+17, BILLS+33, BILLS+48, BILLS+49, BILLS+51, BDATA+3, BDATA+11 , BDATA+12, BDATA+18, BDATA+20
DUZ2	IHS~, IHS+2, IHS+3
>> END	LSTMNTH+13, LSTMNTH+14, BILLS+4, BILLS+8, BILLS+14
ENDDATE	ASKBEG+1~, ASKEND+6*, ASKEND+7, ASKEND+9, ASKEND+11, ASKEND+12, ASKEND+14, ASKEND+22
ENDDAY	LSTMNTH+1~, LSTMNTH+9*, LSTMNTH+13
FMYR	LSTMNTH+1~, LSTMNTH+2, LSTMNTH+10, LSTMNTH+12, LSTMNTH+13
>> IENS	BILLS+47, BILLS+50, BILLS+60, BILLS+63, BILLS+68, BILLS+69, BDATA+1*, BDATA+13, BDATA+14, BDATA+15 , BDATA+16, BDATA+17, BDATA+19
>> INSTYP	BDATA+8*, BDATA+9
LSTMNTH	LSTMNTH+1~, LSTMNTH+4, LSTMNTH+5, LSTMNTH+6, LSTMNTH+10, LSTMNTH+11, LSTMNTH+12, LSTMNTH+13
>> MULTVIS	BILLS+36, BILLS+38, BREC+13
RANGE	BATCH+2~, BATCH+4*
>> RC	ASKEND+22, BATCH+13
REC	IHS+1~, IHS+2*, IHS+3
>> RECHDR	BREC+2*, BREC+3
>> SAVEDUZ	BILLS+48, BILLS+51, BDATA+11, BDATA+20
STARTDAY	LSTMNTH+1~, LSTMNTH+8*, LSTMNTH+12
>> THISMNTH	LSTMNTH+3*, LSTMNTH+10
TMP	BILLS+24!, BILLS+27!, BILLS+29, BILLS+30, BILLS+31, BILLS+37, BILLS+38, BILLS+57, BILLS+58, BILLS+66* , BILLS+67, BREC+15, BREC+16, BREC+17, INIT+3, INIT+4
>> TMPREC	BILLS+56*, BILLS+58
TODAY	LSTMNTH~, LSTMNTH+2, LSTMNTH+3, LSTMNTH+4
>> TPAPRVDT	BILLS+8, BILLS+9, BILLS+10, BILLS+14, BILLS+16, BILLS+20
>> TPBDUZ2	BILLS+7, BILLS+8, BILLS+9, BILLS+10, BILLS+33, BILLS+37, BILLS+41, BILLS+49, BDATA+2, BDATA+12
>> TPBIEN	BILLS+9, BILLS+10, BILLS+17, BILLS+18*, BILLS+20, BILLS+21
>> TPBVLOC	BILLS+50*, BILLS+52, BILLS+56
U	ASKEND+9, BATCH+4, BATCH+5, BATCH+7, LSTMNTH+7, LSTMNTH+14, BILLS+10, BILLS+17, BILLS+21, BILLS+30 , BILLS+56, BDATA+2, BDATA+18, BREC+2, BREC+3, BREC+4, BREC+5, BREC+6, BREC+7, BREC+8 , BREC+9, BREC+10, BREC+11, BREC+12, BREC+13, BREC+14, BREC+17
>> VISCRDT	BILLS+63*, BILLS+64
>> VISIT	BILLS+37, BILLS+38, BILLS+41, BILLS+42, BILLS+56, BILLS+60, BILLS+61, BILLS+66
>> X	BATCH+5, LSTMNTH+6, LSTMNTH+7*, LSTMNTH+9
>> X1	LSTMNTH+7*
>> XBFLG	ASKEND+35, ASKEND+36, ASKEND+37, BATCH+19, BATCH+20, BATCH+21
>> XBFLG(1	ASKEND+35, ASKEND+36, BATCH+19, BATCH+20
>> Y	ASKBEG+6, ASKBEG+7, ASKEND+5, ASKEND+6, BATCH+5
>> ZTQUEUED	INTERACT+2*, BILLS+15

Customize PDF page

Package: IHS Accounts Receivable

Routine: BARDYSV3

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: