Routine: SDM3

Information

SDM3 ;SF/GFT - MAKE APPOINTMENT ; 14 SEP 84 11:33 am

Source file <SDM3.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !,*7,"ONLY "_S_" OVERBOOK"_$E("S",S>1)_" ALLOWED PER DAY!!",! Line Location: SDM3+3
Function Call: READ	Timeout: DTIME Line Location: SDM3+4
Function Call: READ	Prompt: ! Variable: "ENTER TYPE AND TIME (I.E. 'LAB@8 Timeout: 30'): Line Location: ORD+0
Function Call: WRITE	Prompt: !,"ENTER EITHER 'LAB', 'XRAY', OR 'EKG' FOLLOWED BY THE '@' AND THE TIME" Line Location: ORD+2
Function Call: WRITE	Prompt: !,"MUST ENTER THE '@' AFTER THE TYPE AND BEFORE THE TIME",*7 Line Location: ORD+3
Function Call: WRITE	Prompt: !,*7,"PATIENT ALREADY HAS APPOINTMENT AT THAT TIME IN ",$P(^SC(HSC,0),"^",1) Line Location: ORD+5
Function Call: WRITE	Prompt: " SCHEDULED" Line Location: ORD+6
Function Call: WRITE	Prompt: !,"ENTER EITHER 'LAB', 'XRAY', OR 'EKG' FOLLOWED BY AN '@' AND THE TIME" Line Location: ERR+0