{
{    The purpose of this procedure is to set the terminal name of the
{ requesting job to the specified terminal name.
{
{       QFP$SET_TERMINAL_NAME (TERMINAL_NAME);
{
{ TERMINAL_NAME: (input)  This parameter specifies the new terminal name to be
{       assigned to the requesting job.
{
