BARRNBRA ; IHS/SD/POT - Non Ben Payment Report ; 08/20/2008
Source file <BARRNBRA.m>
| Package | Total | Call Graph | 
|---|---|---|
| IHS Accounts Receivable | 8 | ^BARDBQUE  (CHK,DT)^BARRHD  CHKTRANS^BARRNBRE  (100,110,ADDUPBL,ADDUPTR)^BARRNBRF  ASKAGAI1^BARRNBRS  PAZ^BARRUTL  INIT^BARUTL  ^BARVKL0 | 
| IHS VA Utilities | 1 | ($$VAL,ENP)^XBDIQ1 | 
| VA Fileman | 1 | $$GET1^DIQ | 
| Package | Total | Caller Graph | 
|---|---|---|
| IHS Accounts Receivable | 1 | BAR RPT NON-BEN PAYMENT | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| SETHDR | ; ; Build header array | |
| EN | ; EP | |
| COMPUTE | ; EP | |
| ISERR(BARTRDT) | ; | |
| BILL | ; ; Temp global for SORT CRITERIA Allowance Category or Billing Entity ; and Report Type Summarize by BILL w/in payor w/in. | |
| DETAIL | ; ; Temp global for SORT CRITERIA Allowance Category or Billing Entity ; and Report Type Summarize by payor w/in. | |
| STANDARD | ; ; Temp global for SORT CRITERIA Clinic or Visit or A/R Account ; or Discharge Service ; Detail Lines | |
| SUMMARY | ; ; Temp global for SORT CRITERIA Allowance Category or Billing Entity ; and Report Type Summarize. | |
| XIT | ; | |
| ISNONBEN(BARTR) | ;BAR*1.8*24 | |
| MAIN2(YBARBL) | ;YBARBL IS THE 1ST PART OF A BILL | |
| EXTRACT(BARBL) | ; | |
| ASK1 | ||
| TRANS | ;EP for Looping thru Transaction File | |
| DATA | ; Gather data for transactions found in TRANS ; S ^TMP($J,"BAR-NBR9",YBARBL,BARBL) ; S ^TMP($J,"BAR-NBR9",YBARBL,BARBL,BARTR) | |
| MAIN | ;^TMP($J,"BAR-NBR9",-->^TMP($J,"BAR-NBRT",BAR("SUB1"),BAR("SUB3"),BAR("SUB4"),BAR("SUB5")),U,I) | 
| Name | Field # of Occurrence | 
|---|---|
| ^BARDBQUE | ASK1+20 | 
| CHK^BARRHD | SETHDR+20 | 
| DT^BARRHD | SETHDR+8 | 
| CHKTRANS^BARRNBRE | DATA+6 | 
| 100^BARRNBRF | MAIN+22 | 
| 110^BARRNBRF | MAIN+23 | 
| ADDUPBL^BARRNBRF | MAIN+20 | 
| ADDUPTR^BARRNBRF | MAIN+19 | 
| ASKAGAI1^BARRNBRS | ASK1 | 
| PAZ^BARRUTL | ASK1+21 | 
| INIT^BARUTL | EN+6 | 
| ^BARVKL0 | XIT+1 | 
| $$GET1^DIQ | EN+7, MAIN2+6, MAIN2+10, MAIN2+15 | 
| $$VAL^XBDIQ1 | DATA+29, DATA+31 | 
| ENP^XBDIQ1 | ISERR+2 | 
| FileNo | Call Tags | 
|---|---|
| ^DIC(40.7 - [#40.7] | GET1^DIQ | 
| ^ABMDVTYP - [#9002274.8] | GET1^DIQ | 
| ^BAR(90052.06,7819,0) - [#90052.06] | GET1^DIQ | 
| ^AUTTLOC - [#9999999.06] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AUPNPAT - [#9000001] | ISNONBEN+7 | 
| ^BARAC( | DATA+24, DATA+25 | 
| ^BARBL( | DATA+38, EXTRACT+2, EXTRACT+3, ISNONBEN+4 | 
| ^BARTR( | TRANS+2, TRANS+3, TRANS+6, TRANS+9, TRANS+13, DATA+8, DATA+14, DATA+15, DATA+16, ISNONBEN+2 | 
| ^DIC(4 - [#4] | SETHDR+12, SETHDR+15 | 
| ^TMP($J | COMPUTE+2!, COMPUTE+3!, COMPUTE+4!, COMPUTE+5!, DATA+39*, DATA+40*, MAIN+18, MAIN+19, MAIN+20, MAIN+21 , MAIN2+3, MAIN2+4, STANDARD+5, STANDARD+6*, STANDARD+9, STANDARD+10*, STANDARD+12, STANDARD+13*, STANDARD+14*, SUMMARY+6 , SUMMARY+7*, SUMMARY+10, SUMMARY+11*, SUMMARY+12*, SUMMARY+15, SUMMARY+16*, DETAIL+6, DETAIL+7*, BILL+5, BILL+6* , BILL+7* | 
| Name | Line Occurrences | 
|---|---|
| $$ISERR | DATA+13 | 
| $$ISNONBEN | DATA+5 | 
| BILL | MAIN2+23 | 
| DATA | TRANS+3, TRANS+6, TRANS+10, TRANS+14 | 
| DETAIL | MAIN2+22 | 
| EXTRACT | MAIN2+5 | 
| MAIN | COMPUTE+7 | 
| MAIN2 | MAIN+21 | 
| SETHDR | ASK1+15 | 
| STANDARD | MAIN2+12, MAIN2+17 | 
| SUMMARY | MAIN2+24 | 
| TRANS | COMPUTE+7 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| BAR | EN+1!, MAIN+17~ | 
| BAR( | MAIN+15*, MAIN2+2*, STANDARD+6, STANDARD+10, STANDARD+13, SUMMARY+7, SUMMARY+11, SUMMARY+16, DETAIL+7, BILL+6 | 
| BAR("C" | MAIN2+9 | 
| BAR("CONJ" | SETHDR+19* | 
| BAR("HD" | ASK1+3*, ASK1+4*, SETHDR+6*, SETHDR+7*, SETHDR+10* | 
| BAR("LOC" | EN+7*, EN+8*, SETHDR+13, COMPUTE+6 | 
| BAR("LVL" | SETHDR+3*, SETHDR+9*, SETHDR+10 | 
| BAR("OPT" | SETHDR+2* | 
| BAR("PRIVACY" | EN+4* | 
| BAR("SUB" | MAIN+16! | 
| BAR("SUB1" | MAIN2+6*, MAIN2+7*, STANDARD+5, STANDARD+6, STANDARD+9, STANDARD+10, STANDARD+14, SUMMARY+6, SUMMARY+7, SUMMARY+10 , SUMMARY+11, SUMMARY+12, DETAIL+6, DETAIL+7, BILL+5, BILL+6, BILL+7 | 
| BAR("SUB2" | MAIN2+9*, MAIN2+10*, MAIN2+11*, MAIN2+14*, MAIN2+15*, MAIN2+16*, STANDARD+5, STANDARD+6, STANDARD+14 | 
| BAR("SUB3" | MAIN2+18*, SUMMARY+6, SUMMARY+7, DETAIL+6, DETAIL+7, BILL+5, BILL+6, BILL+7 | 
| BAR("SUB4" | MAIN2+19*, DETAIL+6, DETAIL+7, BILL+5, BILL+6, BILL+7 | 
| BAR("SUB5" | MAIN2+20*, MAIN2+21, BILL+5, BILL+6, BILL+7 | 
| BAR("SUBR" | COMPUTE+1* | 
| BAR("TXT" | SETHDR+11*, SETHDR+12*, SETHDR+14*, SETHDR+15*, SETHDR+16*, SETHDR+17*, SETHDR+18* | 
| BAR("V" | MAIN2+14, EXTRACT+4* | 
| BAR(0 | DATA+40 | 
| BAR(10 | DATA+22 | 
| BAR0 | EXTRACT+1~, EXTRACT+2* | 
| BAR1 | EXTRACT+1~, EXTRACT+3*, EXTRACT+4, EXTRACT+5, EXTRACT+6, EXTRACT+7, ISNONBEN+1~, ISNONBEN+4*, ISNONBEN+5 | 
| >> BARADJ | DATA+30*, DATA+31*, DATA+32, DATA+37 | 
| BARBL | DATA+14*, DATA+38, DATA+39, DATA+40, MAIN2+1~, MAIN2+3*, MAIN2+4, MAIN2+5, EXTRACT~, EXTRACT+2 , EXTRACT+3, ISNONBEN+1~, ISNONBEN+3*, ISNONBEN+4 | 
| >> BARCR | DATA+19*, DATA+37 | 
| BARDATE | MAIN2+1~, MAIN2+4*, BILL+7 | 
| >> BARDB | DATA+20*, DATA+37 | 
| BARDDD | MAIN+17~ | 
| >> BARFLG | DATA+23*, DATA+24*, DATA+25*, DATA+37 | 
| >> BARHLD | STANDARD+5*, STANDARD+6, STANDARD+9*, STANDARD+10, STANDARD+12*, STANDARD+13, SUMMARY+6*, SUMMARY+7, SUMMARY+10*, SUMMARY+11 , SUMMARY+15*, SUMMARY+16, DETAIL+6*, DETAIL+7, BILL+5*, BILL+6 | 
| >> BARMENU | ASK1+3, ASK1+4 | 
| >> BARMODE | SETHDR+4*, SETHDR+5*, SETHDR+6, SETHDR+7 | 
| >> BARP("DT" | TRANS+2*, TRANS+3, TRANS+6*, TRANS+9*, TRANS+10, TRANS+13*, TRANS+14 | 
| >> BARP("HIT" | DATA+4*, DATA+7 | 
| >> BARP("RTN" | EN+2* | 
| >> BARP("X" | TRANS+1*, TRANS+2, TRANS+3, TRANS+8*, TRANS+9, TRANS+12*, TRANS+13 | 
| BARPAT | DATA+22*, DATA+24, DATA+25, DATA+40, ISNONBEN+1~, ISNONBEN+5*, ISNONBEN+6, ISNONBEN+7 | 
| >> BARPAY | DATA+29*, DATA+32, DATA+37 | 
| >> BARPAYAD | DATA+32*, DATA+37 | 
| >> BARQ("NS" | ASK1+18* | 
| >> BARQ("RC" | ASK1+16* | 
| >> BARQ("RP" | ASK1+17* | 
| >> BARQ("RX" | ASK1+19* | 
| >> BARTEST | DATA+8*, DATA+9, DATA+11 | 
| BARTR | TRANS+3*, TRANS+6*, TRANS+10*, TRANS+14*, DATA+5, DATA+6, DATA+8, DATA+13, DATA+14, DATA+15 , DATA+16, DATA+29, DATA+31, DATA+39, MAIN+17~, ISERR+1~, ISNONBEN~, ISNONBEN+2 | 
| BARTR("C" | EXTRACT+7* | 
| BARTR("D" | EXTRACT+6* | 
| BARTR("DT" | DATA+18*, DATA+37 | 
| BARTR("L" | MAIN2+6, SUMMARY+12, EXTRACT+5* | 
| BARTR("T" | DATA+17*, DATA+29, DATA+31, DATA+36, DATA+37 | 
| BARTR(0 | DATA+15*, DATA+18, DATA+19, DATA+20, DATA+21 | 
| BARTR(1 | DATA+16*, DATA+17 | 
| BARTR(101 | ISERR+3 | 
| BARTR(103 | ISERR+5 | 
| BARTR0 | ISNONBEN+1~, ISNONBEN+2*, ISNONBEN+3 | 
| >> BARTRACC | DATA+21*, DATA+24, DATA+25 | 
| BARTRDT | ISERR~, ISERR+2 | 
| BARTTYP | ISERR+1~, ISERR+3*, ISERR+4 | 
| >> BARUSR | EN+6 | 
| BARX | MAIN+17~, MAIN+19*, MAIN+21* | 
| BARXTR | MAIN+17~ | 
| BARY | EN+1!, MAIN+18*, MAIN+19, MAIN+20* | 
| BARY("DT" | ASK1+8*, ASK1+9*, ASK1+10, ASK1+11*, TRANS+1, TRANS+2, TRANS+5, TRANS+8, TRANS+9, TRANS+12 | 
| BARY("LOC" | SETHDR+12 | 
| BARY("PAT" | SETHDR+18, TRANS+1, TRANS+5, TRANS+9, TRANS+13 | 
| BARY("RTYP" | EN+3*, ASK1+3, SETHDR+5 | 
| BARY("SORT" | EN+5*, ASK1+6*, ASK1+7*, MAIN2+8, MAIN2+13 | 
| BARY("TYP" | ASK1+12*, ASK1+13* | 
| >> DEBUG | EN+9* | 
| >> DIROUT | ASK1+1, ASK1+2 | 
| >> DTOUT | ASK1+1, ASK1+2 | 
| >> DUOUT | ASK1+1, ASK1+2 | 
| DUZ(2 | EN+7, SETHDR+15, TRANS+2, TRANS+3, TRANS+6, TRANS+9, TRANS+13, DATA+8, DATA+14, DATA+15 , DATA+16, DATA+24, DATA+25, DATA+38, EXTRACT+2, EXTRACT+3, ISNONBEN+2, ISNONBEN+4 | 
| I | MAIN+15*, MAIN+16*, MAIN2+2*, STANDARD+4~, STANDARD+6*, STANDARD+10*, STANDARD+13*, SUMMARY+5~, SUMMARY+7*, SUMMARY+11* , SUMMARY+16*, DETAIL+5~, DETAIL+7*, BILL+6* | 
| INSPAY | MAIN2+1~ | 
| PATPAY | MAIN2+1~ | 
| >> TMP | DATA+37*, DATA+39 | 
| U | SETHDR+12, SETHDR+15, DATA+8, DATA+14, DATA+17, DATA+18, DATA+21, DATA+22, DATA+38, DATA+40 , STANDARD+6, STANDARD+10, STANDARD+13, SUMMARY+7, SUMMARY+11, SUMMARY+12, SUMMARY+16, DETAIL+7, BILL+6, BILL+7 , EXTRACT+4, EXTRACT+5, EXTRACT+6, EXTRACT+7, ISNONBEN+3, ISNONBEN+5, ISNONBEN+7 | 
| >> X | DATA+5* | 
| YBARBL | DATA+38*, DATA+39, DATA+40, MAIN2~, MAIN2+3, MAIN2+4, MAIN2+20, STANDARD+14 |