IBCE837ACC2A ;EDE/JWS - ACC consume X12 claim data ;
Source file <IBCE837ACC2A.m>
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 4 | $$FIND1^DIC FILE^DICN (,WP)^DIE $$GET1^DIQ |
| Integrated Billing | 1 | $$WRAP^IBCE837ACC2A |
| Kernel | 1 | ENCODE^XLFJSON |
| 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 |
| Package | Total | Caller Graph |
|---|---|---|
| Integrated Billing | 4 | IBCE837ACC IBCE837ACC2 IBCE837ACC2A IBCE837ACCU |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| TOS(XP) | ;obtain Type of Service code for each professional claim service line
|
|
| TOS1 | ;
|
|
| TEETH | ;10/15/25;from IBCE837ACC2
|
|
| WRAP(STRING,ROOM,SUBS,IBARY) | ; wrap long lines without breaking up words
|
|
| STRIP(DATA) | ; strip leading spaces
|
|
| FINISH | ;
|
|
| UPDATE(IBIEN,IBVAL,IBFLD) | ;
|
|
| ACCFT(IBFACT,IBFT) | ;check facility type on a professional claim
; if facility type is in list, allow processing inpatient cms-1500 without PTF |
|
| CHKPG(IBPATIEN,IBNOTE) | ;
|
| FileNo | Call Tags |
|---|---|
| ^DGEN(27.11 - [#27.11] | GET1^DIQ |
| ^IBE(353.2 - [#353.2] | FIND1^DIC |
| ^IBA(364.9 - [#364.9] | Classic Fileman Calls |
| ^IBA(364.91 - [#364.91] | GET1^DIQ |
| 364.94 | WP^DIE |
| ^IBA(364.991 - [#364.991] | FIND1^DIC, GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGEN(27.11 - [#27.11] | CHKPG+5 |
| ^DPT - [#2] | CHKPG+3 |
| ^IBA(364.9 - [#364.9] | FINISH+14, FINISH+18 |
| ^TMP("IB837ACC" | TEETH+2, FINISH+3 |
| ^TMP("IBCE837ACC" | FINISH+23* |
| Name | Line Occurrences |
|---|---|
| TOS1 | TOS+10, TOS+11, TOS+12, TOS+13, TOS+14 |
| Name | Field # of Occurrence |
|---|---|
| ^( | TEETH+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| C | WRAP+12~, WRAP+22*, WRAP+24, WRAP+26 |
| D0 | UPDATE+1~ |
| DA | TEETH+4!, TEETH+8!, UPDATE+1~, UPDATE+2* |
| DA(1 | TEETH+6* |
| DATA | STRIP~, STRIP+2 |
| DD | TEETH+4!, TEETH+8! |
| DIC | TEETH+4!, TEETH+6*, TEETH+8!, UPDATE+1~ |
| DIC("DR" | TEETH+6* |
| DIC(0 | TEETH+6* |
| DIE | UPDATE+1~, UPDATE+4* |
| DINUM | TEETH+4! |
| DLAYGO | TEETH+4!, TEETH+6*, TEETH+8! |
| DO | TEETH+4!, TEETH+8! |
| DR | UPDATE+1~, UPDATE+3* |
| END | WRAP+12~, WRAP+21*, WRAP+24* |
| ERR | FINISH+2~ |
| I | TEETH+1~, WRAP+12~, WRAP+17*, WRAP+24*, WRAP+25, STRIP+1~, STRIP+2*, FINISH+2~, FINISH+3*, FINISH+6* , FINISH+7*, FINISH+10*, FINISH+11, FINISH+12, FINISH+13*, FINISH+14*, FINISH+15, FINISH+16, FINISH+17*, ACCFT+2~ , ACCFT+9*, ACCFT+17* |
| IBARY | WRAP~ |
| IBARY( | WRAP+17*, WRAP+24* |
| IBARY(1 | WRAP+14*, WRAP+19*, WRAP+25* |
| >> IBAUTH | FINISH+8, FINISH+10 |
| IBEGP | CHKPG+1~, CHKPG+5*, CHKPG+7 |
| IBEGPSG | CHKPG+1~, CHKPG+7*, CHKPG+8, CHKPG+9 |
| IBFACT | ACCFT~, ACCFT+9, ACCFT+17 |
| IBFLD | UPDATE~, UPDATE+3 |
| IBFT | ACCFT~, ACCFT+4, ACCFT+11 |
| IBIEN | UPDATE~, UPDATE+2 |
| >> IBIFN | TEETH+6 |
| IBNOTE | CHKPG~, CHKPG+3*, CHKPG+5*, CHKPG+8*, CHKPG+9* |
| IBPAIEN | FINISH+2~, FINISH+18*, FINISH+19*, FINISH+20 |
| >> IBPATICN | FINISH+10 |
| IBPATIEN | CHKPG~, CHKPG+3 |
| >> IBPAYERID | FINISH+3 |
| IBPGIEN | CHKPG+1~, CHKPG+3*, CHKPG+5, CHKPG+7 |
| >> IBREF | FINISH+8, FINISH+9, FINISH+10 |
| >> IBREFD9 | FINISH+3 |
| IBVAL | UPDATE~, UPDATE+3 |
| >> IBX12 | FINISH+14, FINISH+18, FINISH+19 |
| II | FINISH+2~, FINISH+5*, FINISH+6, FINISH+7, FINISH+12*, FINISH+13, FINISH+14*, FINISH+16*, FINISH+17 |
| J | FINISH+2~, FINISH+13*, FINISH+17* |
| LEN | WRAP+16~*, WRAP+17 |
| NOTE | FINISH+2~ |
| NOTE( | FINISH+6*, FINISH+10*, FINISH+11, FINISH+12, FINISH+13*, FINISH+14*, FINISH+15, FINISH+16, FINISH+17* |
| NOTE(1 | FINISH+3*, FINISH+4, FINISH+5 |
| NOTE1 | FINISH+2~, FINISH+8*, FINISH+9*, FINISH+10 |
| OK | ACCFT+2~, ACCFT+3*, ACCFT+4, ACCFT+9*, ACCFT+16*, ACCFT+17*, ACCFT+19, CHKPG+1~, CHKPG+7~, CHKPG+8* , CHKPG+9*, CHKPG+11* |
| >> RESULT(1 | FINISH+26*, FINISH+27* |
| ROOM | WRAP~, WRAP+14, WRAP+17, WRAP+19, WRAP+21 |
| RTN | STRIP+1~, STRIP+2*, STRIP+3 |
| START | WRAP+12~, WRAP+21*, WRAP+22, WRAP+24* |
| STOP | WRAP+12~, WRAP+22, WRAP+25* |
| STRING | WRAP~, WRAP+14, WRAP+15, WRAP+16, WRAP+17*, WRAP+19, WRAP+21*, WRAP+22, WRAP+24, WRAP+25 |
| SUBS | WRAP~, WRAP+24 |
| X | TOS+1~, TOS+10*, TOS+11*, TOS+12*, TOS+13*, TOS+14*, TOS+15*, TOS1+1, TEETH+1~, TEETH+3* |
| XD | TEETH+1~ |
| XDATA | TEETH+1~, TEETH+2*, TEETH+3, TEETH+5, TEETH+6 |
| XIB | ACCFT+2~, ACCFT+5*, ACCFT+6, ACCFT+7, ACCFT+12*, ACCFT+13, ACCFT+14 |
| XIB1 | ACCFT+2~, ACCFT+7*, ACCFT+8, ACCFT+9, ACCFT+14*, ACCFT+15, ACCFT+17 |
| XIEN | TEETH+1~ |
| XP | TOS~, TOS+10, TOS+11, TOS+12, TOS+13, TOS+14 |
| XTS | TEETH+1~, TEETH+2* |
| >> XX | FINISH+5, FINISH+12, FINISH+16 |
| >> XX( | FINISH+6, FINISH+13, FINISH+17 |