An entry point to EDIT/3000 is available that will automatically text in a file before the first prompt (/) is displayed and will keep the file when EXIT is typed. (See Section III for a description of the TEXT and KEEP commands.)
In order to specify the file desired, first enter the MPE :FILE command in the form :FILE EDTTEXT= filename. Next run EDIT/3000 by using the MPE :RUN command, with BASICENTRY specified for the entrypoint parameter. (See the MPE Commands Reference Manual for an explanation of the MPE :FILE and :RUN commands.) An example is shown in Figure 2-6 “Using the BASICENTRY entry point to EDIT/3000”.
The MPE :FILE command must be used even if the filename is EDTTEXT itself. In addition, when this special entry is used, the TEXT and KEEP commands are disallowed since they are executed automatically to the filename specified in the MPE :FILE command. If the texted-in file was unnumbered, it will be kept unnumbered.
Figure 2-6 Using the BASICENTRY entry point to EDIT/3000
:FILE EDTTEXT=AFILE
:RUN EDITOR.PUB.SYS,BASICENTRY
HP32201A.7.02 EDIT/3000 MON, JUL 31, 1978, 4:36 PM
(C) HEWLETT-PACKARD CO. 1978
/LIST ALL
1 LINE ONE OF AFILE
2 LINE TWO OF AFILE
3 LINE THREE OF AFILE
4 LINE FOUR OF AFILE
5 LINE FIVE OF AFILE
/ADD
6 LAST LINE OF AFILE
7 //
...
/ END
END OF SUBSYSTEM
|
A simple User Defined Command could be created to facilitate initiating EDIT/3000 with this entry point. For example:
ED F1
OPTION LIST
FILE EDTTEXT=! F1
RUN EDITOR.PUB.SYS,BASICENTRY
|
See Section IX of the MPE Commands Reference Manual for an explanation of creating and using User Defined Commands.
