Step 4: Generating the IBM Sterling Control Center Monitor FTP agent

The IBM® Sterling Control Center Monitor FTP agent is generated using the SCC$FMAC macro provided in the $SCC.SAMPLIB. The generated agent runs as an SMF exit to the FTP server. The FTP agent generates SNMP traps from the file transfer events within the FTP server.

About this task

The SCC$FMAC macro accepts the following parameters:

IP

The TCP/IP address (or DNS name) of the IBM Sterling Control Center Monitor engine.

PORT

The TCP/IP port that the IBM Sterling Control Center Monitor FTP node service is listening on.

SMFWRITE

Specifies whether or not SMF records are to be written. You must turn on SMF records in the FTP server in order for the exit to be driven, but the SMF records can be suppressed by the exit. (Y or N.) Y is the default.

NEXTEXIT

Specifies the name of the next SMF exit to be called by the IBM Sterling Control Center Monitor FTP agent. Installations already using the FTP server SMF exit can continue to use the exit by renaming the exit and specifying the exit name in NEXTEXIT. The IBM Sterling Control Center Monitor FTP agent is called first, and after its work it passes control to the exit named before returning to the FTP server.

To generate the IBM Sterling Control Center Monitor FTP agent:

1. Edit the FTPSMFEX member in $SCC.SAMPLIB with the appropriate parameters for your installation.
2. Assemble the IBM Sterling Control Center Monitor FTP agent using the following JCL (change $SCC to your high-level qualifier). (This sample JCL is included in $SCC.SAMPLIB(FTPSMFEA).

   //JOBCARD  JOB (ACCT),'PGM',MSGCLASS=X,REGION=4M
   //***************************************************************
   //*                                                             *
   //* SAMPLE JCL TO ASSEMBLE THE SCC FTP AGENT SMF EXIT           *
   //*                                                             *
   //* CHANGE $SCC TO YOUR HIGH-LEVEL QUALIFIER                    *
   //*                                                             *
   //***************************************************************
   //ASM      EXEC PGM=ASMA90,
   // PARM='OBJECT,NODECK,XREF(SHORT),RENT'
   //SYSLIB   DD DISP=SHR,DSN=$SCC.SAMPLIB
   //SYSLIN   DD DISP=(,PASS),DSN=&&OBJ,
   //            UNIT=SYSDA,SPACE=(CYL,(1,1)),
   //            DCB=(DSORG=PS,RECFM=FB,LRECL=80,BLKSIZE=3120)
   //SYSIN    DD DISP=SHR,DSN=$SCC.SAMPLIB(FTPSMFEX)
   //SYSPRINT DD SYSOUT=*
   //SYSTERM  DD SYSOUT=*
   //SYSUT1   DD UNIT=SYSDA,SPACE=(CYL,(1,1))
   //*************************
   //*        LKED           *
   //*************************
   //LKED     EXEC  PGM=IEWL,COND=(0,LT,ASM),
   // PARM='SIZE=(256K,13K),LIST,LET,XREF'
   //SYSLIB   DD  DISP=SHR,DSN=$SCC.LINKLIB
   //SYSLIN   DD  DISP=(OLD,DELETE),DSN=&&OBJ
   //SYSLMOD  DD  DISP=SHR,DSN=$SCC.LINKLIB(FTPSMFEX)
   //SYSPRINT DD  SYSOUT=*
   //SYSUT1   DD  UNIT=SYSDA,SPACE=(CYL,(1,1),,CONTIG)