{
{ COMMON DECK FMHCFA }
{
{   The purpose of this procedure is to alter certain file attributes for a
{ file which has previously been created (i.e. an old file.)
{   When a file is created (i.e. when it is initially opened) file
{ attributes provided by the creator are preserved with the file.
{ This procedure can change a subset of the preserved attributes
{ on permanent or temporary files.  A permanent file must not currently
{ be attached to another job and the global share mode must be NONE.
{}
{    FMP$CHANGE_FILE_ATTRIBUTES (LOCAL_FILE_NAME, VALIDATION_RING,
{        FILE_ATTRIBUTES, STATUS)
{
{  LOCAL_FILE_NAME: (input) This parameter specifies the local name
{    of the file for which attributes are to be changed.
{
{  VALIDATION_RING: (input) This parameter specifies the validation
{    ring to be used in ring validation.
{
{  FILE_ATTRIBUTES: (input) This parameter is an array of attributes
{    specifying which attributes are to be changed and the new values.
{
{  STATUS: (output) This parameter returns the request status.
{
