Routine: IBTOPW

Call Graph

Call Graph Total: 13

Package	Total	Call Graph
Integrated Billing	5	PSDR^IBODIV ($$DAT1,DATE)^IBOUTL ^IBTRKR2 (SORT,TYPE,WHOSE)^IBTRPR0 (1,2)^IBTRPR01
Kernel	4	(,HOME)^%ZIS ^%ZISC (,$$S)^%ZTLOAD ($$FMTE,$$HTE)^XLFDT
Registration	2	PID^VADPT PAUSE^VALM1
VA Fileman	2	DT^DICRW ^DIR

Package

Total

Call Graph

Integrated Billing

PSDR^IBODIV ($$DAT1,DATE)^IBOUTL ^IBTRKR2 (SORT,TYPE,WHOSE)^IBTRPR0 (1,2)^IBTRPR01

Kernel

(,HOME)^%ZIS ^%ZISC (,$$S)^%ZTLOAD ($$FMTE,$$HTE)^XLFDT

Registration

PID^VADPT PAUSE^VALM1

VA Fileman

DT^DICRW ^DIR

Package	Total	Caller Graph
Integrated Billing	1	IBT OUTPUT PENDING ITEMS

Package

Total

Caller Graph

Integrated Billing

IBT OUTPUT PENDING ITEMS

Entry Points

Name	Comments	DBIA/ICR reference
SORT
END	; -- Clean up
HDR	; -- Print header for billing report
STOP	; -- see if should stop
DEV	; -- select device, run option
ONE	; -- print one patients data
DATE	; -- select date
BLD	; -- build list
REVS	; -- ask if hospital review, insurance reviews or both
BLDQ
DQ	; -- print one billing report from ct

External References

Name	Field # of Occurrence
^%ZIS	DEV+2
HOME^%ZIS	DEV+3
^%ZISC	END+4
^%ZTLOAD	DEV+3
$$S^%ZTLOAD	HDR+1, STOP+1
DT^DICRW	%
^DIR	REVS+8
PSDR^IBODIV	REVS+14
$$DAT1^IBOUTL	ONE+13, ONE+15
DATE^IBOUTL	DATE+1
^IBTRKR2	DQ+10
SORT^IBTRPR0	SORT
TYPE^IBTRPR0	REVS+13
WHOSE^IBTRPR0	REVS+12
1^IBTRPR01	BLD+9
2^IBTRPR01	BLD+11
PID^VADPT	ONE+9
PAUSE^VALM1	HDR+3
$$FMTE^XLFDT	HDR+7
$$HTE^XLFDT	DQ+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: REVS+1
Function Call: WRITE	Prompt: ! Line Location: REVS+14
Function Call: WRITE	Prompt: ! Line Location: END+2
Function Call: WRITE	Prompt: !!,"No Pending Reviews found." Line Location: DQ+13
Function Call: WRITE	Prompt: !!,"....task stoped at user request" Line Location: HDR+1
Function Call: WRITE	Prompt: @IOF Line Location: HDR+4
Function Call: WRITE	Prompt: !!,"....task stoped at user request" Line Location: STOP+1
Routine Call	%ZIS Line Location: DEV+3
Routine Call	DIR Line Location: REVS+8
Routine Call	%ZIS Line Location: DEV+2

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	ONE+11
^IBE(356.11 - [#356.11]	ONE+12
^IBE(356.6 - [#356.6]	ONE+14
^IBT(356 - [#356]	ONE+14, ONE+15
^TMP("IBSRT"	END+2!, BLD+4!, BLD+14, BLD+17, BLD+18, BLD+19, ONE+2
^TMP("IBSRT1"	END+2!, BLD+4!, ONE+7

Name	Line Occurrences
BLD	DQ+12
BLDQ	BLD+9, BLD+11
DQ	DEV+5
END	REVS+9, REVS+12, REVS+13, REVS+14, DATE+2, DEV+2, DEV+3, DEV+5, DQ+14
HDR	DQ+13, BLD+16, ONE+1, STOP+1
ONE	BLD+19
STOP	BLD+9, BLD+11

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	DEV+2*, END+5!
DFN	END+5!, ONE+4*, ONE+7, ONE+11
DIR	REVS+1~, REVS+8!
DIR("?"	REVS+5, REVS+6, REVS+7*
DIR("A"	REVS+3*
DIR("B"	REVS+4*
DIR(0	REVS+2*
DIRUT	REVS+9, END+5!, HDR+3
DT	%
DUOUT	END+5!
ENTRY	END+6!, ONE+3*
FILE	END+6!, ONE+8*
I	END+5!, DQ+7*
IBASSIGN	END+6!, ONE+6*, ONE+13
IBBDT	DATE+2, DATE+3, END+6!, HDR+7
IBCNT	END+6!, DQ+13, BLD+6, ONE+10
IBDATA	END+6!, ONE+2*, ONE+3, ONE+4, ONE+5, ONE+6, ONE+8, ONE+13
IBDATE	END+6!
IBDISDT	END+5!
IBDIV	END+5!
IBDIV(	DQ+7*, BLD+15
IBDV	END+6!, HDR+6, BLD+14*, BLD+15, BLD+17, BLD+18, BLD+19, ONE+2
IBEDT	DATE+2, DATE+3, END+6!, HDR+7
IBETYP	END+5!
IBFLAG	END+6!, ONE+7*, ONE+11
IBHDT	END+5!, DQ+3*, HDR+6
IBI	BLD+5~, BLD+6, BLD+18, BLD+19, ONE+2
IBJ	END+6!, BLD+5~, BLD+18*, BLD+19, ONE+2
IBK	END+6!, BLD+19*, ONE+2
IBL	END+6!, BLD+19*, ONE+2
IBNEXT	END+6!
IBPAG	END+5!, DQ+3, HDR+3, HDR+4, HDR+5, HDR+6
IBQUIT	END+5!, DQ+3, HDR+1, HDR+2, HDR+3, BLD+9, BLD+11, BLD+14, BLD+17, BLD+18 , BLD+19, ONE+1, STOP+1
IBREV	END+6!, ONE+5*, ONE+12
IBSORT	REVS+12, REVS+13, REVS+14, END+6!
IBSTATUS	END+6!, ONE+5*, ONE+13
IBTAG	END+5!
IBTOPW	END+5!, BLD+6*
IBTPBDT	DATE+3*, END+6!
IBTPEDT	DATE+3*, END+6!
IBTPRT	REVS+13*, END+5!
IBTRC	END+6!
IBTRN	END+5!, ONE+3*, ONE+14, ONE+15
IBTRND	END+5!
IBTRND1	END+5!
IBTRPRF	REVS+10, END+5!, BLD+7, BLD+9, BLD+11
IBTRV	END+6!
IBTSORT	END+5!
IBTWHO	REVS+12*, END+5!
IBWARD	END+6!
IO	DQ+11
IO("Q"	DEV+3!
IOF	HDR+4
IOM	HDR+6, HDR+9
IOSL	ONE+1
IOST	HDR+3, HDR+4
J	END+5!
>> POP	DEV+2
TYPE	END+6!, BLD+17*, BLD+18, BLD+19, ONE+2, ONE+12
U	ONE+14, ONE+15
VA	END+5!
VA("BID"	ONE+11
VAERR	END+5!
>> VALMQUIT	REVS+12, REVS+13
VAUTD	REVS+13, END+6!, DQ+6, DQ+7, BLD+15
VAUTD(	DQ+7
X	END+5!
Y	REVS+9, REVS+10, REVS+14, END+5!
>> ZTDESC	DEV+3*
>> ZTQUEUED	END+3, DQ+14, HDR+1, STOP+1
>> ZTREQ	END+3*
>> ZTRTN	DEV+3*
>> ZTSAVE("IB*"	DEV+3*
>> ZTSAVE("VAUTD"	DEV+3*
>> ZTSAVE("VAUTD("	DEV+3*
ZTSK	DEV+3!
>> ZTSTOP	HDR+1, STOP+1

Customize PDF page

Package: Integrated Billing

Routine: IBTOPW

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: