{
{   The purpose  of  this procedure is to store a permanent file utility label
{ for a particular attached or newly created permanent file.  This stores  the
{ label  both  in  the  permanent  file  catalog  and job locally.  If a label
{ already exists for the file, it will be replaced, and the caller  must  have
{ control  permission to the permanent file.  This label must have been gotten
{ with the SRP$FETCH_SYSTEM_LABEL interface and must not  have  been  modified
{ since the fetch.
{
{       SRP$STORE_SYSTEM_LABEL (LOCAL_FILE_NAME, LABEL, STATUS)
{
{ LOCAL_FILE_NAME:  (input)  This  parameter  specifies the local name for the
{       permanent file.
{
{ LABEL: (input) This parameter specifies a sequence that contains  the  label
{       to be stored.
{
{ STATUS: (output) This parameter returns the request status.
{
{       CONDITIONS: cle$improper_name
{                   lne$ln_lnt_entry_not_found
{                   lne$incorrect_label_size
{                   lne$invalid_label_data
{                   lne$invalid_label_name
{                   lne$incompatible_label
{
{       IDENTIFIER: amc$access_method_id
{
