©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
GMRVUT2 ;HIOFO/YH,RM,FT-ENTRY TO GATHER PATIENT VITAL/MEASURMENT DATA ;10/3/07
Source file <GMRVUT2.m>
| Package | Total | Call Graph |
|---|---|---|
| General Medical Record - Vitals | 6 | CALBMI^GMRVBMI PO2^GMRVLGQU EN1^GMRVSAS0 (EN1,EN2,EN3)^GMRVUTL $$FIELD^GMVGETQL (CLIO,F1205)^GMVUTL |
| Registration | 1 | WIN^DGPMDDCF |
| VA Fileman | 1 | $$GET1^DIQ |
| Package | Total | Caller Graph |
|---|---|---|
| General Medical Record - Vitals | 1 | GMRVUT0 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SETU2 | ; Given the IEN of entry GMRVSTR("IEN") this procedure will set the
; extract global. <<< IA 1447 - NURSING >>> |
|
| STRIP100(DATE) | ; This procedure takes DATE and returns that date with
; any fractional seconds stripped off. |
|
| BP | ;ENTRY TO GATHER PATIENT BLOOD PRESSURE/PULSE DATA
|
|
| INACT42(GMWLOC) | ; THIS PROCEDURE WILL CALL SUPPORTED ENTRY POINT WIN^DGPMDDCF
; TO DETERMINE IF WARD LOCATION (GMWLOC) IS INACTIVE. |
| FileNo | Call Tags |
|---|---|
| ^SC - [#44] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PXRMINDX(120.5 | BP+4, BP+6 |
| ^UTILITY($J | BP+2!, BP+9*, BP+13, BP+24!, SETU2+28* |
| Name | Line Occurrences |
|---|---|
| $$STRIP100 | BP+7, SETU2+28 |
| SETU2 | BP+22 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| D0 | INACT42+2~, INACT42+3* |
| DATE | STRIP100~, STRIP100+2 |
| >> DFN | BP+4, BP+6 |
| DGPMOS | INACT42+2~ |
| >> GDATA | SETU2+3*, SETU2+5, SETU2+6, SETU2+7, SETU2+8*, SETU2+9, SETU2+11*, SETU2+12*, SETU2+13*, SETU2+14* , SETU2+15*, SETU2+23*, SETU2+28 |
| GDT | BP+3*, BP+7*, BP+9, BP+24! |
| GDT(1 | BP+7* |
| GG | SETU2+2~, SETU2+16*, SETU2+20*, SETU2+22, SETU2+23 |
| GMRBMI | SETU2+15*! |
| GMRBMI(1 | SETU2+15* |
| GMRBMI(2 | SETU2+15* |
| >> GMRINF | SETU2+7*, SETU2+8 |
| >> GMRINF(1 | SETU2+7*, SETU2+8 |
| >> GMRINF(2 | SETU2+7*, SETU2+8 |
| >> GMRQUAL | SETU2+16*, SETU2+22*, SETU2+23 |
| >> GMRSITE | SETU2+16*, SETU2+22*, SETU2+23 |
| >> GMRVSTR("B" | BP+4 |
| >> GMRVSTR("E" | BP+3 |
| >> GMRVSTR("IEN" | BP+5*, BP+6*, BP+9, BP+13*, BP+14, BP+15, BP+17, BP+18, SETU2+24, SETU2+25 |
| >> GMRVSTR("LT" | SETU2+9 |
| >> GMRVSTR("O" | BP+7*, BP+8, SETU2+10* |
| >> GMRVSTR("R" | BP+3*, BP+4*, BP+6, BP+7, BP+12*, BP+13*, SETU2+28 |
| >> GMRVSTR("T" | BP+2, BP+9, BP+13, BP+24, SETU2+5, SETU2+6, SETU2+10, SETU2+11, SETU2+12, SETU2+13 , SETU2+14, SETU2+15, SETU2+28 |
| >> GMRVSTR("TDA" | BP+4, BP+6 |
| >> GMRVSTR("TMO" | BP+3*, BP+4, BP+8*, SETU2+10* |
| >> GMRVSTR(0 | BP+8, SETU2+10, SETU2+28 |
| >> GMRVX | SETU2+11* |
| >> GMRVX(0 | SETU2+11*, SETU2+12, SETU2+13, SETU2+14 |
| >> GMRVX(1 | SETU2+4*, SETU2+11 |
| GMVCLIO | BP+1~, BP+15, BP+18 |
| GMVCLIO(0 | BP+20*, BP+21, SETU2+3 |
| GMVCLIO(5 | BP+20*, SETU2+17, SETU2+18 |
| >> GMVIENGUID | SETU2+26*, SETU2+27 |
| GMVLOOP | SETU2+2~, SETU2+17*, SETU2+18 |
| GMVQNAME | SETU2+2~, SETU2+18*, SETU2+19, SETU2+20 |
| GMVRECORDID | SETU2+2~, SETU2+24*, SETU2+27*, SETU2+28 |
| GMWLOC | INACT42~, INACT42+3 |
| U | BP+21, SETU2+17, SETU2+18 |
| X | SETU2+12*, INACT42+2~, INACT42+4 |
| >> Y | SETU2+12, SETU2+15 |