Routine: IBCONS2

Package	Total	Call Graph
Integrated Billing	3	$$INSURED^IBCNS1 TRACK^IBCONS3 $$RPT^IBEFUNC

Package

Total

Call Graph

$$INSURED^IBCNS1 TRACK^IBCONS3 $$RPT^IBEFUNC

Name	Comments	DBIA/ICR reference
CLIN1
PTCHK
SET
PTF	; if all movements are for sc condition then not billable
BILL	; Add to billed list if is insurance bill, not canceled
STOPS	; -finds stops
INS	;S IBINDT=I D ^IBCNS S IBFLAG=$S('$D(IBINS):0,1:IBINS)
ADD
CLIN
LOOP2	; Compilation for the Outpatient report.
LOOP1	; Compilation for both Inpatient Admisssion and Discharge reports.
PROC	; -process each episode of care
DIV	;adds the requested divisions to the report
DIS

Name	Line Occurrences (* Changed, ! Killed)
^DG(40.8 - [#40.8]	DIV+5
^DGCR(399 - [#399]	BILL+4, BILL+5
^DGPM - [#405]	LOOP1+3, LOOP1+4, LOOP1+5, LOOP1+6, LOOP1+8
^DGPT - [#45]	PTF+2, PTF+3
^DIC(37 - [#37]	DIS+3
^DIC(40.7 - [#40.7]	ADD+7
^DIC(42 - [#42]	LOOP1+8
^DPT - [#2]	DIS+2, DIS+3, ADD+2, CLIN1, STOPS+2, PTCHK, SET
^DPT("ADIS"	DIS, DIS+1
^SC - [#44]	CLIN, CLIN1, STOPS+2
^SC("AC"	CLIN
^SDV - [#409.5]	ADD, ADD+3, ADD+4, ADD+7
^TMP($J	SET+2, SET+3, DIV+3, DIV+5

Name	Field # of Occurrence
>> B	SET+2, SET+3, BILL+3, BILL+4, BILL+5*
DA	LOOP1+1~, LOOP1+4, LOOP1+5, LOOP1+6, LOOP1+7, LOOP1+8
>> DFN	LOOP1+4, DIS+1, DIS+2, DIS+3, ADD+2, CLIN1, STOPS+2, INS+1, PTCHK, SET , SET+2, SET+3, BILL+4, BILL+5
DPT0	SET~*, SET+2, SET+3
>> I	LOOP1+3, LOOP1+4, DIS, DIS+1, ADD, ADD+3, ADD+4, ADD+7, CLIN, CLIN1 , STOPS+2, INS+1, SET+2, SET+3, BILL+3
>> I1	BILL+3*, BILL+4, BILL+5
IBADM	LOOP1+1~, LOOP1+5*, BILL+3
IBADMVT	LOOP1+4!, LOOP1+7*
>> IBAPPT	CLIN1*
>> IBBEG	LOOP1+3, DIS, ADD, CLIN
>> IBDC	CLIN*, CLIN1, STOPS+2
>> IBDFN	CLIN*, CLIN1
IBDIV	DIV+1~, DIV+3, DIV+5
>> IBDV	LOOP1+4, LOOP1+8, DIS+3, ADD+2, CLIN1, PROC+1, PROC+2, SET+2, SET+3
>> IBEND	LOOP1+3, DIS, ADD, CLIN
>> IBFLAG	PROC+3, PROC+4, INS+1, PTCHK
>> IBINPT	LOOP1+5, BILL+3, BILL+4, BILL+5
>> IBMOV	PTF+3*
IBOE	DIS+2, ADD+1!, ADD+4, CLIN1*
IBRMARK	PROC+5!, SET+3, SET+4!
>> IBSC	LOOP1+4, PTF+2, PTF+3, PTF+4*
IBSTOP	DIS+3, ADD+6, ADD+7, STOPS+2, STOPS+3*, SET+2, SET+4!
>> IBSUB	LOOP1+3, LOOP1+4
>> IBTERM	SET+1, SET+2, SET+3
>> J	DIS+1*, DIS+2, DIS+3
>> M	BILL+4, BILL+5
>> N	ADD+3*, ADD+4
>> PTF	LOOP1+4, LOOP1+6*, PTF+2, PTF+3
SSN	SET~*, SET+1
TERMD	SET~, SET+1*, SET+2, SET+3
U	DIS+3
>> VAUTD	PROC+1, PROC+2, DIV+2, DIV+4
>> VAUTD(	PROC+1, DIV+3
X	ADD, ADD+2, ADD+5~, ADD+7, STOPS+1~, STOPS+2, STOPS+3

Information