Routine: IBCU3

Information

IBCU3 ;ALB/AAS - BILLING UTILITY ROUTINE (CONTINUED) ;12-FEB-90

Source Information

Source file <IBCU3.m>

Call Graph

Call Graph Total: 2

Package	Total	Call Graph
Integrated Billing	1	$$DAT1^IBOUTL
Registration	1	ELIG^VADPT

Caller Graph

Caller Graph Total: 17

Package	Total	Caller Graph
Integrated Billing	17	IBCBULL IBCD1 IBXX11 ^DGCR(399 IBCA IBCA2 IBCD2 IBCD5 IBCF IBCF13 IBCF3 IBCFP IBCSC5A IBCSC8 IBCSC82 IBCU41 IBCU63

Entry Points

Name	Comments	DBIA/ICR reference
FTQ
BILLEDQ
FT(IFN)	;return a bills form type, based on current (399,.19), default (350.9,1.26), and ins co (36,.14) form types
RXDUPE
BILLED(PTF)	;returns bill "IFN^^rate group" if PTF record is already associated with an uncancelled final bill
SC(DFN)	; returns 1 if service connection indicated, 0 otherwise (based on VAEL(3))
APPT(DATE,DFN,DISP)	;Check date to see if patient has Sched. Appt., add/edit or Registration
APPTE
FNT(FTN)	;returns the ifn of the form type name passed in, must be exact match, 0 if none found
SCE
BDT(DFN,DATE)	; returns primary bill defined for an event date, "" if none
BDTE
RXDUP(RX,DATE,IFN,DISP,DFN,RTG)	;returns bill ifn if rx # exists on another bill
BILLDEV(IFN,PRT)	;returns the default device for a bill's form type, if PRT is passed as true then returns the AR follow up device, otherwise the billing device
FTN(FT)	;returns name of the form type passed in, "" if not defined

External References

Name	Field # of Occurrence
$$DAT1^IBOUTL	RXDUP+13
ELIG^VADPT	SC+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,?10,*7,$P(Y,U,2) Line Location: APPTE+0
Function Call: WRITE	Prompt: !,?10,$P(X,U,2) Line Location: RXDUPE+0

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGCR(399 - [#399]	BDT+1, BDT+2, BDT+3, BILLED+2, BILLED+3, BILLED+4, BILLED+5, FT+1, FT+4, BILLDEV+1 , RXDUP+7, RXDUP+9
^DGCR(399.3 - [#399.3]	RXDUP+13
^DIC(36 - [#36]	FT+4
^DPT - [#2]	APPT+10, APPT+11, APPT+13
^IBA(362.4 - [#362.4]	RXDUP+8
^IBE(350.9 - [#350.9]	FT+4
^IBE(353 - [#353]	FTN+1, FNT+1, BILLDEV+1
^SDV("ADT"	APPT+12

Label References

Name	Line Occurrences
$$FT	BILLDEV+1
$$FTN	FT+2, FT+6, FT+7
APPTE	APPT+10, APPT+12
BDTE	BDT+1
BILLEDQ	BILLED+2
FTQ	FT+2, FT+5
RXDUPE	RXDUP+6
SCE	SC+1

Naked Globals

Name	Field # of Occurrence
^(	APPT+11, APPT+13

Local Variables

Name	Field # of Occurrence
BIFN	RXDUP+6~, RXDUP+9*, RXDUP+13
BLN	RXDUP+6~, RXDUP+9*, RXDUP+10, RXDUP+11, RXDUP+12, RXDUP+13
DATE	APPT~, APPT+9, APPT+10, APPT+11, APPT+12, APPT+13, BDT~, BDT+1, BDT+2, BDT+3 , RXDUP~, RXDUP+6*, RXDUP+8, RXDUP+13
DFN	SC~, SC+1, APPT~, APPT+10, APPT+11, APPT+12, APPT+13, BDT~, BDT+1, BDT+2 , BDT+3, RXDUP~, RXDUP+7*, RXDUP+11
DISP	APPT~, APPTE, RXDUP~, RXDUPE
FT	FTN~, FTN+1
FTC	FT+1~*, FT+2, FT+5, FT+8
FTD	FT+1~, FT+4*, FT+5, FT+7
FTI	FT+1~, FT+4*, FT+5, FT+6
FTN	FT+1~, FNT~, FNT+1
IFN	BILLED+2~, BILLED+3, BILLED+4, BILLED+5, FT~, FT+1, FT+4, BILLDEV~, BILLDEV+1, RXDUP~ , RXDUP+6*, RXDUP+7, RXDUP+9
INS	FT+1~, FT+4*
LN	RXDUP+6~, RXDUP+7*
PRT	BILLDEV~, BILLDEV+1*
PTF	BILLED~, BILLED+2, BILLED+3
RIFN	RXDUP+6~, RXDUP+8
RLN	RXDUP+6~, RXDUP+8*, RXDUP+9
RTG	RXDUP~, RXDUP+7*, RXDUP+12
RX	RXDUP~, RXDUP+6*, RXDUP+8, RXDUP+13
U	APPT+13, APPTE, BDT+3, BILLED+3, BILLED+4, BILLED+5, FTN+1, FT+1, FT+4, BILLDEV+1 , RXDUP+7, RXDUP+8, RXDUP+9, RXDUP+10, RXDUP+11, RXDUP+12, RXDUP+13, RXDUPE
VAEL	SC+3!
VAEL(3	SC+2, SC+3
VAERR	SC+3!
X	SC+1~, SC+3, SCE, APPT+9~, APPT+11, APPT+13, BDT+1~, BDT+3, BDTE, BILLED+2~ , BILLED+4, BILLED+5, FTN+1~, FTN+2, FT+1~, FT+2, FT+5, FT+6, FT+7, FT+8 , FTQ, FNT+1~, FNT+2, BILLDEV+1~, BILLDEV+2, RXDUP+6~, RXDUP+8, RXDUP+13, RXDUPE, RXDUPE+1
X1	APPT+9~, APPT+11, APPT+13
X2	APPT+9~, APPT+13*
Y	SC+1~, SC+2, SC+3, APPT+9~, APPT+10, APPT+11, APPT+12, APPT+13, APPTE, APPTE+1 , BDT+1~, BDT+2, BDT+3, BILLED+2~, BILLED+3, BILLED+5, BILLEDQ, FT+1~, FNT+1~, BILLDEV+1~

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Customize PDF page

Package: Integrated Billing

Routine: IBCU3

Information

Source Information

Call Graph

Call Graph Total: 2

Caller Graph

Caller Graph Total: 17

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: