©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
DGANHD3 ;ALB/RMO - Set-up Utility and Print NHCU and DOM AMIS's 345-346 ; 01 SEP 90 9:20 am
Source file <DGANHD3.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 2 | ^DGANHD4 (CLOSE,ZIS)^DGUTQ |
| VA Fileman | 1 | ^DIC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| Q | ||
| START | ||
| DIV | ;Loop through AMIS Segments by Division to set the Utility Global
|
|
| EN | ;Entry point for IMS and MAS Inpatient AMIS 345-346 Print
|
|
| SET | ;Set Utility Global by Month/Year, Segment and Division
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DGAM(345 - [#42.7] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGAM(345 - [#42.7] | START, DIV+2 |
| ^UTILITY($J | START!, Q!, SET+3* |
| Name | Line Occurrences |
|---|---|
| DIV | START |
| Q | EN+1, EN+2 |
| SET | DIV+2 |
| Name | Field # of Occurrence |
|---|---|
| ^( | DIV+2 |
| ^(0 | DIV+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | Q! |
| DGAM | Q!, SET+1*, SET+2*, SET+3 |
| DGAM0 | Q!, DIV+2*, SET+2 |
| DGDIV | Q!, DIV+2*, SET+3 |
| DGEND | Q!, DIV+1*, SET+1, SET+2 |
| DGMYR | EN+1*, START, Q!, DIV+2, SET+3 |
| DGPGM | EN+2*, Q! |
| DGSEG | START*, Q!, DIV+2, SET+3 |
| DGVAR | EN+2*, Q! |
| DIC | EN+1*! |
| DIC("A" | EN+1* |
| DIC(0 | EN+1* |
| I | Q!, SET+1*, SET+2* |
| IO | START |
| POP | EN+2, Q! |
| >> Y | EN+1 |