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

Package: Integrated Billing

Routine: IBCNERPL


Information

IBCNERPL ;IB/BAA/AWC - IBCN HL7 RESPONSE REPORT PRINT;25 Feb 2015

Source Information

Source file <IBCNERPL.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Integrated Billing 2 $$VISN^IBATUTL  $$FO^IBCNEUT1  
Kernel 2 $$S^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  
Registration 1 $$SITE^VASITE  
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 IBCNERPK  

Entry Points

Name Comments DBIA/ICR reference
EN(IBCNERTN,INCNESPJ) ; Entry point
PRINT ; Get Print Info
; ?3,"Payer Name",?27,"Patient Name",?50,"SSN",?56,"Dt Sent",?76,"Dt Rec'd",?96,"Trace #",?115,"Buffer #"
EXIT ;
EOL ; display "end of page" message and set exit flag
EHDR ; print header for excel
; IB*737/DTG new tag, header for excel only
HEADER ; print header for each page
LINE(LINE) ; Print line of data
; IB*737/DTG handle Excel Header different than report
; I $Y+1>MAXCNT D HEADER I $G(ZTSTOP)!IBPXT Q
CENTER(LINE) ; return length of a centered line
; LINE - line to center

External References

Name Field # of Occurrence
$$S^%ZTLOAD HEADER+4
^DIR EOL+3
$$VISN^IBATUTL EN+7
$$FO^IBCNEUT1 EN+55, EN+60, EXIT+1
$$SITE^VASITE EN+8
$$FMTE^XLFDT EN+13, EN+20, EN+45, EN+46, PRINT+12, PRINT+13
$$NOW^XLFDT EN+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+33
Function Call: WRITE
  • Prompt: !
  • Line Location: EOL+2
Function Call: WRITE
  • Prompt: "HL7 Response Report"_U_TSTAMP,!
  • Line Location: EHDR+4
Function Call: WRITE
  • Prompt: ?1,HDR1,!,!
  • Line Location: EHDR+5
Function Call: WRITE
  • Prompt: ?1,$S($G(INCNESPJ("PYR"))="A":"All",1:"Selected")_" Payers",!
  • Line Location: EHDR+6
Function Call: WRITE
  • Prompt: "Payer Name"_U_"Patient Name"_U_"SSN"_U_"Dt Sent"_U_"Dt Rec'd"_U_"Trace #"_U_"Buffer #"
  • Line Location: EHDR+7
Function Call: WRITE
  • Prompt: @IOF,!,?1,"HL7 Response Report"
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: ?OFFSET,HDR
  • Line Location: HEADER+11
Function Call: WRITE
  • Prompt: !,?1,HDR1,!,!
  • Line Location: HEADER+12
Function Call: WRITE
  • Prompt: ?1,$S($G(INCNESPJ("PYR"))="A":"All",1:"Selected")_" Payers"
  • Line Location: HEADER+13
Function Call: WRITE
  • Prompt: !,?3,"Payer Name",?27,"Patient Name",?50,"SSN",?56,"Dt Sent",?76,"Dt Rec'd",?96,"Trace #",?115,"Buffer #"
  • Line Location: HEADER+15
Function Call: WRITE
  • Prompt: !,?3,"Payer Name",?27,"Patient Name",?50,"SSN",?56,"Dt Sent",?76,"Dt Rec'd",?96,"Trace #",?115,"Buffer #"
  • Line Location: HEADER+16
Function Call: WRITE
  • Prompt: !,?1,DASHES
  • Line Location: HEADER+17
Function Call: WRITE
  • Prompt: !,?1,LINE
  • Line Location: LINE+6
Routine Call
  • DIR
  • Line Location:
    • EOL+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] EN+5
^TMP($J EN+35, EN+37, EN+39, EN+40, EN+41, EN+55, EN+59, EN+60, EN+61, EN+62
PRINT+2
^XTV(8989.3 - [#8989.3] EN+4

Label References

Name Line Occurrences
$$CENTER EN+55, EXIT+1
EHDR EN+34
EOL EN+32, EXIT+2, HEADER+3, LINE+5
EXIT EN+53
HEADER EN+54, LINE+4
LINE EN+32, EN+35, EN+47, EN+55, EN+60, PRINT+16, EXIT+1
PRINT EN+62

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CRT EN+1~, EN+22*, EN+23*, EN+32, EXIT+2, HEADER+3, LINE+5
DASHES EN+2~, EN+19*, HEADER+17
DDATA EN+1~, PRINT+2*, PRINT+5, PRINT+7, PRINT+8, PRINT+12, PRINT+13, PRINT+14, PRINT+15
DEFINST EN+3~, EN+4*, EN+5, EN+6
DEFSTAT EN+2~
DIR EOL+1~, EOL+3!
DIR(0 EOL+3*
DIROUT EOL+1~
DIRUT EOL+1~
DLINE EN+1~, PRINT+2*, PRINT+5*, PRINT+7*, PRINT+8*, PRINT+12*, PRINT+13*, PRINT+14*, PRINT+15*, PRINT+16
DTOUT EOL+1~, EOL+4
DUOUT EOL+1~, EOL+4
EORMSG EN+1~, EN+11*, EN+32, EXIT+1
HD1 EN+2~
HD2 EN+2~
HD3 EN+2~
HDR HEADER+1~, HEADER+9*, HEADER+10, HEADER+11
HDR1 EN+3~, EN+20*, EHDR+5, HEADER+12
IBCNERTN EN~, EN+35, EN+37, EN+39, EN+40, EN+41, EN+55, EN+59, EN+60, EN+61
, EN+62, PRINT+2
IBD EN+1~, PRINT+12*, PRINT+13*
IBPGC EN+1~, EN+9*, EN+32, EXIT+2, EHDR+3*, HEADER+3, HEADER+5*, HEADER+9, LINE+5
IBPWIDTH EN+16~*, HEADER+10, CENTER+6
IBPXT EN+1~, EN+9*, EN+32, EN+37, EN+39, EN+40, EN+53, EN+54, EN+59, EN+60
, EN+61, EN+62, EOL+4*, HEADER+3, HEADER+4*, LINE+3
INCNESPJ EN~
INCNESPJ("BEGDT" EN+20
INCNESPJ("ENDDT" EN+20
INCNESPJ("PYR" EHDR+6, HEADER+13
INCNESPJ("TYPE" EN+14
INCNESPJ("WIDTH" EN+16
IOF HEADER+6
IOSL EN+22, EN+23
IOST EN+23, EN+33
LENGTH CENTER+2~, CENTER+5*, CENTER+6, CENTER+7
LIN EOL+1~, EOL+2*
LINE LINE~, LINE+6, CENTER~, CENTER+5
LOUT EN+3~, EN+41*, EN+45*, EN+46*, EN+47
MAXCNT EN+1~, EN+22*, EN+23*, EOL+2, LINE+3
N EN+3~, EN+40*, EN+41, EN+62*, PRINT+2
NONEMSG EN+1~, EN+10*, EN+35, EN+55
NPROC EN+1~, EN+12*, EN+60
OFFSET HEADER+1~, HEADER+10*, HEADER+11, CENTER+2~, CENTER+6*, CENTER+7
RECVD EN+2~, EN+46*
SENT EN+2~, EN+45*
SITE EN+3~, EN+8*
SRT HEADER+1~
SRT1 EN+1~, EN+25*, EN+37*, EN+39, EN+40, EN+41, EN+59*, EN+60, EN+61, EN+62
PRINT+2
SRT2 EN+1~, EN+39*, EN+40, EN+41, EN+61*, EN+62, PRINT+2
SSN EN+1~
SSNLEN EN+1~
STATION EN+2~, EN+5*, EN+6*, EN+7
TSTAMP EN+1~, EN+13*, EHDR+4, HEADER+9
TYPE EN+2~, EN+14*, EN+16, EN+18, EN+32, EN+53, LINE+4, LINE+5
U EN+4, EN+5, EN+8, EN+45, EN+46, PRINT+5, PRINT+7, PRINT+8, PRINT+12, PRINT+13
PRINT+14, PRINT+15, EHDR+4, EHDR+7
VDATE EN+2~
VISN EN+3~, EN+7*
WIDTH EN+2~, EN+18*, EN+19
X EN+2~
Y EN+2~
>> ZTQUEUED EN+32, EN+33, EXIT+2, HEADER+3, HEADER+4, LINE+5
>> ZTSTOP EN+32, EN+37, EN+39, EN+40, EN+53, EN+54, EN+59, EN+60, EN+61, EN+62
HEADER+4*, LINE+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All