Routine: BARUTLST

Package	Total	Call Graph
Kernel	3	^%ZISC (CLOSE,OPEN)^%ZISH ^%ZTLOAD
IHS Accounts Receivable	2	$$CDT^BARDUTL $$EN^BARVDF
VA Fileman	2	$$GET1^DIQ ^DIR

Package

Total

Call Graph

Kernel

^%ZISC (CLOSE,OPEN)^%ZISH ^%ZTLOAD

IHS Accounts Receivable

$$CDT^BARDUTL $$EN^BARVDF

VA Fileman

$$GET1^DIQ ^DIR

Package	Total	Caller Graph
IHS Accounts Receivable	1	BAR UFMS TRANSMIT CHECK REPORT

Package

Total

Caller Graph

IHS Accounts Receivable

BAR UFMS TRANSMIT CHECK REPORT

Name	Comments	DBIA/ICR reference
WRITE	;EP ; IHS/SD/PKD 10/15/10 Called from BARUFXMT
GETDATA	;
FILTER	;P.OTT
QUE	;QUE TO TASKMAN
PRINT	;EP ; Callable point for queuing
DT	;
SEL	; ; Select device
ISINDPAT(BARTRIEN)	;EP - IS BEN OR NO INS TYP

External References

Name	Field # of Occurrence
^%ZISC	PRINT+9
CLOSE^%ZISH	PRINT+10
OPEN^%ZISH	WRITE+5
^%ZTLOAD	QUE+5
$$CDT^BARDUTL	GETDATA+48
$$EN^BARVDF	PRINT+6, PRINT+8
$$GET1^DIQ	GETDATA+13, GETDATA+32, GETDATA+33, GETDATA+34, GETDATA+35, GETDATA+36, GETDATA+39, GETDATA+41, GETDATA+43, GETDATA+45 , GETDATA+46, GETDATA+47, ISINDPAT+7
^DIR	DT+10, DT+16, FILTER+9, SEL+6, SEL+10, PRINT+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This report will look through all the A/R Transactions in the selected date" Line Location: DT+2
Function Call: WRITE	Prompt: !,"range and report any that have not been transmitted to UFMS. Caution should" Line Location: DT+3
Function Call: WRITE	Prompt: !,"be used when running this report as it could contain a substantial amount of" Line Location: DT+4
Function Call: WRITE	Prompt: !,"data depending on your site." Line Location: DT+5
Function Call: WRITE	Prompt: !!," ============ Entry of TRANSACTION DATE Range =============",! Line Location: DT+6
Function Call: WRITE	Prompt: ! Line Location: DT+13
Function Call: WRITE	Prompt: !!,*7,"INPUT ERROR: Start Date is Greater than than the End Date, TRY AGAIN!",!! Line Location: DT+20
Function Call: WRITE	Prompt: !!,*7,"INPUT ERROR: Start Date must be on or after 10/01/2008, TRY AGAIN!",!! Line Location: DT+21
Function Call: WRITE	Prompt: !!,$$EN^BARVDF("HIN"),"E N D O F R E P O R T",$$EN^BARVDF("HIF"),! Line Location: PRINT+6
Function Call: WRITE	Prompt: $$EN^BARVDF("IOF") Line Location: PRINT+8
Function Call: WRITE	Prompt: "DONE" Line Location: PRINT+11
Function Call: WRITE	Prompt: !!,"Searching...." Line Location: GETDATA+2
Function Call: WRITE	Prompt: !!,"Creating file..." Line Location: WRITE+3
Function Call: WRITE	Prompt: !,"Missing Transaction List for "_$P($G(^AUTTLOC(DUZ(2),0)),U,2) Line Location: WRITE+9
Function Call: WRITE	Prompt: !,"TRANS IEN^BILL#^A/R ACCT^INS TYPE^PYMT^ADJ^CR-DEB^TRANS TYPE^CBATCH^CITEM^TDN^3P APPRV DT^UFMS EXP FILE^VISIT TYPE^INDIAN PATIENT" Line Location: WRITE+10
Routine Call	DIR Line Location: DT+10 DT+16 FILTER+9 SEL+6 SEL+10 PRINT+7

FileNo	Call Tags
^BARAC(2906 - [#90050.02]	GET1^DIQ
^BARTR(2906 - [#90050.03]	GET1^DIQ
^BARCOL(2906 - [#90051.01]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUTTLOC - [#9999999.06]	WRITE+9
^BAR(90052.06	SEL+5
^BARBL(	GETDATA+30, GETDATA+48, GETDATA+50, ISINDPAT+5
^BARTR(	GETDATA+7, GETDATA+9, GETDATA+12, GETDATA+21, GETDATA+24, GETDATA+28, GETDATA+32, GETDATA+33, GETDATA+48, GETDATA+49 , GETDATA+50, ISINDPAT+2
^TMP($J	GETDATA+4!, GETDATA+30, GETDATA+32, GETDATA+33, GETDATA+34, GETDATA+35, GETDATA+37, GETDATA+38, GETDATA+39, GETDATA+43* , GETDATA+44, GETDATA+45, GETDATA+46, GETDATA+47, GETDATA+48, GETDATA+49, GETDATA+50, GETDATA+51, WRITE+12, WRITE+13 , WRITE+16!

Name	Line Occurrences
$$ISINDPAT	GETDATA+20
DT	DT+20, DT+21, FILTER+10
GETDATA	PRINT+3
PRINT	SEL+2
WRITE	PRINT+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BARAC	ISINDPAT+1~, ISINDPAT+6*, ISINDPAT+7
BARBL	ISINDPAT+1~, ISINDPAT+3*, ISINDPAT+4, ISINDPAT+5
>> BARDUZ2	WRITE+8*
BARE	PRINT+12!
BARE("PG"	PRINT+2*
>> BARFLTR	FILTER+11*, GETDATA+21
>> BARFN	SEL+12*, WRITE+5
>> BARINDP	GETDATA+20*, GETDATA+51
BARITYP	ISINDPAT+1~, ISINDPAT+7*, ISINDPAT+8
BARLOC	GETDATA+3!
>> BARP("TRANS"	GETDATA+8, GETDATA+9, GETDATA+12, GETDATA+13, GETDATA+20, GETDATA+21, GETDATA+24, GETDATA+28, GETDATA+30, GETDATA+32 , GETDATA+33, GETDATA+34, GETDATA+35, GETDATA+36, GETDATA+37, GETDATA+38, GETDATA+39, GETDATA+41, GETDATA+43, GETDATA+44 , GETDATA+45, GETDATA+46, GETDATA+47, GETDATA+48, GETDATA+49, GETDATA+50, GETDATA+51, WRITE+11, WRITE+12, WRITE+13 , WRITE+14
>> BARPATH	SEL+8*, WRITE+4, WRITE+5
BARPSFLG	GETDATA+3!
>> BARREC	WRITE+13*, WRITE+14
>> BARTMP01	GETDATA+24*, GETDATA+25
>> BARTMP02	GETDATA+28*, GETDATA+29
>> BARTMP03	GETDATA+29*, GETDATA+30
BARTMP1	GETDATA+1~
BARTMP3	GETDATA+1~
BARTMPG1	GETDATA+1~
BARTMPG2	GETDATA+1~
BARTMPIT	GETDATA+1~
BARTR0	ISINDPAT+1~, ISINDPAT+2*, ISINDPAT+3
BARTRIEN	ISINDPAT~, ISINDPAT+2
>> BARTTYP	GETDATA+41*, GETDATA+43, GETDATA+44
>> BARUFXMT	SEL+2, PRINT+5, WRITE+2, WRITE+15
BARXX	ISINDPAT+1~, ISINDPAT+5*, ISINDPAT+6
>> BARY("DT"	DT+12, DT+19, DT+20, DT+21, GETDATA+5, GETDATA+6, GETDATA+7*, GETDATA+9
DIR	DT+17!, FILTER+1!, SEL+6!, SEL+10!, PRINT+7!
DIR("A"	DT+7, DT+14, FILTER+3, SEL+4, SEL+9*
DIR("B"	DT+9, DT+15, FILTER+8, SEL+5
DIR("L"	FILTER+4, FILTER+5, FILTER+6, FILTER+7
DIR(0	DT+8, FILTER+2, SEL+3, SEL+9, PRINT+7*
>> DIROUT	DT+11, DT+18, FILTER+10, SEL+7, SEL+11, PRINT+4
>> DIRUT	DT+11, DT+18, SEL+7, SEL+11, PRINT+4
>> DTOUT	DT+11, DT+18, FILTER+10, SEL+7, SEL+11, PRINT+4
>> DUOUT	DT+11, DT+18, FILTER+10, SEL+7, SEL+11, PRINT+4
DUZ(2	SEL+5, GETDATA+7, GETDATA+9, GETDATA+12, GETDATA+21, GETDATA+24, GETDATA+28, GETDATA+30, GETDATA+32, GETDATA+33 , GETDATA+48, GETDATA+49, GETDATA+50, WRITE+9, ISINDPAT+2, ISINDPAT+5
IO	WRITE+7
IO("S"	PRINT+9
IOST	PRINT+4, PRINT+7, PRINT+8
>> PF	SEL+2, PRINT+5, WRITE+2
>> POP	WRITE+6
U	GETDATA+12, GETDATA+21, GETDATA+25, GETDATA+29, GETDATA+30, GETDATA+32, GETDATA+33, GETDATA+34, GETDATA+35, GETDATA+37 , GETDATA+38, GETDATA+39, GETDATA+43, GETDATA+44, GETDATA+45, GETDATA+46, GETDATA+47, GETDATA+48, GETDATA+49, GETDATA+50 , GETDATA+51, WRITE+9, WRITE+14, ISINDPAT+3, ISINDPAT+6
>> Y	DT+12, DT+19, FILTER+10, FILTER+11, SEL+8, SEL+12, PRINT+4
>> ZSK	QUE+6
>> ZTDESC	QUE+2*
>> ZTRTN	QUE+1*
>> ZTSAVE("BAR*"	QUE+3*
ZTSK	QUE+4!, QUE+6

Customize PDF page

Package: IHS Accounts Receivable

Routine: BARUTLST

Information

Source Information

Call Graph

Call Graph Total: 7

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: