DGPMBSR ;ALB/LM - BED STATUS REPORT RECALCULATION; 16 JAN 91
Source file <DGPMBSR.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 |
Package | Total | Caller Graph |
---|---|---|
Registration | 2 | DGPMBSAR DGPMGL1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
A | ||
Q | ||
UP43 | ||
DELETE | ; Nulls earliest date to correct in the G&L Corrections file once that date has been recalculated and set recalculation date
|
|
VAR | ; RC=ReCalc from date ; YD=YesterDay ; RD=Report Date ;
; BS=Bed Status ; GL=G&L ; REM=Recalc patient days ; ; PD=Previous Day ; W=Ward ; D=Division ; T=Treating Speciality |
FileNo | Call Tags |
---|---|
^DG(43 - [#43] | Classic Fileman Calls |
^DGS(43.5 - [#43.5] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("VOL" | UP43+1 |
^%ZTSK - [#14.4] | UP43 |
^DGS(43.5 - [#43.5] | A+8, DELETE+1 |
Name | Field # of Occurrence |
---|---|
^("VOL" | UP43+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %H | UP43* |
BD | Q! |
>> BS | A+3, A+6*, A+11* |
C | Q! |
D | Q! |
DA | A+10*!, Q!, UP43+1*!, DELETE+1* |
DAYC | A+6*, A+8*, Q! |
DGI | Q!, DELETE+1* |
DGP | Q! |
DGP("BS" | A+3*, A+11 |
DGP("GL" | A+3*, A+11 |
DGP("PD" | A+3*, A+11 |
DGP("RD" | A+3*, A+11 |
DGP("REM" | A+3*, A+11 |
DGP("TSR" | A+3*, A+11 |
DGX | UP43*! |
DIE | A+10*!, Q!, UP43+1*!, DELETE+1* |
DR | A+10*!, Q!, UP43+1*!, DELETE+1* |
DT | A+4, DELETE+1 |
>> GL | A+3, A+6*, A+11* |
I | Q!, DELETE+1* |
I1 | Q! |
IO("Q" | UP43+1! |
>> PD | A+3, A+5, A+8*, A+11* |
PP | A+8*, Q! |
>> RC | A, A+8, A+11* |
>> RD | A+3, A+8*, A+11* |
>> REM | A+3, A+11* |
T | Q! |
>> TSR | A+3, A+6*, A+11* |
>> TSRIPD | A+5* |
W | Q! |
X | A+4, A+5, A+8, Q!, UP43 |
X1 | A+4*, A+5*, A+8*, Q! |
X2 | A+4*, A+5*, A+8*, Q! |
>> Y | UP43+1* |
>> YD | A+4*, A+8 |
>> Z | UP43*, UP43+1* |
ZTSK | UP43, UP43+1*! |