DGPMBSG3 ;ALB/LM - BED STATUS GENERATION; 6 JUNE 90
Source file <DGPMBSG3.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
A | ||
TSDIV | ; Interward Transfer without TS change between different divisions
|
|
ASIH | ; M=42 (While ASIH) M=47 (Discharge From NHCU/DOM while ASIH)
|
|
DISCH | ||
TS | ||
OTHER | ; T=4 (Lodger CheckIn), T=5 (Lodger CheckOut), T=7 (Non-Movement)
|
|
IRREG | ; If irregular discharge or regular discharge after a loss
|
|
ADM | ||
ONEDAY | ; MV("OD") set in ONEDAY^DGPMGLG1
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^UTILITY("DGOD" | ONEDAY+1 |
^UTILITY("DGTOD" | ONEDAY+1 |
Name | Line Occurrences |
---|---|
ADM | A |
DISCH | A |
IRREG | DISCH+2 |
ONEDAY | DISCH+2 |
OTHER | A |
TS | A |
TSDIV | A+1 |
Name | Field # of Occurrence |
---|---|
^( | ONEDAY+1* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> E("LT" | OTHER+1* |
>> E("LW" | OTHER+1*, TS+2* |
>> E("PT" | ADM+4*, ONEDAY+3*, OTHER+1*, TSDIV+1! |
>> E("PW" | ADM+4*, ONEDAY+2*, OTHER+1*, TS+2* |
>> LT | ADM+1*, ADM+2*, ADM+3*, ADM+4*, DISCH+1*, DISCH+3*, DISCH+5*, ASIH+1*, TS+2*, TSDIV+1* |
>> LTSDV | A+1, ONEDAY+1 |
>> LW | ADM+1*, ADM+2*, ADM+3*, ADM+4*, DISCH+1*, DISCH+3*, DISCH+5*, ASIH+1* |
>> M | ADM+3, ADM+4, DISCH+5, ASIH+1 |
>> MDP | DISCH+2 |
>> MP | DISCH+2*, IRREG+2, IRREG+3, IRREG+4 |
>> MV("AS" | ASIH+1 |
>> MV("LTS" | ONEDAY+1, ONEDAY+3, TS+2, TSDIV+1 |
>> MV("LWD" | ONEDAY+1, ONEDAY+2 |
>> MV("OD" | ONEDAY+1 |
>> MV("PTS" | ONEDAY+3, TS+2, TSDIV+1 |
>> MV("PWD" | ONEDAY+2 |
>> NLS | DISCH+3 |
>> PT | TS+2*, TSDIV+1* |
>> PTSDV | A+1 |
>> T | A+1, ADM, DISCH, OTHER+1, TS |
>> TSC | TS+2 |
>> X | DISCH+5*, ASIH+1* |