if ($Request->item("View")->item() eq "ModifySSR")
    {
      $FileName = "$Session->{'usrSystem'}".xml;
      my $content = "";
      my $body    = "";
      my $path    = "content/ssresources";

      if ($Request->item("Action")->item() eq "View")
        { DoView(); }
      else
        { ProcessModify(); }
# etc. etc.
    }

sub ProcessModify
{
  my $req = $Request->item("Action")->item();

  if ( $req eq "View" )
    { DoView(); }

  elsif ( $req eq "Copy" )
    { DoCopy(); }

  elsif ( $req eq "New" )
    { DoNew(); }

# etc. etc.
}