GMRAPER2 ;HIRMFO/WAA CENTRAL ENTRY FOR REACTIONS ;17-Aug-2011 14:49;DU
Source file <GMRAPER2.m>
| Package | Total | Call Graph |
|---|---|---|
| Adverse Reaction Tracking | 3 | EN1^GMRAPER0 EN1^GMRAPTB SITE^GMRAUTL |
| VA Fileman | 3 | ^DIC ^DIE (,IX1)^DIK |
| Package | Total | Caller Graph |
|---|---|---|
| Adverse Reaction Tracking | 3 | GMRAPED0 GMRAPEH0 GMRAPEO0 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ADR | ;This is to load the data in 120.85 on the 2 Multi.
|
|
| SOURCE() | ;Get the source
|
|
| LOAD(GMRAIEN,GMRAFILE,GMRAND) | ;
|
|
| SITE | ; v--> Load predefined sign and symptoms from SITE FILE
|
|
| EXIT | ;KILL CLEAN
|
|
| ADREAC | ; ADD ENTRY TO SIGNS/SYMPTOMS MULTIPLE
|
|
| PAT | ;This is to process entries in file 120.8 on the 10 mutli.
|
|
| EN1(GMRAIEN,GMRAFILE,GMRAOUT,GMRAODT) | ; ENTRY TO EDIT THE OBSERVED A/AR DATA
; INPUT ; GMRAPIEN = THE INTERNAL ENTRY NUMBER FOR THE REACTION ; GMRAFILE = THE FILE NUMBER OF THE ENTRY IE 120.9 OR 120.85 ; GMRAODT = THE OBSERVED DATE OF THE REACTION (OPTIONAL) |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^GMR(120.8 - [#120.8] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^GMR( | SITE+13, SITE+23, SITE+26, ADREAC+1, ADREAC+2*, ADREAC+4*, LOAD+9, LOAD+10, LOAD+15 |
| ^GMR(120.8 - [#120.8] | PAT+2, PAT+3, ADR+4 |
| ^GMR(120.85 - [#120.85] | ADR+3 |
| ^GMRD(120.83 - [#120.83] | SITE+3, SITE+5, LOAD+11 |
| ^GMRD(120.84 - [#120.84] | SITE+2 |
| Name | Line Occurrences |
|---|---|
| ADR | SITE+8 |
| ADREAC | SITE+18, SITE+20 |
| EXIT | SITE+11 |
| LOAD | SITE+9 |
| PAT | SITE+7 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | SITE+2, SITE+3, SITE+13*, SITE+26, LOAD+10 |
| ^(9999999.11 | LOAD+15 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | SITE+23*, SITE+26*, ADREAC+1*, ADREAC+2, ADREAC+4, SOURCE+1~ |
| DA(1 | SITE+22*, SITE+23, SITE+25*, SITE+26, ADREAC+3*, ADREAC+8* |
| DFN | EN1+8~, PAT+2~* |
| DIC | SOURCE+1~, SOURCE+2* |
| DIC("A" | SOURCE+5* |
| DIC("S" | SOURCE+4* |
| DIC(0 | SOURCE+3* |
| DIE | ADREAC+7*, ADREAC+10! |
| >> DIK | SITE+22*, SITE+25*, ADREAC+4* |
| DIRUT | SOURCE+6! |
| DR | ADREAC+8*, ADREAC+10!, SOURCE+1~ |
| DUZ | SITE+17, SITE+20 |
| GMRAASK | EN1+9~ |
| GMRACHC | EN1+9~ |
| GMRADATE | EN1+9~, SITE+10* |
| GMRAFILE | EN1~, SITE+7, SITE+8, SITE+9, SITE+13, SITE+22, SITE+23, SITE+25, SITE+26, SITE+27 , ADREAC+1, ADREAC+2, ADREAC+4, LOAD~, LOAD+9, LOAD+10, LOAD+15 |
| GMRAFLG | SITE+12~*, SITE+18*, SITE+20*, SITE+23*, SITE+26*, SITE+27 |
| GMRAIEN | EN1~, SITE+9, SITE+13, SITE+22, SITE+25, ADREAC+1, ADREAC+2, ADREAC+3, ADREAC+4, ADREAC+8 , PAT+1, ADR+2, LOAD~, LOAD+9, LOAD+10, LOAD+15 |
| GMRAND | SITE+7*, SITE+8*, SITE+9, SITE+13, SITE+22, SITE+23, SITE+25, SITE+26, ADREAC+1, ADREAC+2 , ADREAC+4, LOAD~, LOAD+9, LOAD+10, LOAD+15 |
| GMRANDT | EN1+8~, ADR+1* |
| GMRAODT | EN1~, EN1+10* |
| GMRAOTH | EN1+8~, SITE+5*, SITE+20, SITE+26, LOAD+11 |
| GMRAOUT | EN1~, SITE+11, PAT+2*, ADR+3*, ADR+4* |
| >> GMRAPA | PAT+1*, PAT+2, PAT+3, ADR+4* |
| >> GMRAPA(0 | PAT+3*, ADR+4* |
| >> GMRAPA1 | ADR+2*, ADR+3 |
| >> GMRAPA1(0 | ADR+3*, ADR+4 |
| GMRAR10 | EN1+9~ |
| GMRAR10( | SITE+3* |
| >> GMRARAD( | SITE+16, SITE+17 |
| >> GMRARDL( | SITE+23 |
| GMRAREAC | EN1+8~ |
| >> GMRAREC | SITE+16*, SITE+17, SITE+18, SITE+20*, SITE+23*, SITE+26* |
| GMRARECN | EN1+8~ |
| >> GMRAROT( | SITE+20 |
| >> GMRAROTD( | SITE+26 |
| GMRARPR | EN1+9~ |
| GMRARPR( | LOAD+14*, LOAD+16* |
| GMRASITE | EN1+8~, EN1+12 |
| >> GMRAWHO( | SITE+18 |
| GMRAX | EN1+8~, SITE+1*, SITE+2, SITE+3, SITE+20*, LOAD+9*, LOAD+10, LOAD+15 |
| GMRAY | EN1+8~, EN1+12*, SITE+2 |
| >> GMRAZN | ADREAC+1*, ADREAC+4 |
| >> GMRSRC | SITE+10* |
| U | SITE+2, SITE+3, SITE+17, SITE+18, SITE+20, SITE+26, ADREAC+1, ADREAC+4, PAT+2, ADR+4 , LOAD+11, LOAD+14, LOAD+16 |
| X | SITE+2*, SITE+3, SITE+17*, SITE+20*, ADREAC+2, LOAD+8~, LOAD+11*, LOAD+13, LOAD+14, LOAD+16 |
| >> X2 | SITE+18*, ADREAC+6 |
| Y | SITE+3*, LOAD+8~, LOAD+10*, LOAD+11, LOAD+13, LOAD+14, LOAD+16, SOURCE+1~, SOURCE+7 |
| Z | LOAD+8~, LOAD+15*, LOAD+16 |