GMRA2PRE ;HIRMFO/FPT-Pre-init for GMRA*4*2 ;7/24/96 08:43
Source file <GMRA2PRE.m>
| Package | Total | Call Graph |
|---|---|---|
| Adverse Reaction Tracking | 1 | $$NKASCR^GMRANKA |
| VA Fileman | 1 | (,EN)^DIK |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DEL01 | ; Delete ^DD(120.8,.01 and ^GMRD(120.8,"SOUND")
; This field will be restored in the installation process without ; the soundex cross-reference |
|
| ERR | ; Delete patient assessment entry in file 120.86 if second piece is 1
; and there are no active entries (i.e., not entered-in-error) in ; file 120.8 for the patient. ; In File 120.86, fix missing .01 value, delete erroneous 5th piece and ; fix 2nd piece. |
| FileNo | Call Tags |
|---|---|
| ^GMR(120.86 - [#120.86] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^GMR(120.86 - [#120.86] | ERR+6, ERR+7, ERR+9*, ERR+10*, ERR+15* |
| ^GMRD(120.82 - [#120.82] | DEL01+4! |
| Name | Line Occurrences |
|---|---|
| DEL01 | GMRA2PRE+7 |
| ERR | GMRA2PRE+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | DEL01+3*, DEL01+4!, ERR+10*, ERR+11*, ERR+14*, ERR+18! |
| DA(1 | DEL01+3* |
| DIK | DEL01+3*, DEL01+4!, ERR+10*, ERR+11*, ERR+14*, ERR+18! |
| DIK(1 | ERR+10*! |
| GMA | ERR+18! |
| GMRALOOP | ERR+5*, ERR+6*, ERR+7, ERR+9, ERR+10, ERR+11, ERR+13, ERR+14, ERR+15, ERR+18! |
| GMRANKA | ERR+13*, ERR+14, ERR+15, ERR+18! |
| GMRANODE | ERR+7*, ERR+8, ERR+9, ERR+10, ERR+18! |
| GMRAPRA | ERR+8*, ERR+11, ERR+12, ERR+18! |
| IOST | ERR+11, ERR+14 |
| U | ERR+8, ERR+9, ERR+10, ERR+15 |