DGPMBSG3 ;ALB/LM - BED STATUS GENERATION; 6 JUNE 90
Source file <DGPMBSG3.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| A | ||
| ADM | ||
| DISCH | ||
| ASIH | ; M=42 (While ASIH) M=47 (Discharge From NHCU/DOM while ASIH)
|
|
| ONEDAY | ; MV("OD") set in ONEDAY^DGPMGLG1
|
|
| IRREG | ; If irregular discharge or regular discharge after a loss
|
|
| OTHER | ; T=4 (Lodger CheckIn), T=5 (Lodger CheckOut), T=7 (Non-Movement)
|
|
| TS | ||
| TSDIV | ; Interward Transfer without TS change between different divisions
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^UTILITY("DGOD" | ONEDAY+1 |
| ^UTILITY("DGTOD" | ONEDAY+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* |
