©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
GMRVXPRE ;HIRMFO/RM-PREINITIALIZATION ROUTINE FOR VITALS ;7/19/96
Source file <GMRVXPRE.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 4 | ($$GET1,FIELD)^DID (,FILE)^DIE ^DIK $$GET1^DIQ |
| General Medical Record - Vitals | 1 | EN^GMRVXCH0 |
| Kernel | 1 | ($$VERSION,BMES)^XPDUTL |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FILES | ;;Old File Name;New File Name
|
|
| EN1 | ; PRE-INITIALIZATION FOR THE VITALS PACKAGE
|
|
| DELXREF(GMRVFILE,GMRVFLD,GMRVIX) | ; This procedure will delete the
; cross-refernce for specified file and field. ; Input variables: GMRVFILE=file number ; GMRVFLD=field number ; GMRVIX=xref name |
|
| 53 | ;;GMRV VITAL QUALITY;GMRV VITAL CATEGORY
|
|
| 52 | ;;GMRV VITAL SITE;GMRV VITAL QUALIFIER
|
| FileNo | Call Tags |
|---|---|
| ^DIC - [#1] | Classic Fileman Calls |
| ^GMR(120.5 - [#120.5] | GET1^DID |
| ^GMRD(120.53 - [#120.53] | FIELD^DID |
| 120.531 | FIELD^DID |
| ^DIC(9.2 - [#9.2] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | EN1+38!, DELXREF+8, DELXREF+9, DELXREF+14!, DELXREF+15! |
| ^GMRD(120.51 - [#120.51] | EN1+6, EN1+7 |
| ^TMP("DIERR" | EN1+10, EN1+14! |
| Name | Line Occurrences |
|---|---|
| DELXREF | EN1+26, EN1+27, EN1+28 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | EN1+4*, EN1+22!, EN1+23*, EN1+43! |
| DA(1 | EN1+4* |
| DIE | EN1+22!, EN1+23*, EN1+43! |
| DIK | EN1+4*, EN1+43! |
| DR | EN1+22!, EN1+23*, EN1+43! |
| GMRV1 | DELXREF+6~, DELXREF+7*, DELXREF+10, DELXREF+11* |
| GMRVACC | EN1+35*, EN1+36, EN1+37, EN1+43! |
| GMRVC | EN1+6*, EN1+10, EN1+11*, EN1+43! |
| GMRVDA | EN1+6*, EN1+7, EN1+9, EN1+43! |
| GMRVDD | EN1+29*, EN1+30, EN1+31, EN1+32, EN1+34*, EN1+35, EN1+38, EN1+43! |
| GMRVER | EN1+1*!, EN1+43! |
| GMRVFDA | EN1+9!, EN1+43! |
| GMRVFDA(99 | EN1+9* |
| GMRVFILE | EN1+16*, EN1+17, EN1+21, EN1+23, EN1+33*, EN1+34, EN1+36, EN1+37, EN1+38, EN1+43! , DELXREF~, DELXREF+8, DELXREF+9, DELXREF+12, DELXREF+14, DELXREF+15 |
| GMRVFINF | EN1+18*, EN1+19, EN1+20, EN1+44! |
| GMRVFLD | EN1+29!, EN1+34*, EN1+36, EN1+37, EN1+38, EN1+44!, DELXREF~, DELXREF+8, DELXREF+9, DELXREF+12 , DELXREF+14, DELXREF+15 |
| GMRVFLD( | EN1+33, EN1+34, EN1+36 |
| GMRVFNM | EN1+17*, EN1+19, EN1+20*, EN1+21, EN1+44! |
| GMRVHELP | EN1+7*, EN1+8*, EN1+9, EN1+44! |
| GMRVIX | DELXREF~, DELXREF+9, DELXREF+12, DELXREF+14 |
| GMRVIXDA | DELXREF+6~, DELXREF+7*, DELXREF+8*, DELXREF+9, DELXREF+15 |
| Name | Field # of Occurrence |
|---|---|
| $T(@$PIECE^2;4(5) | EN1+18 |