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 |