BPSOS03 ;BHAM ISC/FCS/DRS - 9002313.03 utilities ;06/01/2004
Source file <BPSOS03.m>
| Package | Total | Call Graph |
|---|---|---|
| E Claims Management Engine | 3 | $$CLAIM^BPSBUTL $$DFF2EXT^BPSECFM ADDMESS^BPSSCRLG |
| VA FileMan | 1 | $$GET1^DIQ |
| 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 |
|---|---|---|
| E Claims Management Engine | 7 | BPSNCPD1 BPSOSQL BPSRPC02 BPSRPT2 BPSUTIL ^BPST ^BPSTL |
| Outpatient Pharmacy | 1 | PSOBPSU1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INSPAID(N) | ;EP - from BPSOSQL - total amount paid by insurer
|
|
| INSPAID1(N,RX) | ;EP -
|
|
| NETPAID1(N,RX) | ; EP - computed field in 9002313.57 and 9002313.59
|
|
| REJTEXT(RESP,POS,ARR) | ; EP - fills array (passed by ref)
|
|
| MESSAGE(RESP,POS,N) | ; EP - get additional message from response
|
|
| DFF2EXT(X) | ||
| 505(M,N) | ||
| 506(M,N) | ||
| 507(M,N) | ||
| 508(M,N) | ||
| 509(M,N) | ||
| 512(M,N) | ||
| 513(M,N) | ||
| 514(M,N) | ||
| 517(M,N) | ||
| 518(M,N) | ||
| 519(M,N) | ||
| 520(M,N) | ||
| 521(M,N) | ||
| 523(M,N) | ||
| 500(M,N,J) | ; field #500+J signed numeric
|
|
| RESPONSE(BPSRX,BPSFILL,BPSCOB) | ; Pull fields from response.
; MRD;BPS*1.0*20 - Created this API to display additional information ; to the user when an RRR is successfully resubmitted. ; Input: (r) BPSRX - Rx IEN (#52) ; (o) BPSFILL - Refill# ; (o) BPSCOB - Payer Sequence ; Output: [1] Total Amount Paid, file# 9002313.0301, field #509 ; [2] Ingredient Cost Paid, field #506 ; [3] Amount of Copay/Coinsurance, field #518 ; [4] Dispensing Fee Paid, field #507 ; [5] Amount Applied to Periodic Deductible, field #517 ; [6] Remaining Deductible Amount, field #513 |
| FileNo | Call Tags |
|---|---|
| ^BPST - [#9002313.59] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BPSC - [#9002313.02] | NETPAID1+5 |
| ^BPSF(9002313.92 - [#9002313.92] | NETPAID1+7, NETPAID1+12* |
| ^BPSF(9002313.93 - [#9002313.93] | REJTEXT+6, REJTEXT+7 |
| ^BPSR - [#9002313.03] | INSPAID+2, NETPAID1+3, REJTEXT+3, REJTEXT+4, MESSAGE+3, 500+2 |
| Name | Line Occurrences |
|---|---|
| $$500 | 505, 506, 507, 508, 509, 512, 513, 514, 517, 518 , 519, 520, 521, 523 |
| $$505 | NETPAID1+9, NETPAID1+13 |
| $$506 | RESPONSE+32 |
| $$507 | RESPONSE+33 |
| $$509 | INSPAID1+1, NETPAID1+1, RESPONSE+32 |
| $$513 | RESPONSE+34 |
| $$517 | RESPONSE+34 |
| $$518 | RESPONSE+33 |
| $$DFF2EXT | 500+4 |
| $$INSPAID1 | INSPAID+4 |
| $$MESSAGE | MESSAGE+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| A | REJTEXT+2~*, REJTEXT+3*, REJTEXT+4 |
| ADDMESS | MESSAGE+5~, MESSAGE+6 |
| ADDMESS( | MESSAGE+7 |
| ARR | REJTEXT~, REJTEXT+1! |
| ARR( | REJTEXT+9* |
| BPSCOB | RESPONSE~, RESPONSE+17*, RESPONSE+22 |
| BPSFILL | RESPONSE~, RESPONSE+16*, RESPONSE+22 |
| BPSPOS | RESPONSE+13~, RESPONSE+29*, RESPONSE+30*, RESPONSE+32, RESPONSE+33, RESPONSE+34 |
| BPSRESP | RESPONSE+13~, RESPONSE+24*, RESPONSE+25, RESPONSE+32, RESPONSE+33, RESPONSE+34 |
| BPSRX | RESPONSE~, RESPONSE+15, RESPONSE+22 |
| BPSTRAN | RESPONSE+13~, RESPONSE+23*, RESPONSE+25, RESPONSE+29 |
| BPSX | RESPONSE+13~, RESPONSE+22*, RESPONSE+23, RESPONSE+24, RESPONSE+32*, RESPONSE+33*, RESPONSE+34*, RESPONSE+36 |
| FMT | NETPAID1+3~, NETPAID1+6*, NETPAID1+7, NETPAID1+11, NETPAID1+12 |
| I | REJTEXT+2~*, REJTEXT+9* |
| IEN02 | NETPAID1+3~*, NETPAID1+4, NETPAID1+5 |
| INS | NETPAID1+3~, NETPAID1+5*, NETPAID1+6 |
| J | 500~, 500+2 |
| M | 505~, 506~, 507~, 508~, 509~, 512~, 513~, 514~, 517~, 518~ , 519~, 520~, 521~, 523~, 500~, 500+1, 500+2 |
| MSG | MESSAGE+4~*, MESSAGE+7* |
| N | INSPAID~, INSPAID+2, INSPAID+4, INSPAID1~, INSPAID1+1, NETPAID1~, NETPAID1+1, NETPAID1+9, NETPAID1+13, MESSAGE~ , MESSAGE+3, MESSAGE+4, MESSAGE+5~, MESSAGE+7*, 505~, 506~, 507~, 508~, 509~, 512~ , 513~, 514~, 517~, 518~, 519~, 520~, 521~, 523~, 500~, 500+1 , 500+2 |
| POS | REJTEXT~, REJTEXT+3, REJTEXT+4, MESSAGE~, MESSAGE+2*, MESSAGE+6, MESSAGE+8 |
| R | REJTEXT+2~, REJTEXT+4*, REJTEXT+5, REJTEXT+6, REJTEXT+8 |
| RESP | NETPAID1+3, REJTEXT~, REJTEXT+3, REJTEXT+4, MESSAGE~, MESSAGE+1, MESSAGE+3, MESSAGE+6, MESSAGE+8 |
| RX | INSPAID+1~*, INSPAID+2*, INSPAID+4, INSPAID1~, INSPAID1+1, NETPAID1~, NETPAID1+1, NETPAID1+9, NETPAID1+13 |
| S | REJTEXT+6~*, REJTEXT+7 |
| SUB | NETPAID1+2~*, NETPAID1+8*, NETPAID1+9, NETPAID1+10 |
| TOT | INSPAID+1~*, INSPAID+5*, INSPAID+6 |
| U | NETPAID1+3, NETPAID1+5, NETPAID1+7, NETPAID1+12, REJTEXT+4, REJTEXT+7, MESSAGE+3, 500+2, RESPONSE+23, RESPONSE+24 |
| X | INSPAID+1~, INSPAID+4*, INSPAID+5, INSPAID1+1~*, NETPAID1+1~*, NETPAID1+7~*, NETPAID1+8, NETPAID1+9*, NETPAID1+10, NETPAID1+13* , NETPAID1+14, REJTEXT+2~, REJTEXT+7*, REJTEXT+8*, REJTEXT+9, DFF2EXT~, 500+2~*, 500+3*, 500+4*, 500+5 |