Routine: IBNCPDP2

Information

IBNCPDP2 ;OAK/ELZ - PROCESSING FOR ECME RESP ;11/15/07 09:43

Package	Total	Call Graph
Integrated Billing	20	$$SERV^IBARX1 GVAR^IBCBB ARRAY^IBCBB1 EN^IBCD3 CTB^IBCDC BILL^IBCRBC $$SC^IBCU3 $$CHECK^IBECEAU ($$ELIG,$$REVERSE)^IBNCPDP3 ($$BCID,$$CLOSE,$$RELEASE,$$REOPEN,$$SUBMIT)^IBNCPDP4 $$BILLSEC^IBNCPDP5 ($$RT,$$TRICARE,BILL)^IBNCPDP6 ($$PLANN,$$RT)^IBNCPDPU $$SENS^IBNCPDR ($$MCDIV,BULL)^IBNCPEB LOG^IBNCPLOG $$RXBILL^IBNCPUT3 SET^IBR $$FILE^IBRXUTL CLOSE^IBSDU
Accounts Receivable	4	DEC^PRCASER1 REL^PRCASVC STATUS^PRCASVC1 ^PRCASVC6
Kernel	2	($$FMADD,$$FMDIFF,$$NOW)^XLFDT ($$RJ,$$TRIM)^XLFSTR
VA FileMan	2	NOW^%DTC (,FILE)^DIE
E Claims Management Engine	1	$$GETPHARM^BPSUTIL
Outpatient Pharmacy	1	$$RXSITE^PSOBPSUT

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

Package	Total	Caller Graph
Integrated Billing	5	IBNCPDP IBNCPDP1 IBNCPDP3 IBNCPDP4 IBNCPDP5

Entry Points

Name	Comments	DBIA/ICR reference
ECME(DFN,IBD)	; function called by STORESP^IBNCPDP ; input - DFN - patient IEN for the prescription ; IBD array passed in by reference ; The IBD array is passed to various subroutines depending ; on the ePharmacy event as evaluated by IBD("STATUS")
MATCH(BCID,IBS)	; right bill, right COB payer
BILL(DFN,IBD)	; create bills
BILLQ
SETCT	; update claims tracking saying bill has been billed
LOG(PROC,RESULT)	;Store the data
EPHARM(IBRX,IBREFILL)	;
CHARGES(IBIFN)	; set up charges on the bill
DUP(IBD)	; Function to determine if processing a duplicate response ; and if a bill should be created ; Input ; IBD array values ; Output ; Function value: [1] "1" if a duplicate response received and a non-cancelled bill already exists ; [2] non-cancelled external bill# if piece [1] =1 ; or ; [1] "0" if not a duplicate response OR no bill exists ; [2] ""
DUPX	;
ARERR(CODE,COB)	; retrieve AR error text ; This function is called after calling AR routine PRCASVC6 and that routine indicates ; some AR error has been detected. Variable PRCAERR is passed into this function as ; the CODE parameter. The COB parameter indicates the COB payer sequence.
ARERRX	;

External References

Name	Field # of Occurrence
NOW^%DTC	BILL+29
$$GETPHARM^BPSUTIL	EPHARM+10
^DIE	BILL+104, BILL+114, BILL+122, SETCT+3, SETCT+4
FILE^DIE	BILL+149
$$SERV^IBARX1	BILL+46
GVAR^IBCBB	BILL+127
ARRAY^IBCBB1	BILL+127
EN^IBCD3	BILL+97
CTB^IBCDC	SETCT+5
BILL^IBCRBC	CHARGES+4
$$SC^IBCU3	BILL+82
$$CHECK^IBECEAU	BILL+44
$$ELIG^IBNCPDP3	ECME+13
$$REVERSE^IBNCPDP3	ECME+8, BILL+40
$$BCID^IBNCPDP4	BILL+20
$$CLOSE^IBNCPDP4	ECME+9
$$RELEASE^IBNCPDP4	ECME+10
$$REOPEN^IBNCPDP4	ECME+12
$$SUBMIT^IBNCPDP4	ECME+11
$$BILLSEC^IBNCPDP5	ECME+6
$$RT^IBNCPDP6	BILL+73
$$TRICARE^IBNCPDP6	BILL+23
BILL^IBNCPDP6	BILL+25
$$PLANN^IBNCPDPU	BILL+108
$$RT^IBNCPDPU	BILL+74
$$SENS^IBNCPDR	BILL+93
$$MCDIV^IBNCPEB	BILL+47
BULL^IBNCPEB	BILLQ+3
LOG^IBNCPLOG	LOG+11
$$RXBILL^IBNCPUT3	DUP+19
SET^IBR	BILL+52
$$FILE^IBRXUTL	BILL+48
CLOSE^IBSDU	BILL+98
DEC^PRCASER1	BILL+144
REL^PRCASVC	BILL+129
STATUS^PRCASVC1	BILL+134, BILL+145
^PRCASVC6	BILL+127
$$RXSITE^PSOBPSUT	EPHARM+9
$$FMADD^XLFDT	BILL+28, BILL+100
$$FMDIFF^XLFDT	BILL+31
$$NOW^XLFDT	LOG+11
$$RJ^XLFSTR	MATCH+9
$$TRIM^XLFSTR	ARERRX+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^IBT(356 - [#356]	Classic Fileman Calls
^DGCR(399 - [#399]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DG(40.8 - [#40.8]	BILL+83
^DGCR(399 - [#399]	MATCH+11, BILL+21, BILL+39, BILL+118, BILL+138, BILLQ+4, DUP+22, DUP+31
^IBA(355.3 - [#355.3]	BILL+87
^IBE(350.1 - [#350.1]	BILL+45
^IBE(350.8 - [#350.8]	ARERR+15, ARERR+16
^IBE(350.9 - [#350.9]	BILL+49
^IBT(356 - [#356]	SETCT+2, SETCT+4
^SC - [#44]	BILL+48
^VA(200 - [#200]	BILL+125
^XTMP(	BILL+28
^XTMP("IBNCPLDT"	BILL+28, BILL+100*

Label References

Name	Line Occurrences
$$ARERR	BILL+128
$$BILL	ECME+7
$$DUP	BILL+16
$$EPHARM	ECME+5
$$MATCH	BILL+35
ARERRX	ARERR+13, ARERR+16
BILLQ	BILL+8, BILL+10, BILL+12, BILL+13, BILL+16, BILL+19, BILL+21, BILL+31, BILL+44, BILL+46 , BILL+52, BILL+75, BILL+109, BILL+118, BILL+128
CHARGES	BILL+117
DUPX	DUP+13, DUP+22, DUP+25, DUP+26
LOG	ECME+14, BILLQ+2
SETCT	BILL+105

Naked Globals

Name	Field # of Occurrence
^(	BILL+28

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	BILL+2~, BILL+29
ARSTAT	DUP+11~, DUP+30*, DUP+31
BCID	MATCH~, MATCH+7, MATCH+8, MATCH+9
BCID1	MATCH+1~, MATCH+8, MATCH+9, MATCH+11
CHKBL	BILL+1~, BILL+35*, BILL+36, BILL+39
COB	DUP+11~, DUP+18, DUP+19, ARERR~, ARERR+12, ARERRX+2
CODE	ARERR~, ARERR+11*, ARERR+13, ARERR+15, ARERR+18
D0	SETCT+1~
DA	BILL+2~, BILL+101, BILL+104!, BILL+113, BILL+114!, BILL+121, SETCT+1~, SETCT+3, SETCT+4*
DFN	ECME~, ECME+6, ECME+7, ECME+8, ECME+9, ECME+10, ECME+11, ECME+12, ECME+13, BILL~ , BILL+8, BILL+40, BILL+72, BILL+74, BILL+82, BILL+108, BILLQ+3, LOG+11
DGPTUPDT	CHARGES+3~
DGRVRCAL	BILL+2~, BILL+114!
DI	SETCT+1~
DICR	SETCT+1~
DIE	BILL+2~, BILL+101, BILL+104!, BILL+113, BILL+114!, BILL+121, SETCT+1~, SETCT+3, SETCT+4*
DIG	SETCT+1~
DIH	SETCT+1~
DIU	SETCT+1~
DIV	SETCT+1~
DIW	SETCT+1~
DQ	SETCT+1~
DR	BILL+2~, BILL+103, BILL+104!, BILL+113, BILL+114!, BILL+122, SETCT+1~, SETCT+3, SETCT+4*
DT	BILL+11, BILL+28, BILL+100, BILL+122
DUZ	LOG+11
ECMELEN	MATCH+1~, MATCH+6*, MATCH+7, MATCH+9
ERR	ARERR+9~, ARERR+10, ARERR+13, ARERR+16, ARERR+18, ARERRX+1, ARERRX+2, ARERRX+3*, ARERRX+4
IB	BILL+1~, BILL+71!
IB(	BILL+72, BILL+73, BILL+74, BILL+75, BILL+78, BILL+79, BILL+80, BILL+81, BILL+82, BILL+83* , BILL+84, BILL+85, BILL+86, BILL+90
IB(101	BILL+87*
IB(151	BILL+86*
IB(152	BILL+86*
IB(155	BILL+93*
IB(157	BILL+93*
IBACT	BILL+2~
IBADT	BILL+2~, BILL+11*, BILL+20, BILL+86, BILL+108, BILL+144
IBAMT	BILL+1~, BILL+9, BILL+10, BILL+138, BILL+140, BILL+144
IBARR	BILL+37~, BILL+38*, BILL+40, DUP+11~, DUP+19, DUP+26
IBARR(	DUP+29, DUP+30
IBARR("REVERS	AL REASON" , BILL+39*
IBCDFN	BILL+1~, BILL+108, BILL+109, BILL+112, BILL+113
IBD	ECME~, ECME+6, ECME+7, ECME+8, ECME+9, ECME+10, ECME+11, ECME+12, ECME+13, BILL~ , BILL+16, BILL+38, BILLQ+3, LOG+11, DUP~
IBD("AUTH #"	BILL+103
IBD("BCID"	BILL+20*, BILL+21, BILL+28, BILL+35, BILL+100, BILLQ+4
IBD("BILL"	BILLQ+1*
IBD("BILLED"	BILL+9
IBD("CLAIMID"	BILL+19, BILL+20
IBD("COPAY"	BILL+25
IBD("DAYS SUP	PLY" , BILL+90
IBD("DIVISION"	BILL+18, BILL+50*
IBD("DOS"	BILL+11, BILL+90, SETCT+4
IBD("DRUG"	BILL+90, BILL+93
IBD("EPHARM"	ECME+5*
IBD("FILL NUM	BER" , ECME+5, BILL+13, DUP+17
IBD("NDC"	BILL+90
IBD("PAID"	BILL+139
IBD("PLAN"	BILL+87, BILL+108
IBD("PRESCRIPTION"	ECME+5, BILL+12, DUP+16
IBD("QTY"	BILL+90
IBD("RESPONSE"	DUP+13
IBD("RTYPE"	BILL+25
IBD("RX NO"	BILL+90
IBD("RXCOB"	ECME+6, BILL+35, DUP+18
IBD("STATUS"	ECME+6, ECME+7, ECME+8, ECME+9, ECME+10, ECME+11, ECME+12, ECME+13
IBDFN	BILL+1~, BILL+72*
IBDIV	BILL+1~, BILL+18, BILL+47, BILL+48, BILL+49, BILL+50, BILL+83, BILL+84
IBDIV59	EPHARM+8~, EPHARM+9*, EPHARM+10
IBDRX	BILL+1~
IBDUP	BILL+1~, BILL+16*
IBDUZ	BILL+2~, BILL+4, BILL+5, BILL+125, BILL+127, BILL+144, BILL+148
IBFAC	BILL+1~
IBFIL	BILL+2~, BILL+13*, BILL+23, BILL+25, BILL+47, BILL+73, BILL+90, SETCT+2
IBFOUND	MATCH+1~, MATCH+3, MATCH+6, MATCH+11, MATCH+14
IBI	BILL+148~*
IBIDS	BILL+1~
IBIFN	BILL+1~, BILL+77, BILL+101, BILL+113, BILL+117, BILL+118, BILL+121, BILL+138, BILL+148, BILLQ , BILLQ+1, BILLQ+3, SETCT+5, CHARGES~, CHARGES+4, DUP+11~, DUP+22, DUP+29*, DUP+30, DUP+31
IBINS	BILL+1~, BILL+87, BILL+112
IBLDT	BILL+2~, BILL+28*
IBLDT2	BILL+1~, BILL+27, BILL+28, BILL+31
IBLGL	BILL+1~, BILL+28*
IBLOCK	BILL+2~, BILL+7, BILL+27, BILLQ+4
IBNOW	BILL+2~, BILL+29*, BILL+31, BILL+100
IBPAID	BILL+2~, BILL+139*, BILL+140, BILL+144, BILL+145
IBPREV	BILL+2~
IBPS	MATCH+1~, MATCH+2*, MATCH+11
IBQUERY	BILL+2~, BILL+97, BILL+98
IBREAS	BILL+141~, BILL+142, BILL+143, BILL+144
IBREFILL	EPHARM~, EPHARM+7, EPHARM+9
IBRES	BILL+2~, BILLQ*, BILLQ+2, BILLQ+3, BILLQ+5
IBRX	EPHARM~, EPHARM+6, EPHARM+9
IBRXN	BILL+2~, BILL+12*, BILL+23, BILL+25, BILL+47, BILL+48, BILL+73, BILL+90, SETCT+2
IBS	MATCH~, MATCH+2
IBSERV	BILL+1~, BILL+45*, BILL+46
IBSITE	BILL+1~
IBT	BILL+148~
IBT(399	BILL+148*
IBTRIC	BILL+1~, BILL+23*, BILL+25, BILL+143
IBTRKRN	BILL+2~, SETCT+2*, SETCT+3, SETCT+4, SETCT+5
IBX	MATCH+1~, MATCH+10, MATCH+11
IBY	BILL+1~, BILL+7, BILL+8, BILL+10, BILL+12, BILL+13, BILL+16, BILL+19, BILL+21, BILL+31* , BILL+44, BILL+46, BILL+52, BILL+75, BILL+109, BILL+118, BILL+128, BILLQ, BILLQ+3
IBZ	DUP+11~, DUP+19, DUP+22, DUP+25, ARERR+9~, ARERR+15, ARERR+16
PRCAERR	BILL+2~, BILL+128
PRCASV	BILL+1~
PRCASV("APR"	BILL+127*
PRCASV("ARBIL"	BILL+78
PRCASV("ARREC"	BILL+77, BILL+144
PRCASV("OKAY"	BILL+128
PRCASV("STATUS"	BILL+133, BILL+145
PROC	LOG~, LOG+11
RCDUZ	BILL+2~, BILL+5*
RESULT	LOG~, LOG+11
RET	DUP+11~, DUP+12, DUP+22, DUP+29, DUP+31*, DUPX+1
RXFIL	DUP+11~, DUP+17*, DUP+19
RXIEN	DUP+11~, DUP+16*, DUP+19
U	MATCH+11, BILL+16, BILL+39, BILL+47, BILL+49, BILL+83, BILL+100, BILL+118, SETCT+4, DUP+22 , DUP+25, DUP+30, DUP+31, ARERR+11, ARERR+16
X	SETCT+1~
Y	SETCT+1~

Customize PDF page

Package: Integrated Billing

Routine: IBNCPDP2

Information

Source Information

Call Graph

Call Graph Total: 30

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 5

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: