Call Graph
IBCBB2 ;ALB/ARH - CONTINUATION OF EDIT CHECKS ROUTINE (CMS-1500) ;04/14/92
Source file <IBCBB2.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 |
|---|---|---|
| EN | ;
|
|
| OCC10(IBIFN,IBARR,IBFT) | ; Determine if occurrence code 10 exists for pregnancy dx
; IBARR=array subscripted by ien of DX code if IBFT=2 (CMS-1500 form) ; by seq # and = ien of DX code if IBFT'=2 |
|
| OCC10Q |
| Name | Field # of Occurrence |
|---|---|
| $$BDATE^IBACSV | EN+18, OCC10+19 |
| $$ICD9^IBACSV | EN+18, OCC10+19 |
| WARN^IBCBB11 | EN+9, EN+14, EN+21, EN+23, EN+29, EN+34, EN+49, EN+55, EN+62, EN+71 , EN+81, EN+115, EN+123 |
| $$FT^IBCEF | EN+14, EN+34, EN+49, EN+55, EN+86 |
| $$INPAT^IBCEF | EN+21, EN+23 |
| F^IBCEF | EN+7, EN+75, EN+127, OCC10+12 |
| $$PRCD^IBCEF1 | EN+9 |
| $$TXMT^IBCEF4 | EN+3 |
| PROVINF^IBCEF74 | EN+135 |
| $$GETTYP^IBCEP2A | EN+132 |
| $$CLIAREQ^IBCEP8A | EN+60 |
| $$BILLSPEC^IBCEU3 | EN+76 |
| $$LINSPEC^IBCEU3 | EN+115 |
| $$EVENT^IBCF22 | EN+66 |
| SET^IBCSC4D | EN+12 |
| $$MRATYPE^IBEFUNC | EN+57 |
| $$REQMRA^IBEFUNC | EN+61, EN+110 |
| $$WNRBILL^IBEFUNC | EN+57 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | EN+28, EN+112 |
| ^TMP($J | OCC10+11, OCC10+13*, OCC10+14*, OCC10+16, OCC10Q! |
| Name | Line Occurrences |
|---|---|
| $$OCC10 | EN+25 |
| Name | Field # of Occurrence |
|---|---|
| ^( | EN+28 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| FUNCTION | EN+129~, EN+130*, EN+132, EN+137 |
| IBARR | OCC10~ |
| IBARR( | OCC10+16, OCC10+18 |
| IBCPT | EN+1~, EN+28*, EN+29, EN+30, EN+31 |
| IBCPTL | EN+1~ |
| IBCPTL( | EN+31*, EN+39 |
| IBDX | EN+1~, EN+12, EN+25, OCC10+4~, OCC10+18*, OCC10+19 |
| IBDX( | EN+38 |
| IBDXL | EN+1~ |
| IBDXL( | EN+38*, EN+39 |
| IBDXO | EN+1~, EN+12 |
| IBDXO( | EN+18 |
| IBDXO(0 | EN+18 |
| IBDXO(12 | EN+49 |
| IBDXO(4 | EN+55 |
| IBDXTYP | EN+1~, EN+18*, EN+19*, EN+20, EN+21, EN+22, EN+23 |
| IBDXVER | EN+1~, EN+19*, EN+20, EN+21, EN+22, EN+23 |
| >> IBER | EN+2*, EN+15*, EN+20*, EN+22*, EN+25*, EN+30*, EN+35*, EN+40*, EN+57*, EN+61* , EN+67*, EN+77, EN+86*, EN+87*, EN+89*, EN+90*, EN+94*, EN+98*, EN+106*, EN+110* , EN+111*, EN+116*, EN+117*, EN+118*, EN+122*, EN+138* |
| IBFT | OCC10~, OCC10+18 |
| IBI | EN+1~, EN+9*, EN+18*, EN+28*, EN+38*, EN+39*, EN+66, EN+67, EN+77*, EN+80 , EN+81, EN+86, EN+87, EN+89, EN+90, EN+91, EN+94, EN+98, EN+106, OCC10+4~ , OCC10+16*, OCC10+18 |
| IBID | EN+134~, EN+135 |
| IBID(1 | EN+137 |
| IBIFN | EN+3, EN+7, EN+12, EN+14, EN+18, EN+21, EN+23, EN+25, EN+28, EN+34 , EN+49, EN+55, EN+57, EN+60, EN+61, EN+66, EN+75, EN+76, EN+86, EN+110 , EN+112, EN+115, EN+127, EN+132, EN+135, OCC10~, OCC10+12, OCC10+19 |
| IBINS | EN+129~, EN+131*, EN+132, EN+135, EN+138 |
| IBJ | EN+1~, EN+31* |
| IBLCT | EN+1~, EN+76*, EN+78*, EN+109 |
| IBLOC | EN+1~, EN+28*, EN+29* |
| IBN | EN+1~, EN+28*, EN+32, EN+39*, EN+40, OCC10+4~, OCC10+5*, OCC10+16, OCC10+20*, OCC10+21* , OCC10Q+1 |
| >> IBNDTX | EN+111 |
| >> IBNDU2 | EN+60, EN+71, EN+79, EN+81, EN+86, EN+123 |
| IBNVFLG | EN+1~, EN+70*, EN+71*, EN+87 |
| IBOK | EN+134~, EN+136*, EN+137*, EN+138 |
| IBOLAB | EN+1~, EN+76*, EN+91*, EN+123 |
| IBPS | EN+1~, EN+76*, EN+80*, EN+122 |
| IBSP | EN+1~, EN+76* |
| IBTX | EN+1~, EN+3*, EN+29, EN+49, EN+109 |
| IBU3 | EN+1~, EN+112*, EN+116, EN+117, EN+118 |
| IBXDATA | EN+6!, EN+74!, EN+124!, EN+128, OCC10+4~ |
| IBXDATA( | EN+77, EN+80, EN+81, EN+86, EN+87, EN+89, EN+90, EN+91, EN+94, EN+98 , EN+106 |
| IBXSAVE | EN+1~, EN+66, OCC10+4~ |
| IBXSAVE("OCC" | OCC10+14 |
| IBY | EN+1~, EN+28*, EN+31* |
| IBZ | EN+129~ |
| >> IBZPRC92( | EN+9 |
| Q0 | EN+134~, EN+137* |
| U | EN+9, EN+12, EN+18, EN+19, EN+29, EN+30, EN+60, EN+71, EN+79, EN+80 , EN+81, EN+86, EN+87, EN+91, EN+94, EN+98, EN+106, EN+111, EN+112, EN+116 , EN+117, EN+118, EN+123, EN+128, EN+133, EN+137, OCC10+20, OCC10+21 |
| Z | EN+1~, EN+9*, EN+21*, EN+23*, EN+29*, EN+66*, EN+132*, EN+133, EN+137, OCC10+4~ , OCC10+14*, OCC10+17~, OCC10+19*, OCC10+20, OCC10+21 |
| Z1 | OCC10+17~, OCC10+19*, OCC10+20, OCC10+21 |
| ZC | OCC10+17~, OCC10+19*, OCC10+20, OCC10+21 |
