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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IBCEF7

Package: Integrated Billing

Routine: IBCEF7


Information

IBCEF7 ;WOIFO/SS - FORMATTER AND EXTRACTOR SPECIFIC BILL FUNCTIONS ;8/6/03 10:56am

Source Information

Source file <IBCEF7.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Integrated Billing 8 ($$COB,$$COBN,$$FT,$$POLICY,F)^IBCEF  $$OTHINS1^IBCEF2  $$ISINSUR^IBCEF71  ($$GETSSN,OTHP36)^IBCEF72  $$CHCKPRV1^IBCEF73  PROVINF^IBCEF74  $$SOP^IBCEP2B  $$INSFT^IBCEU5  
Kernel 1 NAMECOMP^XLFNAME  

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

Package Total Caller Graph
Integrated Billing 8 IBCEF71  IBCEF72  IBCEF73  IBCEF73A  IBCEF74  IBCEF75  ^IBA(364.5  ^IBA(364.7  

Entry Points

Name Comments DBIA/ICR reference
ALLPROV ;called from #364.5 entry "N-ALL CUR/OTH PROVIDER INFO"
PRV1(IB399) ;
OTHSBID(IBXIEN,IBZOUT) ;
ELMADD2(IBXIEN,IBP,IBARR) ;
OTHADD2(IBXIEN,IBZOUT) ;
FR2PAT(IBDFN,IBINS) ;information about "other insured" address
ELMADDR(IBXIEN,IBP,IBARR) ;
OTHADDR(IBXIEN) ;
PROVPTR(IBIEN399,IBFUNC) ;
PROVSSN(IBIEN399) ;
GETNMEL(IBFULL,IBEL) ;Get name element
PROVIDER(IB399,IBPROV,IBRES) ;
PROVINF(IB399,IBPRNUM,IBRES,IBSORT,IBINSTP) ;
PSPRV(IBIFN) ; Returns information for bill ien IBIFN for purchased svc
; Returns 4 digit data in following format:
; 1st digit: 0 if not outside facility
; 1 if outside facility
; 2nd digit: 0 if not non-VA provider for rendering/attending
; 1 if non-VA provider for rendering/attending
; 3rd digit: 0 if not purchased svc
; 1 if purchased svc
; 4th digit: 0 if 1500 bill
; 1 if UB bill
PSPRVQ
CHKADD ;CHECK ALL ADDRESS ELEMENTS PRESENT IF NOT KILL ALL ADDRESS ELEMENTS

External References

Name Field # of Occurrence
$$COB^IBCEF PROVIDER+3
$$COBN^IBCEF PRV1+4
$$FT^IBCEF PRV1+2, PSPRV+13
$$POLICY^IBCEF OTHSBID+3
F^IBCEF OTHSBID+2, OTHADDR+2
$$OTHINS1^IBCEF2 OTHSBID+5, OTHADD2+5, OTHADDR+5
$$ISINSUR^IBCEF71 PROVIDER+6, PROVIDER+8, PROVIDER+9, PROVIDER+10
$$GETSSN^IBCEF72 PROVSSN+5
OTHP36^IBCEF72 OTHADD2+3
$$CHCKPRV1^IBCEF73 PRV1+8, PRV1+19
PROVINF^IBCEF74 PROVINF+1
$$SOP^IBCEP2B PRV1+5
$$INSFT^IBCEU5 PSPRV+11
NAMECOMP^XLFNAME GETNMEL+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] PRV1+4, OTHADD2+8, PROVPTR+3, PROVPTR+5, PSPRV+11, PSPRV+13, PSPRV+14
^DIC(36 - [#36] OTHADDR+8, OTHADDR+9
^DIC(5 - [#5] FR2PAT+5, OTHADDR+8
^DPT - [#2] FR2PAT+2, FR2PAT+4
^IBE(355.97 - [#355.97] PRV1+10, PRV1+11

Label References

Name Line Occurrences
$$FR2PAT OTHADD2+9
$$PROVPTR PROVSSN+4
OTHADD2 ELMADD2+2
OTHADDR ELMADDR+2
PROVIDER ALLPROV+4
PROVINF PROVIDER+6, PROVIDER+8, PROVIDER+9, PROVIDER+10

Naked Globals

Name Field # of Occurrence
^(1 PRV1+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A ELMADD2+1~, ELMADD2+7*, ELMADDR+1~, ELMADDR+7*
C OTHSBID+1~, OTHSBID+5*, OTHSBID+6, OTHSBID+7, OTHADD2+1~, OTHADD2+5*, OTHADD2+6, OTHADD2+7, OTHADDR+1~, OTHADDR+5*
, OTHADDR+6, OTHADDR+7
CHECK ELMADD2+1~, ELMADD2+6*, ELMADD2+7*, ELMADD2+8, ELMADDR+1~, ELMADDR+5*, ELMADDR+9*, ELMADDR+10, CHKADD+2~, CHKADD+3*
, CHKADD+5*, CHKADD+6
I PRV1+25~, PRV1+26*, PRV1+27, PRV1+28, PRV1+30*
IB1 ELMADD2+1~, ELMADD2+3*, ELMADD2+4*, ELMADD2+7, ELMADD2+9, ELMADD2+10, OTHADD2+1~, ELMADDR+1~, ELMADDR+3*, ELMADDR+4*
, ELMADDR+7, ELMADDR+9, ELMADDR+11, ELMADDR+12, OTHADDR+1~, OTHADDR+9*, OTHADDR+10
IB399 PRV1~, PRV1+2, PRV1+4, PRV1+5, PROVIDER~, PROVIDER+3, PROVIDER+6, PROVIDER+8, PROVIDER+9, PROVIDER+10
, PROVINF~, PROVINF+1
IBARR ELMADD2~, ELMADDR~
IBARR( ELMADD2+9*, ELMADD2+10*, ELMADDR+11*, ELMADDR+12*
IBCURR PROVIDER+1~, PROVIDER+3*, PROVIDER+6, PROVIDER+8, PROVIDER+9, PROVIDER+10
IBDEF PRV1+1~, PRV1+4*, PRV1+5, PRV1+8*, PRV1+9
IBDEFTYP PRV1+1~, PRV1+4*, PRV1+5*, PRV1+8*, PRV1+9, PRV1+13
IBDFN FR2PAT~, FR2PAT+2, FR2PAT+4
IBDFN1 OTHADD2+1~, OTHADD2+8*, OTHADD2+9
IBEL GETNMEL~, GETNMEL+2
IBFRMTYP PRV1+1~, PRV1+2*, PRV1+8, PRV1+16, PRV1+17, PRV1+19
IBFT PROVSSN+2~, PROVSSN+3*, PROVSSN+4, PROVSSN+5
IBFULL GETNMEL~, GETNMEL+1
IBFULL( GETNMEL+2
IBFUNC PROVPTR~, PROVPTR+3
IBIEN399 PROVPTR~, PROVPTR+3, PROVPTR+5, PROVSSN~, PROVSSN+4
IBIFN PSPRV~, PSPRV+11, PSPRV+13, PSPRV+14
IBIND PRV1+1~, PRV1+3*, PRV1+9*, PRV1+21*, PRV1+22, PRV1+23
IBINS OTHADD2+7*, OTHADD2+9, FR2PAT~, FR2PAT+2, OTHADDR+1~, OTHADDR+7*, OTHADDR+8, OTHADDR+9
IBINSTP PROVINF~, PROVINF+1
IBN PRV1+1~, PRV1+3*, PRV1+10*, PRV1+11, PROVPTR+2~, PROVPTR+3*, PROVPTR+4, PROVPTR+5
IBP ELMADD2~, ELMADD2+9, ELMADD2+10, ELMADDR~, ELMADDR+11, ELMADDR+12
IBPRNUM PROVINF~, PROVINF+1
IBPROV PROVIDER~, PROVIDER+4, PROVIDER+5, PROVIDER+6, PROVIDER+7, PROVIDER+8, PROVIDER+9, PROVIDER+10, PROVIDER+11
IBPTR PROVSSN+2~, PROVSSN+4*, PROVSSN+5
IBQ PRV1+1~, PRV1+3*, PRV1+10, PRV1+22*
IBRES PRV1+1~, PRV1+3*, PRV1+9*, PRV1+23*, PRV1+26, PRV1+27, PRV1+28, PRV1+31!, PRV1+32*, PRV1+36*
, PRV1+37, PROVIDER~, PROVINF~, PROVINF+1
IBRES( PROVIDER+11*
IBRESARR PROVIDER+1~, PROVIDER+2*, PROVIDER+6, PROVIDER+8, PROVIDER+9, PROVIDER+10, PROVIDER+11
IBRESTMP PRV1+25~
IBRESTMP( PRV1+28*, PRV1+34, PRV1+36
IBRETVAL PROVSSN+1~*, PROVSSN+5*, PROVSSN+6
IBSORT PROVINF~, PROVINF+1
IBSVC PSPRV+10~, PSPRV+11*, PSPRV+12*, PSPRV+14*, PSPRV+15*, PSPRVQ
IBU2 PSPRV+10~, PSPRV+11*, PSPRV+12, PSPRV+15
IBXDATA OTHSBID+4!, OTHADD2+4!, OTHADDR+3, OTHADDR+4!
IBXIEN ALLPROV+2, ALLPROV+4, OTHSBID~, OTHSBID+3, OTHSBID+5, ELMADD2~, ELMADD2+2, OTHADD2~, OTHADD2+3, OTHADD2+5
, OTHADD2+8, ELMADDR~, ELMADDR+2, OTHADDR~, OTHADDR+5
>> IBXSAVE("CADR" CHKADD+5, CHKADD+6*
>> IBXSAVE("OTH_INSURED_ADDR" ELMADD2+2*, ELMADD2+4, ELMADD2+7!, ELMADD2+9, ELMADD2+10
>> IBXSAVE("OTH_PROV_ADDR" ELMADDR+2, ELMADDR+4, ELMADDR+7, ELMADDR+9!, ELMADDR+11, ELMADDR+12, OTHADDR+10*
>> IBXSAVE("PROVINF" ALLPROV+2, ALLPROV+4*
IBZ ALLPROV+3~, ALLPROV+4, PRV1+1~, PRV1+11*, PRV1+12, PRV1+13, PRV1+14, PRV1+20, PRV1+23, OTHSBID+1~
, OTHADD2+1~, OTHADD2+3, OTHADDR+1~, OTHADDR+3*, PROVIDER+1~
IBZ( OTHSBID+3*, OTHSBID+6, OTHSBID+7, OTHADD2+6, OTHADD2+7, OTHADDR+6, OTHADDR+7
IBZ1 PRV1+1~, PRV1+11*, PRV1+12, PRV1+13
IBZD PRV1+1~
IBZIP OTHADD2+1~, FR2PAT+1~, FR2PAT+5*, FR2PAT+6, OTHADDR+1~, OTHADDR+8*, OTHADDR+9
IBZN PRV1+1~, PRV1+14*, PRV1+16, PRV1+17, PRV1+19, PRV1+23
IBZNAME PRV1+1~, PRV1+14*, PRV1+16, PRV1+17
IBZOUT OTHSBID~, OTHADD2~, OTHADD2+2*
IBZOUT( OTHSBID+7*, OTHADD2+9*
IBZZZ ELMADD2+1~, ELMADD2+2
Q PRV1+25~, PRV1+29*
QUAL PRV1+25~, PRV1+27*, PRV1+28, PRV1+30*, PRV1+34*, PRV1+36
QUALC PRV1+25~
SEQ PRV1+25~, PRV1+33*, PRV1+35*, PRV1+36
U PRV1+4, PRV1+9, PRV1+12, PRV1+13, PSPRV+12, PSPRV+14, PSPRV+15
Z OTHSBID+1~, OTHSBID+3*, OTHSBID+6*, OTHSBID+7, OTHADD2+1~, OTHADD2+6*, OTHADD2+7, OTHADD2+9, OTHADDR+1~, OTHADDR+6*
, OTHADDR+7, OTHADDR+10, PSPRV+10~, PSPRV+13*, CHKADD+2~, CHKADD+3*, CHKADD+4*, CHKADD+5
Z0 OTHSBID+1~, OTHADD2+1~, OTHADDR+1~, PSPRV+10~, PSPRV+13*, PSPRV+14
Z1 OTHSBID+1~, OTHADD2+1~, OTHADDR+1~
Z3 FR2PAT+1~, FR2PAT+2*, FR2PAT+3, FR2PAT+4
Z4 FR2PAT+1~, FR2PAT+4*, FR2PAT+5, FR2PAT+6
Z5 FR2PAT+1~, FR2PAT+6*, FR2PAT+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All