Routine: NURAED01

Information

NURAED01 ;HIRMFO/RM-Cont. of NURAED0 routine ;2/26/92

Name	Line Occurrences
Function Call: READ	Formatting: !! Prompt: "Select Nursing Service Staff Name: " Variable: X Timeout: DTIME Line Location: SEL+1
Function Call: WRITE	Prompt: !!?1,"YOU MAY ALSO ADD A NEW NURS STAFF IF YOU WISH.",! Line Location: SEL+2
Function Call: WRITE	Prompt: !?7,Y(0,0) Line Location: SEL+3
Function Call: WRITE	Prompt: !!,$C(7)," STAFF RECORD DATA MISSING " Line Location: SEL+4
Function Call: WRITE	Prompt: !?9,"...OK" Line Location: YNOK+1
Function Call: WRITE	Prompt: !?13,"ANSWER YES OR NO." Line Location: YNOK+1
Function Call: WRITE	Prompt: ?15,Y(0,0) Line Location: YNOK+3
Function Call: WRITE	Prompt: "??" Line Location: YNOK+5
Function Call: WRITE	Prompt: $C(7),!?3,"ARE YOU ADDING '",Y(0,0),"' AS A NEW NURS STAFF (THE ",NURCNT,$S(NURCNT#10=1&(NURCNT#100-11):"ST",NURCNT#10=2&(NURCNT#100-12):"ND",NURCNT#10=3&(NURCNT#100-13):"RD",1:"TH"),")" Line Location: ADD+1
Function Call: WRITE	Prompt: $C(7),!?4,"ANSWER 'YES' OR 'NO'" Line Location: ADD+2