The Format Protection Mask routine translates a protection mask
    into a formatted string.

    Format

      LIB$FORMAT_SOGW_PROT  protection-mask, [access-names],

                            [ownership-names], [ownership-separator],

                            [list-separator], protection-string,

                            [protection-length]