GMRVEE0 ;HIRMFO/RM,YH-ENTERED IN ERROR EDIT ;3/15/99 15:04
Source file <GMRVEE0.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
General Medical Record - Vitals | 2 | GMRV ERROR EDIT GMRVED5 |
Nursing Service | 1 | NURCVED0 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN1 | ; ENTRY FROM OPTION GMRV ERROR EDIT
|
|
EN2 | ; ENTRY TO VITALS ENTERED IN ERROR IF DFN IS KNOWN.
|
|
DATE | ||
EN3 | ;ENTRY TO ERROR EDIT PROVIDED DFN AND DATE/TIME ARE GIVEN
|
|
Q | ||
WHTL | ; ELIMINATE ALL NON GMRVITY CHILDREN FROM GMRARTY
|
|
CHSDT | ; CHOOSE A DATE FOR ALL VITAL TYPES, OR DROP THRU FROM SINGLE VITAL TYPE
|
|
CHNUM | ||
SDA | ||
PRTCHS | ; PRINT CHOICES FOR DATE/TIME DEFINED BY GMRX
|
|
PRTLN | ; PRINT DATA FOR VITAL RECORD DEFINED BY GMRDA
|
|
DATACK | ; CHECK TO SEE IF DATA FOR THIS PATIENT FOR THIS DATE. IF THERE IS
; SET UP AN ARRAY GMRARTY WITH GMRARTY=$S(0:ONE TYPE ONLY,1:MORE ; THAN ONE TYPE) AND GMRARTY(TYPE IEN)=120.5 ENTRY |
|
CNLP | ;
|
|
STARTY | ; SET GMRARTY ARRAY
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | Classic Fileman Calls |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | DATE*! |
%DT("A" | DATE* |
%DT(0 | DATE* |
%T | Q+1! |
%Y | Q+1! |
D0 | Q+1! |
DA | Q! |
DFN | EN1+1*, EN2+1, Q!, DATACK+4, CNLP+1, STARTY+1 |
DI | Q+1! |
DIC | EN1+1*!, EN3+2*!, Q! |
DIC("A" | EN3+2* |
DIC("S" | EN3+2* |
DIC(0 | EN1+1*, EN3+2* |
DIE | Q! |
DQ | Q+1! |
DR | Q! |
DTIME | CHSDT+3, CHNUM |
>> DTOUT | EN3+3 |
>> DUOUT | EN3+3 |
GDATE | Q! |
GDFN | Q! |
GDT | Q+2! |
GFLAG | Q+1!, CHSDT+2*, CHSDT+3* |
GMRAINP | Q! |
GMRARTY | EN3+2, EN3+5, EN3+7, Q!, DATACK+3!, DATACK+5, STARTY+1* |
GMRARTY( | EN3+8, WHTL+1!, WHTL+2, SDA!, PRTCHS+1, STARTY+1* |
GMRARTY("" | EN3+8 |
GMRARTY("D" | EN3+1, EN3+8, WHTL+2!, CHSDT+2, SDA!, STARTY+1* |
GMRARTY(0 | EN3+5 |
GMRCHC | Q! |
GMRCNT | Q!, CHSDT+1*, CHSDT+2*, CHSDT+3* |
GMRDA | Q!, PRTCHS+1*, PRTLN+1, PRTLN+3, STARTY+1* |
GMRDAT | Q!, PRTLN+1*, PRTLN+2, PRTLN+14 |
GMRDATA | Q+1! |
GMRDATE | Q! |
GMRDFN | Q! |
GMREDB | Q! |
GMRENTY | Q+1! |
GMRFDT | Q! |
GMRI | Q! |
GMRINF | Q+1! |
GMRNM | Q!, CHSDT+1*, CHSDT+2*, CHNUM+2 |
GMROK | Q+2! |
GMROUT | EN1+1*, EN2+1*, DATE*, DATE+1*, EN3+1, EN3+3*, Q+2!, CHSDT+2, CHSDT+3*, CHNUM* , CHNUM+1*, DATACK+5* |
GMRQUAL | Q+1! |
GMRSDT | Q! |
GMRSITE | Q! |
GMRSTR | Q! |
GMRTY | Q! |
GMRVARY | Q+1!, PRTLN+3!* |
GMRVCH | Q! |
GMRVDATE | DATE+1*, Q!, DATACK+3, CNLP+1 |
GMRVDT | EN3+8*, Q!, SDA*, CNLP+1*, STARTY+1 |
GMRVDT(0 | DATACK+3*, CNLP+1 |
GMRVHLOC | Q! |
GMRVIDT | Q! |
GMRVIT | Q! |
GMRVITY | EN3+4*, EN3+5*, EN3+6, EN3+8*, Q!, WHTL+1, WHTL+2, DATACK+4*, CNLP+1, STARTY+1 |
GMRVPO | PRTLN+14~*, PRTLN+15 |
GMRVX | Q!, PRTLN+2!*, PRTLN+3, PRTLN+4, PRTLN+5, PRTLN+6, PRTLN+7, PRTLN+11, PRTLN+12, PRTLN+13 , PRTLN+17, PRTLN+21, PRTLN+22 |
GMRVX(0 | PRTLN+2*, PRTLN+4*, PRTLN+5*, PRTLN+6*, PRTLN+8*, PRTLN+9*, PRTLN+10*, PRTLN+11*, PRTLN+12*, PRTLN+13 , PRTLN+15*, PRTLN+18, PRTLN+19, PRTLN+21 |
GMRVX(1 | PRTLN+18*, PRTLN+19*, PRTLN+21 |
GMRX | EN3+1*, Q!, WHTL+1*, WHTL+2*, CHSDT+2*, CHNUM*, CHNUM+1, CHNUM+2, SDA*, PRTCHS+1 |
GMRY | Q!, SDA*, PRTCHS+1*, PRTLN+2, PRTLN+3 |
GMRZ | Q! |
GMRZZ | Q+1!, PRTLN+3*, PRTLN+18, PRTLN+19, PRTLN+22 |
GMRZZ(1 | PRTLN+3* |
GSAVE | Q! |
POP | Q! |
VAERR | Q+1! |
VAIP | Q+1! |
>> X | DATACK+3 |
>> X1 | DATACK+3* |
>> X2 | DATACK+3* |
>> Y | EN1+1, DATE, DATE+1, EN3+4, CHSDT+2* |