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

Package: Integrated Billing

Routine: IBNCPBB


Information

IBNCPBB ;DALOI/AAT - ECME BACKBILLING ;24-JUN-2003

Source Information

Source file <IBNCPBB.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Integrated Billing 7 $$INSUR^IBBAPI  PROCESS^IBNCPBB1  ($$ECMEBIL,$$SUBMIT)^IBNCPDPU  ($$MACHK,$$ROICHK,ROICLN)^IBNCPDR4  $$DAT2^IBOUTL  ($$FILE,$$RXZERO,$$SUBFILE)^IBRXUTL  $$DRUG^IBRXUTL1  
VA FileMan 5 ^%DT  EN^DDIOL  ^DIC  ^DIE  ^DIR  
Outpatient Pharmacy 2 RX^PSO52API  DIC^PSODI  
List Manager 1 FULL^VALM1  

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

Package Total Caller Graph
Integrated Billing 7 IB GENERATE ECME RX BILLS  IBNCPBB1  IBNCPDR2  IBNCPDR4  IBNCPDS1  IBNCPRR  IBTRED SUBMIT ECME  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN ;[IB GENERATE ECME RX BILLS] entry
CT(IBTRN) ;CT ENTRY
MODE ;
; IBMOD1: "P"-Single Patient, "R"-Single Rx
; IBMOD3 (if IBMOD1="P"): "U"-Unbilled, "A"-All Rx
; IBPAT (if IBMOD1="P"): Patient's DFN
; IBBDT,IBEDT (if IBMOD1="P"): From/To dates inclusive
DATE ;
SELECT ;Select from patient's list
; (IBPAT,IBBDT,IBEDT,IBMOD3)
SELECT2 ;Select from Rx list
; (IBRX)
MKCHOICE ;
CONFIRM ;
CONFRX(IBRX) ;
STAT(X) ;
BILL(IBRXN,IBDT) ;Bill IEN (if any) or null
RXDATA(IBRX,IBFIL) ;
DISP(IBITEM) ;
PARSE(X) ;
PAUSE(MESSAGE) ;
SC(IEN) ;Service connected
DLYRC(DFLT) ; function, ask for NCPDP field 357-NV Delay Reason Code
; DFLT = optional default value (integer from 1-14)
; returns code or "^" on time-out, etc.

External References

Name Field # of Occurrence
^%DT DATE+6, DATE+11
EN^DDIOL PAUSE+1, PAUSE+2, PAUSE+3
^DIC MODE+19
^DIE CT+43
^DIR CT+41, MODE+10, MODE+28, CONFIRM+4, CONFRX+4, DLYRC+7
$$INSUR^IBBAPI CT+24
PROCESS^IBNCPBB1 EN+11
$$ECMEBIL^IBNCPDPU CT+52, MODE+21
$$SUBMIT^IBNCPDPU CT+71
$$MACHK^IBNCPDR4 CT+28
$$ROICHK^IBNCPDR4 CT+30
ROICLN^IBNCPDR4 CT+31
$$DAT2^IBOUTL DISP+3
$$FILE^IBRXUTL CT+14, CT+21, CT+23, CT+58, SELECT+13, SELECT2+5, SELECT2+8, RXDATA+3, RXDATA+4, RXDATA+7
$$RXZERO^IBRXUTL SELECT+11, SELECT2+7
$$SUBFILE^IBRXUTL CT+15, CT+23, SELECT+19, SELECT2+11, RXDATA+5
$$DRUG^IBRXUTL1 DISP+4
RX^PSO52API SELECT+6, SELECT+18, SELECT2+10
DIC^PSODI MODE+13
FULL^VALM1 CT+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+12
Function Call: WRITE
  • Prompt: !!,"This option sends electronic Pharmacy Claims to the Payer"
  • Line Location: CT+5
Function Call: WRITE
  • Prompt: !!,"This is not a Pharmacy Claims Tracking record",*7,!
  • Line Location: CT+10
Function Call: WRITE
  • Prompt: !!,"The Prescription is not released.",!
  • Line Location: CT+17
Function Call: WRITE
  • Prompt: !!,"The Rx is marked 'non-billable' in CT: ",$P($G(^IBE(356.8,+$P(IBZ,U,19),0)),U)
  • Line Location: CT+36
Function Call: WRITE
  • Prompt: !,"If you continue, the NON-BILLABLE REASON will be deleted.",!
  • Line Location: CT+37
Function Call: WRITE
  • Prompt: !
  • Line Location: CT+41
Function Call: WRITE
  • Prompt: !!,"The Prescription is marked 'non-billable' in Claims Tracking",*7
  • Line Location: CT+48
Function Call: WRITE
  • Prompt: !,"Reason non-billable: ",$P($G(^IBE(356.8,+$P(IBZ,U,19),0),"Unknown"),U),!
  • Line Location: CT+49
Function Call: WRITE
  • Prompt: !!,"The patient is not ECME Billable at the ",$S(IBFIL:"re",1:""),"fill date."
  • Line Location: CT+54
Function Call: WRITE
  • Prompt: !,"Reason: ",$P(IBRES,U,2,255),!
  • Line Location: CT+55
Function Call: WRITE
  • Prompt: !!,"Rx# ",IBRXN," was previously billed."
  • Line Location: CT+61
Function Call: WRITE
  • Prompt: !,"Please manually cancel the bill# ",$P($G(^DGCR(399,IBBIL,0)),U)," before submitting claim to ECME.",!
  • Line Location: CT+62
Function Call: WRITE
  • Prompt: !,"The bill# ",$P($G(^DGCR(399,IBBIL,0)),U)," has been cancelled.",!
  • Line Location: CT+64
Function Call: WRITE
  • Prompt: !!,"Submitting Rx# ",IBRXN
  • Line Location: CT+70
Function Call: WRITE
  • Prompt: ", Refill# ",IBFIL
  • Condition for execution: IBFIL
  • Line Location: CT+70
Function Call: WRITE
  • Prompt: " ..."
  • Line Location: CT+70
Function Call: WRITE
  • Prompt: !," ",$S(+IBRES=0:"S",1:"Not s")_"ent through ECME."
  • Line Location: CT+71
Function Call: WRITE
  • Prompt: !," *** ECME returned status: ",$$STAT(IBRES),!
  • Line Location: CT+72
Function Call: WRITE
  • Prompt: !!,"The Rx have been submitted to ECME for electronic billing",!
  • Line Location: CT+73
Function Call: WRITE
  • Prompt: !,"???"
  • Line Location: MODE+17
Function Call: WRITE
  • Prompt: *7,!!,"Warning! The patient is currently not ECME billable!"
  • Line Location: MODE+21
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE+3
Function Call: WRITE
  • Prompt: !
  • Line Location: SELECT2+4
Function Call: WRITE
  • Prompt: !,"The Rx does not exist. Please try again."
  • Line Location: SELECT2+7
Function Call: WRITE
  • Prompt: !,"The Rx has not been released. Please try again."
  • Line Location: SELECT2+8
Function Call: WRITE
  • Prompt: !
  • Line Location: MKCHOICE+2
Function Call: WRITE
  • Prompt: !!," No Rxs meet the entered criteria. Please try again."
  • Line Location: MKCHOICE+5
Function Call: READ
  • Variable: IBSEL
  • Timeout: DTIME
  • Line Location: MKCHOICE+7
Function Call: WRITE
  • Prompt: !!,"Enter Line Item(s) to submit to ECME or (A)LL :"
  • Line Location: MKCHOICE+7
Function Call: WRITE
  • Prompt: !?10,"Enter number(s) or item range(s) separated by comma."
  • Line Location: MKCHOICE+8
Function Call: WRITE
  • Prompt: !?10,"Example: 1,3,7-11"
  • Line Location: MKCHOICE+9
Function Call: WRITE
  • Prompt: $E("ALL",$L(IBSEL)+1,3)
  • Line Location: MKCHOICE+11
Function Call: WRITE
  • Prompt: " Nothing selected"
  • Line Location: MKCHOICE+12
Function Call: WRITE
  • Prompt: " Cancelled"
  • Line Location: MKCHOICE+13
Function Call: WRITE
  • Prompt: !!,"No item(s) match the selection."
  • Line Location: MKCHOICE+16
Function Call: WRITE
  • Prompt: !
  • Line Location: CONFIRM+2
Function Call: WRITE
  • Prompt: !
  • Line Location: CONFRX+2
Function Call: WRITE
  • Prompt: !,IBITEM," ",?4,$P(IBD,U,2)," ",?15,$P(IBD,U,3)," ",?20,$$DAT2^IBOUTL($P(IBD,U,4))," "
  • Line Location: DISP+3
Function Call: WRITE
  • Prompt: ?32,$E($$DRUG^IBRXUTL1(+$P(IBD,U,5)),1,30)
  • Line Location: DISP+4
Function Call: WRITE
  • Prompt: ?64,$P($G(^DGCR(399,+IBBIL,0)),U)
  • Line Location: DISP+6
Function Call: WRITE
  • Prompt: "(canc)"
  • Line Location: DISP+6
Routine Call
  • DIC
  • Line Location:
    • MODE+19
Routine Call
  • DIE
  • Line Location:
    • CT+43
Routine Call
  • DIR
  • Line Location:
    • CT+41
    • MODE+10
    • MODE+28
    • CONFIRM+4
    • CONFRX+4
    • DLYRC+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^IBT(356 - [#356] Classic Fileman Calls
^PSRX - [#52] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] CT+60, CT+62, CT+64, DISP+6
^IBA(362.4 - [#362.4] BILL+4, BILL+5
^IBE(356.8 - [#356.8] CT+36, CT+49, SC+3
^IBT(356 - [#356] CT+7, CT+46
^TMP($J EN+2, SELECT+7, SELECT+8, SELECT+9, SELECT+19, SELECT+23!, SELECT+24!, SELECT2+11, SELECT2+13!

Label References

Name Line Occurrences
$$BILL CT+59, RXDATA+8
$$DLYRC CT+66
$$RXDATA SELECT+14, SELECT+20, SELECT2+9, SELECT2+12
$$SC CT+34
$$STAT CT+72
CONFIRM EN+10
CONFRX CT+68
DATE MODE+23
DISP MKCHOICE+3
MKCHOICE SELECT+25, SELECT2+14
MODE EN+7
PARSE MKCHOICE+15
PAUSE EN+12, CT+11, CT+18, CT+24, CT+50, CT+56, CT+63, CT+74
SELECT EN+8
SELECT2 EN+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PAUSE+4*
%DT DATE+1~, DATE+4*, DATE+6!, DATE+9*, DATE+11!
%DT("A" DATE+5*, DATE+10*
%DT("B" DATE+5*, DATE+10*
C DLYRC+3~
CNT1 SELECT+2~, SELECT+3*
CNT2 SELECT+2~, SELECT+3*
DA CT+35~, CT+43*
DATRET RXDATA+2~, RXDATA+9*, RXDATA+10
DFLT DLYRC~, DLYRC+5
DIC MODE+5~, MODE+13*, MODE+19*, DLYRC+3~
DIC(0 MODE+13*, MODE+19*
DIE CT+35~, CT+43*
DIR CT+35~, CT+41!, MODE+5~, MODE+10!, MODE+28!, CONFIRM+1~, CONFRX+1~, DLYRC+3~, DLYRC+7!
DIR("?" CT+40*
DIR("A" CT+38*, MODE+8*, MODE+26*, CONFIRM+3*, CONFRX+3*
DIR("B" CT+39*, MODE+9*, MODE+27*, CONFIRM+3*, CONFRX+3*, DLYRC+5*
DIR("S" DLYRC+6*
DIR(0 CT+38*, MODE+7*, MODE+25*, CONFIRM+3*, CONFRX+3*, DLYRC+7*
DIROUT DLYRC+3~, DLYRC+8
DIRUT MODE+5~, MODE+10, MODE+28, DLYRC+3~, DLYRC+8
DR CT+35~, CT+43*
DT MODE+21, DATE+2
DTIME MKCHOICE+7, PAUSE+4
DTOUT DLYRC+3~, DLYRC+8
DUOUT MODE+5~, MODE+13, MODE+19, DLYRC+3~, DLYRC+8
I PARSE+1~, PARSE+5*, PARSE+6*
>> IBANY CT+24
>> IBANY("IBBAPI" CT+25
IBBDT EN+1~, DATE+2*, DATE+8*, SELECT+10
IBBIL CT+1~, CT+59*, CT+60, CT+62, CT+64, RXDATA+2~, RXDATA+8*, RXDATA+9, DISP+1~, DISP+5*
, DISP+6
IBBILN DISP+1~
IBBN CT+1~
IBCNT SELECT+2~, SELECT+3*, SELECT+15*, SELECT+22*, SELECT2+2~, SELECT2+9*, SELECT2+12*
IBD SELECT+2~, DISP+1~, DISP+2*, DISP+3, DISP+4, DISP+5
IBDATA SELECT+2~, SELECT+14*, SELECT+15, SELECT+20*, SELECT+21, SELECT+22
IBDATE SELECT+2~, SELECT+9*, SELECT+10
IBDELAY CT+1~, CT+66*, CT+71, DLYRC+3~, DLYRC+4*, DLYRC+8*, DLYRC+9*, DLYRC+10
IBDRUG CT+21*, CT+30, RXDATA+2~, RXDATA+7*, RXDATA+9, DISP+1~
IBDT BILL~, BILL+2*, BILL+6, RXDATA+2~, RXDATA+4*, RXDATA+5*, RXDATA+6*, RXDATA+8, RXDATA+9
IBEDT EN+1~, DATE+2*, DATE+13*, SELECT+10
IBERR CT+1~
IBEXIT EN+5~, EN+6*, EN+7, EN+8, EN+9, EN+10, EN+11, CT+1~, CT+68, MODE+10*
MODE+13*, MODE+17*, MODE+19*, MODE+20, MODE+23, MODE+28*, DATE+7*, DATE+12*, SELECT2+7*, SELECT2+8*
MKCHOICE+5*, MKCHOICE+7*, MKCHOICE+10, MKCHOICE+12*, MKCHOICE+13*, MKCHOICE+16*, CONFIRM+4*, CONFRX+4*
IBFDT CT+1~, CT+23*, CT+24, CT+28, CT+30, CT+52
IBFIL CT+1~, CT+8*, CT+14, CT+15, CT+23, CT+44, CT+54, CT+70, CT+71, RXDATA~
, RXDATA+4, RXDATA+5, RXDATA+9
>> IBINS CT+25*, CT+30
IBITEM DISP~, DISP+2, DISP+3
IBMOD1 EN+1~, EN+8, EN+9, MODE+6*, MODE+11*, MODE+13, MODE+15, MODE+17
IBMOD3 EN+1~, MODE+6*, MODE+29*, SELECT+15, SELECT+21
IBPAT EN+1~, CT+1~, CT+20*, CT+24, CT+30, CT+52, MODE+19*, MODE+21, SELECT+6, SELECT+9
SELECT+11, SELECT+12, SELECT+18, SELECT+19
IBPAUSE EN+1~, EN+3*, EN+12, MODE+10*, MODE+13*, MODE+19*, MODE+23*, MODE+28*, SELECT2+4*
IBQ CT+1~, CT+3*, CT+24, CT+28*, CT+30*, CT+31, CT+34*, CT+42*
IBRDT CT+2~, CT+14*, CT+15*, CT+16, CT+59
IBREF EN+1~, EN+2*, EN+4, EN+13, SELECT+15, SELECT+22, SELECT2+9, SELECT2+12, MKCHOICE+3, MKCHOICE+5
MKCHOICE+6, DISP+2, PARSE+5, PARSE+8, PARSE+12
IBRES CT+2~, CT+52*, CT+53, CT+55, CT+71*, CT+72, CT+73
IBRX EN+1~, CT+2~, CT+8*, CT+9, CT+14, CT+15, CT+21, CT+23, CT+44, CT+58
, CT+71, MODE+13*, SELECT+2~, SELECT+8*, SELECT+9, SELECT+11, SELECT+13, SELECT+14, SELECT+18, SELECT+19
SELECT+20, SELECT2+5, SELECT2+7, SELECT2+8, SELECT2+9, SELECT2+10, SELECT2+11, SELECT2+12, CONFRX~, CONFRX+3
, RXDATA~, RXDATA+3, RXDATA+4, RXDATA+5, RXDATA+7, RXDATA+9
IBRXN CT+2~, CT+58*, CT+59, CT+61, CT+68, CT+70, BILL~, BILL+4, RXDATA+2~, RXDATA+3*
, RXDATA+8, RXDATA+9
IBSCRES CT+2~
IBSCRES( CT+44*
IBSEL EN+1~, MKCHOICE+7*, MKCHOICE+11*, MKCHOICE+12, MKCHOICE+13, MKCHOICE+15, PARSE+4
IBSEL( PARSE+5*
IBSEL(0 MKCHOICE+16
IBSEL(1 MKCHOICE+6*
IBT SC+1~, SC+3*, SC+4, SC+5
IBTRN CT~, CT+7, CT+31, CT+43, CT+46
IBZ CT+2~, CT+7*, CT+8, CT+20, CT+34, CT+36, CT+46*, CT+47, CT+49, SELECT+2~
SELECT+11*, SELECT+12, BILL+1~, BILL+5*, BILL+6
IEN SC~, SC+2, SC+3
J PARSE+1~, PARSE+12*
LIST SELECT+2~, SELECT+4*, SELECT+6, SELECT+7, SELECT+8, SELECT+9, SELECT+24
LIST2 SELECT+2~, SELECT+16*, SELECT+18, SELECT+19, SELECT+23
LST SELECT2+2~, SELECT2+6*, SELECT2+10, SELECT2+11, SELECT2+13
MESSAGE PAUSE~, PAUSE+2
N PARSE+1~, PARSE+6*, PARSE+7, PARSE+8, PARSE+11
N1 PARSE+10~, PARSE+11*, PARSE+12
N2 PARSE+10~, PARSE+11*, PARSE+12
NODE SELECT+2~, SELECT+5*, SELECT+6, SELECT+17*, SELECT+18
PDFN SELECT+2~, SELECT2+2~, SELECT2+5*, SELECT2+7, SELECT2+10, SELECT2+11
PSODIY MODE+14!
PSOFILE MODE+5~, MODE+13*
RES BILL+1~, BILL+3*, BILL+4, BILL+6*, BILL+7
RFNUM SELECT+2~, SELECT+19*, SELECT+20
RIFN SELECT2+2~, SELECT2+3*, SELECT2+11*, SELECT2+12
RXNUMEXT SELECT+2~, SELECT+7*, SELECT+8
U CT+8, CT+20, CT+34, CT+36, CT+47, CT+49, CT+55, CT+60, CT+62, CT+64
SELECT+12, SELECT+15, SELECT+21, BILL+6, DISP+3, DISP+4, DISP+5, DISP+6, SC+3
>> VALMBCK CT+6*
X STAT~, STAT+1, BILL+1~, BILL+4*, BILL+5, PARSE~, PARSE+2*, PARSE+3*, PARSE+6, DLYRC+3~
X( PARSE+8*, PARSE+12*
Y CT+35~, CT+42, MODE+5~, MODE+11, MODE+13, MODE+19, MODE+29, DATE+1~, DATE+7, DATE+8
DATE+12, DATE+13, SELECT+2~, SELECT2+2~, MKCHOICE+1~, MKCHOICE+3*, CONFIRM+1~, CONFIRM+4, CONFRX+1~, CONFRX+4
, DLYRC+3~, DLYRC+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All