DTRHELP.HLB  —  Commands Statements Clauses, OPEN Command
       Opens an RMS file to serve as a log of your interactive dialogue
       with DEC DATATRIEVE. DEC DATATRIEVE copies your input and the DEC
       DATATRIEVE output including error messages to the file exactly as
       displayed.

       Format

         OPEN  file-spec

1  –  Argument

    file-spec

       Is the OpenVMS file specification of the file to be opened. The
       file specification must be in the following format:

       node-spec::device:[directory]file-name.type;version

2  –  Example

       This example opens a log file, displays the contents of a
       procedure, invokes the procedure, closes the log file with
       a CTRL/Z exit from DEC DATATRIEVE, and uses the OpenVMS TYPE
       command to display the contents of the log file:

       DTR> OPEN LOG
       DTR> !THIS IS A TEST OF THE OPEN COMMAND.
       DTR> READY YACHTS
       DTR> SHOW SELL_BOAT
       PROCEDURE SELL_BOAT
       FIND YACHTS WITH BUILDER EQ *.BUILDER AND MODEL EQ *.MODEL
       PRINT ALL
       IF *."Y IF BOAT SOLD" EQ "Y" THEN ERASE ALL ELSE
              PRINT "SELL IT NOW!"
       END_PROCEDURE

       DTR> :SELL_BOAT
       Enter BUILDER: ALBIN
       Enter MODEL: VEGA

                                      LENGTH
                                       OVER
       MANUFACTURER   MODEL     RIG    ALL   WEIGHT BEAM  PRICE

        ALBIN       VEGA       SLOOP   27     5,070  08  $18,600

       Enter Y IF BOAT SOLD: N

       SELL IT NOW!
       DTR> <CTRL/Z>
       $ TYPE LOG.LIS
       DTR> !THIS IS A TEST OF THE OPEN COMMAND.
       DTR> READY YACHTS
       DTR> SHOW SELL_BOAT
       PROCEDURE SELL_BOAT
       FIND YACHTS WITH BUILDER EQ *.BUILDER AND MODEL EQ *.MODEL
       PRINT ALL
       IF *."Y IF BOAT SOLD" EQ "Y" THEN ERASE ALL
       PRINT "SELL IT NOW !"
       END_PROCEDURE

       DTR> :SELL_BOAT
       Enter BUILDER: ALBIN
       Enter MODEL: VEGA
                                      LENGTH
                                       OVER
       MANUFACTURER   MODEL     RIG    ALL   WEIGHT BEAM  PRICE

        ALBIN       VEGA       SLOOP   27     5,070  08  $18,600

       Enter Y IF BOAT SOLD: N

       SELL IT NOW!

       $
Close Help