Routine: YSDIZ

Information

YSDIZ ;SLC/RWF-ONE FIELD ^DIE FORMAT QUES. ASKER ; 7/6/89 17:04 ;

Source file <YSDIZ.m>

Name	Line Occurrences
Function Call: READ	Variable: X Timeout: DTIME Line Location: RD+1
Function Call: WRITE	Prompt: " (",$P($E(DU,Y-1,256),";"),")" Line Location: E+1
Function Call: WRITE	Prompt: $E(Y,YSDG,999) Line Location: S+1
Function Call: WRITE	Prompt: $C(7),"??" Line Location: X+1
Function Call: WRITE	Prompt: $C(7)," ",!?3,"SURE YOU WANT TO DELETE" Line Location: D+1
Function Call: READ	Prompt: "? " Variable: X Timeout: DTIME Line Location: D+2
Function Call: WRITE	Prompt: !?9 Condition for execution: $X>55 Line Location: D+2
Function Call: WRITE	Prompt: $C(7)," <NOTHING DELETED>" Line Location: D+2
Function Call: WRITE	Prompt: ", OR 'MONTH-YEAR'" Line Location: QS+4
Function Call: WRITE	Prompt: !,"CHOOSE FROM: " Line Location: QS+5
Function Call: WRITE	Prompt: !?7,$P(Y,":"),?15," ",$P(Y,":",2) Line Location: QS+5