HELPLIB.HLB  —  :=  Examples
    1.$ TIME := SHOW TIME
      $ TIME
      24-DEC-2001 11:55:44

      In this example, the symbol TIME is equated to the command
      string SHOW TIME. Because the symbol name appears as the first
      word in a command string, the command interpreter automatically
      substitutes it with its string value and executes the command
      SHOW TIME.

    2.$ STAT := $DKA1:[TEDESCO]STAT
      $ STAT

      This example shows how to define STAT as a foreign command. The
      symbol STAT is equated to a string that begins with a dollar
      sign followed by a file specification. The command interpreter
      assumes that the file specification is that of an executable
      image, that is, a file with a file type of .EXE.

      When you subsequently enter STAT, the command interpreter
      executes the image.

    3.$ A = "this is a big     space."
      $ SHOW SYMBOL A
        A = "this is a big     space."
      $ B := 'A'
      $ SHOW SYMBOL B
        B = "THIS IS A BIG SPACE."

      This example compares the assignment and the string assignment
      statements. The symbol A is defined using the assignment
      statement, so lowercase letters and multiple spaces are
      retained. The symbol B is defined using the string assignment
      statement. Note that the single quotation marks (` ')  are
      required; otherwise, the symbol name B would have been equated
      to the literal string A. However, when symbol A's value is
      assigned to symbol B, the letters are converted to uppercase
      and multiple spaces are compressed.

    4.$ FILE_NAME := MYFILE
      $ FILE_NAME[0,2]:= OL
      $ SHOW SYMBOL FILE_NAME
        FILE_NAME = "OLFILE"

      In this example, the substring expression in the assignment
      statement overlays the first 2 characters of the string
      assigned to the symbol FILE_NAME with the letters OL. The
      offset of 0 requests that the overlay begin with the first
      character in the string, and the size specification of 2
      indicates the number of characters to overlay.

    5.$ FILE_NAME := MYFILE
      $ FILE_TYPE := .TST
      $ FILE_NAME[F$LENGTH(FILE_NAME),4] := 'FILE_TYPE'
      $ SHOW SYMBOL FILE_NAME
        FILE_NAME = "MYFILE.TST"

      In this example, the symbol name FILE_NAME is equated to the
      string MYFILE and the symbol name FILE_TYPE is equated to the
      string .TST. The third assignment statement uses the lexical
      function F$LENGTH to define the offset value where the overlay
      is to begin. The symbol name FILE_TYPE is used to refer to
      the replacement string (.TST). Note that you must use single
      quotation marks (` ')  to request symbol substitution.

      The F$LENGTH lexical function returns the length of the string
      equated to the symbol FILE_NAME; this length is used as the
      offset. The expression requests that 4 characters of the string
      currently equated to the symbol FILE_TYPE be placed at the end
      of the string currently equated to FILE_NAME. The resultant
      value of the symbol FILE_NAME is MYFILE.TST.
Close Help