PT 8.52.13: Choosing PSjob as a process type in a PRCS server definition makes PRIORITY and MAX CONC

Hi all,

I checked the component behind the page SERVERDEFN and i found that in SERVERDEFN.GBL.SERVERCLASS.PRCSTYPE.FieldEdit few lines were added:

If SERVERCLASS.PRCSTYPE <> "PSJob" Then
   SQLExec("SELECT 'X' FROM PS_PRCSTYPEDEFN WHERE OPSYS = :SERVERCLASS.OPSYS and PRCSTYPE = :SERVERCLASS.PRCSTYPE", &SELECT);
   If &SELECT <> "X" Then
      Error MsgGet(65, 48, "Invalid Process Type %1", SERVERCLASS.PRCSTYPE);
   End-If;
   SERVERCLASS.PRCSPRIORITY.Visible = True;
   SERVERCLASS.MAXCONCURRENT.Visible = True;
Else
   SERVERCLASS.PRCSPRIORITY.Visible = False;
   SERVERCLASS.MAXCONCURRENT.Visible = False;
End-If;

and also in SERVERDEFN.GBL.SERVERCLASS.RowSelect, the following test was added

If SERVERCLASS.PRCSTYPE = "PSJob" Then
   SERVERCLASS.PRCSPRIORITY.Visible = False;
   SERVERCLASS.MAXCONCURRENT.Visible = False;
End-If;