Routine: BPSECMP2

Package	Total	Call Graph
E Claims Management Engine	8	$$DFF2EXT^BPSECFM DUR1^BPSNCPD3 ($$IEN59,$$STATUS)^BPSOSRX $$ISREVERS^BPSOSU $$CLOSED02^BPSSCR03 $$RXSTATUS^BPSSCRU2 ($$RXAPI1,$$RXSUBF1,RXAPI,RXSUBF)^BPSUTIL1 $$COB59^BPSUTIL2
Outpatient Pharmacy	3	$$GETNDC^PSONDCUT SYNC^PSOREJUT AUDIT^PSOTRI
VA FileMan	3	(,UPDATE)^DIE FDA^DILF ($$GET1,GETS)^DIQ
Integrated Billing	2	$$STORESP^IBNCPDP $$RXBILL^IBNCPUT3
Kernel	1	$$NOW^XLFDT
MailMan	1	^XMD
Registration	1	$$SITE^VASITE

Package	Total	Caller Graph
E Claims Management Engine	3	BPSBUTL BPSECMPS BPSOSQL
Outpatient Pharmacy	1	PSOBPSUT

Name	Comments	DBIA/ICR reference
IBSEND(CLAIMIEN,RESPIEN,EVENT,USER)	;
BULL(RX,FILL,CLAIMIEN,DFN,REASON,ECME)	; ; Create bulletin to tell OPECC to reverse/close secondary claim ; Input Parameters ; RX - Prescription IEN (required) ; FILL - Fill Number (required) ; CLAIMIEN - BPS Claims IEN for the primary reversal ; DFN - Patient IEN ; REASON - Close Reason ; ECME - ECME Number
SENDBULL(RX,FILL)	; ; Check if a bulletin should be created, which we want to do if: ; > There is a non-cancelled IB bill for the secondary claim ; > There is a open ECME secondary claim ; ; Input Parameters ; RX - Prescription IEN (required) ; FILL - Fill Number (required) ; Output ; 0 - Do not create the bulletin ; 1 - Create bulletin
DURSYNC(IEN59)	; ; Synch DURs between ECME and PSO ; Parameters: ; IEN59 is the BPS Transaction IEN
PROCOTH	;
PROCBEN	;
PROCADM	;
PROCDUR	;

Name	Field # of Occurrence
$$DFF2EXT^BPSECFM	IBSEND+77, IBSEND+80, IBSEND+83, IBSEND+85, IBSEND+88, IBSEND+114
DUR1^BPSNCPD3	IBSEND+185
$$IEN59^BPSOSRX	IBSEND+184, SENDBULL+28
$$STATUS^BPSOSRX	IBSEND+182
$$ISREVERS^BPSOSU	IBSEND+134
$$CLOSED02^BPSSCR03	SENDBULL+35
$$RXSTATUS^BPSSCRU2	IBSEND+144
$$RXAPI1^BPSUTIL1	IBSEND+54, IBSEND+92, IBSEND+116, BULL+49, BULL+50
$$RXSUBF1^BPSUTIL1	IBSEND+116
RXAPI^BPSUTIL1	IBSEND+62
RXSUBF^BPSUTIL1	IBSEND+66
$$COB59^BPSUTIL2	IBSEND+108, DURSYNC+15
^DIE	IBSEND+165
UPDATE^DIE	PROCOTH+9, PROCBEN+9, PROCADM+10, PROCADM+18, PROCADM+21, PROCDUR+9
FDA^DILF	PROCOTH+7, PROCOTH+8, PROCBEN+7, PROCBEN+8, PROCADM+8, PROCADM+9, PROCADM+15, PROCADM+16, PROCADM+17, PROCADM+20 , PROCDUR+7, PROCDUR+8
$$GET1^DIQ	IBSEND+21, IBSEND+118, IBSEND+126, IBSEND+127, IBSEND+128, BULL+22, BULL+39, DURSYNC+10, DURSYNC+11
GETS^DIQ	IBSEND+11, IBSEND+12, IBSEND+18
$$STORESP^IBNCPDP	IBSEND+48, IBSEND+153, IBSEND+159, IBSEND+175, IBSEND+189
$$RXBILL^IBNCPUT3	BULL+26, BULL+29, SENDBULL+19
$$GETNDC^PSONDCUT	IBSEND+109
SYNC^PSOREJUT	DURSYNC+15
AUDIT^PSOTRI	IBSEND+149
$$SITE^VASITE	BULL+21
$$NOW^XLFDT	IBSEND+164
^XMD	BULL+65

FileNo	Call Tags
^BPSC - [#9002313.02]	Classic Fileman Calls, GET1^DIQ, GETS^DIQ
9002313.0301	GETS^DIQ
^BPSTL - [#9002313.57]	GET1^DIQ
9002313.57902	GET1^DIQ
^BPST - [#9002313.59]	GET1^DIQ, GETS^DIQ
9002313.59902	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^BPSC - [#9002313.02]	IBSEND+51, IBSEND+146, SENDBULL+32
^BPST - [#9002313.59]	IBSEND+16, IBSEND+28, IBSEND+29, IBSEND+30, IBSEND+103, IBSEND+104, IBSEND+105, IBSEND+184, SENDBULL+30
^BPSTL("B"	IBSEND+125
^DPT - [#2]	BULL+34, BULL+35
^IBE(356.8 - [#356.8]	IBSEND+150

Name	Line Occurrences
$$SENDBULL	BULL+15
BULL	IBSEND+171

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACTIVE	SENDBULL+18~, SENDBULL+21, SENDBULL+23, SENDBULL+24
AMT	IBSEND+4~, IBSEND+76, IBSEND+77, IBSEND+79, IBSEND+80, IBSEND+82, IBSEND+83, IBSEND+87, IBSEND+88
BILL	SENDBULL+18~, SENDBULL+21*, SENDBULL+22
BILLNUM	IBSEND+3~, IBSEND+48, IBSEND+153, IBSEND+159, IBSEND+175, IBSEND+189*
BPS57	IBSEND+1~, IBSEND+124, IBSEND+125, IBSEND+126, IBSEND+127, IBSEND+128
BPSARRY	IBSEND+1~, IBSEND+48, IBSEND+153, IBSEND+159, IBSEND+175, IBSEND+189
BPSARRY("AUTH	#" , IBSEND+90*
BPSARRY("BILLED"	IBSEND+113, IBSEND+114
BPSARRY("CLAIMID"	IBSEND+115*, IBSEND+171
BPSARRY("CLOS	E COMMENT" , IBSEND+144, IBSEND+147, E REASON" , IBSEND+150*, IBSEND+155, IBSEND+164
BPSARRY("COPAY"	IBSEND+88*
BPSARRY("DAYS	SUPPLY" , IBSEND+93, IBSEND+94
BPSARRY("DISP	FEE PAID" , IBSEND+83*
BPSARRY("DOS"	IBSEND+69, IBSEND+70
BPSARRY("DRUG"	IBSEND+92*
BPSARRY("EPHARM"	IBSEND+118*
BPSARRY("FILL	NUMBER" , IBSEND+110, ED BY" , IBSEND+111
BPSARRY("ING	COST PAID" , IBSEND+80*
BPSARRY("NCPD	P QTY" , IBSEND+99, P UNITS" , IBSEND+100
BPSARRY("NDC"	IBSEND+109*
BPSARRY("PAID"	IBSEND+73, IBSEND+85
BPSARRY("PAT	RESP" , IBSEND+77*
BPSARRY("PLAN"	IBSEND+29*
BPSARRY("POLICY"	IBSEND+27*
BPSARRY("PRESCRIPTION"	IBSEND+112*
BPSARRY("PRIM	ARY BILL" , IBSEND+104, IBSEND+127
BPSARRY("PRIMPLAN"	IBSEND+184*
BPSARRY("PRIMREJ"	IBSEND+184*
BPSARRY("PRIO	R PAYMENT" , IBSEND+105, IBSEND+128
BPSARRY("QTY"	IBSEND+96*
BPSARRY("REJ	CODE LST" , IBSEND+186, CODES" , IBSEND+187
BPSARRY("RELE	ASE DATE" , IBSEND+116*, IBSEND+179
BPSARRY("RESPIEN"	IBSEND+47*
BPSARRY("RESPONSE"	IBSEND+117*
BPSARRY("REVE	RSAL REASON" , IBSEND+136*
BPSARRY("RTS-DEL"	IBSEND+137, IBSEND+139, IBSEND+141*
BPSARRY("RTYPE"	IBSEND+30*
BPSARRY("RX N	O" , IBSEND+91*
BPSARRY("RXCOB"	IBSEND+108*, IBSEND+123, IBSEND+149, IBSEND+171, IBSEND+182
BPSARRY("STATUS"	IBSEND+46, IBSEND+153, IBSEND+158, IBSEND+175, IBSEND+189*
BPSARRY("UNITS"	IBSEND+97*
BPSARRY("USER"	IBSEND+40, IBSEND+41, IBSEND+42, IBSEND+158, IBSEND+180*
BPSBILLS	BULL+17~, BULL+26, BULL+28!, BULL+29, SENDBULL+18~, SENDBULL+19
BPSBILLS(	BULL+27, BULL+30, SENDBULL+21, SENDBULL+22
BPSBILLS(""	BULL+27, BULL+30
BPSL	BULL+18~, BULL+43, BULL+44, BULL+45, BULL+46, BULL+47, BULL+48, BULL+49, BULL+50, BULL+51* , BULL+52, BULL+53, BULL+54, BULL+55, BULL+56, BULL+57, BULL+58, BULL+59, BULL+60*
BPSX	BULL+18~
BPSX(	BULL+44, BULL+45, BULL+46, BULL+47, BULL+48, BULL+49, BULL+50, BULL+51, BULL+52, BULL+53 , BULL+54, BULL+55, BULL+56, BULL+57, BULL+58, BULL+59, BULL+60*
CLAIM	SENDBULL+27~, SENDBULL+30*, SENDBULL+31, SENDBULL+32, SENDBULL+35
CLAIMIEN	IBSEND~, IBSEND+8, IBSEND+11, IBSEND+15, IBSEND+16, IBSEND+51, IBSEND+69, IBSEND+99, IBSEND+100, IBSEND+113 , IBSEND+115, IBSEND+134, IBSEND+171, BULL~, BULL+22, BULL+39
CLAIMNFO	IBSEND+2~
CLAIMNFO("9002313.02"	IBSEND+15, IBSEND+69
CLAIMNFO("9002313.0201"	IBSEND+99, IBSEND+100, IBSEND+113, IBSEND+115
CLREAS	IBSEND+3~, IBSEND+139, IBSEND+141, IBSEND+147*, IBSEND+150, IBSEND+171
DA	IBSEND+4~, IBSEND+163*
DFN	IBSEND+3~, IBSEND+24*, IBSEND+48, IBSEND+153, IBSEND+159, IBSEND+171, IBSEND+175, IBSEND+189, BULL~, BULL+33 , BULL+34, BULL+35
DIE	IBSEND+4~, IBSEND+163*
DOS	BULL+17~, BULL+39, BULL+40, BULL+51
DR	IBSEND+4~, IBSEND+164*
ECME	BULL~, BULL+44, BULL+63
ELIG	IBSEND+4~, IBSEND+148*, IBSEND+149
EVENT	IBSEND~, IBSEND+40, IBSEND+134, IBSEND+175, IBSEND+179
>> FDAIEN(	PROCOTH+7, PROCOTH+8, PROCBEN+7, PROCBEN+8, PROCADM+8, PROCADM+9, PROCADM+15, PROCADM+16, PROCADM+17, PROCADM+20 , PROCDUR+7, PROCDUR+8
>> FDAIEN03(	PROCOTH+7, PROCOTH+8, PROCBEN+7, PROCBEN+8, PROCADM+8, PROCADM+9, PROCADM+15, PROCADM+16, PROCADM+17, PROCDUR+7 , PROCDUR+8
FDAT1101	PROCDUR+2~
>> FDATA(	PROCOTH+1, PROCOTH+6, PROCOTH+8, PROCBEN+1, PROCBEN+6, PROCBEN+8, PROCADM+6, PROCADM+7, PROCADM+9, PROCADM+13 , PROCADM+14, PROCADM+17, PROCDUR+1, PROCDUR+6, PROCDUR+7, PROCDUR+8
FDATA03	PROCADM+1~
FDATA3	PROCOTH+2~, PROCBEN+2~, PROCADM+1~
FILE	PROCOTH+2~, PROCOTH+3, PROCOTH+7, PROCOTH+8, PROCBEN+2~, PROCBEN+3, PROCBEN+7, PROCBEN+8, PROCADM+1~, PROCADM+2* , PROCADM+8, PROCADM+9, PROCADM+15, PROCADM+16, PROCADM+17, PROCDUR+2~, PROCDUR+3*, PROCDUR+7, PROCDUR+8
FILE03	PROCADM+1~, PROCADM+3*, PROCADM+20
FILL	BULL~, BULL+12, BULL+15, BULL+26, BULL+29, BULL+49, SENDBULL~, SENDBULL+14, SENDBULL+19, SENDBULL+28
FILLNUM	IBSEND+1~, IBSEND+65*, IBSEND+66, IBSEND+93, IBSEND+94, IBSEND+109, IBSEND+110, IBSEND+116, IBSEND+149, IBSEND+171 , IBSEND+182, IBSEND+184, IBSEND+185
FLDNUM	PROCOTH+2~, PROCOTH+7, PROCOTH+8, PROCBEN+2~, PROCBEN+7, PROCBEN+8, PROCADM+1~, PROCADM+8, PROCADM+9, PROCADM+15* , PROCADM+16, PROCDUR+2~, PROCDUR+7, PROCDUR+8*
IB	SENDBULL+18~, SENDBULL+22*, SENDBULL+23
IEN59	DURSYNC~, DURSYNC+7, DURSYNC+10, DURSYNC+11, DURSYNC+15
IEN59SEC	SENDBULL+27~, SENDBULL+28*, SENDBULL+29, SENDBULL+30
IND	IBSEND+1~, IBSEND+15*, IBSEND+16
NNDX	PROCOTH+2~, PROCOTH+5, PROCOTH+6, PROCOTH+7, PROCOTH+8, PROCBEN+2~, PROCBEN+5, PROCBEN+6, PROCBEN+7, PROCBEN+8 , PROCADM+1~, PROCADM+4, PROCADM+7, PROCADM+8, PROCADM+9, PROCADM+14, PROCADM+17, PROCDUR+2~, PROCDUR+5, PROCDUR+6* , PROCDUR+7, PROCDUR+8
PATNAME	BULL+17~, BULL+34*, BULL+48
PRIBILL	BULL+17~, BULL+27*, BULL+44
PRICLAIM	BULL+17~, BULL+22*, BULL+52
REASON	BULL~, BULL+45, BULL+53
REJS	IBSEND+183~, IBSEND+185
REJS(1	IBSEND+186, IBSEND+187
REQCLAIM	IBSEND+3~, IBSEND+135*, IBSEND+146, IBSEND+162, IBSEND+163
RESPIEN	IBSEND~, IBSEND+7, IBSEND+12, IBSEND+47, IBSEND+58, IBSEND+76, IBSEND+79, IBSEND+82, IBSEND+85, IBSEND+87 , IBSEND+90
RESPNFO	IBSEND+2~
RESPNFO(	IBSEND+58, IBSEND+76, IBSEND+79, IBSEND+82, IBSEND+85, IBSEND+87, IBSEND+90
RESPONSE	IBSEND+3~, IBSEND+58, IBSEND+59, IBSEND+74, IBSEND+117, IBSEND+146, IBSEND+179
RFINFO	IBSEND+2~
RFINFO(	IBSEND+94
ROOT	PROCOTH+2~, PROCOTH+4, PROCOTH+7, PROCOTH+8, PROCBEN+2~, PROCBEN+4, PROCBEN+7, PROCBEN+8, PROCADM+1~, PROCADM+2* , PROCADM+8, PROCADM+9, PROCADM+15, PROCADM+16, PROCADM+17, PROCDUR+2~, PROCDUR+4*, PROCDUR+7, PROCDUR+8
ROOT03	PROCADM+1~, PROCADM+3*, PROCADM+20
RX	BULL~, BULL+11, BULL+15, BULL+26, BULL+29, BULL+49, BULL+50, SENDBULL~, SENDBULL+13, SENDBULL+19 , SENDBULL+28
RXACT	IBSEND+3~, IBSEND+33*, IBSEND+41, IBSEND+45, IBSEND+46, IBSEND+123, IBSEND+139, IBSEND+140, IBSEND+146, IBSEND+180
RXFILL	DURSYNC+4~, DURSYNC+11*, DURSYNC+12, DURSYNC+15
RXIEN	IBSEND+1~, IBSEND+51, IBSEND+54, IBSEND+62, IBSEND+66, IBSEND+91, IBSEND+92, IBSEND+93, IBSEND+109, IBSEND+111 , IBSEND+112, IBSEND+116, IBSEND+144, IBSEND+149, IBSEND+171, IBSEND+182, IBSEND+184, IBSEND+185, DURSYNC+4~, DURSYNC+10 , DURSYNC+12, DURSYNC+15
RXINFO	IBSEND+2~
RXINFO(52	IBSEND+91, IBSEND+93, IBSEND+111
SECBILL	BULL+17~, BULL+30*, BULL+46
SSN	BULL+17~, BULL+35, BULL+36, BULL+48
STATION	BULL+17~, BULL+21*, BULL+27, BULL+30
TRANINFO	IBSEND+2~
TRANINFO("9002313.59"	IBSEND+24, IBSEND+27, IBSEND+33, IBSEND+42, IBSEND+96, IBSEND+97, IBSEND+135, IBSEND+136, IBSEND+148
>> TRANSACT	PROCOTH+1, PROCOTH+6, PROCOTH+7, PROCOTH+8, PROCBEN+1, PROCBEN+6, PROCBEN+7, PROCBEN+8, PROCADM+6, PROCADM+7 , PROCADM+8, PROCADM+9, PROCADM+13, PROCADM+14, PROCADM+15, PROCADM+16, PROCADM+17, PROCADM+20, PROCDUR+1, PROCDUR+6 , PROCDUR+7, PROCDUR+8
TRNDX	IBSEND+1~, IBSEND+16*, IBSEND+17, IBSEND+18, IBSEND+21, IBSEND+24, IBSEND+27, IBSEND+28, IBSEND+29, IBSEND+30 , IBSEND+33, IBSEND+42, IBSEND+65, IBSEND+96, IBSEND+97, IBSEND+103, IBSEND+104, IBSEND+105, IBSEND+108, IBSEND+118 , IBSEND+125, IBSEND+135, IBSEND+136, IBSEND+148
U	IBSEND+29, IBSEND+30, IBSEND+104, IBSEND+105, IBSEND+146, IBSEND+182, IBSEND+184, BULL+21, BULL+27, BULL+30 , BULL+34, BULL+35, SENDBULL+23, SENDBULL+30
USER	IBSEND~, IBSEND+40
XMDUZ	BULL+18~, BULL+64*
XMSUB	BULL+18~, BULL+63*
XMTEXT	BULL+18~, BULL+64*
XMY	BULL+18~
XMY("G.BPS OP	ECC" , BULL+64*

Customize PDF page

Package: E Claims Management Engine

Routine: BPSECMP2

Information

Source Information

Call Graph

Call Graph Total: 19

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 4

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: