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

Package: Integrated Billing

Routine: IBCEP4A


Information

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

Source Information

Source file <IBCEP4A.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 5 ^DIC  FILE^DICN  ^DIE  ^DIK  ^DIR  
Integrated Billing 2 (BLD,DISP)^IBCEP4  $$EXPAND^IBTRE  
List Manager 2 FULL^VALM1  EN^VALM2  
Kernel 1 $$FMTE^XLFDT  

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

Package Total Caller Graph
Integrated Billing 4 IBCE PRVCARE ADD  IBCE PRVCARE DELETE  IBCE PRVCARE EDIT  IBCEP3  

Entry Points

Name Comments DBIA/ICR reference
NEW(IB) ; Add care unit
; Assumes IBINS is defined as ins co ien (file 36)
; IB = 0 or null if called from list manager, 1 if not
NEWQ
CHANGE(IB) ; Edit a care unit name or combination for ins co IBINS
; Assumes IBINS is defined as ins co ien (file 36)
; IB = 0 or null if called from list manager, 1 if not
CHGQ
INSASS(IBINSZ,IB95) ; Assign care unit to or delete from an ins co
; IBINSZ = ien of ins co (file 36)
; IB95 = flag ("IBCU")=care unit
; can have subscripts to send in pre-entered data
INSQ
EDIT(IBFLD,IB0,IBIEN,IBCK1) ; Allow addition/edit of fields in file 355.96
; without direct Fileman call so uniqueness can be checked
; IBFLD = field # in file 355.96
; IB0 = current 0-node of data in the entry in file 355.96
; IBIEN = ien of entry being edited in file 355.96
; IBCK1 = flag ... if 1, checks for uniqueness after field changed
EDITQ
ADDCU(IBINSZ,IBCU,IBFT,IBCT,IBPTYP) ; Add a new care unit record to file 355.96
; Same parameter definitions as EDIT
DELETE(IB) ; delete a care unit name
; IB = 0 or null if called from list manager, 1 if not
DELETEQ ;
SEL() ; Select entry from list
; returns ien in file 355.95 for selected entry

External References

Name Field # of Occurrence
^DIC NEW+8, CHANGE+5, CHANGE+24
FILE^DICN ADDCU+4
^DIE CHANGE+12, CHANGE+13, CHANGE+54
^DIK CHANGE+39, DELETE+7, DELETE+8
^DIR CHANGE+9, CHANGE+11, CHANGE+35, CHANGE+38, CHANGE+52, INSASS+17, INSASS+34, INSASS+36, INSASS+37, EDIT+14
, DELETE+5, DELETE+9
BLD^IBCEP4 NEW+12, CHANGE+54, CHANGE+56, INSASS+38, DELETE+9
DISP^IBCEP4 CHANGE+31
$$EXPAND^IBTRE CHANGE+44, INSASS+31, EDIT+11
FULL^VALM1 NEW+4, CHANGE+4, INSASS+7, DELETE+3
EN^VALM2 SEL+3
$$FMTE^XLFDT CHANGE+33

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: CHANGE+5
Function Call: WRITE
  • Prompt: !
  • Line Location: CHANGE+9
Function Call: WRITE
  • Prompt: !,"SELECT ONE OF THE FOLLOWING CARE UNIT COMBINATIONS:"
  • Line Location: CHANGE+23
Function Call: WRITE
  • Prompt: !!,"*** CARE UNIT COMBINATION FOR: ",$P($G(^IBA(355.95,+IB95("IBCU"),0)),U)," ***"
  • Line Location: CHANGE+30
Function Call: WRITE
  • Prompt: !,Q(Z)
  • Line Location: CHANGE+32
Function Call: WRITE
  • Prompt: !,"EXP DATE: ",$$FMTE^XLFDT($P(IBDA0,U,7),"2D")
  • Line Location: CHANGE+33
Function Call: WRITE
  • Prompt: !,"CARE UNIT: ",$P($G(^IBA(355.95,+IBDA0,0)),U),!
  • Line Location: CHANGE+34
Function Call: WRITE
  • Prompt: !
  • Line Location: CHANGE+35
Function Call: WRITE
  • Prompt: !,"CARE UNIT: ",$P($G(^IBA(355.95,IB95("IBCU"),0)),U)
  • Line Location: CHANGE+43
Function Call: WRITE
  • Prompt: !,"INSURANCE COMPANY: ",$$EXPAND^IBTRE(355.96,.03,$P(IB0,U,3))
  • Line Location: CHANGE+44
Function Call: WRITE
  • Prompt: !
  • Line Location: CHANGE+52
Function Call: WRITE
  • Prompt: !
  • Line Location: CHANGE+52
Function Call: WRITE
  • Prompt: !
  • Line Location: INSASS+9
Function Call: WRITE
  • Prompt: !,"CARE UNIT: "_$$EXPAND^IBTRE(355.96,.01,IB95("IBCU"))
  • Line Location: INSASS+31
Function Call: WRITE
  • Prompt: !
  • Line Location: INSASS+34
Function Call: WRITE
  • Prompt: !
  • Line Location: INSASS+34
Function Call: WRITE
  • Prompt: !
  • Line Location: INSASS+36
Function Call: WRITE
  • Prompt: !
  • Line Location: INSASS+37
Function Call: WRITE
  • Prompt: !
  • Line Location: DELETE+9
Routine Call
  • DIC
  • Line Location:
    • NEW+8
    • CHANGE+5
    • CHANGE+24
Routine Call
  • DIE
  • Line Location:
    • CHANGE+12
    • CHANGE+13
    • CHANGE+54
Routine Call
  • DIR
  • Line Location:
    • CHANGE+9
    • CHANGE+11
    • CHANGE+35
    • CHANGE+38
    • CHANGE+52
    • INSASS+17
    • INSASS+34
    • INSASS+36
    • INSASS+37
    • EDIT+14
    • DELETE+5
    • DELETE+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBA(355.95 - [#355.95] Classic Fileman Calls
^IBA(355.96 - [#355.96] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBA(355.95 - [#355.95] CHANGE+7, CHANGE+9, CHANGE+12, CHANGE+30, CHANGE+34, CHANGE+43
^IBA(355.96 - [#355.96] CHANGE+16, CHANGE+18, CHANGE+19, CHANGE+28, CHANGE+41, INSASS+33, EDIT+20, DELETE+7
^IBE(355.97 - [#355.97] INSASS+16
^TMP("IBPRV_CU" SEL+6

Label References

Name Line Occurrences
$$ADDCU INSASS+35
$$EDIT CHANGE+46
$$SEL CHANGE+4, DELETE+3
CHGQ CHANGE+6, CHANGE+10, CHANGE+11, CHANGE+14, CHANGE+16
DELETEQ DELETE+3
EDITQ EDIT+15
INSASS NEW+11, CHANGE+16
INSQ INSASS+8, INSASS+10
NEWQ NEW+9

Naked Globals

Name Field # of Occurrence
^(0 EDIT+20
^(1 CHANGE+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA NEW+3~, CHANGE+3~, CHANGE+12*, CHANGE+13*, CHANGE+39*, CHANGE+54*, INSASS+4~, INSASS+13~, EDIT+10~, ADDCU+2~
, DELETE+7*, DELETE+8*
DD NEW+3~, CHANGE+3~
DIC NEW+3~, NEW+8*!, CHANGE+3~, CHANGE+5*!, CHANGE+24*!, INSASS+4~, ADDCU+2~, ADDCU+3*
DIC("A" NEW+8*, CHANGE+5*
DIC("DR" NEW+8*, ADDCU+3*
DIC("S" NEW+8*, CHANGE+5*, CHANGE+24*
DIC(0 NEW+8*, CHANGE+5*, CHANGE+24*, ADDCU+3*
DIE NEW+3~, CHANGE+3~, CHANGE+12*, CHANGE+13*, CHANGE+54*
DIK CHANGE+3~, CHANGE+39*, DELETE+7*, DELETE+8*
DIR NEW+3~, CHANGE+3~, CHANGE+9!, CHANGE+11!, CHANGE+35!, CHANGE+38!, CHANGE+52!, INSASS+4~, INSASS+17!, INSASS+34!
, INSASS+36!, INSASS+37!, EDIT+10~, EDIT+14!, DELETE+2~, DELETE+5!, DELETE+9!
DIR("?" INSASS+16*
DIR("A" CHANGE+9*, CHANGE+11*, CHANGE+35*, CHANGE+38*, CHANGE+52*, INSASS+34*, INSASS+36*, INSASS+37*, DELETE+5*, DELETE+9*
DIR("B" CHANGE+9*, CHANGE+35*, CHANGE+38*, INSASS+16*, EDIT+13*, DELETE+5*
DIR("S" CHANGE+9*
DIR(0 CHANGE+9*, CHANGE+11*, CHANGE+35*, CHANGE+38*, CHANGE+52*, INSASS+17*, INSASS+34*, INSASS+36*, INSASS+37*, EDIT+12*
, DELETE+5*, DELETE+9*
DLAYGO NEW+3~, NEW+8*!, CHANGE+3~, ADDCU+2~, ADDCU+3*
DO NEW+3~, CHANGE+3~
DR NEW+3~, CHANGE+3~, CHANGE+12*, CHANGE+13*, CHANGE+54*, INSASS+4~
DTOUT CHANGE+3~, CHANGE+10, CHANGE+36, INSASS+18, EDIT+15
DUOUT CHANGE+3~, CHANGE+10, CHANGE+36, INSASS+18, EDIT+15
IB NEW~, NEW+4, NEW+12, NEWQ, CHANGE~, CHANGE+4, CHANGE+5, CHANGE+56, CHGQ, DELETE~
, DELETE+3, DELETE+4, DELETEQ+1
IB0 CHANGE+3~, CHANGE+41*, CHANGE+43, CHANGE+44, CHANGE+46, CHANGE+48, CHANGE+49*, EDIT~, EDIT+11, EDIT+19
IB95 NEW+3~, NEW+10*, NEW+11, CHANGE+3~, CHANGE+16*, INSASS~, INSASS+8!, INSASS+18!, INSASS+28
IB95("IBCT" INSASS+12, INSASS+22*, INSASS+33, INSASS+35
IB95("IBCU" NEW+10*, CHANGE+7*, CHANGE+9, CHANGE+12, CHANGE+13, CHANGE+16, CHANGE+18, CHANGE+19, CHANGE+24, CHANGE+30
, CHANGE+43, INSASS+6, INSASS+12, INSASS+28, INSASS+31, INSASS+33, INSASS+35, DELETE+4*, DELETE+6*, DELETE+7
, DELETE+8
IB95("IBEXPDT" INSASS+26*
IB95("IBFT" INSASS+12, INSASS+20*, INSASS+33, INSASS+35
IB95("IBINS" INSASS+32*
IB95("IBPTYP" INSASS+12, INSASS+16, INSASS+24*, INSASS+33, INSASS+35
IBADD NEW+3~
IBCHG CHANGE+3~, CHANGE+39*, CHANGE+40*, CHANGE+48*, CHANGE+50*, CHANGE+54, INSASS+4~, INSASS+6*, INSASS+37*, INSASS+38
IBCK CHANGE+3~, CHANGE+40*, CHANGE+45*, CHANGE+46*
IBCK1 EDIT~, EDIT+17
IBCT INSASS+4~, INSASS+22*, INSASS+30*, INSASS+35*, INSASS+37*, ADDCU~, ADDCU+3
IBCU INSASS+4~, INSASS+6*, ADDCU~, ADDCU+3
IBDA CHANGE+3~, CHANGE+19*, CHANGE+24*, CHANGE+26, CHANGE+28, CHANGE+39, CHANGE+41, CHANGE+46, CHANGE+54, INSASS+4~
IBDA0 CHANGE+27~, CHANGE+28*, CHANGE+29, CHANGE+31, CHANGE+33, CHANGE+34
IBDELETE CHANGE+3~, CHANGE+7*
IBDELETE(0 CHANGE+7*
IBDELETE(1 CHANGE+7*
IBDICS INSASS+4~, INSASS+14!, INSASS+16*, INSASS+17
IBEDIT CHANGE+3~, CHANGE+40*, CHANGE+41*, CHANGE+53*
IBFLD EDIT~, EDIT+11, EDIT+12, EDIT+19
IBFT INSASS+4~, INSASS+20*, ADDCU~, ADDCU+3
IBIEN EDIT~, EDIT+20
IBINS NEW+8, NEW+11, CHANGE+16, CHANGE+24, CHANGE+31, INSASS+4~, INSASS+5*, EDIT+10~, EDIT+11*, EDIT+19
IBINSZ INSASS~, INSASS+5, INSASS+8, INSASS+32, INSASS+33, INSASS+35, ADDCU~, ADDCU+3
IBNEW EDIT+10~, EDIT+11*, EDIT+15*, EDIT+16*, EDIT+19, EDIT+20*, EDITQ
IBOK NEW+3~, CHANGE+3~, CHANGE+40*, CHANGE+41, CHANGE+50*, CHANGE+53*, CHANGE+54
IBPTYP INSASS+4~, INSASS+24*, ADDCU~, ADDCU+3
IBPXDT INSASS+4~, INSASS+26*
IBVAL EDIT+10~, EDIT+11*, EDIT+13
IBZ CHANGE+3~, CHANGE+41!
IBZ( CHANGE+43*, CHANGE+44*, CHANGE+46*, CHANGE+47, CHANGE+48, CHANGE+49, CHANGE+51, CHANGE+54
Q CHANGE+27~, INSASS+29~
Q( CHANGE+32
Q0 CHANGE+27~, CHANGE+31
SEL SEL+2~, SEL+4*, SEL+5, SEL+6
U CHANGE+9, CHANGE+12, CHANGE+30, CHANGE+31, CHANGE+33, CHANGE+34, CHANGE+43, CHANGE+44, CHANGE+47, CHANGE+48
, CHANGE+49, CHANGE+51, INSASS+16, EDIT+11, EDIT+16, EDIT+19
>> VALMBCK NEWQ*, CHGQ*, INSASS+18*, INSQ*, DELETEQ+1*
VALMY SEL+2~
VALMY("" SEL+4
X NEW+3~, CHANGE+3~, CHANGE+11, CHANGE+24*, INSASS+4~, EDIT+10~, ADDCU+2~, ADDCU+3*, DELETE+2~
X1 EDIT+18~, EDIT+19*, EDIT+20
X2 EDIT+18~, EDIT+19*, EDIT+20
X3 EDIT+18~, EDIT+19*, EDIT+20
X4 EDIT+18~, EDIT+19*, EDIT+20
X5 EDIT+18~, EDIT+19*, EDIT+20
>> XQORNOD(0 SEL+3
Y NEW+3~, NEW+9, NEW+10, CHANGE+3~, CHANGE+4*, CHANGE+6, CHANGE+7, CHANGE+12, CHANGE+14, CHANGE+24
, CHANGE+37, CHANGE+39, CHANGE+53, INSASS+4~, INSASS+20, INSASS+22, INSASS+24, INSASS+26, INSASS+35*, INSASS+36
, EDIT+10~, EDIT+15, EDIT+16, ADDCU+2~, ADDCU+5, DELETE+2~, DELETE+3*, DELETE+4, DELETE+6
Z NEW+3~, CHANGE+3~, CHANGE+32*, CHANGE+41*, CHANGE+42, CHANGE+46, CHANGE+47, CHANGE+48, CHANGE+49, CHANGE+51
, INSASS+4~, INSASS+10*, INSASS+12, INSASS+15, INSASS+17, INSASS+18*, INSASS+20, INSASS+22, INSASS+24, INSASS+26
, INSASS+28, DELETE+7*
Z100 CHANGE+3~, CHANGE+42*, CHANGE+43, CHANGE+44, CHANGE+45, CHANGE+48, CHANGE+49
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