DGPMBSR ;ALB/LM - BED STATUS REPORT RECALCULATION; [ 05/30/2002 1:17 PM ]
Source file <DGPMBSR.m>
Package | Total | Call Graph |
---|---|---|
IHS Changes To ADT | 2 | PURG^BDGAD0 ^BDGAD1 |
VA Fileman | 2 | (C,YMD)^%DTC ^DIE |
Registration | 1 | CLEAN^DGPMGLG |
Name | Comments | DBIA/ICR reference |
---|---|---|
A | ||
Q | ||
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 |
|
UP43 | ;
|
|
DELETE | ; Nulls earliest date to correct in the G&L Corrections file once that date has been recalculated and set recalculation date
|
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+3 |
^%ZTSK - [#14.4] | UP43+2 |
^DGS(43.5 - [#43.5] | A+14, DELETE+1 |
Name | Line Occurrences |
---|---|
DELETE | A+14 |
Name | Field # of Occurrence |
---|---|
^("VOL" | UP43+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %H | UP43+2* |
BD | Q! |
>> BS | A+6, A+9*, A+19* |
C | Q! |
D | Q! |
DA | A+18*!, Q!, UP43+3*!, DELETE+1* |
DAYC | A+9*, A+14*, Q! |
DGI | Q!, DELETE+1* |
DGP | Q! |
DGP("BS" | A+6*, A+19 |
DGP("GL" | A+6*, A+19 |
DGP("PD" | A+6*, A+19 |
DGP("RD" | A+6*, A+19 |
DGP("REM" | A+6*, A+19 |
DGP("TSR" | A+6*, A+19 |
DGX | UP43+2*! |
DIE | A+18*!, Q!, UP43+3*!, DELETE+1* |
DR | A+18*!, Q!, UP43+3*!, DELETE+1* |
DT | A+7, DELETE+1 |
>> GL | A+6, A+9*, A+19* |
I | Q!, DELETE+1* |
I1 | Q! |
IO("Q" | UP43+3! |
>> PD | A+6, A+8, A+14*, A+19* |
PP | A+14*, Q! |
>> RC | A, A+4, A+14, A+19* |
>> RD | A+6, A+14*, A+19* |
>> REM | A+6, A+19* |
T | Q! |
>> TSR | A+6, A+9*, A+19* |
>> TSRIPD | A+8* |
W | Q! |
X | A+7, A+8, A+14, Q!, UP43+2 |
X1 | A+7*, A+8*, A+14*, Q! |
X2 | A+7*, A+8*, A+14*, Q! |
>> Y | UP43+3* |
>> YD | A+7*, A+14 |
>> Z | UP43+2*, UP43+3* |
ZTSK | UP43+2, UP43+3*! |