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

Package: Integrated Billing

Routine: IBCSCH2


Information

IBCSCH2 ;ALB/DLS - Continuation of routine IBCSCH ;12 JUN 2007

Source Information

Source file <IBCSCH2.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Integrated Billing 6 ($$BOX24D,OUTPT)^IBCEF11  $$BILLN^IBCEFG0  SPECIFIC^IBCEU5  $$PRVTYP^IBCRU6  $$PAUSE^IBCSCH1  $$PRVLIC^IBCU1  
Kernel 5 $$FMTE^XLFDT  $$UP^XLFSTR  $$IEN2DATA^XUA4A72  $$ESBLOCK^XUSESIG1  $$NPI^XUSNPI  
VA FileMan 2 ^DIC  $$GET1^DIQ  

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

Package Total Caller Graph
Integrated Billing 2 IBCB2  IBCSCH  

Entry Points

Name Comments DBIA/ICR reference
DISPPRV(IBIFN) ; Display provider information: interactive - user selects provider
DISPNVA(IBIFN) ; Display Non-VA individual provider information.
DENTAL(IBIFN) ; Select Dental Claim detail gathered and displayed here
GETPROVS(IBIFN,PRVARY) ;Get the Provider Types
PG ; Display Dental form box numbers at top of charge list

External References

Name Field # of Occurrence
^DIC DISPPRV+7, DISPNVA+4
$$GET1^DIQ DISPPRV+33, DISPPRV+34, DISPPRV+35, DISPPRV+42, DISPNVA+6, DISPNVA+7, DISPNVA+9, DISPNVA+17, DISPNVA+19, DISPNVA+22
, DENTAL+30, GETPROVS+13
$$BOX24D^IBCEF11 DENTAL+4
OUTPT^IBCEF11 DENTAL+6
$$BILLN^IBCEFG0 DENTAL+5
SPECIFIC^IBCEU5 DISPPRV+4
$$PRVTYP^IBCRU6 DISPPRV+53
$$PAUSE^IBCSCH1 DENTAL+62, DENTAL+66, DENTAL+68
$$PRVLIC^IBCU1 DISPPRV+20
$$FMTE^XLFDT DISPPRV+22, DISPPRV+49, DISPPRV+50, DISPPRV+52, DISPNVA+10, DISPNVA+29
$$UP^XLFSTR GETPROVS+6
$$IEN2DATA^XUA4A72 DISPPRV+41, DISPNVA+21
$$ESBLOCK^XUSESIG1 DISPPRV+10
$$NPI^XUSNPI DISPPRV+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This is a display of provider specific information."
  • Line Location: DISPPRV+3
Function Call: WRITE
  • Prompt: !!,$TR($J(" ",IOM)," ","-")
  • Line Location: DISPPRV+9
Function Call: WRITE
  • Prompt: !," Signature Name: ",$P(IBPX,U,1)
  • Line Location: DISPPRV+11
Function Call: WRITE
  • Prompt: !,"Signature Title: ",$P(IBPX,U,3)
  • Line Location: DISPPRV+12
Function Call: WRITE
  • Prompt: !," Degree: ",$P(IBPX,U,2)
  • Line Location: DISPPRV+13
Function Call: WRITE
  • Prompt: !," NPI: ",$S(IBNPI>0:IBNPI,1:"")
  • Line Location: DISPPRV+18
Function Call: WRITE
  • Prompt: !!," License(s): "
  • Line Location: DISPPRV+21
Function Call: WRITE
  • Prompt: "None Active on ",$$FMTE^XLFDT(IBDT,2)
  • Line Location: DISPPRV+22
Function Call: WRITE
  • Prompt: !,?17
  • Line Location: DISPPRV+25
Function Call: WRITE
  • Prompt: IBPX," "
  • Line Location: DISPPRV+26
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPPRV+43
Function Call: WRITE
  • Prompt: !," Person Class: ",$P(IBPX,U,6)
  • Line Location: DISPPRV+44
Function Call: WRITE
  • Prompt: !," PROVIDER TYPE: ",$P(IBPX,U)
  • Line Location: DISPPRV+45
Function Call: WRITE
  • Prompt: !," CLASSIFICATION: ",$P(IBPX,U,2)
  • Line Location: DISPPRV+46
Function Call: WRITE
  • Prompt: !," SPECIALIZATION: ",$P(IBPX,U,3)
  • Line Location: DISPPRV+47
Function Call: WRITE
  • Prompt: !," EFFECTIVE: ",$$FMTE^XLFDT(IBTAXEFF,2)
  • Line Location: DISPPRV+49
Function Call: WRITE
  • Prompt: " - ",$$FMTE^XLFDT(IBTAXTRM,2)
  • Line Location: DISPPRV+50
Function Call: WRITE
  • Prompt: !!," Person Class: None Active on ",$$FMTE^XLFDT(IBDT,2)
  • Line Location: DISPPRV+52
Function Call: WRITE
  • Prompt: !!,"RC Provider Group: ",$S(+IBPX:$P(IBPX,U,3)_", "_$P(IBPX,U,5)_"%",1:"None")
  • Line Location: DISPPRV+54
Function Call: WRITE
  • Prompt: !,$TR($J(" ",IOM)," ","-")
  • Line Location: DISPPRV+55
Function Call: WRITE
  • Prompt: !!,$TR($J(" ",IOM)," ","-")
  • Line Location: DISPNVA+5
Function Call: WRITE
  • Prompt: !," Signature Name: ",$$GET1^DIQ(355.93,IBNVID_",",.01)
  • Line Location: DISPNVA+6
Function Call: WRITE
  • Prompt: !," NPI: ",$$GET1^DIQ(355.93,IBNVID_",",41.01)
  • Line Location: DISPNVA+7
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPNVA+8
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPNVA+11
Function Call: WRITE
  • Prompt: !," Person Class: ",$P(IBPX,U,6)
  • Line Location: DISPNVA+23
Function Call: WRITE
  • Prompt: $S($G(IBNVTX)=1:" (Primary)",1:" (Secondary)")
  • Line Location: DISPNVA+24
Function Call: WRITE
  • Prompt: !," PROVIDER TYPE: ",$P(IBPX,U)
  • Line Location: DISPNVA+25
Function Call: WRITE
  • Prompt: !," CLASSIFICATION: ",$P(IBPX,U,2)
  • Line Location: DISPNVA+26
Function Call: WRITE
  • Prompt: !," SPECIALIZATION: ",$P(IBPX,U,3)
  • Line Location: DISPNVA+27
Function Call: WRITE
  • Prompt: !," Person Class: None Active on ",$$FMTE^XLFDT(IBDT,2),!
  • Line Location: DISPNVA+29
Function Call: WRITE
  • Prompt: $TR($J(" ",IOM)," ","-"),!
  • Line Location: DISPNVA+30
Function Call: WRITE
  • Prompt: @IOF,"Example of dx, procedures, teeth info, and charges entered on the Dental claim"
  • Line Location: DENTAL+9
Function Call: WRITE
  • Prompt: !,"--------------------------------------------------------------------------------"
  • Line Location: DENTAL+10
Function Call: WRITE
  • Prompt: !,"Claim Provider:"
  • Line Location: DENTAL+11
Function Call: WRITE
  • Prompt: !
  • Line Location: DENTAL+14
Function Call: WRITE
  • Prompt: ?POS,PRVARY("SQ",SEQ)
  • Line Location: DENTAL+17
Function Call: WRITE
  • Prompt: !!,"34a. Diagnosis:"
  • Line Location: DENTAL+20
Function Call: WRITE
  • Prompt: !,"35. Dental Claim Note:"
  • Line Location: DENTAL+29
Function Call: WRITE
  • Prompt: !,$$GET1^DIQ(399,IBIFN,97)
  • Line Location: DENTAL+30
Function Call: WRITE
  • Prompt: !
  • Line Location: DENTAL+32
Function Call: WRITE
  • Prompt: !,@ARY@(N,"START"),?9,@ARY@(N,"END"),?18,@ARY@(N,"ORALCAV")
  • Line Location: DENTAL+59
Function Call: WRITE
  • Prompt: ?33,$G(@ARY@(N,1,"TOOTH")),?36,$G(@ARY@(N,1,"SURFACE")),?42,$G(@ARY@(N,"CPT"))
  • Line Location: DENTAL+60
Function Call: WRITE
  • Prompt: ?48,$G(@ARY@(N,"CPTMOD")),?60,$G(@ARY@(N,"DIAG")),?65,$G(@ARY@(N,"QTY")),?68,$G(@ARY@(N,"CHARGE")),?77,@ARY@(N,"POS")
  • Line Location: DENTAL+61
Function Call: WRITE
  • Prompt: !,$TR($J("-",80)," ","-")
  • Line Location: DENTAL+62
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DENTAL+62
Function Call: WRITE
  • Prompt: !,?33,$G(@ARY@(N,NN,"TOOTH")),?36,$G(@ARY@(N,NN,"SURFACE"))
  • Line Location: DENTAL+65
Function Call: WRITE
  • Prompt: !,$TR($J("-",80)," ","-")
  • Line Location: DENTAL+66
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DENTAL+66
Function Call: WRITE
  • Prompt: !,"--------------------------------------------------------------------------------"
  • Line Location: DENTAL+67
Function Call: WRITE
  • Prompt: "24 25 27 28 29 29a 29b 31 38"
  • Line Location: PG+1
Function Call: WRITE
  • Prompt: !,"--------------------------------------------------------------------------------"
  • Line Location: PG+2
Routine Call
  • DIC
  • Line Location:
    • DISPPRV+7
    • DISPNVA+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls
200.05 GET1^DIQ
^IBA(355.93 - [#355.93] Classic Fileman Calls,  GET1^DIQ
355.9342 GET1^DIQ
^DGCR(399 - [#399] GET1^DIQ
^USC(8932.1 - [#8932.1] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] DISPPRV+5, DISPNVA+2, GETPROVS+5, GETPROVS+9, GETPROVS+10, GETPROVS+11
^DIC(5 - [#5] DISPPRV+24
^DIC(81.3 - [#81.3] DENTAL+46
^IBA(355.93 - [#355.93] DISPNVA+14, DISPNVA+16
^TMP("IBXDISP" DENTAL+3!, DENTAL+28
^TMP("IBXSAVE" DENTAL+3!
^VA(200 - [#200] DISPPRV+31

Label References

Name Line Occurrences
GETPROVS DENTAL+7
PG DENTAL+32, DENTAL+62, DENTAL+66

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARY DENTAL+2~, DENTAL+34*, DENTAL+36, DENTAL+37, DENTAL+41, DENTAL+42, DENTAL+43, DENTAL+47, DENTAL+48, DENTAL+50
, DENTAL+51, DENTAL+52, DENTAL+55, DENTAL+56, DENTAL+58, DENTAL+59, DENTAL+60, DENTAL+61, DENTAL+62, DENTAL+63
, DENTAL+64, DENTAL+65, DENTAL+66, DENTAL+69
CPTMOD DENTAL+2~, DENTAL+44*, DENTAL+45, DENTAL+46*, DENTAL+47
DA DISPPRV+1~, DISPNVA+1~
DIC DISPPRV+1~, DISPPRV+7*, DISPNVA+1~, DISPNVA+4*
DIC("A" DISPPRV+7*, DISPNVA+4*
DIC("S" DISPNVA+4*
DIC(0 DISPPRV+7*, DISPNVA+4*
DT DISPPRV+5, DISPNVA+2
FILE GETPROVS+1~, GETPROVS+10*, GETPROVS+12, GETPROVS+13
FLD GETPROVS+1~, GETPROVS+12*, GETPROVS+13
I DENTAL+2~, DENTAL+40*, DENTAL+44*, DENTAL+45, DENTAL+46
IBARR DISPPRV+1~, DISPPRV+20
IBARR( DISPPRV+23, DISPPRV+24
IBDT DISPPRV+1~, DISPPRV+5*, DISPPRV+20, DISPPRV+22, DISPPRV+38, DISPPRV+52, DISPPRV+53, DISPNVA+1~, DISPNVA+2*, DISPNVA+10
, DISPNVA+29
IBI DISPPRV+1~, DISPPRV+7*, DISPNVA+1~, DISPNVA+4*
IBIFN DISPPRV~, DISPPRV+4, DISPPRV+5, DISPNVA~, DISPNVA+2, DENTAL~, DENTAL+1, DENTAL+5, DENTAL+6, DENTAL+7
, DENTAL+30, GETPROVS~, GETPROVS+3, GETPROVS+5, GETPROVS+9, GETPROVS+10, GETPROVS+11
IBJ DISPPRV+1~, DISPPRV+23*, DISPPRV+24
IBLC DENTAL+2~, DENTAL+32*, DENTAL+62*, DENTAL+66*, DENTAL+68, PG+3*
IBLIN DENTAL+2~, DENTAL+4*, DENTAL+5, DENTAL+28
IBNPI DISPPRV+1~, DISPPRV+17*, DISPPRV+18
IBNPISTR DISPPRV+1~, DISPPRV+16*, DISPPRV+17
IBNVFLG DISPNVA+1~, DISPNVA+13*, DISPNVA+18*, DISPNVA+29
IBNVID DISPNVA+1~, DISPNVA+5*, DISPNVA+6, DISPNVA+7, DISPNVA+9, DISPNVA+14, DISPNVA+16, DISPNVA+17, DISPNVA+19
IBNVSL DISPNVA+1~, DISPNVA+9*, DISPNVA+10
IBNVTX DISPNVA+1~, DISPNVA+12*, DISPNVA+14*, DISPNVA+16, DISPNVA+24
IBNVTX2 DISPNVA+1~, DISPNVA+15*, DISPNVA+16*, DISPNVA+17, DISPNVA+19
IBNVTXID DISPNVA+1~, DISPNVA+19*, DISPNVA+21, DISPNVA+22, DISPNVA+28
IBPRV DISPPRV+1~, DISPPRV+8*, DISPPRV+10, DISPPRV+16, DISPPRV+20, DISPPRV+31, DISPPRV+33, DISPPRV+34, DISPPRV+35, DISPPRV+53
IBPRVDAT DISPPRV+2~
IBPRVTAX DISPPRV+1~, DISPPRV+30*, DISPPRV+31*, DISPPRV+33, DISPPRV+34, DISPPRV+35
IBPX DISPPRV+1~, DISPPRV+10*, DISPPRV+11, DISPPRV+12, DISPPRV+13, DISPPRV+20*, DISPPRV+22, DISPPRV+24*, DISPPRV+25, DISPPRV+26
, DISPPRV+41*, DISPPRV+44, DISPPRV+45, DISPPRV+46, DISPPRV+47, DISPPRV+53*, DISPPRV+54, DISPNVA+1~, DISPNVA+21*, DISPNVA+23
, DISPNVA+25, DISPNVA+26, DISPNVA+27
IBQ DENTAL+2~, DENTAL+62*, DENTAL+66*, DENTAL+68*
IBRORA DENTAL+2~, DENTAL+12*
IBRORARES DENTAL+2~
IBRORATX DENTAL+2~
IBTAXEFF DISPPRV+2~, DISPPRV+34*, DISPPRV+38, DISPPRV+49
IBTAXFLG DISPPRV+1~, DISPPRV+29*, DISPPRV+39*, DISPPRV+52
IBTAXID DISPPRV+2~, DISPPRV+33*, DISPPRV+41, DISPPRV+42, DISPPRV+48
IBTAXTRM DISPPRV+2~, DISPPRV+35*, DISPPRV+36*, DISPPRV+38, DISPPRV+50
IBTAXX12 DISPPRV+2~, DISPPRV+42*, DISPPRV+48, DISPNVA+1~, DISPNVA+22*, DISPNVA+28
IBW DISPPRV+1~, DISPPRV+23*, DISPPRV+25*, DISPPRV+26*
IBX DENTAL+2~, DENTAL+5*
IBXDATA DENTAL+2~, DENTAL+35
IBXDATA( DENTAL+35, DENTAL+36, DENTAL+37, DENTAL+38, DENTAL+39, DENTAL+42, DENTAL+43, DENTAL+44, DENTAL+48, DENTAL+50
, DENTAL+51, DENTAL+52, DENTAL+54, DENTAL+55, DENTAL+56
IOF DENTAL+9, DENTAL+62, DENTAL+66
IOM DISPPRV+9, DISPPRV+55, DISPNVA+5, DISPNVA+30
L DENTAL+2~, DENTAL+21*, DENTAL+22, DENTAL+26, DENTAL+28
N DENTAL+2~, DENTAL+35*, DENTAL+36, DENTAL+37, DENTAL+38, DENTAL+39, DENTAL+41, DENTAL+42, DENTAL+43, DENTAL+44
, DENTAL+47, DENTAL+48, DENTAL+50, DENTAL+51, DENTAL+52, DENTAL+54, DENTAL+55, DENTAL+56, DENTAL+58*, DENTAL+59
, DENTAL+60, DENTAL+61, DENTAL+62, DENTAL+63, DENTAL+64, DENTAL+65, DENTAL+66
NN DENTAL+2~, DENTAL+54*, DENTAL+55, DENTAL+56, DENTAL+63*, DENTAL+64, DENTAL+65, DENTAL+66
NPI DENTAL+2~, GETPROVS+13*, GETPROVS+14
NUM DENTAL+2~, DENTAL+25*, DENTAL+26*, DENTAL+27, DENTAL+28
POS DENTAL+2~, DENTAL+15*, DENTAL+17*
PROV GETPROVS+1~, GETPROVS+11*, GETPROVS+13
PRVARY DENTAL+2~, DENTAL+7, DENTAL+13, GETPROVS~, GETPROVS+2!
PRVARY("P" GETPROVS+8, GETPROVS+14*
PRVARY("SQ" DENTAL+16, DENTAL+17, GETPROVS+14*
SEQ DENTAL+2~, DENTAL+15*, DENTAL+16*, DENTAL+17
SQ GETPROVS+1~, GETPROVS+9*, GETPROVS+10, GETPROVS+11, GETPROVS+14
T DENTAL+2~, DENTAL+24*, DENTAL+26, DENTAL+27, DENTAL+28
T1 DENTAL+2~, DENTAL+27*, DENTAL+28
T2 DENTAL+2~, DENTAL+27*, DENTAL+28
TYPE GETPROVS+1~, GETPROVS+4*, GETPROVS+5*, GETPROVS+6, GETPROVS+9
U DISPPRV+11, DISPPRV+12, DISPPRV+13, DISPPRV+17, DISPPRV+24, DISPPRV+44, DISPPRV+45, DISPPRV+46, DISPPRV+47, DISPPRV+54
, DISPNVA+23, DISPNVA+25, DISPNVA+26, DISPNVA+27, DENTAL+36, DENTAL+37, DENTAL+39, DENTAL+42, DENTAL+43, DENTAL+44
, DENTAL+46, DENTAL+48, DENTAL+50, DENTAL+51, DENTAL+52, DENTAL+55, DENTAL+56, GETPROVS+10, GETPROVS+11
UCTYPE GETPROVS+1~, GETPROVS+6*, GETPROVS+7*, GETPROVS+8, GETPROVS+14
X DISPPRV+1~, DISPNVA+1~
XABCD DENTAL+2~, DENTAL+39*, DENTAL+40*, DENTAL+41
XDIAG DENTAL+2~, DENTAL+39*, DENTAL+40
XIBI DENTAL+2~, DENTAL+38*
Y DISPPRV+1~, DISPPRV+7, DISPPRV+8, DISPNVA+1~, DISPNVA+4, DISPNVA+5
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