Routine: IBBFAPI

Information

IBBFAPI ;OAK/ELZ - FOR OTHER PACKAGES TO QUERY INSURANCE INFO ;2/18/10

Call Graph

Call Graph Total: 4

Package	Total	Call Graph
Integrated Billing	2	STCHK^IBCNRU1 $$INDEM^IBCNS1
VA FileMan	2	NOW^%DTC $$GET1^DIQ

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: 1

Package	Total	Caller Graph
Integrated Billing	1	IBBAPI

Entry Points

Name	Comments	DBIA/ICR reference
INSUR(DFN,IBDT,IBSTAT,IBR,IBFLDS)	; Return Patient Insurance Information	ICR #5103 Status: Withdrawn Usage: Controlled Subscription
ERRORLD	; load error array
ERRORLD1	; error messages
ERROR	;
1	; Ins. Comp. name
2	; Ins. Comp. Street Address Line 1
3	; Ins. Comp. City
4	; Ins. Comp. State
5	; Ins. Comp. Zip
6	; Ins. Comp. Phone
7	; Coordination of Benefits
8	; Policy Name ; patch 516 - baa
9	; Policy Reimbursable?
10	; Policy Effective Date
11	; Policy Expiration Date
12	; Subscriber Relationship
13	; Subscriber Name ; patch 516 - baa
14
15	; Pharmacy Coverage?
16	; Outpatient Coverage?
17	; Inpatient Coverage?
18	; Group Number ; patch 516 - baa
19	; Patient Relationship to Subscriber
20	; VA Advantage and Tricare plan
21	; Plan Type
22	; Subscriber Sex
23	; Ins. Company Street Address Line 2
24	; Ins. Company Street Address Line 3
25	; Date Last Verified
26	; Insured's Street 1
27	; Insured's Street 2
28	; Insured's City
29	; Insured's State
30	; Insured's Zip
31	; Insured's Phone
PLCOV(IBPL,IBVDT,IBCAT)	; Determine if a specific plan covers a category of coverage as of a date ; IBPL - pointer to file 355.3 group insurance plan (req) ; IBVDT - fileman format visit date (req) ; IBCAT - pointer to file 355.31 limitation of coverage category (req)
PLCOVQ
EPHARM(IBPL)	; return if a plan is epharmacy billable
EPHARMQ	;

External References

Name	Field # of Occurrence
NOW^%DTC	INSUR+14
$$GET1^DIQ	1+1, 2+1, 3+1, 4+1, 5+1, 6+1, 7+1, 8+1, 9+1, 10+1 , 11+1, 12+1, 13+1, 14+1, 18+1, 19+1, 20+3, 20+4, 20+5, 21+2 , 21+3, 21+4, 22+2, 22+3, 23+1, 24+1, 25+1, 26+1, 27+1, 28+1 , 29+1, 30+1, 31+1
STCHK^IBCNRU1	EPHARM+5
$$INDEM^IBCNS1	INSUR+34

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
2.312	GET1^DIQ
^IBE(355.1 - [#355.1]	GET1^DIQ
^IBA(355.3 - [#355.3]	GET1^DIQ
^DIC(36 - [#36]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(36 - [#36]	INSUR+31
^DPT - [#2]	INSUR+12, INSUR+28, INSUR+29
^IBA(355.3 - [#355.3]	INSUR+39, EPHARM+3
^IBA(355.32 - [#355.32]	PLCOV+8, PLCOV+9
^IBA(355.33 - [#355.33]	INSUR+24
^IBE(355.31 - [#355.31]	PLCOV+7

Label References

Name	Line Occurrences
$$EPHARM	INSUR+54
$$PLCOV	INSUR+51, INSUR+52, INSUR+53, INSUR+54, 15+2, 16+2, 17+2
12	22+1
@(	INSUR+48
EPHARMQ	EPHARM+4
ERROR	INSUR+9, INSUR+11, INSUR+12, INSUR+13, INSUR+15, INSUR+21
ERRORLD	INSUR+3
PLCOVQ	PLCOV+7

Naked Globals

Name	Field # of Occurrence
^(	INSUR+28

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	INSUR+2~, INSUR+14
CATLIM	PLCOV+4~, PLCOV+8*, PLCOV+9
DFN	INSUR~, INSUR+5*, INSUR+11, INSUR+12, INSUR+24, INSUR+28, INSUR+29, 1+1, 7+1, 8+1 , 10+1, 11+1, 12+1, 13+1, 14+1, 18+1, 19+1, 20+3, 21+2, 22+2 , 22+3, 25+1, 26+1, 27+1, 28+1, 29+1, 30+1, 31+1
ERROR	INSUR+2~, INSUR+9, INSUR+10, INSUR+11, INSUR+12, INSUR+13, INSUR+15, INSUR+16, INSUR+19, INSUR+20 , INSUR+21, ERROR+1
ERRORT	INSUR+2~, INSUR+3!
ERRORT(	ERRORLD+1*, ERROR+1
FCNT	INSUR+2~, INSUR+43*, INSUR+45
IBCAT	PLCOV~, PLCOV+5, PLCOV+7*, PLCOV+8
IBCOV	15+1~, 15+2, 15+3, 16+1~, 16+2, 16+3, 17+1~, 17+2*, 17+3
IBDT	INSUR~, INSUR+7, INSUR+9, INSUR+13, INSUR+14, INSUR+37, INSUR+38, INSUR+51, INSUR+52, INSUR+53 , INSUR+54, 15+2, 16+2, 17+2
IBFLDS	INSUR~, INSUR+8*, INSUR+17, INSUR+18, INSUR+43, INSUR+45, INSUR+48
IBOK	EPHARM+1~, EPHARM+2, EPHARM+4, EPHARM+6*, EPHARMQ+1
IBPIEN	EPHARM+1~, EPHARM+3*, EPHARM+4, EPHARM+5
IBPL	PLCOV~, PLCOV+5, PLCOV+8, EPHARM~, EPHARM+3
IBPLN	INSUR+2~, INSUR+32*, INSUR+50, INSUR+51, INSUR+52, INSUR+53, INSUR+54, 15+2, 16+2, 17+2
IBR	INSUR~, INSUR+10!, INSUR+22!, ERROR+1!
IBR("BUFFER"	INSUR+24*
IBR("IBBAPI"	INSUR+44, INSUR+48, INSUR+49!, INSUR+55!, ERROR+1*
IBSTAT	INSUR~, INSUR+6, INSUR+9, INSUR+15, INSUR+27, INSUR+33, INSUR+34, INSUR+36, INSUR+49, INSUR+51 , INSUR+52, INSUR+53, INSUR+54
IBVDT	PLCOV~, PLCOV+5, PLCOV+8
IBY	EPHARM+1~, EPHARM+5
IBY(1	EPHARM+6
ICNT	INSUR+2~, INSUR+28, INSUR+42, INSUR+44, INSUR+48, INSUR+49*
INSP	INSUR+2~, INSUR+32*, 2+1, 3+1, 4+1, 5+1, 6+1, 9+1, 23+1, 24+1
N	INSUR+2~, INSUR+28*, INSUR+29, INSUR+44, 1+1, 7+1, 8+1, 10+1, 11+1, 12+1 , 13+1, 14+1, 18+1, 19+1, 20+3, 21+2, 22+3, 25+1, 26+1, 27+1 , 28+1, 29+1, 30+1, 31+1
N1	INSUR+2~, INSUR+45*, INSUR+48
NOK	INSUR+2~, INSUR+4*, INSUR+9, INSUR+11, INSUR+12, INSUR+13, INSUR+16, INSUR+21
PASS	INSUR+2~, INSUR+10, INSUR+55, INSUR+56
PASS1	INSUR+2~, INSUR+35, INSUR+37, INSUR+38, INSUR+39, INSUR+40, INSUR+41, INSUR+49, INSUR+50, INSUR+51* , INSUR+52, INSUR+53, INSUR+54*
PLN	20+2~, 20+3, 20+4, 21+1~, 21+2, 21+3
RET	INSUR+46~, INSUR+48*
RETVAL	INSUR+46~, INSUR+48, 1+1, 2+1, 3+1, 4+1, 5+1, 6+1, 7+1, 7+2* , 8+1, 9+1, 9+2, 10+1, 11+1, 12+1, 12+2, 13+1, 14+1, 15+3 , 16+3, 17+3, 18+1, 19+1, 20+1, 20+7, 21+4, 22+2, 22+3, 23+1 , 24+1, 25+1, 26+1, 27+1, 28+1, 29+1, 30+1, 31+1
RETVAL1	20+2~, 20+6*, 20+7
TYP1	20+2~, 20+4, 20+5, 21+1~, 21+3, 21+4
TYP2	20+2~, 20+5*, 20+6
U	INSUR+15, INSUR+32, INSUR+33, INSUR+37, INSUR+38, INSUR+39, INSUR+40, 1+1, 4+1, 7+1 , 8+1, 19+1, 20+7, 21+4, 22+2, 22+3, 29+1, PLCOV+9
X	INSUR+2~, INSUR+15, INSUR+17, INSUR+18, INSUR+24, INSUR+29, INSUR+31, INSUR+32, INSUR+34, INSUR+37 , INSUR+38, INSUR+39, INSUR+55, ERRORLD+1, PLCOV+4~, PLCOV+6, PLCOV+9, PLCOVQ
X1	INSUR+30~, INSUR+31*, INSUR+33, INSUR+40
Y	INSUR+15~, INSUR+17~, INSUR+18, INSUR+19, INSUR+20, PLCOV+4~

Marked Items

Name	Field # of Occurrence
$T(ERRORLD1+X	ERRORLD+1

Customize PDF page

Package: Integrated Billing