Routine: ENARY31

Information

ENARX31 ;(WIRMFO)/SAW/DH/SAB-EQUIPMENT INV. ARCHIVE ;2.14.97

Source file <ENARY31.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: "THIS VERSION OF 'ENARX31' WAS CREATED ON JAN 25,1991",! Line Location: ENARY31+2
Function Call: WRITE	Prompt: "BUT I NEED VERSION 17 OF THE VA FILEMAN!" Line Location: ENARY31+2
Function Call: WRITE	Prompt: ?9,"(","AT AEMS Development"," BY VA FileMan V.17.32)",!,"TO SET UP FOR YOU THE FOLLOWING FILE:",! Line Location: ENARY31+3
Function Call: WRITE	Prompt: !,"BUT I'M OBSOLETE!!" Line Location: ENARY31+4
Function Call: WRITE	Prompt: !,"FIRST, I'LL FRESHEN UP YOUR VA FILEMAN...." Line Location: ENARY31+5
Function Call: WRITE	Prompt: "." Line Location: GO+1
Function Call: WRITE	Prompt: !,*7,"OK, I'M DONE.",!,"NO"_$P("TE THAT FILE",U,DSEC)_" SECURITY-CODE PROTECTION HAS BEEN MADE" Line Location: GO+3
Function Call: WRITE	Prompt: !?3,N,?13,N(N),$P(" (PARTIAL DEFINITION)",U,$P(X,";",7)),$P(" (INCLUDING DATA)",I,D) Line Location: 1+0
Function Call: WRITE	Prompt: 7,!,"BUT YOU'VE ALREADY GOT '",$P(Z,"^",1),"' AS FILE #",N,"!*" Line Location: 1+1
Function Call: WRITE	Prompt: *7,!,"NOTE -- YOU ALREADY HAVE '",$P(Z,"^",1),"' FILE" Line Location: 1+3
Function Call: WRITE	Prompt: " WITH DATA",!?9,"WANT MY DATA ADDED IN TO YOURS" Line Location: 1+4
Function Call: WRITE	Prompt: ! Line Location: 1+5
Function Call: WRITE	Prompt: !?9,7,"I WILL REPLACE* YOUR DATA WITH MINE, OK" Line Location: OV+0
Function Call: WRITE	Prompt: *7,!!,"NO UPDATING HAS OCCURRED!" Line Location: Q+0