JFSCPCN1: Control Statements for JFSCPLPA and JFSCPBCK

This member contains the IEBCOPY control statements used by jobs JFSCPLPA and JFSCPBCK:

*
* MEMBER: JFSCPCN1
* DATASET: PREFIX.FOCCTL.DATA
*
* This member contains IEBCOPY UTILITY CONTROL STATEMENTS for
* the jobs JFSCPLPA AND JFSCPBCK. They copy REENTRANT FOCUS
* modules to the appropriate library. See the descriptions in
* the aforementioned jobs for detailed instructions.
*
* The PRIMARY or ROOT names of the modules are in alphabetical
* sequence. Any ALIAS names are included in the same select
* statement that specifies the ROOT name.
*
* FOCUS modules that have an RMODE OF 24 are excluded from
* being copied. In addition, the following module(s) are excluded
* because their control points are subject to being "ZAPPED".
*   MVSDLL, SSCONSEC, HFINST
*
*
*
*
*
*

  COPY     INDD=((INLIB,R)),OUTDD=OUTLIB
  SELECT   MEMBER=(CDTAB)
  SELECT   MEMBER=(CORFOC)
  SELECT   MEMBER=(DQSQLF)
  SELECT   MEMBER=(EDXFOC)
  SELECT   MEMBER=(EMGSRV)
  SELECT   MEMBER=(FMI)
  SELECT   MEMBER=(FOCMIL)
  SELECT   MEMBER=(FOCUTL)
  SELECT   MEMBER=(GNTINT)
  SELECT   MEMBER=(GRMMNT)
  SELECT   MEMBER=(HFFUNC)
  SELECT   MEMBER=(IMSRV)
  SELECT   MEMBER=(INTCBS)
  SELECT   MEMBER=(MASPAR)
  SELECT   MEMBER=(MFP)
  SELECT   MEMBER=(MNTIPR)
  SELECT   MEMBER=(NLSP)
  SELECT   MEMBER=(NTDM)
  SELECT   MEMBER=(NTDUMP)
  SELECT   MEMBER=(NTHR)
  SELECT   MEMBER=(NWH)
  SELECT   MEMBER=(OSL)
  SELECT   MEMBER=(PARSER)
  SELECT   MEMBER=(QDATACOM)
  SELECT   MEMBER=(QFMI)
  SELECT   MEMBER=(QFQDBE)
  SELECT   MEMBER=(QIDMSR)
  SELECT   MEMBER=(QIMSX)
  SELECT   MEMBER=(QLEGACY,QTOTAL,QTOTIN,                              X
                QS2K,QHLIX,QFSP000)

 SELECT   MEMBER=(QMFINT)
  SELECT   MEMBER=(QSQLDS)
  SELECT   MEMBER=(QSWDB2)
  SELECT   MEMBER=(QVSAMX)
  SELECT   MEMBER=(RMH)
  SELECT   MEMBER=(RTH)
  SELECT   MEMBER=(SQLDS)
  SELECT   MEMBER=(SQLFOC)
  SELECT   MEMBER=(SQLGET)
  SELECT   MEMBER=(TSCOM3)
  SELECT   MEMBER=(UFAAPI)
  SELECT   MEMBER=(UTL)
  SELECT   MEMBER=(VSAMX)
  SELECT   MEMBER=(VVSET)
  SELECT   MEMBER=(WFINIT)
  SELECT   MEMBER=(WTINIT)
  SELECT   MEMBER=(XVSRV)
* END OF MEMBER: JFSCPCN1