DGAINP2 ;ALB/RMO - Balance and Save Inpatient AMIS's 334-341 ; 08 MAY 90 2:20 pm
Source file <DGAINP2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SET | ;Add up Prior and Current Month AMIS(s) for All Divisions
|
|
| Q | ||
| FILE | ;Save AMIS Segment Statistics in File
|
|
| BAL | ;Balance AMIS Segment and Set Balance Flag to 1
|
|
| SAVE | ;Loop through Segments by Division to Save
|
|
| GEN | ;Generate AMIS Code Sheets
|
| Name | Field # of Occurrence |
|---|---|
| QUE^DGGECSA | GEN+1 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(40.8 - [#40.8] | GEN+1 |
| ^DGAM(334 - [#42.6] | DGAINP2+13, SET+2, SET+3, FILE+1, FILE+2, FILE+3, FILE+5* |
| ^UTILITY($J | DGAINP2+12, SET+4, SAVE+1 |
| Name | Line Occurrences |
|---|---|
| BAL | DGAINP2+12 |
| FILE | SAVE+1, FILE+1 |
| GEN | DGAINP2+13 |
| SAVE | DGAINP2+12 |
| SET | DGAINP2+12 |
| Name | Field # of Occurrence |
|---|---|
| ^( | SET+2, SET+3, SET+4, SAVE+1 |
| ^(0 | SET+2, SET+3, FILE+1*, FILE+2*, FILE+3*, FILE+5* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DGAM | Q!, SET+1*, SET+4*, BAL+1, SAVE+1*, FILE+4 |
| DGAM0 | Q!, FILE+4*, FILE+5 |
| DGBALFLG | Q!, BAL+1*, BAL+2, FILE+2 |
| >> DGCODFLG | DGAINP2+13 |
| DGDIV | Q!, SAVE+1*, FILE+4, FILE+5, GEN+1* |
| DGEND | Q!, SET+1*, SET+2, SET+3, SET+4 |
| >> DGMYR | DGAINP2+12, DGAINP2+13, SET+4, SAVE+1, FILE+1, FILE+2, FILE+3, FILE+5 |
| DGNOB | DGAINP2+12!, DGAINP2+13, Q! |
| DGNOB( | BAL+2* |
| DGPAM | Q!, SET+1*, SET+2*, SET+3*, BAL+1 |
| >> DGPMYR | SET+2, SET+3 |
| >> DGSEG | DGAINP2+12*, DGAINP2+13*, SET+1, SET+2, SET+3, SET+4, BAL+2, SAVE+1, FILE+2, FILE+3 , FILE+4, FILE+5 |
| DT | FILE+4 |
| DUZ | FILE+4 |
| I | Q!, SET+1*, SET+2*, SET+3*, SET+4* |
| J | Q!, SET+2*, SET+3*, SET+4* |
| X | Q!, SET+2*, SET+3*, SET+4* |