DGPMVDD ;ALB/MIR - MISCELLANEOUS DD CALLS FROM FILE 405 AND 405.1 ; 4/14/04 6:26pm
Source file <DGPMVDD.m>
| Package | Total | Call Graph | 
|---|---|---|
| Registration | 1 | (RIN,WIN)^DGPMDDCF | 
| VA Fileman | 1 | C^%DTC | 
| Package | Total | Caller Graph | 
|---|---|---|
| Registration | 7 | DGPMX13 DGPMX2 DGPMX23 DGPMX4 DGPMX43 DGPMX45 ^DGPM | 
| IHS Changes To ADT | 1 | ADGT162 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ROOM | ;is room-bed active at time of movement? - called from input transform of .07 in 405 | |
| UARET | ;called from DGPM TRANSFER template...default 30 day return from UA | |
| TROC | ;is bed occupied when transferring from 1 or 23 movement? | |
| TROCWB | ;check if ward still has available beds | |
| W | ;called from input transform for ward location | |
| W2 | ;Ward consistency check for transfer.  interward transfers not to same ward.  unless ASIH mvt, can't go from hospital to NHCU/DOM, vice versa | |
| ZZ | ||
| WARD | ;is ward active at time of movement? | |
| ABSRET | ;check absence return date for consistency with movement type | |
| W1 | ;consistency edits for ward location from admit option | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DD("DD" | UARET+4 | 
| ^DG(405.2 - [#405.2] | W2+18 | 
| ^DG(405.4 - [#405.4] | TROCWB+1 | 
| ^DGPM - [#405] | W+2, W1+2, W2+3, WARD+1, ROOM+1, TROC+6, ABSRET+1, UARET+2 | 
| ^DGPM("ARM" | TROC+6, TROCWB+1 | 
| ^DIC(42 - [#42] | W1+7, W2+3, W2+9 | 
| Name | Line Occurrences | 
|---|---|
| W1 | W+2 | 
| W2 | W+2 | 
| Name | Field # of Occurrence | 
|---|---|
| ^("E" | W2+18 | 
| ^(0 | W1+2, W2+3, W2+4, W2+9, W2+10 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| D0 | WARD+1~*, ROOM+1~*, TROC+9~* | 
| >> DA | W+2, W2+3, WARD+1, ROOM+1, ABSRET+1, UARET+2 | 
| DGB | TROC+10!, TROCWB+1* | 
| DGOCC | TROC+10!, TROCWB+1* | 
| >> DGOOS | WARD+1*, ROOM+1*, TROC+5*, TROC+9* | 
| >> DGPM0 | W2+9, TROC+5, TROC+6, TROC+9 | 
| >> DGPM2 | W1+7, ZZ+1, W2+18 | 
| >> DGPMABL | ZZ+1, W2+18 | 
| >> DGPMOC | TROC+5*, TROC+6*, TROC+9 | 
| DGPMOS | WARD+1*, ROOM+1*, TROC+9*, TROC+10! | 
| >> DGPMP | W+2, W1+2 | 
| DGPMRD | ABSRET+1*, ABSRET+2, ABSRET+3, ABSRET+4, ABSRET+5! | 
| >> DGPMRET | UARET+3*, UARET+4* | 
| >> DGPMSVC | W1+1 | 
| >> DGPMT | W+1, W+2 | 
| DGPMTYP | W+2*, W1+2, W1+4, W1+7, W2+2, W2+6, W2+18, ABSRET+1*, ABSRET+2, ABSRET+3 , ABSRET+5! | 
| >> DGPMWD | W+2*, W1+7 | 
| DGPMX | TROC+6*, TROC+10!, ABSRET+1*, ABSRET+2, ABSRET+3, ABSRET+4, ABSRET+5!, UARET+1~, UARET+2*, UARET+3 , UARET+4 | 
| DGRAI | W2+4~*, W2+8, W2+10*, W2+12, W2+14, W2+16 | 
| >> DGSWITCH | ROOM+1 | 
| >> DGX | W1+2*, W1+4*, W1+7*, ZZ, W2+3*, W2+4, W2+7, W2+8, W2+9*, W2+10 , W2+12, W2+13, W2+14, W2+16, W2+18* | 
| >> DGZ6 | TROC+5*, TROCWB+1 | 
| >> DGZ7 | TROC+5*, TROC+6, TROC+9 | 
| DIC | W+1! | 
| DIC("S" | W1+1*, W1+2*, W1+4*, ZZ*, ZZ+1*, W2+2*, W2+7*, W2+8*, W2+13*, W2+14* , W2+17*, W2+18* | 
| DT | ROOM+1 | 
| I | TROC+10!, TROCWB+1* | 
| U | W1+7 | 
| X | W+1!, WARD+1~, ROOM+1~, TROC+9~, ABSRET+1, ABSRET+2!, ABSRET+3!, ABSRET+4!, ABSRET+5*, UARET+1~ , UARET+4 | 
| X1 | ABSRET+2*, ABSRET+3*, ABSRET+4*, UARET+1~, UARET+4* | 
| X2 | ABSRET+2*, ABSRET+3*, ABSRET+4*, UARET+1~, UARET+4* | 
| Y | WARD+1, ROOM+1, UARET+1~, UARET+4* |