Routine: DGPMDDLD

Information

DGPMDDLD ;ALB/MRL - DETERMINE LODGER X-REF'S; 9 FEB 89

Source file <DGPMDDLD.m>

Name	Comments	DBIA/ICR reference
EN	; -- lodger x-ref on ward field in
KX
Q
S6	; -- ward x-ref
K6	;
S7
K7
CHK	;
LD	; -- set "LD" x-ref for file #2 equal to corresp adm mv (#.107)
FIND	;
RESET	; -- reset ^DPT nodes and x-refs ; input: DFN
RESETQ
XREF	;