[Search for users]
[Overall Top Noters]
[List of all Conferences]
[Download this site]
Title: | DOCUMENT T1.0 |
Notice: | **New notesfile (DOCUMENT.NOTE) now available (see note 897)** |
Moderator: | CLOSET::ADLER |
|
Created: | Mon Feb 09 1987 |
Last Modified: | Thu Oct 31 1991 |
Last Successful Update: | Fri Jun 06 1997 |
Number of topics: | 897 |
Total number of notes: | 4397 |
169.0. "Listing available designs" by UBEAUT::PAGE (It works for me) Mon Mar 30 1987 22:17
I got pretty tired of trying to find out which designs were available
so I knocked up this little command procedure to do it for me. As
it parses the file DOC$DESIGNS.DAT you will not have to edit it
when you add your own designs, they will just get listed.
Hope it helps.
Nigel
$ save_verify = 'f$verify (0)'
$ on control_y then goto close_designs
$ open/read/share=read designs doc$local_formats:doc$designs.dat
$ write sys$output " VAXdocument designs"
$ write sys$output " -------------------"
$ family = ""
$ read_designs:
$ read/end_of_file=close_designs designs record
$ record = f$element (0,"/",f$edit (record,"TRIM,COMPRESS,UPCASE,UNCOMMENT"))
$ if record .eqs. "" .or. record .eqs. "/" then goto read_designs
$ type = f$element (0," ",record)
$ name = f$element (1," ",record)
$ if type .eqs. "FAMILY" then family = name + "."
$ if type .eqs. "NAME" then write sys$output " ",family,name
$ goto read_designs
$ close_designs:
$ close/nolog designs
T.R | Title | User | Personal Name | Date | Lines |
---|
169.1 | Feedback? | VAXUUM::DYER | Adventures in Success | Tue Mar 31 1987 15:24 | 3 |
| Who out there thinks it's useful to have available designs and destinations
listed? Would anyone like such a feature in DOCUMENT?
<_Jym_>
|
169.2 | First YES vote | JAWS::STRYKER | Stew Stryker | Tue Mar 31 1987 16:33 | 1 |
| Sure
|
169.3 | another YES vote | ATLAST::BOUKNIGHT | Everything has an outline | Tue Mar 31 1987 17:56 | 7 |
| partcularly if it did the right thing in searching through the sequcne
of local and system definitions.
Could make it easier to couple DOCUMENT to other systems, like
ALL-IN-1.
jack
|
169.4 | How about something like | MARTY::FRIEDMAN | | Tue Mar 31 1987 18:20 | 17 |
| $ DOCUMENT
DOCUMENT> SHOW DOCTYPES/ALL
...
DOCUMENT> SHOW DOCTYPES/LOCAL
...
DOCUMENT> SHOW DOCTYPES/GLOBAL
or if the first element in the 'command mode' is a filename:
DOCUMENT> myfile.gnc
doctype? ...
destination? ...
...^Z
$
|
169.5 | Yup | 7615::HAKKARAINEN | Albatross! | Wed Apr 01 1987 10:30 | 12 |
| I think .1 is useful.
Re -1:
DSRPLUS on the 20 had that kind of mixed interface, command line and
prompting. It's often real handy, but it's a bear to document well.
People seem not to do well with changing modes.
Think we might be able to have this feature slog through the .gdx,
.dtp, and related files to give specs and a sample? :-)
kh
|
169.6 | Ayup!! | CLOSET::KAIKOW | | Wed Apr 01 1987 10:56 | 3 |
| re: 169.1
Ayup!!
|
169.7 | Yep! | GLORY::OVERTON | | Tue Jul 14 1987 14:30 | 1 |
| Yes, it definitely could help!
|