Routine: IBOBL

Package

Total

Call Graph

(,HOME)^%ZIS ^%ZISC ^%ZTLOAD

GVAR^IBCBB END^IBCBB1

^%DT ^DIC

Package	Total	Caller Graph
Integrated Billing	1	IB LIST BILLS FOR EPISODE

Package

Total

Caller Graph

Name	Line Occurrences
Function Call: WRITE	Prompt: $E(I,4,5)_"/"_$E(I,6,7)_"/"_$E(I,2,3)," " Line Location: ONE+4
Function Call: WRITE	Prompt: @IOF Line Location: HDR1+0
Function Call: WRITE	Prompt: "LIST OF ALL BILLS FOR AN EPISODE OF CARE",?(IOM-30),DGDATE," PAGE ",DGPAG Line Location: HDR1+1
Routine Call	%ZIS Line Location: DEV+4
Routine Call	DIC Line Location: ASK+5
Routine Call	%ZIS Line Location: DEV+1

FileNo	Call Tags
^DGCR(399 - [#399]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	START+3
^DGCR(399 - [#399]	LOOP+1, LOOP2+1
^DGCR(399.3 - [#399.3]	ONE+2
^DIC(11 - [#11]	ONE+10
^DIC(36 - [#36]	ONE+9
^DPT - [#2]	ONE+11, HDR1+2
^UTILITY($J	END+5!

Name	Field # of Occurrence
^(0	ONE+2, ONE+9, ONE+10, ONE+11

Name	Field # of Occurrence
%DT	START+3*, END+5!
>> %ZIS	DEV+1*
DFN	ASK+5*, ONE+11, HDR1+2, END+5!
DGDATE	START+3*, HDR1+1, END+5!
DGEVDT	ASK+5, START+3, HDR1+2, END+5!
DGIFN	ASK+5, LOOP2+2, END+5!
DGIFN1	ASK+5, LOOP+1, LOOP2, LOOP2+1, END+5!
>> DGIFN2	LOOP2*, LOOP2+2
DGLINE	START+3*, HDR1+5, END+5!
DGPAG	START+3, HDR1, HDR1+1, END+5!
DGPAYOR	ONE+8, ONE+9, ONE+10, ONE+11, ONE+12!
DIC	ASK+5*!
DIC(0	ASK+5*
DTIME	PAUSE
>> I	LOOP+1, ONE+4
>> IBAT	ONE+2
>> IBBNO	ONE+2
>> IBCL	ONE+3
IBCNT	END+5!
>> IBEVDT	ONE+4
>> IBFDT	ONE+4
IBIFN	LOOP, LOOP+1, LOOP2, LOOP2+1, LOOP2+2*, END+5!
IBIFN1	END+5!
>> IBIFN2	LOOP2*, LOOP2+2
>> IBNDM	ONE+9, ONE+10
IBQUIT	START+3, LOOP+1, LOOP+2, LOOP2+1, ONE+1, HDR, PAUSE, END+5!
>> IBST	ONE+5
>> IBTDT	ONE+4
>> IBTF	ONE+6
>> IBWHO	ONE+7, ONE+9, ONE+10, ONE+11
IBX1	PAUSE*, END+5!
IO	DEV+6
IO("Q"	DEV+2!
IOF	HDR1
IOM	START+3, HDR1+1
IOSL	ONE+1
IOST	HDR, HDR1, PAUSE
>> J	LOOP2+1*
>> POP	DEV+1
U	%*
>> X	START+3*
>> Y	ASK+5, START+3*
>> Y(0	ASK+5
>> ZTDESC	DEV+3*
>> ZTQUEUED	END+3
>> ZTREQ	END+3*
>> ZTRTN	DEV+3*
>> ZTSAVE("DFN"	DEV+3*
>> ZTSAVE("DG*"	DEV+3*
ZTSK	DEV+4!

Information