DGPMBSR3 ;ALB/LM - STORE NEW CENSUS NODES; 16 JAN 91
Source file <DGPMBSR3.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
A | ||
DGR | ||
CENSUS | ||
WSET | ||
DGC | ||
OOSQ | ||
AUTH | ; -- how many auth beds
|
|
Q | ||
CMPD | ; $P(X("DGC"),"^",25) = Cum Monthly Pat Days (0;25) in file #41.9)
|
|
OOS | ; -- Is Ward OOS for Date?
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DG(41.9 - [#41.9] | CENSUS*, CENSUS+1, CENSUS+2*, CENSUS+3*, CENSUS+4* |
^DIC(42 - [#42] | A+2 |
^UTILITY( | WSET |
^UTILITY("DGC" | CENSUS+3* |
^UTILITY("DGR" | CENSUS+4* |
Name | Line Occurrences |
---|---|
AUTH | A+2 |
CMPD | A+2 |
DGR | A+2 |
OOS | A+2 |
OOSQ | OOS+1 |
Q | A |
WSET | A+2 |
Name | Field # of Occurrence |
---|---|
^( | WSET |
^(0 | CENSUS+1* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | Q! |
D0 | AUTH+1*, AUTH+2!, OOS+1*, OOSQ! |
DGPMOS | AUTH+1*, AUTH+2!, OOS+1*, OOSQ! |
>> FY("B" | A+1* |
I | A+2*, Q! |
I1 | Q!, WSET*, WSET+1* |
OSI | Q! |
RB | Q! |
>> RD | A+1, AUTH+1, OOS+1, CENSUS+2, CENSUS+3, CENSUS+4 |
>> REM | WSET+3 |
W | A+2*, Q!, WSET, AUTH+1, OOS+1, CENSUS, CENSUS+1, CENSUS+2, CENSUS+3, CENSUS+4 |
X | Q!, WSET+3*, WSET+4, WSET+5, AUTH+1, OOS+1, OOS+2, CENSUS*, CENSUS+2* |
X( | WSET* |
X("AB" | AUTH+1*, OOS+1, DGR+1, DGR+10 |
X("DG6" | DGR+3 |
X("DGAA" | DGR+6 |
X("DGAS" | DGR+8 |
X("DGC" | WSET+1*, WSET+2*, WSET+3, WSET+4*, WSET+5*, CMPD+1*, CMPD+3*, DGC*, DGC+1*, DGC+2* , DGC+3*, CENSUS+3 |
X("DGCN" | WSET+1, WSET+3 |
X("DGFR" | DGR |
X("DGIP" | WSET+3 |
X("DGOD" | WSET+5, CMPD+3, DGR+11 |
X("DGPS" | DGR+5 |
X("DGR" | DGR*, DGR+2*, DGR+3*, DGR+4*, DGR+5*, DGR+6*, DGR+7*, DGR+8*, DGR+9*, DGR+10* , DGR+11*, DGC+1, DGC+2, DGC+3, CENSUS+4 |
X("DGUA" | DGR+7 |
X("DGVN" | DGR+4 |
X("OB" | DGR+1*, DGR+2, DGC |
X("OS" | OOS+1*, OOS+2*, DGR+1, DGR+9 |
X1 | Q! |
X2 | Q! |
Z | Q! |
Z1 | Q! |
Z2 | Q! |
Z3 | Q! |