©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
DGAINP1 ;ALB/RMO - Calculate Inpatient AMIS's 334-341 ; 27 DEC 89 1:37 pm
Source file <DGAINP1.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 3 | ^DGAINP0 ^DGAINP2 ^DGAINP4 |
| VA Fileman | 1 | ^DIK |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CEN | ;AMIS Statistics are Calculated using data for Ward from Census File
|
|
| UTL | ;Save AMIS Statistics in the Utility Global
|
|
| Q | ||
| PSY | ;Set Utility GLobal for Psych 1-45 PDC
|
|
| DEL | ;Delete Previous AMIS Statistics
|
|
| CAL | ;Actual Calculations for AMIS Fields
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(41.9 - [#41.9] | CEN+3, CEN+4 |
| ^DG(43 - [#43] | CEN+2 |
| ^DGAM(334 - [#42.6] | DGAINP1+11 |
| ^DIC(42 - [#42] | DGAINP1+12 |
| ^UTILITY($J | UTL+2, UTL+5*, PSY+2 |
| Name | Line Occurrences |
|---|---|
| CAL | DGAINP1+12 |
| CEN | DGAINP1+12 |
| DEL | DGAINP1+11 |
| PSY | DGAINP1+13 |
| UTL | DGAINP1+12 |
| Name | Field # of Occurrence |
|---|---|
| ^( | DGAINP1+12, UTL+2, PSY+2* |
| ^("GL" | CEN+2 |
| ^(0 | DGAINP1+12, CEN+3, CEN+4 |
| ^(1 | CEN+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | DEL+1*! |
| DA(1 | DEL+1* |
| DGAA | Q!, CAL+12*, UTL+3 |
| DGABO | Q!, CAL+10*, UTL+3 |
| DGAM | Q!, UTL+2*, UTL+4*, UTL+5 |
| DGBO | Q!, CAL+9*, UTL+3 |
| DGCE0 | Q!, CEN+4*, CEN+5, CAL+1, CAL+2, CAL+3, CAL+4, CAL+5, CAL+6, CAL+7 , CAL+8, CAL+9, CAL+11, CAL+12 |
| DGCE1 | Q!, CEN+4*, CAL+10, CAL+13, CAL+14 |
| DGCP0 | Q!, CEN+3*, CEN+5, CAL+1, CAL+2, CAL+3, CAL+4, CAL+5, CAL+6, CAL+7 , CAL+8, CAL+11, CAL+12 |
| DGDA | Q!, CAL+7*, UTL+3 |
| DGDE | Q!, CAL+4*, CAL+7, UTL+3 |
| DGDIV | Q!, CEN+2*, UTL+2, UTL+5, PSY+2* |
| DGDO | Q!, CAL+5*, CAL+7, UTL+3 |
| DGEND | Q!, UTL+4* |
| >> DGEOM | CEN+4 |
| DGERRFLG | DGAINP1+12, Q!, CEN+1*, CEN+5* |
| DGFE | Q!, CAL+14*, UTL+3 |
| DGGB | Q!, CAL+3*, UTL+3 |
| DGL45 | Q! |
| DGL45( | PSY+2 |
| DGLB | Q!, CAL+8*, UTL+3 |
| >> DGMYR | DGAINP1+11, DEL+1, UTL+2, UTL+5, PSY+2 |
| DGOB | Q!, CAL+13*, UTL+3 |
| DGPD | Q!, CAL+11*, UTL+3 |
| >> DGPEOM | CEN+3 |
| DGSEG | DGAINP1+11*, DGAINP1+12, Q!, DEL+1, CEN+1*, CEN+5, UTL+2, UTL+3, UTL+4, UTL+5 |
| DGSTR | Q!, UTL+3*, UTL+4 |
| DGTA | Q!, CAL+2*, UTL+3 |
| DGTI | Q!, CAL+1*, CAL+2, UTL+3 |
| DGTO | Q!, CAL+6*, CAL+7, UTL+3 |
| DGW0 | DGAINP1+12*, Q!, CEN+1, CEN+2, CEN+5 |
| DGWI | DGAINP1+12*, Q!, CEN+3, CEN+4 |
| DIK | DEL+1*! |
| I | Q!, UTL+4* |
| X | Q!, CEN+1* |