BPSSCR03 ;BHAM ISC/SS - ECME USR SCREEN UTILITIES ;05-APR-05
Source file <BPSSCR03.m>
| 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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ADDINF(BP59,BPARR,BPMLEN,BPMODE) | ;to return additional information about the claim*/
|
|
| CLMINF(BP59) | ;ptr to #9002313.59
|
|
| EREJTXT(BP59) | ; return the eT/eC line for non-billable entry
|
|
| EREJTX | ;
|
|
| COMM(BP59) | ;ptr to #9002313.59
|
|
| RESP(BP59) | ;Payer Response Information
|
|
| CLMCLSTX(BP59,BPTXT) | ;*/
|
|
| CLOSED02(BPCLAIM) | ;*/
|
|
| FILTER(BP59,BPARR) | ;
|
|
| FLTUSR(BPST0,BPARR) | ;
|
|
| FLTPAT(BPST0,BPARR) | ;
|
|
| FLTRX(BPST1,BPARR) | ;
|
|
| FLTREJ(BP59,BPARR) | ;
|
|
| ISMWC(BPRX52,BPREFNUM,BPMWC) | ;
|
|
| FILTRALL(BPTMP1,BPTMP2,BPARR) | ;
|
|
| TRDFNALL(BPTMP) | ;
|
|
| SETTRDFN(BPTMP,BP59) | ;
|
|
| NB(BP59) | ; Is this BPS Transaction a TRI/CVA non-billable entry?
|
|
| NBCL(BP59) | ; Is this BPS Transaction a Closed TRI/CVA non-billable entry?
|
|
| NBOP(BP59) | ; Is this BPS Transaction an Open TRI/CVA non-billable entry?
|
| Name | Field # of Occurrence |
|---|---|
| $$USERNAM^BPSCMT01 | ADDINF+15 |
| $$PAYABLE^BPSSCR02 | FILTER+39 |
| $$REJECTED^BPSSCR02 | FILTER+38 |
| $$UNSTRAND^BPSSCR02 | FILTER+40 |
| $$FLTELIG^BPSSCR05 | FILTER+21 |
| $$FLTINS^BPSSCR05 | FILTER+68 |
| $$FLTSUBTP^BPSSCR05 | FILTER+24 |
| $$GETINSUR^BPSSCRU2 | SETTRDFN+11 |
| $$MWC^BPSSCRU2 | ISMWC+1 |
| $$MWCNAME^BPSSCRU2 | ISMWC+1 |
| $$RL^BPSSCRU2 | FILTER+45, FILTER+47 |
| $$RTBB^BPSSCRU2 | FILTER+53 |
| $$RXREF^BPSSCRU2 | FILTER+8 |
| $$CLAIMST^BPSSCRU3 | ADDINF+17 |
| $$COMMENT^BPSSCRU3 | ADDINF+4 |
| $$DATTIM^BPSSCRU3 | ADDINF+12 |
| $$GETMESS^BPSSCRU3 | ADDINF+39, ADDINF+40, ADDINF+44 |
| GETRJCOD^BPSSCRU3 | ADDINF+38 |
| REJCODES^BPSSCRU3 | FLTREJ+3 |
| WRAPLN2^BPSSCRU5 | ADDINF+39, ADDINF+40 |
| $$COBCLST^BPSSCRU6 | ADDINF+20, ADDINF+25 |
| $$ALLCOB59^BPSUTIL2 | ADDINF+22 |
| $$GET1^DIQ | EREJTXT+3 |
| PAUSE^VALM1 | CLMINF+2, COMM+2, RESP+2 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^BPST - [#9002313.59] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BPSC - [#9002313.02] | CLOSED02+3 |
| ^BPSF(9002313.93 - [#9002313.93] | FLTREJ+7 |
| ^BPST - [#9002313.59] | ADDINF+9, ADDINF+10, EREJTXT+5, CLMCLSTX+1, FILTER+4, FILTER+5, SETTRDFN+8, NB+1, NBCL+1, NBOP+1 |
| Name | Line Occurrences |
|---|---|
| $$CLOSED02 | CLMCLSTX+1, FILTER+13, FILTER+15 |
| $$EREJTXT | ADDINF+31 |
| $$FILTER | FILTRALL+4 |
| $$FLTPAT | FILTER+30 |
| $$FLTREJ | FILTER+65 |
| $$FLTRX | FILTER+33 |
| $$FLTUSR | FILTER+27 |
| $$ISMWC | FILTER+50 |
| $$NB | ADDINF+28, FILTER+13, FILTER+15, FILTER+24, FILTER+36, NBCL+1, NBOP+1 |
| $$NBCL | FILTER+17 |
| $$NBOP | FILTER+18 |
| EREJTX | EREJTXT+4 |
| SETTRDFN | TRDFNALL+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BP59 | ADDINF~, ADDINF+4, ADDINF+9, ADDINF+10, ADDINF+17, ADDINF+20, ADDINF+22, ADDINF+24, ADDINF+28, ADDINF+31 , ADDINF+38, ADDINF+39, ADDINF+40, ADDINF+44, CLMINF~, EREJTXT~, EREJTXT+3, EREJTXT+5, COMM~, RESP~ , CLMCLSTX~, CLMCLSTX+1, FILTER~, FILTER+4, FILTER+5, FILTER+8, FILTER+13, FILTER+15, FILTER+17, FILTER+18 , FILTER+21, FILTER+24, FILTER+36, FILTER+38, FILTER+39, FILTER+40, FILTER+45, FILTER+47, FILTER+53, FILTER+65 , FILTER+68, FLTREJ~, FLTREJ+3, FILTRALL+1~, FILTRALL+2*, FILTRALL+3*, FILTRALL+4, TRDFNALL+1~, TRDFNALL+2*, TRDFNALL+3* , TRDFNALL+4, SETTRDFN~, SETTRDFN+8, SETTRDFN+11, NB~, NB+1, NBCL~, NBCL+1, NBOP~, NBOP+1 |
| BP59X | ADDINF+1~, ADDINF+23*, ADDINF+24, ADDINF+25 |
| BPARR | ADDINF~, ADDINF+38, ADDINF+39, ADDINF+40, FILTER~, FILTER+21, FILTER+24, FILTER+27, FILTER+30, FILTER+33 , FILTER+65, FILTER+68, FLTUSR~, FLTPAT~, FLTRX~, FLTREJ~, FILTRALL~, FILTRALL+4 |
| BPARR( | ADDINF+5*, ADDINF+6*, ADDINF+13*, ADDINF+16*, ADDINF+29*, ADDINF+31*, ADDINF+35*, ADDINF+50*, ADDINF+51*, ADDINF+52* , FILTER+13, FILTER+15, FILTER+17, FILTER+18, FILTER+27, FILTER+30, FILTER+33, FILTER+38, FILTER+39, FILTER+40 , FILTER+41, FILTER+45, FILTER+47, FILTER+50, FILTER+55, FILTER+57, FILTER+58, FILTER+59, FILTER+60, FILTER+65 , FILTER+71, FLTUSR+1, FLTUSR+2, FLTUSR+3, FLTPAT+1, FLTPAT+2, FLTPAT+3, FLTRX+1, FLTRX+2, FLTRX+3 , FLTREJ+8, FLTREJ+9 |
| BPARR("DIVS" | FILTER+71 |
| BPCLAIM | CLOSED02~, CLOSED02+1, CLOSED02+3 |
| BPCMNT | ADDINF+8~*, ADDINF+9*, ADDINF+10 |
| BPDFN | SETTRDFN+7~, SETTRDFN+10*, SETTRDFN+14, SETTRDFN+15, SETTRDFN+16, SETTRDFN+18, SETTRDFN+23, SETTRDFN+24, SETTRDFN+25 |
| BPINSUR | SETTRDFN+7~, SETTRDFN+11*, SETTRDFN+14, SETTRDFN+15, SETTRDFN+16, SETTRDFN+18, SETTRDFN+23, SETTRDFN+24, SETTRDFN+25 |
| BPMLEN | ADDINF~, ADDINF+47, ADDINF+48, ADDINF+49 |
| BPMODE | ADDINF~, ADDINF+3 |
| BPMWC | ISMWC~, ISMWC+1 |
| BPN | ADDINF+1~, ADDINF+2*, ADDINF+5*, ADDINF+6*, ADDINF+13*, ADDINF+16*, ADDINF+29*, ADDINF+31*, ADDINF+35*, ADDINF+37 , ADDINF+38, ADDINF+39, ADDINF+40, ADDINF+50*, ADDINF+51*, ADDINF+52*, ADDINF+53 |
| BPN2 | ADDINF+1~, ADDINF+37* |
| BPPREV | SETTRDFN+7~, SETTRDFN+18*, SETTRDFN+22, SETTRDFN+25 |
| BPRCODES | FLTREJ+1~, FLTREJ+3 |
| BPRCODES( | FLTREJ+6 |
| BPREFNUM | FILTER+1~, FILTER+10*, FILTER+50, ISMWC~, ISMWC+1 |
| BPRET | FILTER+2~, FILTER+3* |
| BPRTBB | FILTER+1~, FILTER+53*, FILTER+57, FILTER+58, FILTER+59, FILTER+60 |
| BPRX52 | FILTER+1~, FILTER+9*, FILTER+50, ISMWC~, ISMWC+1 |
| BPRXREF | FILTER+1~, FILTER+8*, FILTER+9, FILTER+10 |
| BPSCOBA | ADDINF+1~, ADDINF+22*, ADDINF+23 |
| BPSFT | FILTER+2~, FILTER+54*, FILTER+56*, FILTER+57*, FILTER+58*, FILTER+59*, FILTER+60*, FILTER+61 |
| BPSRJCD | FLTREJ+2~, FLTREJ+5*, FLTREJ+6*, FLTREJ+7 |
| BPSRJFLAG | FLTREJ+2~, FLTREJ+5*, FLTREJ+6, FLTREJ+8*, FLTREJ+9*, FLTREJ+10 |
| BPSRJIEN | FLTREJ+2~, FLTREJ+7*, FLTREJ+8, FLTREJ+9 |
| BPSRPU | FILTER+2~, FILTER+35*, FILTER+37*, FILTER+38*, FILTER+39*, FILTER+40*, FILTER+41*, FILTER+42 |
| BPST0 | FILTER+1~, FILTER+4*, FILTER+7, FILTER+13, FILTER+15, FILTER+27, FILTER+30, FLTUSR~, FLTUSR+2, FLTUSR+3 , FLTPAT~, FLTPAT+2, FLTPAT+3 |
| BPST1 | FILTER+1~, FILTER+5*, FILTER+33, FILTER+71, FLTRX~, FLTRX+2, FLTRX+3 |
| BPSTATUS | ADDINF+1~, ADDINF+18*, ADDINF+34, ADDINF+42, ADDINF+43 |
| BPTMP | TRDFNALL~, TRDFNALL+3, TRDFNALL+4, SETTRDFN~, SETTRDFN+14, SETTRDFN+15, SETTRDFN+16, SETTRDFN+18, SETTRDFN+23, SETTRDFN+24 , SETTRDFN+25 |
| BPTMP1 | FILTRALL~, FILTRALL+3 |
| BPTMP2 | FILTRALL~, FILTRALL+4 |
| BPTRDT | SETTRDFN+7~, SETTRDFN+9*, SETTRDFN+15, SETTRDFN+16, SETTRDFN+22, SETTRDFN+23, SETTRDFN+24 |
| BPTXT | CLMCLSTX~, CLMCLSTX+1 |
| BPTXT1 | ADDINF+1~, ADDINF+2*, ADDINF+20*, ADDINF+25*, ADDINF+29, ADDINF+30*, ADDINF+35, ADDINF+36*, ADDINF+43, ADDINF+45* , ADDINF+47, ADDINF+48, ADDINF+49 |
| BPTXT2 | ADDINF+1~, ADDINF+2*, ADDINF+47*, ADDINF+50 |
| BPTXT3 | ADDINF+1~, ADDINF+2*, ADDINF+48*, ADDINF+51 |
| BPTXT4 | ADDINF+1~, ADDINF+2*, ADDINF+49*, ADDINF+52 |
| BPX | ADDINF+1~, ADDINF+4*, ADDINF+5, ADDINF+6, ADDINF+12*, ADDINF+13, ADDINF+15*, ADDINF+16*, ADDINF+17*, ADDINF+18 , ADDINF+43 |
| BPX1 | ADDINF+1~, ADDINF+2*, ADDINF+8~, ADDINF+10*, ADDINF+11, ADDINF+12, ADDINF+14, ADDINF+15, ADDINF+43*, ADDINF+44* , ADDINF+45 |
| BPX2 | EREJTXT+1~, EREJTXT+2*, EREJTXT+5*, EREJTX+1 |
| BPZERO | SETTRDFN+7~, SETTRDFN+8*, SETTRDFN+9, SETTRDFN+10 |
| ELIG | EREJTXT+1~, EREJTXT+3*, EREJTXT+4, EREJTXT+5 |
| I | ADDINF+1~, ADDINF+23* |
| U | ADDINF+5, ADDINF+6, ADDINF+12, ADDINF+14, ADDINF+15, ADDINF+18, ADDINF+23, ADDINF+43, EREJTXT+5, CLMCLSTX+1 , CLOSED02+3, FILTER+7, FILTER+9, FILTER+10, FILTER+13, FILTER+15, FILTER+71, FLTUSR+2, FLTUSR+3, FLTPAT+2 , FLTPAT+3, FLTRX+2, FLTRX+3, SETTRDFN+9, SETTRDFN+10, NB+1, NBCL+1, NBOP+1 |