IB20P669 ;/Albany - IB*2.0*669 POST INSTALL;03/10/20 2:10pm
Source file <IB20P669.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| POSTINIT | ;Post Install for IB*2.0*669
|
|
| QUEUEINT | ; Run the UC Visit DB initialization in the background.
|
|
| INITUCDB | ||
| DBCHK(IBDFN,IBVDT) | ; Check to see if the visit is already in the DB.
; |
|
| CANCLUC | ; Initialize the new CAN CANCEL URGENT CARE field (.04) in the IB CHARGE REMOVE REASON file (#350.3).
; Also inactivate UC-ENTERED IN ERROR AND UC-CHANGE IN ELIGIBILITY ; Also define the type of UC Visit Tracking DB (351.82) update process to follow when using the cancellation |
|
| IBDDAT | ; Cancellation reasons (350.3) to update
|
|
| NEWCREAS | ; New Cancellation Reasons
|
|
| REASDAT | ; Fee Service to inactivate
|
| Name | Field # of Occurrence |
|---|---|
| C^%DTC | INITUCDB+27 |
| ^%ZTLOAD | QUEUEINT+9, INITUCDB+97 |
| $$S^%ZTLOAD | INITUCDB+88 |
| FILE^DICN | NEWCREAS+19 |
| ^DIE | INITUCDB+84, CANCLUC+22, NEWCREAS+24 |
| UPDATE^DIE | INITUCDB+71 |
| IX^DIK | NEWCREAS+26 |
| SITE^IBAUTL | INITUCDB+21 |
| $$GETELGP^IBECEA36 | INITUCDB+55 |
| $$GETVST^IBECEA36 | INITUCDB+56 |
| $$DT^XLFDT | INITUCDB+27 |
| $$NOW^XLFDT | QUEUEINT+6, INITUCDB+94 |
| BMES^XPDUTL | POSTINIT+1, POSTINIT+7, QUEUEINT+10 |
| MES^XPDUTL | CANCLUC+7, CANCLUC+26, NEWCREAS+7 |
| FileNo | Call Tags |
|---|---|
| ^IBE(350.3 - [#350.3] | Classic Fileman Calls |
| ^IBUC(351.82 - [#351.82] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IB - [#350] | INITUCDB+38 |
| ^IB("AE" | INITUCDB+37 |
| ^IBE(350.1 - [#350.1] | INITUCDB+12, INITUCDB+13, INITUCDB+14 |
| ^IBE(350.3 - [#350.3] | INITUCDB+15, INITUCDB+16, INITUCDB+17, INITUCDB+18, INITUCDB+19, INITUCDB+20, CANCLUC+14, NEWCREAS+16 |
| ^IBUC(351.82 - [#351.82] | DBCHK+6, DBCHK+7 |
| ^XTMP("IB20P669" | INITUCDB+28*, INITUCDB+35, INITUCDB+87* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |