©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
BQITDWC ;VNGT/HS/ALA-Calculate Waist Circumference ; 18 Feb 2010 10:14 AM
Source file <BQITDWC.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 3 | $$FIND1^DIC $$VFIELD^DILFD $$GET1^DIQ |
| Kernel | 1 | $$FMTE^XLFDT |
| Patient Care Component Reports | 1 | $$START1^APCLDF |
| iCare | 1 | $$DATE^BQIUL1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| WC(BDFN,TMFRAME) | ;EP -- Waist Circumference
; Get the waist circumference for a patient and a time frame |
|
| AWC(TMFRAME,TPGLOB) | ;EP - Get waist circumferences for all patients
; Input ; TMFRAME - Timeframe for search ; TPGLOB - Temporary global |
| FileNo | Call Tags |
|---|---|
| ^AUPNVSIT - [#9000010] | GET1^DIQ |
| ^AUPNVMSR - [#9000010.01] | GET1^DIQ, VFIELD^DILFD |
| ^AUTTMSR - [#9999999.07] | FIND1^DIC |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVMSR("AD" | AWC+13 |
| ^AUPNVSIT("B" | AWC+8, AWC+10 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | WC+10*, WC+11 |
| BDATE | WC+8*, WC+10, AWC+4~, AWC+5*, AWC+7 |
| BDFN | WC~, WC+10 |
| BQIPRY | WC+9~ |
| BQIPRY(1 | WC+12 |
| BTYP | AWC+4~, AWC+6*, AWC+14 |
| DATE | AWC+4~, AWC+7*, AWC+8*, AWC+10, AWC+19 |
| DFN | AWC+4~, AWC+17*, AWC+19 |
| DT | WC+8, AWC+5 |
| >> E | WC+11* |
| EDATE | WC+8*, WC+10, AWC+4~, AWC+5*, AWC+8 |
| IEN | AWC+4~ |
| MIEN | AWC+4~, AWC+12*, AWC+13*, AWC+14, AWC+16, AWC+17, AWC+18, AWC+19 |
| RESULT | AWC+4~, AWC+18*, AWC+19 |
| TMDATA | AWC+4~ |
| TMFRAME | WC~, WC+7*, WC+8, AWC~, AWC+5 |
| TPGLOB | AWC~, AWC+19 |
| U | WC+12 |
| VISIT | AWC+4~, AWC+9*, AWC+10*, AWC+11, AWC+13, AWC+19 |