Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: BPSPRRX5

Package: E Claims Management Engine

Routine: BPSPRRX5


Information

BPSPRRX5 ;ALB/SS - ePharmacy secondary billing ;12-DEC-08

Source Information

Source file <BPSPRRX5.m>

Call Graph

Call Graph

Call Graph Total: 18

Package Total Call Graph
E Claims Management Engine 14 $$DFF2EXT^BPSECFM  ($$IEN59,$$STATUS)^BPSOSRX  $$PAYABLE^BPSOSRX5  $$SECINSCK^BPSPRRX  ($$SUBMCLM,DISPBILL)^BPSPRRX2  $$PROMPTS^BPSPRRX3  ($$FINDECLM,DISPECLM)^BPSPRRX5  ($$PRIMDATA,$$SECDATA)^BPSPRRX6  
ACTDTY^BPSPRRX7  $$LJ^BPSSCR02  $$NB^BPSSCR03  $$YESNO^BPSSCRRS  ($$DRGNAME,$$ECMENUM,$$GETMWC,$$MWCNAME,$$NDC,$$RL,$$RTBB,$$RXNUM,$$RXREF,$$RXST)^BPSSCRU2  ($$COB59,$$LASTDOS)^BPSUTIL2  
Integrated Billing 2 EN1^IBNCPDPI  $$RXBILL^IBNCPUT3  
Kernel 1 $$FMTE^XLFDT  
VA FileMan 1 ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 9

Package Total Caller Graph
E Claims Management Engine 8 BPSNCPDP  BPSPRRX  BPSPRRX3  BPSPRRX4  BPSPRRX5  BPSPRRX6  BPSRES  BPSSCRRS  
Outpatient Pharmacy 1 PSOREJP3  

Entry Points

Name Comments DBIA/ICR reference
SELREFIL(BPSARR,BPSPRMPT,BPSMESS) ;
FINDECLM(BPSRXIEN,BPSREF,BPCOBIND) ;
DISPECLM(BP59) ;
CLMINFO(BP59) ;
GETPL59(BP59) ;
GETRTP59(BP59) ;
GETBIL59(BP59) ;
SELCOB(BPSPRMPT,BPSMESS) ;
SECNOPRM(BPSRX,BPSRF,BPSDOS,BPSDFN,BPDISPPR) ;
GETOPPRA(BPSRESP,BPARR) ; get the Other Payer-Patient Responsibility Amount/Qualifier pairs from the Primary payer response
; BPS*1*20
; Input: BPSRESP - response file ien
; Output: array BPARR (pass by reference)
; BPARR = count of amount/qualifier pairs
; BPARR(#) = AMOUNT ^ QUALIFIER
GETPPX ;

External References

Name Field # of Occurrence
$$DFF2EXT^BPSECFM GETOPPRA+20, GETOPPRA+23, GETOPPRA+25, GETOPPRA+27, GETOPPRA+29, GETOPPRA+31, GETOPPRA+33, GETOPPRA+35, GETOPPRA+37, GETOPPRA+39
, GETOPPRA+41, GETOPPRA+43, GETOPPRA+45
$$IEN59^BPSOSRX FINDECLM+2
$$STATUS^BPSOSRX FINDECLM+5, CLMINFO+13
$$PAYABLE^BPSOSRX5 FINDECLM+6, CLMINFO+14
$$SECINSCK^BPSPRRX SECNOPRM+60, SECNOPRM+72
$$SUBMCLM^BPSPRRX2 SECNOPRM+101
DISPBILL^BPSPRRX2 SECNOPRM+55
$$PROMPTS^BPSPRRX3 SECNOPRM+85
$$FINDECLM^BPSPRRX5 SECNOPRM+30
DISPECLM^BPSPRRX5 SECNOPRM+35
$$PRIMDATA^BPSPRRX6 SECNOPRM+75
$$SECDATA^BPSPRRX6 SECNOPRM+79
ACTDTY^BPSPRRX7 SECNOPRM+94
$$LJ^BPSSCR02 CLMINFO+4, CLMINFO+9, CLMINFO+10, CLMINFO+11
$$NB^BPSSCR03 FINDECLM+4
$$YESNO^BPSSCRRS SECNOPRM+37, SECNOPRM+67, SECNOPRM+89
$$DRGNAME^BPSSCRU2 CLMINFO+4
$$ECMENUM^BPSSCRU2 CLMINFO+11
$$GETMWC^BPSSCRU2 CLMINFO+11
$$MWCNAME^BPSSCRU2 CLMINFO+11
$$NDC^BPSSCRU2 CLMINFO+4
$$RL^BPSSCRU2 CLMINFO+12
$$RTBB^BPSSCRU2 CLMINFO+12
$$RXNUM^BPSSCRU2 CLMINFO+10
$$RXREF^BPSSCRU2 CLMINFO+3
$$RXST^BPSSCRU2 CLMINFO+12
$$COB59^BPSUTIL2 CLMINFO+2
$$LASTDOS^BPSUTIL2 CLMINFO+7
^DIR SELREFIL+15, SELCOB+9
EN1^IBNCPDPI SECNOPRM+68
$$RXBILL^IBNCPUT3 SECNOPRM+44
$$FMTE^XLFDT SELREFIL+11, SELREFIL+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Drug name NDC DOS RX# FILL/ECME# TYPE STATUS"
  • Line Location: DISPECLM+1
Function Call: WRITE
  • Prompt: !,"==============================================================================="
  • Line Location: DISPECLM+2
Function Call: WRITE
  • Prompt: !,$$CLMINFO(BP59)
  • Line Location: DISPECLM+3
Function Call: WRITE
  • Prompt: !!,"There is an existing rejected/reversed secondary e-claim(s) for the RX/refill."
  • Line Location: SECNOPRM+36
Function Call: WRITE
  • Prompt: !
  • Line Location: SECNOPRM+56
Function Call: WRITE
  • Prompt: !!,"Unable to find a secondary insurance policy which is e-Pharmacy billable."
  • Line Location: SECNOPRM+62
Function Call: WRITE
  • Prompt: !,"You must correct this in order to continue.",!
  • Line Location: SECNOPRM+63
Function Call: WRITE
  • Prompt: !
  • Line Location: SECNOPRM+88
Function Call: WRITE
  • Prompt: !!,$P(BPSRET,U,2),!
  • Line Location: SECNOPRM+102
Routine Call
  • DIR
  • Line Location:
    • SELREFIL+15
    • SELCOB+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BPSR - [#9002313.03] GETOPPRA+16, GETOPPRA+20, GETOPPRA+23, GETOPPRA+25, GETOPPRA+27, GETOPPRA+29, GETOPPRA+31, GETOPPRA+33, GETOPPRA+35, GETOPPRA+37
, GETOPPRA+39, GETOPPRA+41, GETOPPRA+43, GETOPPRA+45
^BPST - [#9002313.59] FINDECLM+3, GETPL59+1, GETRTP59+1, GETBIL59+1

Label References

Name Line Occurrences
$$CLMINFO DISPECLM+3
GETPPX GETOPPRA+15, GETOPPRA+16, GETOPPRA+21

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AMT GETOPPRA+12~, GETOPPRA+20*, GETOPPRA+21, GETOPPRA+23*, GETOPPRA+24, GETOPPRA+25*, GETOPPRA+26, GETOPPRA+27*, GETOPPRA+28, GETOPPRA+29*
, GETOPPRA+30, GETOPPRA+31*, GETOPPRA+32, GETOPPRA+33*, GETOPPRA+34, GETOPPRA+35*, GETOPPRA+36, GETOPPRA+37*, GETOPPRA+38, GETOPPRA+39*
, GETOPPRA+40, GETOPPRA+41*, GETOPPRA+42, GETOPPRA+43*, GETOPPRA+44, GETOPPRA+45*, GETOPPRA+46
BP2NDBIL SECNOPRM+23~, SECNOPRM+41, SECNOPRM+44*, SECNOPRM+45
BP59 DISPECLM~, DISPECLM+3, CLMINFO~, CLMINFO+2, CLMINFO+3, CLMINFO+4, CLMINFO+7, CLMINFO+11, CLMINFO+12, GETPL59~
, GETPL59+1, GETRTP59~, GETRTP59+1, GETBIL59~, GETBIL59+1
BPARR GETOPPRA~, GETOPPRA+13!, GETOPPRA+14*, GETOPPRA+21*, GETOPPRA+24*, GETOPPRA+26*, GETOPPRA+28*, GETOPPRA+30*, GETOPPRA+32*, GETOPPRA+34*
, GETOPPRA+36*, GETOPPRA+38*, GETOPPRA+40*, GETOPPRA+42*, GETOPPRA+44*, GETOPPRA+46*
BPARR( GETOPPRA+21*, GETOPPRA+24*, GETOPPRA+26*, GETOPPRA+28*, GETOPPRA+30*, GETOPPRA+32*, GETOPPRA+34*, GETOPPRA+36*, GETOPPRA+38*, GETOPPRA+40*
, GETOPPRA+42*, GETOPPRA+44*, GETOPPRA+46*
BPCOB CLMINFO+1~, CLMINFO+2*, CLMINFO+13
BPCOBIND FINDECLM~, FINDECLM+2, FINDECLM+5
BPDISPPR SECNOPRM~, SECNOPRM+51
BPPAYBLE FINDECLM+1~, FINDECLM+6*, FINDECLM+8, FINDECLM+9, CLMINFO+1~, CLMINFO+14*, CLMINFO+15
BPPAYSEQ SECNOPRM+23~
BPPSEQ SECNOPRM+49~, SECNOPRM+54*, SECNOPRM+55
BPRESUBM SECNOPRM+24~, SECNOPRM+27*, SECNOPRM+37*, SECNOPRM+38, SECNOPRM+79, SECNOPRM+97, SECNOPRM+98
BPRTTP59 SECNOPRM+24~, SECNOPRM+79
BPS399 SECNOPRM+42~, SECNOPRM+46*, SECNOPRM+48*, SECNOPRM+53, SECNOPRM+55
BPS59 FINDECLM+1~, FINDECLM+2*, FINDECLM+3, FINDECLM+4, FINDECLM+7, FINDECLM+8, FINDECLM+9
BPSARR SELREFIL~, SECNOPRM+24~, SECNOPRM+42~, SECNOPRM+44
BPSARR( SELREFIL+9, SELREFIL+11, SELREFIL+12, SELREFIL+18, SECNOPRM+48, SECNOPRM+53, SECNOPRM+55
BPSBINFO SECNOPRM+23~
BPSCNT SELREFIL+1~, SELREFIL+3*, SELREFIL+10*, SELREFIL+11, SELREFIL+12, SECNOPRM+42~, SECNOPRM+47*, SECNOPRM+50*, SECNOPRM+52, SECNOPRM+55
BPSDFN SECNOPRM~, SECNOPRM+60, SECNOPRM+68, SECNOPRM+72, SECNOPRM+94
BPSDOS SECNOPRM~, SECNOPRM+60, SECNOPRM+72, SECNOPRM+85, SECNOPRM+94, SECNOPRM+101
BPSECLM SECNOPRM+23~, SECNOPRM+30*, SECNOPRM+31, SECNOPRM+32, SECNOPRM+34, SECNOPRM+35
BPSECOND SECNOPRM+24~, SECNOPRM+75, SECNOPRM+79, SECNOPRM+85, SECNOPRM+101
BPSECOND("INS NAME" , SECNOPRM+89
BPSECOND("NEW COB DATA" , SECNOPRM+92*
BPSECOND("PLAN" SECNOPRM+101
BPSECOND("PRI MARY BILL" , SECNOPRM+82*
BPSECOND("RTYPE" SECNOPRM+101
BPSINIEN SECNOPRM+23~
BPSMESS SELREFIL~, SELREFIL+5, SELCOB~, SELCOB+4
BPSPL59 SECNOPRM+24~, SECNOPRM+79
BPSPLAN SECNOPRM+24~
BPSPLNSL SECNOPRM+24~
BPSPRMPT SELREFIL~, SELREFIL+4, SELCOB~, SELCOB+2
BPSQ SECNOPRM+23~, SECNOPRM+33*, SECNOPRM+34, SECNOPRM+38*
BPSREF FINDECLM~, FINDECLM+2, FINDECLM+5
BPSRESP GETOPPRA~, GETOPPRA+15, GETOPPRA+16, GETOPPRA+20, GETOPPRA+23, GETOPPRA+25, GETOPPRA+27, GETOPPRA+29, GETOPPRA+31, GETOPPRA+33
, GETOPPRA+35, GETOPPRA+37, GETOPPRA+39, GETOPPRA+41, GETOPPRA+43, GETOPPRA+45
BPSRET SECNOPRM+23~, SECNOPRM+53*, SECNOPRM+54, SECNOPRM+75*, SECNOPRM+79, SECNOPRM+101*, SECNOPRM+102, SECNOPRM+103
BPSRF SECNOPRM~, SECNOPRM+30, SECNOPRM+44, SECNOPRM+55, SECNOPRM+75, SECNOPRM+79, SECNOPRM+85, SECNOPRM+94, SECNOPRM+101
BPSRX SECNOPRM~, SECNOPRM+30, SECNOPRM+44, SECNOPRM+55, SECNOPRM+75, SECNOPRM+79, SECNOPRM+85, SECNOPRM+94, SECNOPRM+101
BPSRXCOB SECNOPRM+23~
BPSRXIEN FINDECLM~, FINDECLM+2, FINDECLM+5
BPSSTAT FINDECLM+1~, FINDECLM+5*, FINDECLM+6, FINDECLM+7, FINDECLM+8, FINDECLM+9, CLMINFO+1~, CLMINFO+13*, CLMINFO+14, CLMINFO+16
, CLMINFO+17, CLMINFO+18
BPSSTR SELREFIL+1~, SELREFIL+11*, SELREFIL+14
BPSWHERE SECNOPRM+24~, SECNOPRM+97*, SECNOPRM+98*, SECNOPRM+101
BPX SELREFIL+2*, SELREFIL+9*, SELREFIL+11, SELREFIL+12, CLMINFO+1~, CLMINFO+4*, CLMINFO+9*, CLMINFO+10*, CLMINFO+11*, CLMINFO+12*
, CLMINFO+15, CLMINFO+16, CLMINFO+17, CLMINFO+18, CLMINFO+19
BPX1 CLMINFO+1~, CLMINFO+3*, CLMINFO+4, CLMINFO+10, CLMINFO+13
BPY SECNOPRM+23~, SECNOPRM+67*, SECNOPRM+68, SECNOPRM+69
BPYDEF SECNOPRM+23~, SECNOPRM+59*, SECNOPRM+61*, SECNOPRM+67
DIR SELREFIL+1~, SELCOB+1~
DIR("A" SELREFIL+4*, SELCOB+2*
DIR("L" SELREFIL+5*, SELREFIL+6*, SELREFIL+7*, SELREFIL+8*, SELREFIL+12*, SELREFIL+13*, SELCOB+4*, SELCOB+5*, SELCOB+6*, SELCOB+7*
, SELCOB+8*
DIR(0 SELREFIL+14*, SELCOB+3*
DOSDT CLMINFO+1~, CLMINFO+7*, CLMINFO+9
U SELREFIL+11, SELREFIL+12, FINDECLM+4, FINDECLM+5, FINDECLM+7, FINDECLM+8, FINDECLM+9, CLMINFO+4, CLMINFO+10, CLMINFO+13
, GETPL59+1, GETRTP59+1, GETBIL59+1, SECNOPRM+35, SECNOPRM+41, SECNOPRM+53, SECNOPRM+54, SECNOPRM+55, SECNOPRM+102, GETOPPRA+20
, GETOPPRA+21, GETOPPRA+23, GETOPPRA+24, GETOPPRA+25, GETOPPRA+26, GETOPPRA+27, GETOPPRA+28, GETOPPRA+29, GETOPPRA+30, GETOPPRA+31
, GETOPPRA+32, GETOPPRA+33, GETOPPRA+34, GETOPPRA+35, GETOPPRA+36, GETOPPRA+37, GETOPPRA+38, GETOPPRA+39, GETOPPRA+40, GETOPPRA+41
, GETOPPRA+42, GETOPPRA+43, GETOPPRA+44, GETOPPRA+45, GETOPPRA+46
X SELREFIL+1~, SELREFIL+16, SELREFIL+17, SELCOB+1~, SELCOB+10
Y SELREFIL+1~, SELREFIL+18, SELCOB+1~, SELCOB+11
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All