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* |