Prompt: !!?4,"NO - I'm not ready",!?4,"YES - I'm ready to answer your questions"
Line Location: 1+0
Function Call: READ
Prompt: "SEND RESPONSE VIA (L)ETTER OR (M)AILMAN MESSAGE? "
Formatting: !!
Timeout: DTIME
Variable: X
Line Location: V+0
Function Call: WRITE
Prompt: !!?4,"LETTER - To generate release survey on a printer for mailing to ISC.",!?4,"MESSAGE - To transmit release survey as a mailman message if able to do so"
Line Location: V+1
Function Call: WRITE
Prompt: I
Line Location: M+0
Function Call: WRITE
Prompt: !,"DO YOU WISH TO RETRANSMIT AS A MAILMAN MESSAGE"
Line Location: M+0
Function Call: WRITE
Prompt: !!,"ARE YOU READY TO TRANSMIT MESSAGE TO THE ALBANY ISC"
Line Location: M+1
Function Call: WRITE
Prompt: !!?4,"YES - To Transmit Message",!?4,"NO - To not Transmit Message."
Line Location: M+2
Function Call: WRITE
Prompt: W
Line Location: L+0
Function Call: WRITE
Prompt: !,"ENTER AN UP-ARROW [""^""] AT THE 'DEVICE' PROMPT TO ABORT!"
Line Location: L+0
Function Call: WRITE
Prompt: S
Line Location: W+0
Function Call: WRITE
Prompt: !!,"INITIAL RESPONSE WAS SENT VIA ",$S($P(^DG(48,DGVREL,0),"^",3)="M":"MAILMAN MESSAGE",1:"LETTER")," ON ",Y,"."