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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: IBNCPDP3

Package: Integrated Billing

Routine: IBNCPDP3


Information

IBNCPDP3 ;OAK/ELZ - STORES NDC/AWP UPDATES ;11/14/07 13:18

Source Information

Source file <IBNCPDP3.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Integrated Billing 8 (ERR,PAT)^IBAERR1  PT^IBCNEBF  ($$ADDBI,$$ADDCI)^IBCREF  $$PT^IBEFUNC  ($$MATCH,LOG)^IBNCPDP2  $$BCID^IBNCPDP4  CANC^IBNCPDP6  ($$NDC,NONBR)^IBNCPNB  
VA FileMan 2 (,FILE)^DIE  ($$GET1,GETS)^DIQ  
Accounts Receivable 1 ^PRCASER1  
Kernel 1 $$FMADD^XLFDT  
MailMan 1 ^XMD  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Integrated Billing 2 IBNCPDP  IBNCPDP2  

Entry Points

Name Comments DBIA/ICR reference
ELIG(DFN,IBD) ; process an Eligibility response
UPAWP(IBNDC,IBAWP,IBADT) ; updates AWP prices for NDCs
ELIGX ;
REVERSE(DFN,IBD,IBAUTO) ;process reversed claims
RTS(IBRR) ; Return to Stock processing on Released Rx
; input - IBRR = reversal reason
; IBCRSN = passed in by reference
; output - 0 = reversal not due to a Rx RETURN TO STOCK or Rx DELETE
; 1 = reversal due to a Rx RETURN TO STOCK or Rx DELETE
; IBCRSN = charge removal reason
BULL ; Generate a bulletin if there is an error in cancelling the claim.
REVQ ; perform end of job tasks
GETRSN(DFN,IBRXN,IBFIL) ;
; retrieve charge removal reason from file 354.71
; input - DFN,IBRXN=Rx ien,IBFIL=fill number
; output - charge removal reason

External References

Name Field # of Occurrence
^DIE REVERSE+38, RTS+16
FILE^DIE REVERSE+53, ELIG+79
$$GET1^DIQ GETRSN+11, ELIG+38, ELIG+39, ELIG+41, ELIG+42, ELIG+43, ELIG+44, ELIG+45, ELIG+46, ELIG+47
, ELIG+48, ELIG+49, ELIG+51, ELIG+52, ELIG+53, ELIG+54, ELIG+55, ELIG+56, ELIG+57, ELIG+58
GETS^DIQ ELIG+13
ERR^IBAERR1 BULL+17
PAT^IBAERR1 BULL+12
PT^IBCNEBF ELIG+23
$$ADDBI^IBCREF UPAWP+10
$$ADDCI^IBCREF UPAWP+12
$$PT^IBEFUNC BULL+3
$$MATCH^IBNCPDP2 REVERSE+23
LOG^IBNCPDP2 REVQ+1
$$BCID^IBNCPDP4 REVERSE+18
CANC^IBNCPDP6 REVERSE+16
$$NDC^IBNCPNB UPAWP+8
NONBR^IBNCPNB REVERSE+29
^PRCASER1 REVERSE+46
$$FMADD^XLFDT REVERSE+22
^XMD BULL+21

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
2.312 GET1^DIQ
^IBAM(354.71 - [#354.71] GET1^DIQ
^IBA(355.3 - [#355.3] GET1^DIQ
^IBT(356 - [#356] Classic Fileman Calls
^DIC(36 - [#36] GET1^DIQ
^DGCR(399 - [#399] Classic Fileman Calls
^BPSR - [#9002313.03] GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BPSR - [#9002313.03] ELIG+11
^DGCR(399 - [#399] REVERSE+19, REVERSE+32, REVERSE+41, REVQ+2
^DPT - [#2] ELIG+16, ELIG+17, ELIG+29
^IBA(355.33 - [#355.33] ELIG+26
^IBAM(354.71 - [#354.71] GETRSN+7, GETRSN+8, GETRSN+9
^IBE(350.9 - [#350.9] UPAWP+5
^IBE(355.12 - [#355.12] ELIG+27
^IBT(356 - [#356] RTS+9, RTS+11, RTS+13, RTS+17
^PRCA(430 - [#430] REVERSE+42
^XTMP( REVERSE+22
^XTMP("IBNCPLDT" REVERSE+22

Label References

Name Line Occurrences
$$GETRSN RTS+12
$$RTS REVERSE+14
BULL REVERSE+48
ELIGX ELIG+3, ELIG+10, ELIG+11, ELIG+14, ELIG+15, ELIG+16, ELIG+17, ELIG+24, ELIG+25, ELIG+26
, ELIG+28, ELIG+30
REVQ REVERSE+7, REVERSE+8, REVERSE+9, REVERSE+10, REVERSE+11, REVERSE+12, REVERSE+19, REVERSE+30, REVERSE+33, REVERSE+34

Naked Globals

Name Field # of Occurrence
^( REVERSE+22*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BPRGRP ELIG+1~, ELIG+75*, ELIG+77
BPRIEN ELIG+1~, ELIG+4*, ELIG+10, ELIG+11, ELIG+12, ELIG+66
BPRSUB ELIG+1~, ELIG+71*, ELIG+73
BPSR ELIG+1~
BPSR( ELIG+14, ELIG+71, ELIG+75
BUDA ELIG+1~, ELIG+33*, ELIG+38, ELIG+39, ELIG+41, ELIG+42, ELIG+43, ELIG+44, ELIG+45, ELIG+46
, ELIG+47, ELIG+48, ELIG+49, ELIG+51, ELIG+52, ELIG+53, ELIG+54, ELIG+55, ELIG+56, ELIG+57
, ELIG+58, ELIG+61, ELIG+62, ELIG+63, ELIG+64, ELIG+65, ELIG+66, ELIG+73, ELIG+77
BUFF ELIG+1~
BUFF( ELIG+38*, ELIG+39*, ELIG+41*, ELIG+42*, ELIG+43*, ELIG+44*, ELIG+45*, ELIG+46*, ELIG+47*, ELIG+48*
, ELIG+49*, ELIG+51*, ELIG+52*, ELIG+53*, ELIG+54*, ELIG+55*, ELIG+56*, ELIG+57*, ELIG+58*, ELIG+61*
, ELIG+62*, ELIG+63*, ELIG+64*, ELIG+65*, ELIG+66*, ELIG+73*, ELIG+77*
DA REVERSE+1~, REVERSE+37*, REVERSE+38!, RTS+6~, RTS+14*
DFN REVERSE~, REVERSE+7, REVERSE+29, RTS+12, BULL+3, GETRSN~, GETRSN+7, GETRSN+8, ELIG~, ELIG+3
, ELIG+16, ELIG+17, ELIG+23, ELIG+29, ELIG+34
DIE REVERSE+1~, REVERSE+37*, REVERSE+38!, RTS+6~, RTS+14*
DR REVERSE+1~, REVERSE+37*, REVERSE+38!, RTS+6~, RTS+15*
DT REVERSE+22, REVERSE+45
DUZ REVERSE+21, REVERSE+52
EPHSRC ELIG+1~, ELIG+27*, ELIG+28, ELIG+61
ERACT ELIG+1~
I REVERSE+1~, REVERSE+32*
IB REVERSE+1~
IB( REVERSE+32*
IB("S" REVERSE+34
IB("U1" REVERSE+41*, REVERSE+43
IB(0 REVERSE+33
IB0 GETRSN+4~, GETRSN+9*, GETRSN+10
IBADT UPAWP~, UPAWP+12, REVERSE+1~, REVERSE+9*, REVERSE+18, REVERSE+29
IBARES REVERSE+2~, REVERSE+47*, REVERSE+48, REVERSE+50
IBAUTO REVERSE~, REVQ+1
IBAWP UPAWP~, UPAWP+12
IBC BULL+1~, BULL+11*, BULL+13*, BULL+14*, BULL+15*, BULL+16*, BULL+18*, BULL+19*, BULL+20*
IBCC REVERSE+2~, REVERSE+28*, REVERSE+29
IBCDFN ELIG+1~, ELIG+6*, ELIG+15, ELIG+16, ELIG+17, ELIG+23, ELIG+29, ELIG+34
IBCHG REVERSE+1~, REVERSE+43*, REVERSE+45
IBCMT RTS+6~, RTS+14*, RTS+15
IBCR REVERSE+2~, REVERSE+25*, REVERSE+29, REVERSE+30
IBCRES REVERSE+1~, REVERSE+36*, REVERSE+37, REVERSE+45, RTS+12*
IBCS UPAWP+2~, UPAWP+5*, UPAWP+6, UPAWP+12
IBD REVERSE~, ELIG~
IBD("BCID" REVERSE+18*, REVERSE+19, REVERSE+22, REVERSE+23, REVQ+2
IBD("CLAIMID" REVERSE+8, REVERSE+18
IBD("CLOSE CO MMENT" , REVERSE+28
IBD("CLOSE RE ASON" , REVERSE+24, REVERSE+25
IBD("DOS" REVERSE+9
IBD("DROP TO PAPER" , REVERSE+24*, REVERSE+26
IBD("FILL NUM BER" , REVERSE+11
IBD("PLAN" ELIG+7
IBD("POLICY" ELIG+6
IBD("PRESCRIPTION" REVERSE+10
IBD("RELEASE COPAY" , REVERSE+27
IBD("RESPIEN" ELIG+4
IBD("RESPONSE" REVERSE+12
IBD("REVERSAL REASON" , REVERSE+14
IBD("RXCOB" REVERSE+23
IBD("USER" REVERSE+21, ELIG+5
IBDA GETRSN+4~, GETRSN+5*, GETRSN+8*, GETRSN+9, GETRSN+11
IBDT GETRSN+4~, GETRSN+5*, GETRSN+7*, GETRSN+8
IBDUZ REVERSE+2~, REVERSE+4*, REVERSE+45, REVERSE+52, REVERSE+53, BULL+6
IBERR ELIG+1~, ELIG+20!, ELIG+23, ELIG+24
IBFDA ELIG+1~, ELIG+25, ELIG+26, ELIG+33
IBFIL REVERSE+2~, REVERSE+11*, REVERSE+16, REVERSE+29, RTS+9, RTS+12, GETRSN~, GETRSN+6
IBGRP BULL+1~
IBI REVERSE+53~*
IBIFN REVERSE+1~, REVERSE+23*, REVERSE+30, REVERSE+32, REVERSE+37, REVERSE+41, REVERSE+42, REVERSE+53, REVQ+3
IBIL REVERSE+1~, REVERSE+42*, REVERSE+45, BULL+13
IBITEM UPAWP+2~, UPAWP+10*, UPAWP+12
IBLDT REVERSE+1~, REVERSE+3~, REVERSE+22*
IBLGL REVERSE+3~, REVERSE+22*
IBLOCK REVERSE+1~, REVERSE+5*, REVERSE+20*, REVQ+2
IBLOCK2 RTS+6~, RTS+13*, RTS+17
IBNCPDPELIG ELIG+1~, ELIG+22*
IBNDC UPAWP~, UPAWP+8*, UPAWP+10
IBNOW REVERSE+2~
IBPAP REVERSE+2~, REVERSE+26*, REVERSE+29, REVERSE+30
IBPL ELIG+1~, ELIG+7*, ELIG+17, ELIG+35
IBPT BULL+1~, BULL+3*, BULL+4
IBRELC REVERSE+2~, REVERSE+27*, REVERSE+29
IBRES ELIG+1~, ELIG+2*, ELIG+3*, ELIG+10*, ELIG+11*, ELIG+14*, ELIG+15*, ELIG+16*, ELIG+17*, ELIG+24*
, ELIG+25*, ELIG+26*, ELIG+28*, ELIG+30*, ELIG+81*, ELIGX+1
IBRR RTS~, RTS+8
IBRTS REVERSE+2~, REVERSE+12, REVERSE+14*
IBRXFIL GETRSN+4~, GETRSN+6*, GETRSN+10
IBRXN REVERSE+2~, REVERSE+10*, REVERSE+16, REVERSE+29, RTS+9, RTS+12, GETRSN~, GETRSN+6
IBT REVERSE+53~, BULL+1~
IBT( BULL+13*, BULL+14*, BULL+15*, BULL+16*, BULL+18*, BULL+19*, BULL+20*
IBT(1 BULL+9*
IBT(2 BULL+10*
IBT(3 BULL+11*
IBT(399 REVERSE+53*
IBTRKRN RTS+6~, RTS+9*, RTS+10, RTS+11, RTS+13, RTS+14, RTS+17
IBUSR REVERSE+2~, REVERSE+21*, REVERSE+29, ELIG+1~, ELIG+5*, ELIG+21
IBXRSN GETRSN+4~, GETRSN+5*, GETRSN+7, GETRSN+8, GETRSN+11*, GETRSN+12*, GETRSN+13
IBY REVERSE+1~, REVERSE+7*, REVERSE+8*, REVERSE+9*, REVERSE+10*, REVERSE+11*, REVERSE+13*, REVERSE+19*, REVERSE+30*, REVERSE+33*
, REVERSE+34*, REVERSE+48*, REVERSE+50*, REVQ+1, REVQ+3*, REVQ+4
ICDA ELIG+1~, ELIG+36*, ELIG+51, ELIG+52, ELIG+53, ELIG+54, ELIG+55, ELIG+56, ELIG+57, ELIG+58
IDUZ ELIG+1~, ELIG+21*
INSIEN ELIG+1~, ELIG+29*, ELIG+30, ELIG+36
PLDA ELIG+1~, ELIG+35*, ELIG+41, ELIG+42, ELIG+43, ELIG+44, ELIG+45, ELIG+46, ELIG+47, ELIG+48
, ELIG+49
PTDA ELIG+1~, ELIG+34*, ELIG+38, ELIG+39
U REVERSE+34, RTS+11, ELIG+17, ELIG+29
X REVERSE+1~, REVERSE+45*
XMDUZ BULL+1~, BULL+5*
XMSUB BULL+1~, BULL+4*
XMTEXT BULL+1~, BULL+5*
XMY BULL+1~
XMY( BULL+6*
XMY("G.IBCNR EPHARM" , BULL+7*
Y REVERSE+1~, REVERSE+47
ZR ELIG+1~, ELIG+12*, ELIG+13, ELIG+14, ELIG+71, ELIG+75
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All