Routine: BARRSYNC

Package	Total	Call Graph
IHS Accounts Receivable	8	^BARDBQUE $$SDT^BARDUTL (CHK,WHD)^BARRHD MSG^BARRSEL LOC^BARRSL1 PAZ^BARRUTL (EOP,INIT)^BARUTL $$EN^BARVDF
VA Fileman	2	DD^%DT $$GET1^DIQ
Kernel	1	$$CJ^XLFSTR

Package	Total	Caller Graph
IHS Accounts Receivable	1	BAR MAN RPT AUTO SYNC

Entry Points

Name	Comments	DBIA/ICR reference
SETHDR	; ; Build header array
EN	; EP
COMPUTE	;
BILL	; ; Report of selected visit types for DUZ(2) logged into.
VISIT	;
VISIT2	;
HDB	; EP ; Page and column header
PRINT	; ; Print report
BILL2	;
NODATA	; ; Write message because Auto Sync did not run
HD	; EP

External References

Name	Field # of Occurrence
DD^%DT	BILL+7, BILL+20, VISIT+5
^BARDBQUE	EN+17
$$SDT^BARDUTL	BILL2+14
CHK^BARRHD	SETHDR+12
WHD^BARRHD	HDB+4
MSG^BARRSEL	EN+8
LOC^BARRSL1	EN+9
PAZ^BARRUTL	EN+18, NODATA+5, HD+1
EOP^BARUTL	PRINT+9
INIT^BARUTL	EN+3
$$EN^BARVDF	NODATA+2
$$GET1^DIQ	EN+6, BILL2+12
$$CJ^XLFSTR	BILL+8, BILL+21, VISIT+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?5,$$EN^BARVDF("RVN"),"WARNING:",$$EN^BARVDF("RVF") Line Location: NODATA+2
Function Call: WRITE	Prompt: ?18,"Auto Sync has not been executed. This report contains no data." Line Location: NODATA+3
Function Call: WRITE	Prompt: !?18,"Contact your site manager for further assistance." Line Location: NODATA+4
Function Call: WRITE	Prompt: !!!,"* NO DATA TO PRINT *" Line Location: PRINT+8
Function Call: WRITE	Prompt: !!!,"* NO DATA TO PRINT *" Line Location: PRINT+14
Function Call: WRITE	Prompt: !,"*** REPORT TOTAL (Bill cnt:" Line Location: PRINT+17
Function Call: WRITE	Prompt: ?37,$J(BARRCNT,4),")" Line Location: PRINT+18
Function Call: WRITE	Prompt: ?43,$J($FN(BARR1,",",2),10) Line Location: PRINT+19
Function Call: WRITE	Prompt: ?56,$J($FN(BARR2,",",2),10) Line Location: PRINT+20
Function Call: WRITE	Prompt: ?69,$J($FN(BARR3,",",2),10) Line Location: PRINT+21
Function Call: WRITE	Prompt: !?48,"BILL",?56,"TRANSACTION" Line Location: HDB+5
Function Call: WRITE	Prompt: !,"A/R BILL",?15,"DOS",?27,"A/R ACCOUNT",?46,"BALANCE",?56,"HISTORY BAL",?69,"DIFFERENCE" Line Location: HDB+6
Function Call: WRITE	Prompt: !,BAR("DASH"),! Line Location: HDB+8
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("(As of Auto Sync run on "_Y_")",IOM) Line Location: BILL+21
Function Call: WRITE	Prompt: !!?5,"Visit Location: ",BARVIS,! Line Location: BILL2+1
Function Call: WRITE	Prompt: !,$E($$GET1^DIQ(90050.01,BARBILL,.01),1,12) Line Location: BILL2+12
Function Call: WRITE	Prompt: ?14,"NO DOS" Line Location: BILL2+13
Function Call: WRITE	Prompt: ?14,$$SDT^BARDUTL(BARDOS) Line Location: BILL2+14
Function Call: WRITE	Prompt: ?26,$E(BARAC,1,15) Line Location: BILL2+15
Function Call: WRITE	Prompt: ?43,$J($FN(BARBAMT,",",2),10) Line Location: BILL2+16
Function Call: WRITE	Prompt: ?56,$J($FN(BARTAMT,",",2),10) Line Location: BILL2+17
Function Call: WRITE	Prompt: ?69,$J($FN(BARDIFF,",",2),10) Line Location: BILL2+18
Function Call: WRITE	Prompt: !," ** Visit Location Total (Bill cnt:" Line Location: BILL2+30
Function Call: WRITE	Prompt: ?37,$J($G(BARVCNT),4),")" Line Location: BILL2+36
Function Call: WRITE	Prompt: ?43,$J($FN($G(BARV1),",",2),10) Line Location: BILL2+37
Function Call: WRITE	Prompt: ?56,$J($FN($G(BARV2),",",2),10) Line Location: BILL2+38
Function Call: WRITE	Prompt: ?69,$J($FN($G(BARV3),",",2),10) Line Location: BILL2+39
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("(As of Auto Sync run on "_Y_")",IOM) Line Location: VISIT+6

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^BARBL(2906 - [#90050.01]	GET1^DIQ
^BAR(90052.06,7819,0) - [#90052.06]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BARSYNC	EN+2, COMPUTE+4, COMPUTE+6, COMPUTE+8, BILL+5, BILL+18, BILL+23, BILL2+3, BILL2+5, BILL2+7 , BILL2+8, BILL2+9, VISIT+3, VISIT2+4, VISIT2+5
^BARSYNC(0	PRINT+7
^DIC(4 - [#4]	SETHDR+5, SETHDR+8

Label References

Name	Line Occurrences
BILL	PRINT+10
BILL2	BILL+11, BILL+25, VISIT2+6
HD	BILL2+11
HDB	PRINT+6
NODATA	EN+2
SETHDR	EN+12
VISIT	PRINT+11
VISIT2	VISIT+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BAR	EN+1!
BAR("CONJ"	SETHDR+11*
BAR("DASH"	HDB+7*, HDB+8
BAR("F1"	PRINT+12, HD+2*, BILL+5, BILL+18, BILL+23, BILL2+3, BILL2+5, BILL2+7, BILL2+11, BILL2+28 , VISIT+3, VISIT+8, VISIT2+4
BAR("HD"	SETHDR+3*
BAR("I"	HDB+3*
BAR("LOC"	EN+6, EN+7, SETHDR+6, COMPUTE+2, PRINT+10
BAR("LVL"	SETHDR+2*
BAR("PG"	PRINT+3, HDB+2
BAR("PRIVACY"	EN+5*
BAR("TXT"	SETHDR+4, SETHDR+5, SETHDR+7, SETHDR+8, SETHDR+9, SETHDR+10
BAR("VISIT"	COMPUTE+10*, VISIT+1, VISIT+8
BAR(132	HDB+7
>> BARAC	BILL2+2, BILL2+3, BILL2+5, BILL2+7, BILL2+8, BILL2+9, BILL2+15
>> BARBAMT	BILL2+8*, BILL2+10, BILL2+16, BILL2+22, BILL2+25
>> BARBILL	BILL2+6, BILL2+7, BILL2+8, BILL2+9, BILL2+12
>> BARBLOC	COMPUTE+5, COMPUTE+6, COMPUTE+8
>> BARDASH	PRINT+4*, BILL2+29
>> BARDIFF	BILL2+10*, BILL2+18, BILL2+24, BILL2+27
>> BARDOS	BILL2+4, BILL2+5, BILL2+7, BILL2+8, BILL2+9, BILL2+13, BILL2+14
>> BAREQUAL	PRINT+5*, PRINT+16
>> BARHOLD	VISIT2+2*, VISIT2+7
>> BARP("RTN"	EN+4*
>> BARQ("NS"	EN+15*
>> BARQ("RC"	EN+13*
>> BARQ("RP"	EN+14*
>> BARQ("RX"	EN+16*
BARR1	PRINT+2!, PRINT+19, BILL2+25*
BARR2	PRINT+2!, PRINT+20, BILL2+26*
BARR3	PRINT+2!, PRINT+21, BILL2+27*
BARRCNT	PRINT+2!, PRINT+13, PRINT+18, BILL2+21*
BARSTART	COMPUTE+1~, COMPUTE+3, COMPUTE+4, COMPUTE+6, COMPUTE+8, BILL+4, BILL+5, BILL+6, BILL+17, BILL+18 , BILL+19, BILL+23, BILL2+3, BILL2+5, BILL2+7, BILL2+8, BILL2+9, VISIT+2, VISIT+3, VISIT+4 , VISIT2+4, VISIT2+5
>> BARTAMT	BILL2+9*, BILL2+10, BILL2+17, BILL2+23, BILL2+26
>> BARUSR	EN+3
BARV1	BILL+10, BILL+24!, BILL2+22, BILL2+37, VISIT2+1!
BARV2	BILL+10, BILL+24!, BILL2+23, BILL2+38, VISIT2+1!
BARV3	BILL+10, BILL+24!, BILL2+24, BILL2+39, VISIT2+1!
BARVCNT	BILL+10, BILL+24!, BILL2+20, BILL2+36, VISIT2+1!
>> BARVIS	BILL+9, BILL+22, BILL+23, BILL2+1, BILL2+3, BILL2+5, BILL2+7, BILL2+8, BILL2+9, VISIT+7 , VISIT+8*, VISIT2+5
>> BARVLOC	COMPUTE+7, COMPUTE+8, COMPUTE+9, COMPUTE+10
BARY	EN+1!
BARY("LOC"	EN+11, SETHDR+5, COMPUTE+9, BILL+2, BILL+9
>> DIROUT	HD+2
>> DTOUT	EN+10, HD+2
>> DUOUT	EN+10, HD+2
DUZ(2	EN+6, SETHDR+8, BILL+23, BILL2+3, BILL2+5, BILL2+7, BILL2+8, BILL2+9, VISIT2+2, VISIT2+3* , VISIT2+4, VISIT2+5, VISIT2+7
IOM	BILL+8, BILL+21, VISIT+6
IOSL	BILL2+11
U	SETHDR+5, SETHDR+8, BILL2+8, BILL2+9
>> Y	BILL+6, BILL+8, BILL+19, BILL+21, VISIT+4*, VISIT+6

Customize PDF page

Package: IHS Accounts Receivable

Routine: BARRSYNC

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: