Routine: IBCD3

Package	Total	Call Graph
Integrated Billing	5	VST^IBCCPT IPRC^IBCD4 OPTDX^IBCSC4D DEFAULT^IBCSC5C ^IBCU6
VA Fileman	3	FILE^DICN ^DIE IX1^DIK

Package	Total	Caller Graph
Integrated Billing	1	IBCD2

Entry Points

Name	Comments	DBIA/ICR reference
END
RX	; file rx refills, add default CPT and Dx if defined
INPT
Q
WHERE	;;.01^0^1;.02^0^2;.03^0^3;.04^0^4;.05^0^5;.06^0^6;.07^0^7;.08^0^8;.09^0^9;.11^0^11;.17^0^17;.16^0^16;.18^0^18;.19^0^19;.2^0^20;112^M^12;151^U^1;152^U^2;155^U^5;101^M^1;158^U^8;159^U^9;160^U^10;161^U^11;162^U^12;
OUTPT	;file outpatient visit dates and find/store outpatient procedures and diagnosis

External References

Name	Field # of Occurrence
FILE^DICN	RX+4, OUTPT+4, OUTPT+9, OUTPT+15, INPT+3, INPT+10
^DIE	RX+5, OUTPT+10, OUTPT+16, INPT+4, INPT+11
IX1^DIK	IBCD3+9
VST^IBCCPT	OUTPT+6
IPRC^IBCD4	INPT+6
OPTDX^IBCSC4D	OUTPT+13
DEFAULT^IBCSC5C	RX+7
^IBCU6	END+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^IBA(362.3 - [#362.3]	Classic Fileman Calls
^IBA(362.4 - [#362.4]	Classic Fileman Calls
^DGCR(399 - [#399]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGCR(399 - [#399]	IBCD3+7, IBCD3+8, OUTPT+3, OUTPT+7, INPT+7*, END
^DPT - [#2]	END
^TMP("IBDX"	INPT+1!, INPT+2
^TMP("IBIPRC"	INPT+6!, INPT+8, INPT+9
^UTILITY($J	OUTPT+6, OUTPT+8, OUTPT+11!

Label References

Name	Line Occurrences
END	RX+1, OUTPT+1, INPT
WHERE	IBCD3+6

Naked Globals

Name	Field # of Occurrence
^(	OUTPT+8
^(0	IBCD3+8*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	Q!
%DT	Q!
DA	IBCD3+9!, RX+4!, RX+5!, OUTPT+4!, OUTPT+10!, OUTPT+16!, INPT+4!, INPT+11!, Q!
DA(1	OUTPT+4, OUTPT+9, INPT+10*
DD	RX+4!, OUTPT+4!, OUTPT+9!, OUTPT+10!, OUTPT+15!, OUTPT+16!, INPT+3!, INPT+4!, INPT+10!, INPT+11!
>> DFN	OUTPT+13
DGCNT	OUTPT+11!
DGCPT	OUTPT+11!
DGCPTS	OUTPT+11!
DGDIR0	Q!
DGDIRA	Q!
DGDIRB	Q!
DGDIV	OUTPT+11!
DGNOD	OUTPT+11!
DGPTUPDT	END+2*, Q!
DGRVRCAL	Q!
DGXRF1	Q!
DIC	RX+4, RX+5!, OUTPT+4!, OUTPT+9, OUTPT+10!, OUTPT+15, OUTPT+16!, INPT+3, INPT+4!, INPT+10 , INPT+11!, Q!
DIC(0	RX+4, OUTPT+4, OUTPT+9, OUTPT+15, INPT+3, INPT+10
DIE	RX+5!, OUTPT+10!, OUTPT+16!, INPT+4!, INPT+11*!
DIK	IBCD3+9*!
DINUM	RX+4!, OUTPT+4*!, OUTPT+10!, OUTPT+16!, INPT+4!, INPT+11!, Q!
DIR	Q!
DO	RX+4!, OUTPT+4!, OUTPT+9!, OUTPT+10!, OUTPT+15!, OUTPT+16!, INPT+3!, INPT+4!, INPT+10!, INPT+11!
DR	RX+5!, OUTPT+10, OUTPT+16, INPT+4, INPT+11*
I	IBCD3+5~, IBCD3+6, IBCD3+7, OUTPT+11!
I1	OUTPT+11!
I2	OUTPT+11!
I7	OUTPT+11!
>> IB(	IBCD3+6, RX+1, RX+2, RX+3, OUTPT+1, INPT, INPT+1, INPT+6
>> IB(151	OUTPT+13, INPT+6
>> IB(152	OUTPT+13, INPT+6
>> IB(43	OUTPT+2, OUTPT+3
IBAC	IBCD3+5~*
>> IBAUTO	END+2*
IBCHK	Q!
>> IBDFN	END
IBDR	IBCD3+5!, Q!
IBDR(	IBCD3+6*, IBCD3+7
IBDX	OUTPT+13!
IBDX(	OUTPT+14
IBI	IBCD3+5~, INPT+2, INPT+4, INPT+9
>> IBIFN	IBCD3+7, IBCD3+8, IBCD3+9, RX+5, RX+7, OUTPT+3, OUTPT+4, OUTPT+7, OUTPT+9, OUTPT+16 , INPT+4, INPT+7, INPT+10, END
IBINDT	Q!
IBOPV1	OUTPT+11!
IBOPV2	OUTPT+11!
>> IBRX	RX+2*, RX+3, RX+5
IBX	IBCD3+5~, RX+3, RX+4, RX+5, OUTPT+3, OUTPT+4, OUTPT+8, OUTPT+9, OUTPT+10, OUTPT+14 , OUTPT+15, INPT+2, INPT+3, INPT+8, INPT+9, INPT+11, END*
IBY	IBCD3+5~, RX+2, RX+3, OUTPT+8, OUTPT+14, INPT+9
>> IBZ	INPT+9*, INPT+10
U	RX+4, RX+5, OUTPT+10, INPT+9, END
V	OUTPT+11!
X	IBCD3+5~, IBCD3+6, RX+4, OUTPT+4, OUTPT+9, OUTPT+15, INPT+3, INPT+10*
X1	IBCD3+6*, Q!
X2	Q!
X3	Q!
X4	Q!
Y	RX+5, OUTPT+10, OUTPT+16, INPT+4, INPT+11, Q!

Marked Items

Customize PDF page

Package: Integrated Billing

Routine: IBCD3

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 1

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items