IB20P276 ;DALOI/AAT - POST INIT ACTION ;24-JUN-2003
Source file <IB20P276.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;
|
|
| NEWNBR | ; Add/Modify IB non-billable reasons #356.8
|
|
| OPT | ; Enable the menu option "IBCNR EDIT HIPAA NCPDP FLAG"
|
|
| ADDUSR | ; Add the user to the New Person file (#200)
|
|
| VERIFY(IBIFN,IBRX,IBFIL) | ;check and correct
|
|
| SETQTY(IBX,QTY,DSUPP) | ;
|
|
| GETRX(IBIFN) | ;Get Rx from 362.4
|
|
| BULL | ; Generate a bulletin with modified bills.
|
|
| SETSTA(IBIFN) | ; set the status
|
|
| BPSFIX | ;CONVERT OLD BPS CODES
|
|
| LOGFIX | ;CONVERT CLOSE REASON IN THE IB LOG
|
|
| REASONS | ;CLOSE REASON to add/modify into file #356.8
|
| Name | Field # of Occurrence |
|---|---|
| ^DIC | ADDUSR+4 |
| FILE^DICN | ADDUSR+8 |
| FILE^DIE | OPT+5, SETQTY+4, SETSTA+4 |
| UPDATE^DIE | NEWNBR+19 |
| ^IBCNRXI1 | EN+14 |
| $$FMADD^XLFDT | BPSFIX+13 |
| ^XMD | BULL+7 |
| BMES^XPDUTL | EN+1, EN+5, EN+7, EN+10, EN+13, EN+16, OPT+3, OPT+8, ADDUSR+6, ADDUSR+7 , ADDUSR+10, ADDUSR+11, ADDUSR+13 |
| MES^XPDUTL | NEWNBR+26, BPSFIX+3 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BPSC - [#9002313.02] | BPSFIX+6, BPSFIX+8, BPSFIX+11*, BPSFIX+12* |
| ^DIC(19 - [#19] | OPT+2 |
| ^IBA(362.4 - [#362.4] | VERIFY+6, VERIFY+8, GETRX+3, GETRX+4 |
| ^IBE(356.8 - [#356.8] | NEWNBR+9, NEWNBR+11, NEWNBR+24*, NEWNBR+25*, BPSFIX+4, BPSFIX+5, LOGFIX+2, LOGFIX+3 |
| ^PSRX - [#52] | VERIFY+2 |
| ^PSRX("B" | GETRX+5 |
| ^XTMP( | BPSFIX+3, BPSFIX+13*, LOGFIX+6, LOGFIX+7, LOGFIX+8, LOGFIX+9, LOGFIX+11, LOGFIX+14*, LOGFIX+15* |
| Name | Field # of Occurrence |
|---|---|
| ^( | BPSFIX+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DD | ADDUSR+2~, ADDUSR+8! |
| DIC | ADDUSR+2~, ADDUSR+4*, ADDUSR+8*! |
| DIC("DR" | ADDUSR+8* |
| DIC(0 | ADDUSR+4*, ADDUSR+8* |
| DLAYGO | ADDUSR+2~, ADDUSR+8*! |
| DO | ADDUSR+2~, ADDUSR+8! |
| DSUPP | VERIFY+1~, VERIFY+4*, VERIFY+9, VERIFY+11, SETQTY~, SETQTY+2 |
| DT | BPSFIX+13 |
| DUZ | BULL+5 |
| I | BPSFIX+1~, BPSFIX+4*, BPSFIX+6*, BPSFIX+8, BPSFIX+11, BPSFIX+12, LOGFIX+1~, LOGFIX+2*, LOGFIX+5*, LOGFIX+6* , LOGFIX+7, LOGFIX+8, LOGFIX+9, LOGFIX+11, LOGFIX+14, LOGFIX+15 |
| IBC | BPSFIX+1~, LOGFIX+1~ |
| IBC( | BPSFIX+4*, BPSFIX+9, LOGFIX+2*, LOGFIX+12 |
| IBCNT | NEWNBR+14~, NEWNBR+15*, NEWNBR+20* |
| IBDROP | LOGFIX+1~ |
| IBE02 | NEWNBR+3~, NEWNBR+5*, NEWNBR+17, NEWNBR+24 |
| IBE03 | NEWNBR+3~, NEWNBR+6*, NEWNBR+18, NEWNBR+25 |
| IBERR | NEWNBR+14~, NEWNBR+20, OPT+1~, OPT+6, SETQTY+1~, SETSTA+1~, SETSTA+5 |
| IBERR( | NEWNBR+21, NEWNBR+22, OPT+7, OPT+8 |
| IBFDA | SETSTA+1~ |
| IBFDA(430 | SETSTA+3* |
| IBFIL | VERIFY~, VERIFY+2 |
| IBGRP | BULL+1~ |
| IBI | NEWNBR+1~, NEWNBR+2*, NEWNBR+8 |
| IBIEN | NEWNBR+3~, NEWNBR+9*, NEWNBR+10*, NEWNBR+11*, NEWNBR+12, NEWNBR+13, NEWNBR+14~, NEWNBR+23, NEWNBR+24, NEWNBR+25 |
| IBIENS | SETSTA+1~, SETSTA+2*, SETSTA+3 |
| IBIFN | VERIFY~, VERIFY+6, GETRX~, GETRX+3, SETSTA~, SETSTA+2 |
| IBL | NEWNBR+3~, NEWNBR+7*, NEWNBR+8 |
| IBMES | NEWNBR+1~, NEWNBR+8*, NEWNBR+12*, NEWNBR+22*, NEWNBR+26 |
| IBNAME | NEWNBR+3~, NEWNBR+4*, NEWNBR+7, NEWNBR+8, NEWNBR+9, NEWNBR+16, ADDUSR+2~, ADDUSR+3*, ADDUSR+4, ADDUSR+6 , ADDUSR+7, ADDUSR+8, ADDUSR+10, ADDUSR+13 |
| IBNEW | BPSFIX+7~, BPSFIX+9*, BPSFIX+11, LOGFIX+10~, LOGFIX+12*, LOGFIX+14 |
| IBNODE | LOGFIX+1~, LOGFIX+5*, LOGFIX+6 |
| IBOLD | BPSFIX+7~, BPSFIX+8*, BPSFIX+9, LOGFIX+10~, LOGFIX+11*, LOGFIX+12, LOGFIX+15 |
| IBOTH | BPSFIX+1~, BPSFIX+5*, BPSFIX+9, LOGFIX+1~, LOGFIX+3*, LOGFIX+12 |
| IBRT | NEWNBR+14~, OPT+1~, SETQTY+1~ |
| IBRT( | NEWNBR+16*, NEWNBR+17*, NEWNBR+18*, SETQTY+2*, SETQTY+3* |
| IBRT(19 | OPT+4* |
| IBRX | VERIFY~, VERIFY+2, GETRX+1~, GETRX+2*, GETRX+5*, GETRX+6 |
| IBRXN | GETRX+1~, GETRX+4*, GETRX+5 |
| IBRXZ | VERIFY+1~, VERIFY+2*, VERIFY+3, VERIFY+4 |
| IBT | BPSFIX+1~, LOGFIX+1~ |
| IBX | VERIFY+1~, VERIFY+6*, VERIFY+8, VERIFY+11, SETQTY~, SETQTY+2, SETQTY+3, GETRX+1~, GETRX+3*, GETRX+4 |
| IBY | NEWNBR+1~, NEWNBR+2*, NEWNBR+4, NEWNBR+5, NEWNBR+6, BPSFIX+1~, BPSFIX+4*, LOGFIX+1~, LOGFIX+2* |
| IBZ | VERIFY+1~, VERIFY+8*, VERIFY+9, BPSFIX+1~, BPSFIX+6*, LOGFIX+1~ |
| IEN | OPT+1~, OPT+2*, OPT+3, OPT+4 |
| J | LOGFIX+1~, LOGFIX+7*, LOGFIX+8, LOGFIX+9, LOGFIX+11, LOGFIX+14, LOGFIX+15 |
| QTY | VERIFY+1~, VERIFY+3*, VERIFY+9, VERIFY+11, SETQTY~, SETQTY+3 |
| U | NEWNBR+4, NEWNBR+5, NEWNBR+6, NEWNBR+24, NEWNBR+25, VERIFY+3, VERIFY+4, VERIFY+9, GETRX+4, BPSFIX+4 , BPSFIX+6, BPSFIX+8, BPSFIX+11, BPSFIX+12, BPSFIX+13, LOGFIX+2 |
| X | ADDUSR+2~, ADDUSR+4*, ADDUSR+8* |
| XMDUZ | BULL+1~, BULL+4* |
| XMSUB | BULL+1~, BULL+3* |
| XMTEXT | BULL+1~, BULL+4* |
| XMY | BULL+1~ |
| XMY( | BULL+5* |
| XMY("G.PRCA E | RROR" , BULL+6* |
| Y | NEWNBR+21~*, NEWNBR+22, OPT+7~*, OPT+8, ADDUSR+2~, ADDUSR+5, ADDUSR+9 |
| ZNODE | BPSFIX+1~, BPSFIX+2*, BPSFIX+3, BPSFIX+13 |