{
{   This procedure  takes  the  requested  catalog,  and  the new_catalog_name
{  parameters, and the name of the found catalog  header,  and  builds  a  new
{  online catalog header.  For example:
{ catalog_header = NVESET.  A .  B
{ new_catalog_header = NVESET .  DOG
{ found_catalog_header = NVESET .  A .  B .  FRED
{ new_online_catalog_header => NVESET .  DOG .  FRED
{ The determination of whether the found item is under the requested item must
{ have  been  done  outside  of  this  procedure.  The size of the new catalog
{ header is assumed correct.
{
{       PUP$BUILD_NEW_ONLINE_CAT_HEAD (CATALOG_HEADER, NEW_CATALOG_HEADER,
{         FOUND_CATALOG_HEADER, NEW_ONLINE_CATALOG_HEADER)
{
{ CATALOG_HEADER:  (input) This parameter specifies the catalog header for the
{       catalog or file parameter on the restore subcommand.
{
{ NEW_CATALOG_HEADER: (input) This parameter specifies the catalog header  for
{       the  new  catalog  name  or  new  file  name parameters on the restore
{       subcommand.
{
{ FOUND_CATALOG_HEADER: (input) This parameter specifies  the  catalog  header
{       for the item found on the backup file.
{
{ NEW_ONLINE_CATALOG_HEADER:  (output)  This parameter returns the name of the
{       catalog header to be used in restoring the new item.
{
