{
{   The purpose of this request is to put media information about a
{ catalog into the permanent file system.  This request is intended to be
{ used only by the restore_permanent_files utility when restoring on loss
{ of a catalog device.  This request may only
{ be issued by the system administrator and only after a call to
{ PFP$BUILD_SORTED_DFL is issued.  The media information was obtained by
{ doing a pfp$get_item_item and including pfc$catalog_description and
{ pfc$catalog_media_descriptor in the catalog_info_selections.
{   If the catalog already exists and it is on an active device, no change
{ in the catalog will occur.  If the catalog already exists and it is on
{ an inactive device, the catalog will be recreated.  If the parent catalog media
{ has been recreated by a previous pfp$put_catalog_media_info, then if the
{ file media descriptor in the catalog information describes an active device
{ manager file, that media will be restored.  If the fmd describes an inactive
{ file, the catalog will be recreated.
{
{       PFP$PUT_CATALOG_MEDIA_INFO (PATH, P_CATALOG_GROUP, SET_NAME, RESTORE_CATALOG_STATUS,
{             STATUS)
{
{ PATH: (input) This parameter specifies the name of the catalog being restored.
{
{ P_CATALOG_GROUP: (input) This parameter specifies the catalog information
{       in which the catalog description and media reside.
{
{ SET_NAME: (input) This parameter specifies the set name of the restored item
{       as specified by the backup file.  It must match the set name currently
{       defined for the family.
{
{ RESTORE_CATALOG_STATUS: (output) This parameter returns the status of whether
{       the catalog's location was restored, or the catalog was recreated.
{
{ STATUS: (output) The parameter resturns the request status.  Abnormal
{       status here may be as a result of the parent not existing.  Also if the
{       parent was not recreated, and the catalog was not found then this
{       status will indicate an unknown catalog.
{        CONDITIONS:
{               pfe$last_name_not_subcatalog
{               pfe$unknown_last_subcatalog
{               pfe$unknown_nth_subcatalog
