Routine: IBOEMP

Package	Total	Caller Graph
Integrated Billing	1	IB OUTPUT EMPLOYER REPORT

Entry Points

Name	Comments	DBIA/ICR reference
EN	;report on employers of patients with no insurance at time of care
RANGE	;get date range
DEV	;get the device
NX
EN1	;tasked entry point
PHDR	;create print header
RG
EXIT

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,?27,IBHDR,!!!! Line Location: EN+1
Function Call: WRITE	Prompt: "??" Line Location: RG+8
Function Call: WRITE	Prompt: "??" Line Location: NX+0
Routine Call	%ZIS Line Location: EN+1
Routine Call	DIR Line Location: RG+4 RG+7 NX+4 RANGE+2 RANGE+5
Routine Call	%ZIS Line Location: DEV+2

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	RANGE+3, RANGE+6
^TMP("IBEMP"	EXIT!

Name	Field # of Occurrence
>> %	PHDR+1
>> %ZIS	DEV+2*
>> %ZIS("A"	DEV+2*
DIOEND	EXIT+2!
DIR	RG+4!, RG+7!, NX+4!, RANGE+2!, RANGE+5!
DIR("?"	RG, RG+1, RG+2, RG+6, NX+2*
DIR("A"	RG+3, RG+7, NX+3, RANGE+1, RANGE+4*
DIR("B"	RG+3, RG+7, RANGE+4*
DIR(0	RG+3, RG+7, NX+3, RANGE+1, RANGE+4*
DIROUT	EXIT+2!
DIRUT	RG+4, RG+7, NX+4, EXIT+2!, RANGE+2, RANGE+5
DTOUT	EXIT+2!
DUOUT	EXIT+2!
IBBEG	EXIT+2!, RANGE+3*, RANGE+4
IBBEGE	EXIT+2!, RANGE+3*
IBCDT	EN1+3!, PHDR+1*
IBCH	NX+4*, EXIT+2!
IBDIV	EN1+3!, PHDR+3, PHDR+4, PHDR+5*
IBDSH	EN1+3!, PHDR+2*
IBEND	EXIT+2!, RANGE+6*
IBENDE	EXIT+2!, RANGE+6*
IBES	EN1+1*, EN1+3!
IBFLD	NX+5*, EXIT+2!, RANGE+1, RANGE+4
IBHDR	EN+1*, DEV+3, EXIT+2!
IBHDR1	EN1+3!, PHDR+3, PHDR+4, PHDR+5*
IBI	EN1+3!, PHDR+2*
IBLN	EN1+3!, PHDR+2*
IBPGN	EN1+3!, PHDR+2*
IBQ	EN1+2, EN1+3!, PHDR+2*
IBQUIT	NX+5, EXIT+2!, RANGE+2, RANGE+5, RANGE+6*
IBRGB	RG+4, RG+5, RG+6*, RG+8, NX, EXIT+2!
IBRGE	RG+4, RG+5, RG+7*, RG+8, NX, EXIT+2!
IBX	EN1+3!
IBY	EN1+3!
IO	DEV+4
IO("Q"	DEV+3!
IOF	EN+1
IOM	PHDR+2
>> POP	DEV+2
VA	EXIT+2!
VAERR	EN1+3!
VAUTD	EN1+3!, PHDR+3
VAUTD(	PHDR+4, PHDR+5
X	EN1+3!, EXIT+2!
Y	RG+4, RG+5, RG+6, RG+7, NX+4, EN1+3!, EXIT+2!, PHDR+1*, RANGE+3, RANGE+6
>> ZTDESC	DEV+3*
>> ZTQUEUED	EXIT
>> ZTREQ	EXIT*
>> ZTRTN	DEV+3*
>> ZTSAVE("IB*"	DEV+3*
>> ZTSAVE("VAUTD"	DEV+3*