Routine: IBOST

Package	Total	Call Graph
Kernel	3	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD
Integrated Billing	2	SITE^IBAUTL (DATE,PAUSE)^IBOUTL
VA Fileman	1	(D,DT)^DIQ

Package	Total	Caller Graph
Integrated Billing	1	IB OUTPUT STATISTICAL REPORT

Name	Comments	DBIA/ICR reference
GROSS	; -gross count of action types, total charges
EN	;
END
HDR	;
DEV
PRINT	; -output data
NET	; -net count of new actions that aren't cancelled
NETLIN	;
LINE	;
DQ	; -entry from tasked job

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,*13,?20,"Integrated Billing Statistical Report" Line Location: EN+3
Function Call: WRITE	Prompt: ! Line Location: DQ+6
Function Call: WRITE	Prompt: !?(IOM-8/2),"Page: ",IBPAG Line Location: HDR+9
Routine Call	%ZIS Line Location: EN+3
Routine Call	%ZIS Line Location: DEV

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	HDR+4
^IB - [#350]	DQ+4, GROSS+4, NET+5, NET+6
^IB("APDT"	NET+3
^IB("D"	DQ+4
^IBE(350.1 - [#350.1]	GROSS+5, NET+6
^TMP($J	DQ+3!, GROSS+6, GROSS+7, NET+8, NET+9, PRINT+3, PRINT+6, LINE+3, LINE+4, NETLIN+2 , NETLIN+4, NETLIN+5, END!

Name	Field # of Occurrence
>> %ZIS	DEV*
>> %ZIS("A"	DEV*
DT	PRINT+1
DUOUT	END+4!
IBATYP	GROSS+5, GROSS+6, GROSS+7, NET+8, NET+9, PRINT+3, PRINT+6*, LINE+2, LINE+3, LINE+4 , NETLIN+2, NETLIN+3, NETLIN+4, NETLIN+5, END+4!
IBBDT	DQ+4, HDR+6, END+4!
IBCHRG	NET+6, NET+7, NET+8, END+4!
IBDT	DQ+4*, END+4!
IBEDT	EN+4, DQ+4, HDR+7, END+4!
IBFAC	HDR+4, END+4!
IBHDT	PRINT+1*, HDR+8, END+4!
IBJ	END+4!
IBL	NET+3*, END+4!
IBLAST	NET+3*, NET+4, NET+5, NET+6, END+4!
IBLDT	NET+3*, END+4!
IBN	DQ+4*, GROSS+4, NET+3, END+4!
IBND	GROSS+4*, GROSS+5, GROSS+7, END+4!
IBPAG	PRINT+1, HDR+1, HDR+9, END+4!
IBQUIT	PRINT+1*, PRINT+3, PRINT+6, LINE+1, NETLIN+1, END+4!
IBSEQNO	GROSS+5, GROSS+6, GROSS+7, NET+8, NET+9, PRINT+3, PRINT+6*, LINE+3, LINE+4, NETLIN+2 , NETLIN+4, NETLIN+5, END+4!
IBSEQNOL	NET+6*, NET+7, NET+9, END+4!
IBSITE	HDR+5, END+4!
IBSNM	HDR+4*, HDR+5, END+4!
IBT	PRINT+3, PRINT+6, END+4!
IO	DEV+2
IO("Q"	DEV+1!
IOF	EN+3, HDR+1
IOM	PRINT+2, PRINT+5, LINE+2, LINE+3, LINE+4, NETLIN+3, NETLIN+4, NETLIN+5, HDR+2, HDR+3 , HDR+5, HDR+6, HDR+7, HDR+8, HDR+9, HDR+10
IOSL	LINE+1, NETLIN+1
IOST	HDR+1
>> POP	DEV
X	END+4!
Y	PRINT+1, HDR+6, HDR+7*, END+4!
>> ZTDESC	DEV+1*
>> ZTQUEUED	END+3
>> ZTREQ	END+3*
>> ZTRTN	DEV+1*
>> ZTSAVE("IB*"	DEV+1*
ZTSK	DEV+1!

Information