Routine: ZISETMSQ

Information

ZISETUPM ;BB,SF/GFT,AC - INITIALIZES DEVICE AND TERMINAL TYPES FOR INTERSYSTEMS;1/12/88 12:45 PM ;4/9/92 14:19

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"THIS ROUTINE WILL TAKE INTERSYSTEMS TERMINAL AND SUBTYPE FILES",!,"(IN ^%IS) AND MOVE THEM TO THE ^%ZIS FILES.",!! Line Location: ZISETMSQ+2
Function Call: READ	Prompt: "OK? " Variable: X Timeout: $S($D(DTIME):DTIME,1:60),!! Line Location: ZISETMSQ+3
Function Call: READ	Variable: %ZISV1 Timeout: $S($D(DTIME):DTIME,1:300) Line Location: QUES+0
Function Call: WRITE	Prompt: "TERMINAL TYPES:",! Line Location: SUB+1
Function Call: WRITE	Prompt: C,! Line Location: A+3
Function Call: WRITE	Prompt: !,C Line Location: A+5
Function Call: WRITE	Prompt: !!,"DEVICES:",! Line Location: DEVICE+1
Function Call: WRITE	Prompt: !!,"ALL SETUP" Line Location: C+1
Function Call: WRITE	Prompt: !,"There must be a prefix for a new device" Line Location: HLP+1
Function Call: WRITE	Prompt: !,"becuase the Device Name and the $I cannot" Line Location: HLP+2
Function Call: WRITE	Prompt: !,"be the same." Line Location: HLP+3