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

Package: Integrated Billing

Routine: IBCICMEP


Information

IBCICMEP ;DSI/JSR - ClaimsManager ERROR REPORT ;6-APR-2001

Source Information

Source file <IBCICMEP.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 2 $$S^%ZTLOAD  $$NOW^XLFDT  
Integrated Billing 1 $$CMTINFO^IBCIUT5  
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: 1

Package Total Caller Graph
Integrated Billing 1 IBCICME  

Entry Points

Name Comments DBIA/ICR reference
EN ; this is the only entry point
PRINT ; prints data extracted
PRINT2 ; print audit report
HEADER ; header for main report
HEAD2 ; only printed when insurance is a selected sort
HEADA ; only for audit header
DATA ; formats line item data - note claims with same edit error mnemonic
; may print mulitple times if the HFCA line item is an unique line
; with the same error type. The report prints the error mnemonic and
; the HCFA line # as it relates to IB.
ERROR ; this is a unique error which CM reports
COMM ; print CM user comments these comments are keyed by the user
LINE ; print report detail line
XIT ; one exit point

External References

Name Field # of Occurrence
$$S^%ZTLOAD HEADER+2, HEADA+2
^DIR EN+26, HEADER+1, HEADA+1
$$CMTINFO^IBCIUT5 COMM+4
$$NOW^XLFDT HEADER+7, HEADA+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?35,"N O D A T A F O U N D",!!
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: ?35,"N O D A T A F O U N D",!
  • Line Location: PRINT2+5
Function Call: WRITE
  • Prompt: ?20,SORT1,?40,$J($FN(AUDIT,","),9),!
  • Line Location: PRINT2+9
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT2+10
Function Call: WRITE
  • Prompt: ?20,"Total # Claims",?40,$J($FN($P($G(IBCITOT),U,1),","),9),!
  • Line Location: PRINT2+13
Function Call: WRITE
  • Prompt: ?20,"Total # Errors",?40,$J($FN($P($G(IBCITOT),U,2),","),9),!
  • Line Location: PRINT2+14
Function Call: WRITE
  • Prompt: @IOF,!,"ClaimsManager Detailed Error Report sort by "_RPTTYP(GROUPBY)_" for "
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: $E(IBCIBEG,4,5)_"/"_$E(IBCIBEG,6,7)_"/"_$E(IBCIBEG,2,3)_" thru "_$E(IBCIEND,4,5)_"/"_$E(IBCIEND,6,7)_"/"_$E(IBCIEND,2,3)
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: ?100,"Page :"_IBCIPGCT,!
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: "Detailed Report",?100,"Run Date: "_IBCIRUN,!!
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: ?1,"ERROR",?8,"BILL NO.",?18,"PATIENT NAME",?44,"PID",?50," EVENT",?60,"BILLER",?68,"CODER",?76,"ASSIGN",?84,"ERROR CODES",?102,"TYPE",?108,"CHARGES",?116,"CM STATUS"
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: ?1,"ERROR",?8,"BILL NO.",?18,"PATIENT NAME",?44,"PID",?50," ENTER",?60,"BILLER",?68,"CODER",?76,"ASSIGN",?84,"ERROR CODES",?102,"TYPE",?108,"CHARGES",?116,"CM STATUS"
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: !,X,!
  • Line Location: HEADER+11
Function Call: WRITE
  • Prompt: ?2,"INSURANCE: "_SORT4,!
  • Line Location: HEAD2+4
Function Call: WRITE
  • Prompt: @IOF,!,"ClaimsManager Audit Error Report for "
  • Line Location: HEADA+4
Function Call: WRITE
  • Prompt: $E(IBCIBEG,4,5)_"/"_$E(IBCIBEG,6,7)_"/"_$E(IBCIBEG,2,3)_" thru "_$E(IBCIEND,4,5)_"/"_$E(IBCIEND,6,7)_"/"_$E(IBCIEND,2,3)
  • Line Location: HEADA+5
Function Call: WRITE
  • Prompt: ?100,"Page :"_IBCIPGCT,!
  • Line Location: HEADA+6
Function Call: WRITE
  • Prompt: "Summary Report"
  • Line Location: HEADA+7
Function Call: WRITE
  • Prompt: "Detailed Report"
  • Line Location: HEADA+8
Function Call: WRITE
  • Prompt: ?100,"Run Date: "_IBCIRUN,!!
  • Line Location: HEADA+10
Function Call: WRITE
  • Prompt: ?10,"CM Error Message: "
  • Line Location: ERROR+5
Function Call: WRITE
  • Prompt: ?28,IBCITXT,!
  • Line Location: ERROR+7
Function Call: WRITE
  • Prompt: !
  • Line Location: ERROR+8
Function Call: WRITE
  • Prompt: ?10,$$CMTINFO^IBCIUT5(IBIFN),!
  • Line Location: COMM+4
Function Call: WRITE
  • Prompt: ?28,IBCITXT,!
  • Line Location: COMM+9
Function Call: WRITE
  • Prompt: !
  • Line Location: COMM+10
Function Call: WRITE
  • Prompt: ?1,IBCI12_"*"_IBCI11,?8,IBCI1,?19,$E(NAME,1,23),?44,$E(IBCI2,6,9)
  • Line Location: LINE+5
Function Call: WRITE
  • Prompt: ?50,IBCIDT,?60,$E(IBCI4,1,6),?68,$E(IBCI5,1,6),?76,$E(IBCI6,1,6)
  • Line Location: LINE+6
Function Call: WRITE
  • Prompt: ?84,IBCI10,?102,IBCI7,?108,$J($FN(IBCI8,",",0),6),?116,IBCIX,!
  • Line Location: LINE+7
Routine Call
  • DIR
  • Line Location:
    • EN+26
    • HEADER+1
    • HEADA+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" HEADER+7, HEADA+9
^IBA(351.9 - [#351.9] ERROR+1, ERROR+4, COMM+1, COMM+5, COMM+6
^IBA(351.91 - [#351.91] EN+14, EN+15
^TMP($J PRINT+1, PRINT+2, PRINT+3, PRINT+4, PRINT+6, PRINT+9, PRINT+10, PRINT+11, PRINT+12, PRINT2+1
PRINT2+5, PRINT2+6, PRINT2+8, PRINT2+11, DATA+4, DATA+16

Label References

Name Line Occurrences
COMM PRINT+16
DATA PRINT+13
ERROR PRINT+15
HEAD2 PRINT+8, LINE+3
HEADA PRINT2+2
HEADER PRINT+1, PRINT+5, PRINT2+7, HEAD2+3, ERROR+2, ERROR+6, COMM+2, COMM+7, LINE+2, LINE+3
LINE PRINT+14
PRINT EN+24
PRINT2 EN+25
XIT EN+27

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ASSIGN EN+1~, EN+6*, PRINT+5
AUDIT EN+1~, PRINT2+8*, PRINT2+9
COMMEN EN+1~, EN+7*, PRINT+16
CRT EN+1~, EN+22*, EN+23*, EN+26, HEADER+1, HEADA+1
DATE EN+1~, EN+10*, HEADER+9
DIR EN+26!, HEADER+1!, HEADA+1!
DIR(0 EN+26*, HEADER+1*, HEADA+1*
>> DTOUT EN+26, HEADER+1, HEADA+1
>> DUOUT EN+26, HEADER+1, HEADA+1
EFLAG EN+1~, EN+12*, PRINT+15
ERRSEQ EN+1~, ERROR+1*, ERROR+4, ERROR+5
GROUPBY EN+1~, EN+8*, PRINT+8, HEADER+4, HEAD2+1
I EN+1~, EN+15*
IBCI1 EN+1~, DATA+5*, LINE+5
IBCI10 EN+1~, DATA+15*, LINE+7
IBCI11 EN+2~, DATA+17*, LINE+5
IBCI12 EN+2~, DATA+18*, LINE+5
IBCI2 EN+2~, DATA+6*, LINE+5
IBCI3 EN+2~, DATA+7*, DATA+8
IBCI4 EN+2~, DATA+9*, LINE+6
IBCI5 EN+2~, DATA+10*, LINE+6
IBCI6 EN+2~, DATA+11*, LINE+6
IBCI7 EN+2~, DATA+12*, LINE+7
IBCI8 EN+2~, DATA+13*, LINE+7
IBCI9 EN+2~, DATA+14*, DATA+19
IBCIARR EN+2~, EN+3~
IBCIARR( EN+15*, DATA+19
IBCIBEG EN+3~, EN+9*, HEADER+5, HEADA+5
IBCID2 EN+3~, DATA+16*, DATA+17, DATA+18
IBCIDATA EN+3~, DATA+4*, DATA+5, DATA+6, DATA+7, DATA+9, DATA+10, DATA+11, DATA+12, DATA+13
DATA+14, DATA+15
IBCIDT EN+3~, DATA+8*, LINE+6
IBCIEMN EN+3~, PRINT+12*, DATA+16, ERROR+1, ERROR+4
IBCIEND EN+3~, EN+11*, HEADER+5, HEADA+5
IBCIPGCT EN+3~, EN+13*, EN+26, PRINT+8, HEADER+1, HEADER+3*, HEADER+6, HEADA+1, HEADA+3*, HEADA+6
LINE+3
IBCIPXT EN+5~, EN+13*, EN+25, EN+26*, PRINT+2, PRINT+3, PRINT+4, PRINT+6, PRINT+8, PRINT+9
PRINT+10, PRINT+11, PRINT+12, PRINT2+3, PRINT2+6, HEADER+1*, HEAD2+2, HEAD2+3, HEAD2+4, HEAD2+5
HEADA+1*, ERROR+1, ERROR+3, ERROR+6, COMM+2, COMM+3, COMM+5, COMM+7, COMM+8, LINE+1
LINE+2, LINE+3, LINE+4
IBCIQT EN+4~
>> IBCIRTN PRINT+1, PRINT+2, PRINT+3, PRINT+4, PRINT+6, PRINT+9, PRINT+10, PRINT+11, PRINT+12, PRINT2+1
PRINT2+5, PRINT2+6, PRINT2+8, PRINT2+11, DATA+4, DATA+16
IBCIRUN EN+4~, HEADER+7*, HEADER+8, HEADA+9*, HEADA+10
IBCISEQ EN+4~, COMM+5*, COMM+6
IBCITOT EN+4~, PRINT2+11*, PRINT2+13, PRINT2+14
IBCITXT EN+4~, ERROR+4*, ERROR+7, COMM+6*, COMM+9
IBCIX EN+4~, EN+5~, DATA+19*, LINE+7
IBIFN EN+4~, PRINT+11*, PRINT+12, DATA+4, DATA+16, ERROR+1, ERROR+4, COMM+1, COMM+4, COMM+5
COMM+6
IOF HEADER+4, HEADA+4
IOSL EN+22, EN+23
IOST EN+22
MAXCNT EN+4~, EN+22*, EN+23*, PRINT2+7, HEAD2+3, ERROR+2, ERROR+6, COMM+2, COMM+7, LINE+2
NAME EN+5~, PRINT+10*, PRINT+11, PRINT+12, DATA+4, DATA+16, LINE+5
PREV EN+4~, PRINT+7*
>> RPTSPECS("ASNSORT" EN+6
>> RPTSPECS("BEGDATE" EN+9
>> RPTSPECS("DATYP" EN+10
>> RPTSPECS("DIS PLAY ERROR TEXT" , EN+12
>> RPTSPECS("ENDDATE" EN+11
>> RPTSPECS("IBCICOMM" EN+7
>> RPTSPECS("SORTBY" EN+8
>> RPTSPECS("TYPE" EN+24, PRINT2+1, HEADA+7
RPTTYP EN+5~
RPTTYP( HEADER+4
RPTTYP(1 EN+16*
RPTTYP(2 EN+17*
RPTTYP(3 EN+18*
RPTTYP(4 EN+19*
RPTTYP(5 EN+20*
SORT1 EN+5~, PRINT+2*, PRINT+3, PRINT+4, PRINT+6, PRINT+9, PRINT+10, PRINT+11, PRINT+12, PRINT2+6*
PRINT2+8, PRINT2+9, DATA+4, DATA+16
SORT2 EN+5~, PRINT+3*, PRINT+4, PRINT+6, PRINT+9, PRINT+10, PRINT+11, PRINT+12, DATA+4, DATA+16
SORT3 EN+5~, PRINT+4*, PRINT+6, PRINT+9, PRINT+10, PRINT+11, PRINT+12, DATA+4, DATA+16
SORT4 EN+5~, PRINT+6*, PRINT+7, PRINT+9, PRINT+10, PRINT+11, PRINT+12, HEAD2+4, HEAD2+5, DATA+4
DATA+16
SORT5 EN+5~, PRINT+9*, PRINT+10, PRINT+11, PRINT+12, DATA+4, DATA+16
STOP EN+5~
U EN+14, EN+15, PRINT2+13, PRINT2+14, DATA+5, DATA+6, DATA+7, DATA+9, DATA+10, DATA+11
DATA+12, DATA+13, DATA+14, DATA+15, DATA+17, DATA+18
X EN+5~, HEADER+11~*
Y EN+5~, HEADER+7*, HEADA+9*
Z EN+5~, EN+14*, EN+15
>> ZTQUEUED EN+26, HEADER+1, HEADER+2, HEADA+1, HEADA+2
>> ZTSTOP PRINT+2, PRINT+3, PRINT+4, PRINT+6, PRINT+9, PRINT+10, PRINT+11, PRINT+12, PRINT2+6, HEADER+2*
HEADA+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All