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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IBCEP5

Package: Integrated Billing

Routine: IBCEP5


Information

IBCEP5 ;ALB/TMP - EDI UTILITIES for provider ID ;29-SEP-00

Source Information

Source file <IBCEP5.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Integrated Billing 4 COPYPROV^IBCEP5A  $$GETLIC^IBCEP5D  $$STLIC^IBCEP8  $$EXPAND^IBTRE  
List Manager 4 EN^VALM  FULL^VALM1  (CLEAN,SET)^VALM10  EN^VALM2  
VA FileMan 3 (,$$FIND1)^DIC  $$GET1^DIQ  ^DIR  
Kernel 1 DISP^XQORM1  

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 IBCE PRVPRV MAINT  IBCEP5A  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point for IBCE PRV MAINT
EN1 ; Entrypoint for non-VA provider ID maintenance hook
HDR ; -- header code
INIT ; -- init variables and list array
AGAIN
INITQ
BLD ; Build initial display
; Assumes IBPRV = the variable ptr for prov id file (355.9)
; IBINS = the ien of the ins co or if null, ALL is assumed
; IBSLEV = 1 to display only provider default ids
; = 2 to display all provider/insurance co ids
BLDQ
HELP ; -- help code
EXIT ; -- exit code
EXPND ; -- expand code
SEL(IBDA,MANY) ; Select from provider id list
; IBDA is passed by reference and IBDA(1) returned containing
; ien's of the provider id records selected (file 355.9).
; If > 1 entry can be selected, MANY is set to 1

External References

Name Field # of Occurrence
^DIC INIT+30
$$FIND1^DIC INIT+17
$$GET1^DIQ EN1+3, HDR+2, INIT+4, BLD+7
^DIR EN1+8, INIT+23, AGAIN+3
COPYPROV^IBCEP5A EXIT+1
$$GETLIC^IBCEP5D BLD+43
$$STLIC^IBCEP8 BLD+17, BLD+27
$$EXPAND^IBTRE HDR+8, HDR+9, BLD+27
EN^VALM EN1+11
FULL^VALM1 EN1+4
CLEAN^VALM10 EXIT+3
SET^VALM10 BLD+19, BLD+38, BLD+44, BLD+47, BLD+52, BLD+53
EN^VALM2 SEL+6
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+8
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+8
Function Call: WRITE
  • Prompt: !,*7,"This is a required response. Enter '^' to exit"
  • Line Location: INIT+32
Function Call: WRITE
  • Prompt: !,*7,"This is a Child Insurance Company. Editing IDs is not permitted."
  • Line Location: AGAIN+8
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Routine Call
  • DIC
  • Line Location:
    • INIT+30
Routine Call
  • DIC
  • Line Location:
    • INIT+17
Routine Call
  • DIR
  • Line Location:
    • EN1+8
    • INIT+23
    • AGAIN+3
Routine Call
  • VALM
  • Line Location:
    • EN1+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORD(101 - [#101] FIND1^DIC
^IBA(355.93 - [#355.93] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(36 - [#36] HDR+12, HDR+14, AGAIN+7, BLD+15
^DIC(5 - [#5] BLD+27, BLD+47
^IBA(355.9 - [#355.9] BLD+12, BLD+13, BLD+14
^IBA(355.93 - [#355.93] BLD+17, BLD+27
^IBA(355.95 - [#355.95] BLD+32
^IBA(355.96 - [#355.96] BLD+32
^TMP("IBPRV_" BLD+9!, BLD+39*, BLD+48*, EXIT+4!, SEL+7
^TMP("IBPRV_SORT" BLD+9!, BLD+15*, BLD+17*, BLD+18, BLD+21, BLD+22, BLD+49!, EXIT+4!
^TMP("IB_EDITED_IDS" INIT+3!

Label References

Name Line Occurrences
AGAIN AGAIN
BLD AGAIN+12
BLDQ BLD+51
INITQ INIT+21, AGAIN

Naked Globals

Name Field # of Occurrence
^( BLD+22

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AGAIN INIT+1~, AGAIN, AGAIN+1*, AGAIN+7*
CARETYP BLD+5~, BLD+29*, BLD+30, BLD+34
CAREUNT BLD+5~, BLD+32*, BLD+33*, BLD+35
CT BLD+5~, BLD+13*, BLD+14, BLD+15, BLD+21*, BLD+22, BLD+29
CU BLD+5~, BLD+12*, BLD+13, BLD+14, BLD+15, BLD+22*, BLD+32
DIC INIT+1~, INIT+26*, INIT+29!
DIC("A" INIT+27*
DIC("DR" INIT+28*
DIC(0 INIT+26*
DIR EN1+1~, EN1+8!, INIT+1~, INIT+23!, AGAIN+3!
DIR("?" AGAIN+2*
DIR("A" EN1+7*, INIT+22*, AGAIN+2*
DIR("B" EN1+7*, INIT+22*
DIR(0 EN1+6*, EN1+7, INIT+22*, AGAIN+2*
DTOUT INIT+1~, INIT+31, AGAIN+4
DUOUT INIT+1~, INIT+31, AGAIN+4
FORM BLD+5~, BLD+26*, BLD+27, BLD+30
FT BLD+5~, BLD+13*, BLD+14, BLD+15, BLD+21*, BLD+22, BLD+26
IB BLD+5~, BLD+14*, BLD+15, BLD+22*, BLD+38
IB1 BLD+5~, BLD+11*, BLD+12*
IBALL EXIT+4!
IBC HDR+1~, HDR+4*, HDR+7*, HDR+8*, HDR+9*, HDR+14
IBCT BLD+5~, BLD+11*, BLD+19, BLD+23*, BLD+27, BLD+38, BLD+39, BLD+44, BLD+46*, BLD+47
, BLD+48
IBDA SEL~, SEL+5*, SEL+7*
IBDA( SEL+7*
IBENT BLD+5~, BLD+11*
IBFASTXT EN1+2!
IBFILE INIT+1~, INIT+20*, INIT+25*, INIT+26, INIT+27, INIT+28, INIT+33
IBIF EN1+1~, EN1+3*, EN1+5, HDR+1~, HDR+2*, HDR+5, HDR+8, HDR+9, HDR+14, INIT+1~
, INIT+4*, INIT+12, BLD+5~, BLD+7*, BLD+19
IBINS EN+1~, HDR+10, HDR+12, HDR+14, AGAIN+5*, AGAIN+7, AGAIN+11*, BLD+12, BLD+19, BLD+53
, EXIT+1, EXIT+4!
IBLCT BLD+5~, BLD+11*, BLD+19*, BLD+23*, BLD+38, BLD+44*, BLD+46*, BLD+47, BLD+51, BLD+54*
, BLDQ+1
>> IBNPRV HDR+2, INIT+4, INIT+12
IBNVAFL EN1+1~
IBP BLD+41~, BLD+42*, BLD+43
IBP( BLD+45, BLD+47
IBPRMPT EN1+1~, EN1+5*, EN1+6, HDR+5*, HDR+6
IBPRV EN+1~, EN1+3, HDR+8, HDR+9, HDR+13, INIT+20*, INIT+21, INIT+29, INIT+33*, AGAIN+6
, BLD+7, BLD+12, BLD+13, BLD+14, BLD+17, BLD+27, BLD+39, BLD+40, BLD+42, BLD+48
, EXIT+2!
IBSLEV EN1+1~, EN1+10*, HDR+6, HDR+13, AGAIN, BLD+12, BLD+17, BLD+40
INS BLD+5~, BLD+11*, BLD+12*, BLD+13, BLD+14, BLD+15, BLD+18*, BLD+19, BLD+21, BLD+22
MANY SEL~, SEL+6
PCDISP HDR+11~, HDR+13*, HDR+14
PCF HDR+11~, HDR+12*, HDR+13
PT BLD+5~, BLD+13*, BLD+14, BLD+15, BLD+20*, BLD+21*, BLD+22, BLD+27
U HDR+14, INIT+26, BLD+15, BLD+17, BLD+27, BLD+32, BLD+47
>> VALM("PROTOCOL" INIT+16!, INIT+18*
>> VALM("TITLE" INIT+13*
VALMBG BLDQ!, BLDQ+1*
>> VALMCAP INIT+15*
VALMCNT BLDQ!, BLDQ+1*
>> VALMDDF("CAREUNIT" INIT+14!
VALMHDR HDR+3!
VALMHDR( HDR+7*, HDR+8*, HDR+9*, HDR+14*
>> VALMQUIT INIT+21, INIT+24*, INIT+29, INIT+31*, AGAIN, AGAIN+4*
>> VALMY( SEL+7
X EN1+1~, INIT+1~, HELP+1*
>> XQORNOD(0 SEL+6
Y EN1+1~, EN1+9, EN1+10, INIT+1~, INIT+17*, INIT+18, INIT+24, INIT+25, INIT+32, INIT+33
, AGAIN+5
Z HDR+1~, HDR+6*, HDR+7, BLD+5~, BLD+14*, BLD+15, BLD+22*, BLD+39, BLD+45*, BLD+47
, SEL+4~, SEL+7*
Z0 BLD+10!, BLD+27*, BLD+30*, BLD+34*, BLD+35*, BLD+38
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 |  Naked Globals |  Local Variables  | All