Routine: IBCONS2

Information

IBCONS2 ;ALB/CPM - NSC W/INSURANCE OUTPUT (CON'T) ;31-JAN-92

Package	Total	Call Graph
Integrated Billing	6	($$INSURED,ALL)^IBCNS1 $$PTCOV^IBCNSU3 TRACK^IBCONS3 ($$APPTCT,$$DISCT,$$RPT)^IBEFUNC $$BDSRC^IBEFUNC3 ($$DISND,$$SCE,CLOSE,SCAN)^IBSDU

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 4

Package	Total	Caller Graph
Integrated Billing	4	IBCOMA1 IBCOMC1 IBCOMN1 IBCONS4

Entry Points

Name	Comments	DBIA/ICR reference
LOOP1	; Compilation for both Inpatient Admisssion and Discharge reports.
LOOP2	; Compilation for the Outpatient report
CALLBCK(IBOE,IBOE0,IBQUERY2)	; Executed by scan call back logic to process encounters ; IBOE = encounter ien ; IBOE0 = 0-node of the encounter
CHILD(IBOE,IBOE0,IBVAL,IBSTOP,IBQUERY2)	;Find any child add/edits ; IBSTOP and IBQUERY2 are returned
PROC	; -process each episode of care
PROCO	; Entrypoint for outpatient loop2
VALID()	;
VALIDQ
INS
PTCHK
SET
BILL	; Add to billed list if is insurance bill, not canceled ; if opt, date is in list, if inpt, admission date = event date ; ** PATCH 66 modified to include check for bill authorized status and add that to the stored TMP array
PTF	; if all movements are for sc condition then not billable
DIV	;adds the requested divisions to the report
PAT(DFN)	; true if patient is included in range requested ** PATCH 66
PATQ
PTINS(DFN)	; check if patients ins is within selected range ** PATCH 66
PTINSQ
STGRNG(STRNG)	; check if the string passed in is contained within the selected ASCII range ** PATCH 66
ASCII(STRNG)	; returns string in ASCII ** PATCH 66
TERMDG(DFN)	; returns a patients terminal digit ** PATCH 66
RNBOE(IBOE)	; return a Reason Not Billable for the encounter if one can be found

External References

Name	Field # of Occurrence
$$INSURED^IBCNS1	INS
ALL^IBCNS1	PTINS+5
$$PTCOV^IBCNSU3	INS+1
TRACK^IBCONS3	PROCO+2
$$APPTCT^IBEFUNC	PTCHK+5
$$DISCT^IBEFUNC	CALLBCK+40
$$RPT^IBEFUNC	CALLBCK+24
$$BDSRC^IBEFUNC3	CALLBCK+5
$$DISND^IBSDU	CALLBCK+15
$$SCE^IBSDU	LOOP2+17, PTCHK+3
CLOSE^IBSDU	LOOP2+10
SCAN^IBSDU	LOOP2+9, CHILD+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DG(40.8 - [#40.8]	DIV+5
^DGCR(399 - [#399]	BILL+7, BILL+8, BILL+11, BILL+12
^DGPM - [#405]	LOOP1+3, LOOP1+4, LOOP1+5, LOOP1+6, LOOP1+8
^DGPT - [#45]	PTF+2, PTF+3
^DIC(36 - [#36]	PTINS+6
^DIC(37 - [#37]	CALLBCK+42
^DIC(40.7 - [#40.7]	LOOP2+21
^DIC(42 - [#42]	LOOP1+8
^DIC(8 - [#8]	PTCHK+4
^DPT - [#2]	LOOP2+13, PTCHK, SET, PAT+9, TERMDG+1
^IBT(356 - [#356]	RNBOE+1
^SC - [#44]	CALLBCK+12, CALLBCK+35
^TMP("DIERR"	LOOP2+9!, CHILD+6!
^TMP("IBOEC"	LOOP2+8!, LOOP2+13, LOOP2+14, LOOP2+17, LOOP2+28!, CALLBCK+29, CALLBCK+30
^TMP($J	LOOP1+1!, LOOP1+9!, LOOP2+2!, LOOP2+28!, VALID+3, SET+4, SET+5, SET+6, SET+7, DIV+1* , DIV+3, DIV+5, PAT+2, PAT+3, PAT+11, PAT+12, PTINS+2, PTINS+3, PTINS+8, PTINS+9

Label References

Name	Line Occurrences
$$ASCII	STGRNG+1
$$CHILD	CALLBCK+34, CALLBCK+41
$$PAT	VALID+4
$$PTINS	VALID+9
$$RNBOE	CALLBCK+29
$$STGRNG	PAT+9, PTINS+6
$$TERMDG	SET+3, PAT+5
$$VALID	CALLBCK+18, PROC+1
BILL	PROCO+4
DIV	LOOP1+2, LOOP2+2
INS	VALID+8
PATQ	PAT+2, PAT+3
PROC	LOOP1+4
PROCO	LOOP2+26, CALLBCK+36, CALLBCK+43
PTCHK	VALID+7
PTF	LOOP1+4
PTINSQ	PTINS+2, PTINS+3
SET	PROCO+4
VALIDQ	VALID+3, VALID+4, VALID+5, VALID+6, VALID+7, VALID+8, VALID+9

Naked Globals

Name	Field # of Occurrence
^(	LOOP1+4, PTF+3
^("VET"	PTCHK
^(1	SET+6*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> B	SET+2, SET+5, BILL+4, BILL+7, BILL+9, BILL+11, BILL+13, BILL+14
DA	LOOP1+1~, LOOP1+4, LOOP1+5, LOOP1+6, LOOP1+7, LOOP1+8
DFN	LOOP1+4, LOOP2+1~, LOOP2+13, LOOP2+14, LOOP2+17, CALLBCK+4~, CALLBCK+7*, CALLBCK+9, CALLBCK+29, CALLBCK+30 , VALID+3, VALID+4, VALID+9, INS, INS+1, PTCHK, SET, SET+3, SET+4, SET+5 , SET+6, SET+7, BILL+7, BILL+11, PAT~, PAT+2, PAT+3, PAT+5, PAT+9, PAT+11 , PAT+12, PTINS~, PTINS+2, PTINS+3, PTINS+5, PTINS+8, PTINS+9, TERMDG~, TERMDG+1
DPT0	SET~, SET+3, TERMDG+1~
I	LOOP1+3, LOOP1+4, LOOP2+25, CALLBCK+4~, CALLBCK+8, CALLBCK+9, CALLBCK+36, CALLBCK+43*, INS, INS+1 , SET+4, BILL+4
>> I1	BILL+4*, BILL+9, BILL+11
IB0	BILL+4~, BILL+8, BILL+9, BILL+12, BILL+13
IBADM	LOOP1+1~, LOOP1+5*, BILL+4
IBADMVT	LOOP1+4!, LOOP1+7*
IBAR	PTINS+1~
IBAR(	PTINS+6
>> IBAUTH	BILL+4, BILL+9, BILL+13*, BILL+14
>> IBBEG	LOOP1+3, LOOP2+5, PTINS+5
IBCBK	LOOP2+1~, LOOP2+7, LOOP2+9, CHILD+2~, CHILD+5, CHILD+6
IBCOMB	LOOP2+15!, CHILD+2~
IBCOMB(	LOOP2+21*, LOOP2+23, CHILD+7
IBDC	CALLBCK+4~, CALLBCK+7, CALLBCK+11, CALLBCK+12, CALLBCK+33, CALLBCK+35
IBDIV	DIV+1~, DIV+3, DIV+5
IBDS	CALLBCK+4~, CALLBCK+7, CALLBCK+15, CALLBCK+16, CALLBCK+42
IBDTA	LOOP2+1~, LOOP2+14*, LOOP2+17, LOOP2+25
IBDV	LOOP1+4, LOOP1+8, LOOP2+1~, LOOP2+18, CALLBCK+4~, CALLBCK+7, CALLBCK+12, CALLBCK+16*, CALLBCK+27, CALLBCK+28 , VALID+5, VALID+6, SET+1
>> IBEND	LOOP1+3, LOOP2+5, PTINS+5
IBFILTER	LOOP2+1~, LOOP2+6, LOOP2+9, CHILD+2~, CHILD+4, CHILD+6
>> IBFLAG	VALID+7, VALID+8, INS, INS+1, PTCHK, PTCHK+4, PTCHK+5*
IBI	PTINS+1~, PTINS+6, STGRNG+1~, STGRNG+2, STGRNG+3, ASCII+1~, ASCII+2
>> IBINPT	LOOP1+5, INS+1, PTCHK+2, BILL+4, BILL+7, BILL+11
>> IBMOV	PTF+3*
IBNO	LOOP2+1~, LOOP2+16, LOOP2+19, LOOP2+20
IBOE	LOOP2+1~, LOOP2+15!, LOOP2+20*, LOOP2+26, CALLBCK~, CALLBCK+15, CALLBCK+29, CALLBCK+30, CALLBCK+34, CALLBCK+40 , CALLBCK+41, CHILD~, PTCHK+3, RNBOE~, RNBOE+1
IBOE(	LOOP2+19, LOOP2+20*
IBOE(1	LOOP2+20
IBOE0	LOOP2+1~, LOOP2+17, LOOP2+18, LOOP2+21, CALLBCK~, CALLBCK+5, CALLBCK+7, CALLBCK+8, CALLBCK+11, CALLBCK+15 , CALLBCK+24, CALLBCK+29, CALLBCK+30, CALLBCK+34, CALLBCK+36, CALLBCK+40, CALLBCK+41, CALLBCK+43, CHILD~, CHILD+4 , PTCHK+3~, PTCHK+5
IBOEZ	LOOP2+1~, LOOP2+17*, LOOP2+19, LOOP2+20
IBOK	VALID+1~, VALID+2, VALID+10, VALIDQ
IBQUERY2	LOOP2+1~, LOOP2+4*, LOOP2+10, CALLBCK~, CALLBCK+34, CALLBCK+41, CHILD~, CHILD+6
IBR	RNBOE+1~*, RNBOE+2
IBRMARK	PROCO+1!, PROCO+3*, SET+7, SET+8!
IBSB	STGRNG+1~, STGRNG+2*
>> IBSC	PROCO+2, PROCO+3, PTF+2, PTF+3, PTF+4*
IBSE	STGRNG+1~, STGRNG+3*
>> IBSELCDV	SET+1, DIV+1
>> IBSELRNG	VALID+3, VALID+4, VALID+9, PAT+5, PAT+9, PTINS+5
>> IBSELSR1	PAT+6, STGRNG+2
>> IBSELSR2	PAT+7, STGRNG+3
>> IBSELTRM	SET+3
IBSTOP	LOOP2+1~, LOOP2+15!, LOOP2+22, LOOP2+23, CALLBCK+4~, CALLBCK+34, CALLBCK+35, CALLBCK+41, CALLBCK+42, CHILD~ , CHILD+4, CHILD+7, CHILD+8, SET+6, SET+8!
>> IBSUB	LOOP1+3, LOOP1+4
IBSUBSC2	SET~, SET+1*, SET+4, SET+5, SET+6, SET+7
IBSUBSC3	SET~, SET+2*, SET+4, SET+5, SET+6, SET+7
IBSUBSC4	SET~, SET+3*, SET+4, SET+5, SET+6, SET+7
IBSUBSC6	SET~, SET+4*, SET+5, SET+6, SET+7
IBT	CALLBCK+4~, CALLBCK+7*, CALLBCK+10, CALLBCK+14, CALLBCK+24, CALLBCK+26, CALLBCK+32, CALLBCK+38
IBTEMP	PTCHK+3~*, PTCHK+4
IBVAL	LOOP2+1~, LOOP2+9, CALLBCK+34, CALLBCK+41, CHILD~, CHILD+3
IBVAL("BDT"	LOOP2+5*
IBVAL("EDT"	LOOP2+5*
IBVAL1	CHILD+2~, CHILD+3*, CHILD+6
IBVAL1("DFN"	CHILD+4*
IBX	PAT+1~, PAT+2, PAT+3, PAT+6, PAT+7, PAT+9, PAT+11, PAT+12, PATQ, PTINS+1~* , PTINS+2, PTINS+3, PTINS+5, PTINS+6, PTINS+8, PTINS+9, PTINSQ, STGRNG+1~, STGRNG+2, STGRNG+3* , STGRNG+4, ASCII+1~, ASCII+2, ASCII+3, RNBOE+1~*
IBY	PAT+1~, PAT+5, PAT+6, PAT+7, PAT+9, PTINS+1~, PTINS+6, STGRNG+1~, STGRNG+2, STGRNG+3* , ASCII+1~, ASCII+2*
>> M	BILL+7, BILL+8, BILL+9, BILL+11, BILL+12, BILL+13
>> PTF	LOOP1+4, LOOP1+6*, PTF+2, PTF+3
SSN	TERMDG+1~*, TERMDG+2
STRNG	STGRNG~, STGRNG+1*, STGRNG+2, STGRNG+3, ASCII~, ASCII+2
TERMD	TERMDG+1~, TERMDG+2, TERMDG+3
U	LOOP2+18, LOOP2+20, LOOP2+21, LOOP2+23, CALLBCK+5, CALLBCK+7, CALLBCK+11, CALLBCK+12, CALLBCK+16, CALLBCK+24 , CALLBCK+35, CALLBCK+42, CHILD+4, CHILD+7, PTCHK+4, SET+3, PAT+9, PTINS+6, RNBOE+1
>> VAUTD	CALLBCK+27, CALLBCK+28, VALID+5, VALID+6, DIV+2, DIV+4
>> VAUTD(	CALLBCK+27, VALID+5, DIV+3
X	CALLBCK+34, CALLBCK+35, CALLBCK+39~, CALLBCK+41, CALLBCK+42
Y	LOOP2+1~
Y0	LOOP2+1~
Z	LOOP2+21, LOOP2+23, CALLBCK+4~, CHILD+2~, CHILD+7*

Customize PDF page

Package: Integrated Billing

Routine: IBCONS2

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 4

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: