Responding to all posters, not just Mr Metz.

1. I already tried calling the proc from JCL.  It ran, stopped immediately and 
returned no error messages.
2. I started the proc with the MSGCLASS and did receive output.  It was 
identical to the JCL call; immediate stop and no error messages.  I will post 
this below.
3. The started task is a second FTP server supporting FTPS. To simplify, I 
copied the FTPD proc and renamed it FTPSD.  In theory, it is running exactly as 
the original FTPD task with a different port. (990)
4. The PROFILE update reads like this - 
AUTOLOG                                        
   FTPSD JOBNAME FTPSD      ; FTPS SERVER      
ENDAUTOLOG                                     
PORT                                           
   989 TCP OMVS                ; FTPS SERVER   
   990 TCP FTPSD     NOAUTOLOG ; FTPS SERVER   

Here is the output of running the started task - (system specifics changed for 
security reasons)
 08:26:31 ---- IAT6853 THE CURRENT DATE IS MONDAY,    27 JUL 2020 ----
 08:26:31 IAT4401  LOCATE FOR STEP=FTPD     DD=STEPLIB  DSN=SYSX.TCPIP.SEZATCP
 08:26:31 IAT4402 UNIT=3390    ,VOL(S)=XYZZY
 08:26:31 IAT4401  LOCATE FOR STEP=FTPD     DD=STEPLIB  DSN=SYSX.TCPIP.XXLOAD
 08:26:31 IAT4402 STORCLAS=XYZZY, MGMTCLAS=XYZZY
 08:26:31 IAT4401  LOCATE FOR STEP=FTPD     DD=SYSFTPD  DSN=SYSX.TCPIP.PARMLIB
 08:26:31 IAT4402 STORCLAS=XYZZY, MGMTCLAS=XYZZY
 08:26:31 IAT4401  LOCATE FOR STEP=FTPD     DD=SYSTCPD  DSN=SYSX.TCPIP.PARMLIB
 08:26:31 IAT4402 STORCLAS=XYZZY, MGMTCLAS=XYZZY
 08:26:31  IEF695I START FTPSD    WITH JOBNAME FTPSD    IS ASSIGNED TO USER 
FTPSD   , GROUP XXXXXXXX
 08:26:31  ACF9CCCD USERID FTPSD    IS ASSIGNED TO THIS JOB - FTPSD
 08:26:31  IEF403I FTPSD - STARTED - TIME=08.26.31
 08:26:31  IEF404I FTPSD - ENDED - TIME=08.26.31
//FTPSD    JOB MSGCLASS=T,                                             *
// MSGLEVEL=1
//STARTING EXEC FTPSD
        1 //FTPSD    JOB MSGCLASS=T,                                            
 *
          // MSGLEVEL=1
        2 //STARTING EXEC FTPSD
        3 XXFTPSD  PROC MODULE='FTPD',PARMS='TRACE PORT 990'
        4 XXFTPD   EXEC PGM=&MODULE,REGION=0M,TIME=NOLIMIT,
          XX      PARM='POSIX(ON) ALL31(ON)/&PARMS'
          IEFC653I SUBSTITUTION JCL - 
PGM=FTPD,REGION=0M,TIME=NOLIMIT,PARM='POSIX(ON) ALL31(ON)/TRACE PORT 990'
        5 XXSTEPLIB  DD DSN=SYSX.TCPIP.SEZATCP,DISP=SHR
        6 XX         DD DSN=SYSX.TCPIP.XXLOAD,DISP=SHR
        7 XXCEEDUMP  DD SYSOUT=*
        8 XXSYSOUT   DD SYSOUT=*
        9 XXSYSFTPD DD DISP=SHR,DSN=SYSX.TCPIP.PARMLIB(FTPSSL)
       10 XXSYSTCPD DD DISP=SHR,DSN=SYSX.TCPIP.PARMLIB(TCPDATA)
 STMT NO. MESSAGE
        2 IEFC001I PROCEDURE FTPSD WAS EXPANDED USING SYSTEM LIBRARY 
SYSX.PROCLIB
IEF695I START FTPSD    WITH JOBNAME FTPSD    IS ASSIGNED TO USER FTPSD   , 
GROUP USSGRPX
IEF043I Actions taken by SMFLIMxx parmlib policy for FTPSD    FTPD
        Step MEMLIMIT set to ONOUDONT by policy - SMFLIM00 0002
IEF142I FTPSD FTPSD - STEP WAS EXECUTED - COND CODE 0000
IEF373I STEP/FTPD    /START 2020209.0826
IEF032I STEP/FTPD    /STOP  2020209.0826
        CPU:     0 HR  00 MIN  00.08 SEC    SRB:     0 HR  00 MIN  00.00 SEC
        VIRT:    80K  SYS:   216K  EXT:     2220K  SYS:     9108K
        ATB- REAL:                    12K  SLOTS:                     0K
             VIRT- ALLOC:       7M SHRD:       0M
IEF375I  JOB/FTPSD   /START 2020209.0826
IEF033I  JOB/FTPSD   /STOP  2020209.0826
        CPU:     0 HR  00 MIN  00.08 SEC    SRB:     0 HR  00 MIN  00.00 SEC

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to