Routine: DGSCHAD1

Information

DGSCHAD1 ;ALB/MRL - PURGE SCHEDULED ADMISSIONS ; 06 May 87

Source file <DGSCHAD1.m>

Package	Total	Caller Graph
Registration	1	DG SCHED ADMIT PURGE

Name	Line Occurrences
Function Call: WRITE	Prompt: !,J Line Location: DGSCHAD1+3
Function Call: WRITE	Prompt: !?4,"MUST RETAIN LAST 90 DAYS OF SCHEDULED ADMISSION DATA!",*7 Line Location: 1+1
Function Call: WRITE	Prompt: !!,"NO ADMISSIONS SCHEDULED ON OR BEFORE " Line Location: 1+2
Function Call: WRITE	Prompt: Y,".",*7 Line Location: 1+2
Routine Call	%ZIS Line Location: DGSCHAD1+2

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	1, 1+2
^DGS(41.1 - [#41.1]	1+2, S

Name	Line Occurrences
1	1+1
Q	1, 1+2, 1+3, S+1