IBCEFP1 ;ALB/GEF - OUTPUT FORMATTER PROVIDER UTILITIES ;28-OCT-10
Source file <IBCEFP1.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NAME(IBDATA,IBIFN,IBCRED,IBSPEC) | ; Parse person's nm into 6 pieces LAST^FIRST^MIDDLE^CRED^SUFFIX^SPECIALITY
; IBDATA = IEN;GLOBAL REFERENCE of Variable Pointer ; IBIFN = Claim ien |
|
| NAMEQ | ;
|
|
| TAXON(IBDATA,IBTAX) | ; RETURNS taxonomy code from NEW PERSON or non/other VA BP
|
|
| NPI(IBDATA) | ; look for NPI in #200 or #355.93
|
|
| CLEANUP(IBXSAVE) | ; Clean up
|
|
| COBID(IBIFN,IBTYP,IBMRAND,IBD) | ;Get COB ID
|
|
| COBIDX | ;
|
|
| DEFID(IBIFN,IBPRV) | ;
; IBIFN = ien of bill ; IBPRV = ien of entry subfile 399.0222 ; Function returns default ids: prim id def^sec id def^tert id def ; SSN cannot be the default ID |
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DIQ | NAME+6, NAMEQ+2, TAXON+1 |
| $$COBN^IBCEF | COBID+9 |
| $$FT^IBCEF | COBID+8, DEFID+8 |
| $$INPAT^IBCEF | COBID+8 |
| F^IBCEF | COBID+4 |
| $$GETNPI^IBCEF73A | NPI+1 |
| $$GETTAX^IBCEF73A | TAXON+2 |
| $$GETID^IBCEP2 | DEFID+12 |
| $$CRED^IBCEU | NAME+7 |
| $$SPEC^IBCEU | NAMEQ+1 |
| $$MCRONBIL^IBEFUNC | COBID+3 |
| $$WNRBILL^IBEFUNC | COBID+9 |
| NAMECOMP^XLFNAME | NAME+11 |
| STDNAME^XLFNAME | NAME+13 |
| FileNo | Call Tags |
|---|---|
| ^DIC(42.4 - [#42.4] | GET1^DIQ |
| ^USC(8932.1 - [#8932.1] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | NAME+8, DEFID+11 |
| ^IBA(355.93 - [#355.93] | NAME+16 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| COBID | COBID+1~, COBID+2*, COBID+12*, COBID+13*, COBID+14*, COBIDX+1 |
| DT | NAME+8 |
| IBCRED | NAME~, NAME+7*, NAME+12, NAME+14, NAME+16 |
| IBD | COBID~, COBID+10, COBID+11*, COBID+12, COBID+14 |
| IBDATA | NAME~, NAME+5, NAME+6, NAME+7, NAME+16, NAMEQ+1, TAXON~, TAXON+2, NPI~, NPI+1 |
| IBDT | NAME+4~, NAME+8*, NAMEQ+1 |
| IBFN | NAME+4~, NAME+5*, NAME+6, NAME+16 |
| IBGLB | NAME+4~, NAME+5* |
| IBID | COBID+1~, COBID+9*, COBID+11, COBID+12, COBID+14 |
| IBIFN | NAME~, NAME+8, COBID~, COBID+3, COBID+4, COBID+8, COBID+9, COBID+14, DEFID~, DEFID+5 , DEFID+8, DEFID+11, DEFID+12 |
| IBINS | DEFID+6~ |
| IBINS4 | DEFID+6~ |
| IBMRAND | COBID~, COBID+3*, COBID+6 |
| IBNM | NAME+4~, NAME+12*, NAME+14*, NAME+16*, NAMEQ+3*, NAMEQ+4 |
| IBNMC | NAME+4~, NAME+6*, NAME+9*, NAME+10, NAME+11*, NAME+13, NAME+16 |
| IBNMC("FAMILY" | NAME+12, NAME+14 |
| IBNMC("GIVEN" | NAME+12, NAME+14 |
| IBNMC("MIDDLE" | NAME+12, NAME+14 |
| IBNMC("SUFFIX" | NAME+12, NAME+14 |
| IBPROV | COBID+1~ |
| IBPRV | COBID+5*, DEFID~, DEFID+9 |
| IBPRV( | COBID+7*, COBID+11, COBID+13 |
| IBPRV(4 | COBID+8* |
| IBSPEC | NAME~, NAMEQ+1*, NAMEQ+2*, NAMEQ+3 |
| IBTAX | TAXON~, TAXON+1*, TAXON+2*, TAXON+3 |
| IBTYP | COBID~, COBID+7, COBID+11 |
| IBUB | DEFID+6~, DEFID+8* |
| IBWNR | COBID+1~, COBID+9*, COBID+11 |
| IBXSAVE | CLEANUP~ |
| IBXSAVE("BILL | ING PRV" , CLEANUP+4! |
| IBXSAVE("ID" | CLEANUP+5! |
| IBXSAVE("L-PROV" | CLEANUP+2! |
| IBXSAVE("LAB/FAC" | CLEANUP+3! |
| IBXSAVE("PROVINF" | CLEANUP+1! |
| IBXSAVE("SLC" | CLEANUP+7! |
| IBXSAVE("SLPRV" | CLEANUP+6! |
| IBY | COBID+1~, COBID+5*, COBID+13 |
| IBZ | COBID+1~, COBID+5, DEFID+6~, DEFID+7* |
| ID | DEFID+6~, DEFID+9*, DEFID+10, DEFID+12*, DEFID+14*, DEFID+15 |
| U | NAME+8, NAME+12, NAME+14, NAME+16, NAMEQ+3, TAXON+2, COBID+5, COBID+10, COBID+11, COBID+12 , COBID+13, COBID+14, DEFID+9, DEFID+10, DEFID+12, DEFID+14 |
| Z | DEFID+6~, DEFID+9*, DEFID+12 |
| Z1 | DEFID+6~, DEFID+10*, DEFID+11, DEFID+12, DEFID+14 |
