DG53114T ;ALB/MTC - TRICARE ENHANCEMENT POST INSTALL UPDATES; 3/4/97
Source file <DG53114T.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;
|
|
| PAT | ;-- This function will add a TRICARE patient Type to file #391
; if it dies not already exists. |
|
| PATQ | ;
|
|
| ELIG | ;-- This function will add a TRICARE/CHAMPUS eligibility to file #8
|
|
| ELIGQ | ;
|
|
| MESS | ;-- This routine will display a message indicating that
; the sites should examine the entries in file #8 to ; check if any need to be pointed to the new Tricare/Champus ; eligibility code. |
|
| UPDAT | ; update package file for install of Scheduling patch SD*5.3*94
|
|
| UPPOS | ;-- This routine will update the POS file 21 eligibility sub-file
|
|
| UPPOSQ | ;
|
|
| POSTEX | ;
|
| FileNo | Call Tags |
|---|---|
| ^DG(391 - [#391] | Classic Fileman Calls |
| ^DIC(8 - [#8] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD(21 | UPPOS+12 |
| ^DG(391 - [#391] | PAT+7 |
| ^DIC(21 - [#21] | UPPOS+8, UPPOS+10 |
| ^DIC(8 - [#8] | ELIG+5, UPPOS+5 |
| ^DIC(8.1 - [#8.1] | ELIG+9 |
| ^DIC(9.4 - [#9.4] | UPDAT+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| D0 | PAT+3~, ELIG+2~ |
| DA | PAT+3~, ELIG+2~, UPPOS+2~, UPPOS+14! |
| DA(1 | UPPOS+12*, UPPOS+14! |
| DGCNT | UPPOS+2~, UPPOS+7* |
| DGE | ELIG+2~, ELIG+9*, ELIG+11 |
| DGX | UPPOS+2~, UPPOS+5*, UPPOS+6, UPPOS+10 |
| DGY | UPPOS+2~, UPPOS+7*, UPPOS+8 |
| DGZ | UPPOS+2~, UPPOS+8*, UPPOS+9, UPPOS+10, UPPOS+11, UPPOS+12 |
| DIC | PAT+3~, PAT+11*, ELIG+2~, ELIG+10*, UPPOS+2~, UPPOS+11*, UPPOS+14! |
| DIC("DR" | PAT+12*, ELIG+11* |
| DIC("P" | UPPOS+12*, UPPOS+14! |
| DIC(0 | PAT+12*, ELIG+11*, UPPOS+12* |
| DIE | PAT+3~, ELIG+2~ |
| DLAYGO | UPPOS+2~, UPPOS+12*, UPPOS+14! |
| DR | PAT+3~, ELIG+2~ |
| DT | UPDAT+5 |
| DUZ | UPDAT+5 |
| PATCH | UPDAT+1~, UPDAT+5*, UPDAT+8* |
| PKG | UPDAT+1~, UPDAT+3*, UPDAT+8 |
| U | UPPOS+12 |
| VER | UPDAT+1~, UPDAT+4*, UPDAT+8 |
| X | PAT+3~, PAT+7*, PAT+8, PAT+11*, ELIG+2~, ELIG+5*, ELIG+6, ELIG+10*, UPPOS+2~, UPPOS+12* |
| Y | PAT+3~, PAT+14, ELIG+2~, ELIG+13, UPPOS+2~ |
| Name | Field # of Occurrence |
|---|---|
| $T(POSTEX+DGCNT | UPPOS+7 |
