Routine: IBOBCC

Package	Total	Call Graph
Integrated Billing	4	^IBCNS $$CPTBSTAT^IBEFUNC1 PRINT^IBOBCC1 BDT^IBOUTL
Kernel	3	(,HOME)^%ZIS ^%ZISC (,$$S)^%ZTLOAD

Package

Total

Call Graph

^IBCNS $$CPTBSTAT^IBEFUNC1 PRINT^IBOBCC1 BDT^IBOUTL

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

Package	Total	Caller Graph
Integrated Billing	1	IB OUTPUT UNBILLED BASC

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
EN	;get date range then run the report
APPT	;get all BASC CPTs for appointments in date range for patients with insurance
DEV	;get the device
EN1	;entry pt. for tasked jobs
EXIT	;clean up and quit
PRINT
BILLED	;determine which BASC procedures from scheduling were actually entered in billing
STOP()	;determine if user requested task to be stopped

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,?15,"Report Unbilled BASC for Insured Patient Appointments",!!!! Line Location: EN+4
Function Call: WRITE	Prompt: !!,"TASK STOPPED BY USER",!! Line Location: STOP+1
Routine Call	%ZIS Line Location: EN+3
Routine Call	%ZIS Line Location: DEV+2

Name	Line Occurrences (* Changed, ! Killed)
^DGCR(399 - [#399]	BILLED+5, BILLED+6, BILLED+7
^DPT - [#2]	BILLED+10
^SDV - [#409.5]	APPT+5
^SDV("AP"	APPT+2, APPT+3
^TMP("IBBC"	APPT+7, APPT+10, BILLED+3, BILLED+4, BILLED+5, BILLED+8!, BILLED+9, BILLED+10*

Name	Field # of Occurrence
^(	APPT+4, BILLED+5

Name	Field # of Occurrence
>> %ZIS	DEV+2*
>> %ZIS("A"	DEV+2*
DFN	APPT+4*, APPT+8!
DIROUT	EXIT+3!
DIRUT	EXIT+3!
DTOUT	EXIT+3!
DUOUT	EXIT+3!
IBAD	APPT+4, APPT+6, APPT+7, APPT+8!, BILLED+3, BILLED+4*, BILLED+5, BILLED+6, BILLED+7, BILLED+8 , BILLED+9, BILLED+10, BILLED+11!
IBADT	APPT+1, APPT+2, APPT+3, APPT+4, APPT+5, APPT+8!
IBBDT	EN+5, EXIT+3!, APPT+1
IBBN	BILLED+6*, BILLED+7, BILLED+11!
IBCNT	BILLED+5, BILLED+6, BILLED+7, BILLED+8, BILLED+9, BILLED+11!
IBCPT	APPT+6, APPT+7, APPT+8!, BILLED+4, BILLED+5*, BILLED+6, BILLED+7, BILLED+8, BILLED+9, BILLED+11!
IBDFN	APPT+4, APPT+7, APPT+8!, BILLED+3, BILLED+4, BILLED+5, BILLED+6, BILLED+8, BILLED+9, BILLED+10 , BILLED+11!
IBE	APPT+1*, APPT+2, APPT+8!
IBEDT	EN+5, EXIT+3!, APPT+1
IBHDR	EN+3*, DEV+3, EXIT+3!
IBI	APPT+6*, APPT+8!
IBINDT	APPT+4*, APPT+8!
IBINS	APPT+4, APPT+8!
>> IBPGN	STOP+1
IBPR	APPT+5*, APPT+6, APPT+8!
>> IBQ	APPT+1, APPT+2, APPT+10, BILLED+3*
IBX	APPT+2, APPT+3, APPT+4, APPT+5, APPT+8!, BILLED+7*, BILLED+11!
IO	DEV+4
IO("Q"	DEV+3!
IOF	EN+4
>> POP	DEV+2
X	EXIT+3!
Y	EN+5, EXIT+3!
>> ZTDESC	DEV+3*
>> ZTQUEUED	EXIT+2, STOP+1
ZTREQ	EXIT+2*, STOP+1!
>> ZTRTN	DEV+3*
>> ZTSAVE("IB*"	DEV+3*
ZTSK	DEV+3!
>> ZTSTOP	STOP+1*, STOP+2

Information