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 |