The Create a Barrier routine creates and initializes a barrier,
    and returns the barrier identifier. You use the barrier
    identifier to perform all operations on that barrier.

    Format

      PPL$CREATE_BARRIER  barrier-id [,barrier-name] [,quorum]