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

Package: Integrated Billing

Routine: IBCERPN


Information

IBCERPN ;ALB/VD - RPN Resubmission/Printing Claims No Changes CSA Report ;1/16/2019

Source Information

Source file <IBCERPN.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  ($$FMTE,$$HTE,$$NOW)^XLFDT  
Integrated Billing 2 $$TXT^IBCECSA1  $$CURR^IBCEF2  
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 IBCE RESUB FROM CSA RPT  

Entry Points

Name Comments DBIA/ICR reference
ENT ; Menu Option Entry Point
QUE ; Queued Entry Point
DATES ; Enter the date range for this report
DEVICE ; - Ask device
GATHER ;GATHER THE INFO BASED ON THE DATE RANGE ENTERED
; Uses the ^IBM(361,"ARPN",CURDAT,IBNO,USER,ACTION) cross-reference file to get
; data within date range. If data is within date range this sets up the ^TMP($J
; file with all data needed for the report.
PRINT ; Print data
END
HDRINIT ; Initial setting
HEADER ; Print Header info
EXIT() ;clean up and quit

External References

Name Field # of Occurrence
^%ZIS DEVICE+3
HOME^%ZIS DEVICE+10
^%ZISC EXIT+6
^%ZTLOAD DEVICE+8
^DIR DATES+5, DATES+10, DEVICE+11, END+1, HEADER+5
$$TXT^IBCECSA1 GATHER+19
$$CURR^IBCEF2 GATHER+15
$$FMTE^XLFDT QUE+3, DATES+9, PRINT+21, HDRINIT+10
$$HTE^XLFDT DATES+4
$$NOW^XLFDT HDRINIT+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DATES+2
Function Call: WRITE
  • Prompt: !
  • Line Location: DATES+7
Function Call: WRITE
  • Prompt: !!!,"You will need a 132 column printer for this report",!
  • Line Location: DEVICE+2
Function Call: WRITE
  • Prompt: !!,$S($D(ZTSK):"Your task number "_ZTSK_" has been queued.",1:"Unable to queue this job.")
  • Line Location: DEVICE+9
Function Call: WRITE
  • Prompt: !!!
  • Line Location: DEVICE+11
Function Call: WRITE
  • Prompt: !!!,NONEMSG
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: !,$J(LCTR,3),?7,IBCLMNO,?16,$E(IBPAY,1,20),?38,$E(USRNAM,1,15),?59
  • Line Location: PRINT+20
Function Call: WRITE
  • Prompt: $E(IBEMSG,1,50),?111,$P($$FMTE^XLFDT(CURDAT,2),"@"),?120,$J("$"_$FN(IBCBAL,"",2),12)
  • Line Location: PRINT+21
Function Call: WRITE
  • Prompt: !!!,?49,EORMSG,!!!
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDRINIT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: !,HDR1,?59,HDR2,?114," Page: "_PGC_" of "_PAGES
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: !,LEGEND
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !!,?7,"Bill #",?17,"Payer Name",?38,"User Name",?59,"Error Message/Narrative/Category",?111,"Date",?124,"Curr Bal"
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: !,DASH
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EXIT+3
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+3
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+10
Routine Call
  • DIR
  • Line Location:
    • DATES+5
    • DATES+10
    • DEVICE+11
    • END+1
    • HEADER+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] GATHER+13, GATHER+14, GATHER+17
^DIC(36 - [#36] GATHER+14, GATHER+15
^IBM(361 - [#361] GATHER+10, GATHER+11, GATHER+12, GATHER+21, GATHER+23
^TMP( QUE+1!, GATHER+26*, PRINT+10, PRINT+11, PRINT+12, PRINT+13, PRINT+14, PRINT+15, PRINT+16, EXIT+7!
^VA(200 - [#200] GATHER+25

Label References

Name Line Occurrences
DATES ENT+4
DEVICE ENT+6
END PRINT+10
EXIT QUE+8
GATHER QUE+2
HDRINIT QUE+5
HEADER QUE+6, PRINT+17, PRINT+23
PRINT QUE+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEVICE+1~, DEVICE+3*
ACTION GATHER+5~, GATHER+24*, GATHER+26
ARPNRC GATHER+5~, GATHER+23*, GATHER+24
BEGDT ENT+1~, QUE+3*, QUE+4, EXIT+8!
BEGIN ENT+1~, ENT+5, DATES+5*, EXIT+8!
BILLDT ENT+1~
BILLNO ENT+1~
CNT ENT+1~
CURBAL ENT+1~
CURDAT GATHER+5~, GATHER+9*, GATHER+10*, GATHER+11, GATHER+21, GATHER+26, PRINT+5~, PRINT+14*, PRINT+15, PRINT+16
, PRINT+21
DASH ENT+1~, GATHER+7*, HEADER+10
DIR DATES+1~, DATES+5!, DATES+10!, DEVICE+11!, END+1!, HEADER+1~, HEADER+5!
DIR("?" DATES+4*, DATES+9*
DIR("A" DATES+3*, DATES+8*
DIR("B" DATES+4*, DATES+9*
DIR(0 DATES+3*, DATES+8*, DEVICE+11*, END+1*, HEADER+5*
DT ENT+1~, DATES+9
DUOUT HEADER+1~, HEADER+5
END ENT+1~, ENT+5, DATES+10*
ENDDT ENT+1~, QUE+3*, QUE+4, EXIT+8!
EORMSG ENT+1~, PRINT+5~, PRINT+6*, END
HDR1 ENT+1~, HDRINIT+9*, HEADER+7
HDR2 ENT+1~, HDRINIT+10*, HEADER+7
IBABEG ENT+1~, QUE+3, DATES+5*, GATHER+9, EXIT+8!
IBAEND ENT+2~, QUE+3, DATES+10*, GATHER+10, EXIT+8!
IBCBAL GATHER+5~, GATHER+18*, GATHER+26, PRINT+5~, PRINT+16*, PRINT+21
IBCLMNO GATHER+5~, GATHER+13*, GATHER+26, PRINT+5~, PRINT+15*, PRINT+16, PRINT+20
IBEMSG GATHER+19*, GATHER+20*, GATHER+26, PRINT+5~, PRINT+13*, PRINT+14, PRINT+15, PRINT+16, PRINT+21
IBIFN GATHER+5~, GATHER+12*, GATHER+13, GATHER+14, GATHER+15, GATHER+17, GATHER+26
IBNO GATHER+5~, GATHER+11*, GATHER+12, GATHER+19, GATHER+21, GATHER+23
IBOAM GATHER+5~, GATHER+17*, GATHER+18
IBPAY GATHER+5~, GATHER+14*, GATHER+15*, GATHER+16*, GATHER+26, PRINT+5~, PRINT+12*, PRINT+13, PRINT+14, PRINT+15
, PRINT+16, PRINT+20
IBQUIT ENT+2~, ENT+3*, ENT+4, ENT+6, QUE+6, DEVICE+3*, DEVICE+4*, PRINT+14, PRINT+15, PRINT+17
, PRINT+24, HEADER+3, HEADER+5*, EXIT+8!
IEN EXIT+8!
IO DEVICE+12
IO("Q" DEVICE+4
IOF HDRINIT+2, HEADER+6, EXIT+3
IOSL GATHER+8
IOST DEVICE+11, END+1, HDRINIT+2, HEADER+5, EXIT+3
LCTR PRINT+5~, PRINT+8*, PRINT+18*, PRINT+20
LEGEND ENT+2~, ENT+5*, QUE+4*, HEADER+8
LNCNT ENT+2~, GATHER+6~, PRINT+17, PRINT+22*, PRINT+23, HDRINIT+1*, HDRINIT+5*, HEADER+2*, HEADER+11*, EXIT+8!
LNTOT ENT+2~, GATHER+8*, GATHER+27*, HDRINIT+3, HDRINIT+4, HDRINIT+6
MAX ENT+2~, GATHER+8*, PRINT+17, PRINT+23, HDRINIT+6
NARATV ENT+2~
NONEMSG PRINT+5~, PRINT+7*, PRINT+10
PAGES ENT+2~, HDRINIT+3*, HDRINIT+6*, HDRINIT+7*, HDRINIT+8*, HEADER+7
PAYNAM ENT+2~
PGC ENT+2~, GATHER+8*, HDRINIT+2, HDRINIT+4, HEADER+3, HEADER+7, HEADER+11*
POP ENT+2~, ENT+6, DEVICE+3
RNAME ENT+2~, ENT+3*, QUE+1, GATHER+26, PRINT+10, PRINT+11, PRINT+12, PRINT+13, PRINT+14, PRINT+15
, PRINT+16, EXIT+7
SEQ GATHER+6~, GATHER+21*, GATHER+23
U GATHER+13, GATHER+14, GATHER+15, GATHER+18, GATHER+24, GATHER+25, GATHER+26
USER GATHER+6~, GATHER+24*, GATHER+25, GATHER+26
USERNM ENT+2~
USRNAM GATHER+6~, GATHER+25*, GATHER+26, PRINT+5~, PRINT+11*, PRINT+12, PRINT+13, PRINT+14, PRINT+15, PRINT+16
, PRINT+20
Y ENT+2~, ENT+4, DATES+5, DATES+8, DATES+10, EXIT+8!
Y(0 DATES+5, DATES+10
ZTDESC DEVICE+1~, DEVICE+5*
ZTIO DEVICE+1~
ZTQUEUED DEVICE+1~, EXIT+5, EXIT+6
ZTREQ EXIT+1~, EXIT+5*
ZTRTN DEVICE+1~, DEVICE+5*
ZTSAVE DEVICE+1~
ZTSAVE("BEGDT" DEVICE+7*
ZTSAVE("BEGIN" DEVICE+6*
ZTSAVE("END" DEVICE+6*
ZTSAVE("ENDDT" DEVICE+7*
ZTSAVE("IBABEG" DEVICE+6*
ZTSAVE("IBAEND" DEVICE+6*
ZTSAVE("IBQUIT" DEVICE+7*
ZTSAVE("RNAME" DEVICE+7*
ZTSK DEVICE+9, DEVICE+10!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All