©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
BAREDP03 ; IHS/SD/LSL - EDI CLAIM & POSTING ELEMENTS ;
Source file <BAREDP03.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 2 | ^DIE $$GET1^DIQ |
| IHS Accounts Receivable | 1 | $$EN^BARVDF |
| IHS VA Utilities | 1 | ($$DIC,ENP,ENPM)^XBDIQ1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| IMAGE | ; EP
; increment and store list of processing variables into image |
|
| SETVAR | ; EP
; pull names of variables for triggering processing points ; as VAR("NEWBILL")="NEWBILL^BAREDPA3" |
|
| EN(TRDA,IMPDA) | ; EP
; Process segments into claims with postable data |
|
| PULLVARS |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| 90056.02011 | GET1^DIQ |
| 90056.0205 | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BAREDI("1T" - [#90056.01] | EN+21 |
| ^BAREDI("I" | EN+7!, EN+8!, EN+9*, EN+32, EN+43, PULLVARS+31, IMAGE+5* |
| ^TMP($J | EN+5! |
| Name | Line Occurrences |
|---|---|
| @( | PULLVARS+37 |
| IMAGE | PULLVARS+33 |
| PULLVARS | EN+22 |
| SETVAR | EN+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> CK | EN+45*, EN+49, EN+50, EN+51 |
| >> CKAMT | EN+46*, EN+49, EN+50, EN+51 |
| >> CKDA | EN+40*, EN+43*, EN+44 |
| >> CLMCK | EN+38*, EN+39 |
| CLMDA | EN+5!, EN+10*, EN+30*, EN+32*, EN+33, EN+36 |
| CLP | EN+31! |
| CLP( | EN+39*, EN+49, EN+50, EN+51 |
| >> CLPAMT | EN+31*, EN+37*, EN+39 |
| >> COUNT | EN+4*, EN+24 |
| >> D0S | PULLVARS+5*, PULLVARS+8 |
| DA | EN+26!, EN+33* |
| DA(1 | EN+28* |
| DIC | EN+26! |
| DIE | EN+26!, EN+27* |
| DR | EN+26!, EN+29* |
| DT | EN+9 |
| DUZ(2 | EN+7, EN+8, EN+9, EN+32, EN+43, PULLVARS+31, IMAGE+5 |
| ELM | PULLVARS+7! |
| ELM( | PULLVARS+10, PULLVARS+11, PULLVARS+12 |
| >> ELMDA | PULLVARS+9*, PULLVARS+10*, PULLVARS+11, PULLVARS+12 |
| >> FLG | EN+40*, EN+48, EN+52* |
| >> IENS | EN+36*, EN+37, EN+38, EN+44*, EN+45, EN+46, EN+47, EN+51 |
| IMGDA | EN+5!, IMAGE+4*, IMAGE+5 |
| IMPDA | EN~, EN+7, EN+8, EN+9, EN+28, EN+32, EN+36, EN+43, EN+44, PULLVARS+31 , IMAGE+5 |
| >> LINE | EN+10* |
| >> NM | SETVAR+7*, SETVAR+10 |
| >> PIECE | PULLVARS+17*, PULLVARS+18*, PULLVARS+19, PULLVARS+28*, PULLVARS+29*, PULLVARS+30, PULLVARS+31, PULLVARS+32 |
| >> PLBAMT | EN+47*, EN+49, EN+50, EN+51 |
| >> REC | EN+13*, EN+18, EN+19, PULLVARS+2 |
| >> RECDA | EN+17*, EN+18*, EN+19, PULLVARS+2, PULLVARS+31 |
| RECORD | PULLVARS+24! |
| RECORD(10 | PULLVARS+32 |
| >> ROU | SETVAR+8*, SETVAR+9*, SETVAR+10 |
| >> SEGDA | EN+19*, EN+21 |
| SEQ | PULLVARS+7! |
| SEQ( | PULLVARS+12*, PULLVARS+18, PULLVARS+19, PULLVARS+29, PULLVARS+30 |
| TRDA | EN~, EN+21 |
| VAR | SETVAR+3! |
| VAR( | PULLVARS+37, SETVAR+10* |
| >> VARDA | SETVAR+5*, SETVAR+6*, SETVAR+7, SETVAR+8 |
| VARM | SETVAR+3!, SETVAR+11! |
| VARM( | SETVAR+6, SETVAR+7, SETVAR+8 |
| >> VARNM | PULLVARS+19*, PULLVARS+20, PULLVARS+30*, PULLVARS+31, PULLVARS+37, IMAGE+3 |
| >> VARVAL | PULLVARS+32*, IMAGE+2 |
| >> X | IMAGE+3*, IMAGE+5 |
| >> XREC | PULLVARS+2* |
| >> XREC( | PULLVARS+5 |