BAREDP02 ; IHS/SD/LSL - PARSE SEGMENTS INTO ELEMENTS AND CONVERT ; 11 Jul 2011 2:50 PM
Source file <BAREDP02.m>
| Package | Total | Call Graph | 
|---|---|---|
| VA Fileman | 4 | (,DD)^%DT ^DIC FILE^DICN $$GET1^DIQ | 
| IHS VA Utilities | 1 | ($$DIC,$$VAL,ENP,ENPM)^XBDIQ1 | 
| Package | Total | Caller Graph | 
|---|---|---|
| IHS Accounts Receivable | 2 | BAREDP00 BAREDPZ1 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| STNDTBL | ; EP - Pull value from A/R EDI TABLES File | |
| CONVERT | ; ; Convert incoming data according to data type(s) | |
| PLB | ; EP | |
| EN(TRDA,IMPDA) | ||
| LQCD | ; EP ; This line tag called by .03 field in A/R EDI TABLES File ; Processing routine for Remark or NCPDP Reject Payment Codes. ; Whichever is passed in on LQ02 | |
| CLMADJCD | ; EP ; .03 (processing routine) for this data type of this element ; Find standard claim level adjustment code | |
| CLMCODE | ; EP ; .03 (processing routine) for this data type of this element ; find claim reason code | |
| RMKCODE | ; ; find remark code | |
| FIND(FILE,PATH,X) | ||
| TABLE | ; ; perform lookup on table ; ELM(.07) contains path to table | |
| DT | ; ; Convert date to readable format for HIPAA 835 ; ISA09 comes as YYMMDD all other elements are YYYYMMDD | |
| LOADTR | ; ; load element parsing specifications | |
| HRMKCD | ; EP ; This line tag called by .03 field in A/R EDI TABLES File ; Processing routine for Remark Code elements to look up in RPMS File | |
| CHKS(IMPDA) | ; | |
| PLVCODE | ; ; find provider level reason code ; Not called for HIPAA - regular table entry. | 
| Name | Field # of Occurrence | 
|---|---|
| ^%DT | DT+5 | 
| DD^%DT | DT+5 | 
| ^DIC | STNDTBL+8, CLMCODE+8, CLMADJCD+10, HRMKCD+8, LQCD+16, PLVCODE+8, FIND+9 | 
| FILE^DICN | CHKS+42 | 
| $$GET1^DIQ | EN+1, EN+9, TABLE+3, STNDTBL+1, CLMADJCD+13, HRMKCD+11, LQCD+19 | 
| $$DIC^XBDIQ1 | CLMCODE+5, PLVCODE+5, FIND+5 | 
| $$VAL^XBDIQ1 | CLMCODE+11, PLVCODE+10 | 
| ENP^XBDIQ1 | EN+31, LOADTR+10 | 
| ENPM^XBDIQ1 | EN+5, EN+21, LOADTR+6 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^ABSPF(9002313.93 - [#9002313.93] | Classic Fileman Calls, GET1^DIQ | 
| ^BAREDI("1T" - [#90056.01] | GET1^DIQ | 
| 90056.0105 | GET1^DIQ | 
| ^BARETBL - [#90056.04] | GET1^DIQ | 
| ^BAREDT - [#90056.05] | GET1^DIQ | 
| ^BARADJ - [#90056.06] | Classic Fileman Calls, GET1^DIQ | 
| ^BARMKCD - [#90056.23] | Classic Fileman Calls, GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^BAREDI("I" | LOADTR+17!, LOADTR+19*, LOADTR+20*, CHKS+4, CHKS+5, CHKS+9, CHKS+10, CHKS+11, CHKS+17, CHKS+20 , CHKS+22, PLB+4, PLB+6 | 
| ^BAREDT - [#90056.05] | EN+8 | 
| ^DD(90056.02 | CHKS+31 | 
| ^TMP($J | EN+19!, LOADTR+3!, LOADTR+8 | 
| Name | Line Occurrences | 
|---|---|
| $$FIND | TABLE+6 | 
| CONVERT | LOADTR+13 | 
| HRMKCD | LQCD+9 | 
| LOADTR | EN+33 | 
| PLB | CHKS+26 | 
| STNDTBL | CONVERT+3 | 
| TABLE | CONVERT+2 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> %DT | DT+4* | 
| ARRAY | LOADTR+3! | 
| ARRAY( | LOADTR+15*, LOADTR+20 | 
| ARRAY("" | LOADTR+18 | 
| >> BAR15 | PLB+6*, PLB+7, PLB+8, PLB+13, PLB+14, PLB+15, PLB+16, PLB+17, PLB+18 | 
| >> BARCCNT | CHKS+2*, CHKS+7, CHKS+9, CHKS+10, CHKS+11, CHKS+20, CHKS+22, CHKS+23, CHKS+24*, CHKS+25* , CHKS+27*, CHKS+33, CHKS+34, CHKS+35, CHKS+36, CHKS+37, CHKS+38, CHKS+39, CHKS+40, PLB+10* , PLB+11*, PLB+12, PLB+13, PLB+14, PLB+15, PLB+16, PLB+17, PLB+18 | 
| BARCDA | PLB+1~, PLB+2*, PLB+4*, PLB+6 | 
| BARCTMP | CHKS+1~ | 
| BARCTMP( | CHKS+7*, CHKS+9*, CHKS+10*, CHKS+11*, CHKS+20*, CHKS+22*, CHKS+23*, CHKS+27, CHKS+33, CHKS+34 , CHKS+35, CHKS+36, CHKS+37, CHKS+38, CHKS+39, CHKS+40, PLB+11, PLB+12, PLB+13*, PLB+14* , PLB+15*, PLB+16*, PLB+17*, PLB+18* | 
| >> BARCTYP | LQCD+8*, LQCD+9, LQCD+10 | 
| BARI | EN+7*, EN+8*, EN+9, EN+10! | 
| BARJ | EN+9*, EN+10! | 
| >> BARQ | CHKS+15*, CHKS+16, CHKS+18* | 
| BARSCK | PLB+1~, PLB+3* | 
| BARSEG | PLB+1~, PLB+7*, PLB+8, PLB+9 | 
| BARVCK | PLB+1~, PLB+3*, PLB+8*, PLB+12 | 
| >> C | FIND+8* | 
| CNT | PLB+1~, PLB+4*, PLB+5 | 
| >> COUNT | EN+24*, EN+27, EN+28, EN+29*, EN+34 | 
| DA | CLMCODE+4!, CLMADJCD+5!, HRMKCD+4!, LQCD+12!, PLVCODE+4!, FIND+2!, CHKS+28! | 
| DA( | FIND+8* | 
| DA(1 | STNDTBL+5*, STNDTBL+6, CLMCODE+6*, PLVCODE+6*, CHKS+29*, CHKS+30 | 
| DAT | EN+4!, EN+6 | 
| DAT( | EN+9*, EN+14, EN+16*, CONVERT+4 | 
| DAT("ID" | EN+11! | 
| >> DATDA | EN+13*, EN+14*, EN+16 | 
| >> DAZ( | FIND+7*, FIND+8 | 
| DD | CLMADJCD+9!, HRMKCD+7!, LQCD+15!, CHKS+41! | 
| DIC | STNDTBL+6*, CLMCODE+4!, CLMCODE+5*, CLMADJCD+5!, CLMADJCD+7*, HRMKCD+4!, HRMKCD+5*, LQCD+12!, LQCD+13*, PLVCODE+4! , PLVCODE+5*, FIND+2!, FIND+5*, CHKS+28!, CHKS+30* | 
| DIC("DR" | CHKS+34*, CHKS+35*, CHKS+36*, CHKS+37*, CHKS+38*, CHKS+39*, CHKS+40* | 
| DIC("P" | CHKS+31* | 
| DIC(0 | STNDTBL+7*, CLMCODE+7*, CLMADJCD+8*, HRMKCD+6*, LQCD+14*, PLVCODE+7*, FIND+6*, CHKS+32* | 
| DIE | CHKS+28! | 
| DIR | CHKS+28! | 
| DO | CLMADJCD+9!, HRMKCD+7!, LQCD+15!, CHKS+41! | 
| DT | LOADTR+19 | 
| DUZ(2 | LOADTR+17, LOADTR+19, LOADTR+20, CHKS+4, CHKS+5, CHKS+9, CHKS+10, CHKS+11, CHKS+17, CHKS+20 , CHKS+22, CHKS+30, PLB+4, PLB+6 | 
| >> E | LOADTR+2*, LOADTR+12, LQCD+8, CHKS+6, CHKS+7, CHKS+9, CHKS+10, CHKS+11, CHKS+17, CHKS+20 , CHKS+22, PLB+7, PLB+8, PLB+13, PLB+14, PLB+15, PLB+16, PLB+17, PLB+18 | 
| ELM | LOADTR+9! | 
| ELM( | LOADTR+11, CONVERT+2, CONVERT+3, CONVERT+4, TABLE+3, TABLE+6, STNDTBL+1, STNDTBL+5 | 
| >> ELMDA | LOADTR+7*, LOADTR+8*, LOADTR+20* | 
| FILE | FIND~, FIND+5 | 
| >> I | LOADTR+18*, LOADTR+19, LOADTR+20, FIND+7*, FIND+8, CHKS+2*, CHKS+4*, CHKS+5, CHKS+8*, CHKS+9 , CHKS+10, CHKS+11, CHKS+12*, CHKS+17*, CHKS+20, CHKS+21*, CHKS+22 | 
| IMPDA | EN~, LOADTR+17, LOADTR+19, LOADTR+20, CHKS~, CHKS+4, CHKS+5, CHKS+9, CHKS+10, CHKS+11 , CHKS+17, CHKS+20, CHKS+22, CHKS+29, PLB+4, PLB+6 | 
| >> IREC | CHKS+5*, CHKS+6, CHKS+7 | 
| >> MCODE | TABLE+3*, TABLE+4*, TABLE+5, STNDTBL+1*, STNDTBL+2*, STNDTBL+3 | 
| PATH | FIND~, FIND+7 | 
| >> PATHS | EN+32*, LOADTR+4 | 
| REC | EN+30! | 
| REC( | EN+32, LOADTR+12, LQCD+8 | 
| >> RECDA | EN+25*, EN+26*, LOADTR+17, LOADTR+19, LOADTR+20 | 
| >> RECM | EN+22*, EN+26 | 
| >> SEGXDA | LOADTR+4* | 
| >> SEQ | LOADTR+11*, LOADTR+12, LOADTR+15 | 
| >> TABID | EN+1* | 
| TRDA | EN~, EN+1, CLMCODE+6, PLVCODE+6 | 
| U | STNDTBL+10, FIND+11, CHKS+7, CHKS+9, CHKS+10, CHKS+11, CHKS+20, CHKS+22, CHKS+23, CHKS+31 , CHKS+33, CHKS+34, CHKS+35, CHKS+36, CHKS+37, CHKS+38, CHKS+39, CHKS+40, PLB+12, PLB+13 , PLB+14, PLB+15, PLB+16, PLB+17, PLB+18 | 
| X | LOADTR+12*, LOADTR+15, CONVERT+5*, TABLE+6*, STNDTBL+9*, STNDTBL+10*, DT+3*, DT+6*, CLMCODE+3, CLMCODE+9* , CLMCODE+11*, CLMADJCD+3*, CLMADJCD+4, CLMADJCD+6*, CLMADJCD+11*, CLMADJCD+13*, RMKCODE+2, RMKCODE+3*, HRMKCD+3, HRMKCD+9* , HRMKCD+11*, LQCD+7, LQCD+11*, LQCD+17*, LQCD+19*, PLVCODE+3, PLVCODE+9*, PLVCODE+10*, FIND~, FIND+3 , FIND+10*, FIND+11*, FIND+12, CHKS+28!, CHKS+33* | 
| >> XDA | CLMCODE+10*, CLMADJCD+12*, CLMADJCD+13, HRMKCD+10*, HRMKCD+11, LQCD+18*, LQCD+19, PLVCODE+10* | 
| >> XX | CONVERT+4* | 
| Y | STNDTBL+9, DT+6, CLMCODE+9, CLMCODE+10, CLMADJCD+11, CLMADJCD+12, HRMKCD+9, HRMKCD+10, LQCD+17, LQCD+18 , PLVCODE+9, PLVCODE+10, FIND+10, CHKS+28! | 
| Y(0 | STNDTBL+10, FIND+11 |