The following example shows a port declared for YACHTS records in
       a DEC Fortran program:

       CALL DTR$COMMAND (DAB,'DECLARE PORT BOAT_PORT USING
       1 01 YACHT.
       2    03 BOAT.
       3       06 BUILDER PIC X(9).
       4       06 MODEL PIC X(10).
       5       06 RIG PIC X(6).
       6       06 LOA PIC X(3).
       7       06 DISP PIC X(5).
       8       06 BEAM PIC XX.
       9       06 PRICE PIC X(5).;')