Routine: DGPMGLC

Information

DGPMGLC ;ALB/XAK,JDS,MJK,LM - G&L CORRECTIONS ;10 AUG 84 15:19

Source file <DGPMGLC.m>

Name	Comments	DBIA/ICR reference
EN	;
LOCK
BR	; ; -- get adm d/t
Z
1	; ADM,XFR,DIS ENTERED
2	; ADM,XFR,DIS,FACILITY TS DELETED
3	; ADM,XFR,DIS DATE EDITED
10	; ADM WARD EDITED
11	; MAS TYPE EDITED
12	; XFR WARD EDITED
FTS	; FACILITY TS ; 13 = ENTERED ; 14 = DELETED ; 15 = FACILITY TS DATE EDITED
KILL
NUM