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