ADUCRT: PGM


/* THIS COMMAND WILL BIND ALL OF THESE MODULES INTO A SERVICE PROGRAM       +
   IF ONE OF THESE MODULES CHANGES THIS JOB MUST BE RERUN TO REBIND         +
   IT WILL NOT BE NECESSARY TO REBIND ALL OF THE PROGRAMS THAT CALL THESE   +
   MODULES.  IF YOU CHANGE THE CALLING STRUCTURE OF ANY OF THESE MODULES    +
   ALL PROGRAMS MUST BE REBOUND.                                            +
   IF YOU ADD A PROGRAM IT MUST BE ADDED TO THE END.  YOU MUST UPDATE THE   +
   EXPORT LIST IN ADUTEST/BATCH    MEMBER NAME ADUSRVPGM.  IF YOU ADD TO THE +
   END ONLY THE PROGRAMS USING THE NEW MODULE NEED TO BE REBOUND             */

             CRTSRVPGM  SRVPGM(ADUTESTLIB/ADUSSLPGM) MODULE(*LIBL/CPRT *LIBL/ERROR *LIBL/FOPENV *LIBL/OUTOFMEM *LIBL/RDCOLOR *LIBL/SACCEPT *LIBL/SCLOSE *LIBL/SGETS *LIBL/SINIT *LIBL/SMASKWAI *LIBL/SMKSKT *LIBL/SOPEN +
                          *LIBL/SOPENV *LIBL/SPEEK *LIBL/SPEERADD *LIBL/SPEERNAM *LIBL/SPRINTF *LIBL/SPRT *LIBL/SPRTSKT *LIBL/SPUTS *LIBL/SREAD *LIBL/SREADBYT *LIBL/SRMSRVR *LIBL/SRMTRBLK *LIBL/SSCANF *LIBL/STEST +
                          *LIBL/STIMEOUT *LIBL/STPBLK *LIBL/STPNXT *LIBL/STRNXTFM *LIBL/SVPRINTF *LIBL/SWAIT *LIBL/SWRITE ESDTOSSL) EXPORT(*SRCFILE) SRCFILE(ADUTEST/QCSRC) SRCMBR(ADUSSLBND) TEXT('CREATE ADU SERVICE PROGRAM +
                          OF COSMIC SSL ROUTINES') BNDDIR(*NONE) DETAIL(*EXTENDED) TGTRLS(V4R3M0)
ENDPGM