home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / viscobv6.zip / vac22os2 / ibmcobol / samples / sdu / cics.sna next >
Text File  |  1995-06-07  |  9KB  |  149 lines
  1. *****************************************************************************
  2. * Copyright (c) IBM Corporation 1993  -  All Rights Reserved                *
  3. *                                                                           *
  4. *                                                                           *
  5. * Sample Network Definition for CICS                                        *
  6. * ----------------------------------                                        *
  7. *                                                                           *
  8. * This is a SAMPLE of network definitions for a CICS system                 *
  9. * for use with IBM Distributed FileManager (DFM/2) for OS/2.                *
  10. *                                                                           *
  11. *****************************************************************************
  12. *                                                                           *
  13. * DFM/2 (program no. 5648-020)                                              *
  14. * Version: 1.0                                                              *
  15. * Release: 1.0                                                              *
  16. *                                                                           *
  17. * DISCLAIMER OF WARRANTIES:                                                 *
  18. * The following is a sample created by IBM Corporation. It is not part of   *
  19. * any standard or IBM product and is provided to you solely for the purpose *
  20. * of assisting you in the definition of your environment.                   *
  21. * It is provided "AS IS", without warranty of any kind. IBM shall not be    *
  22. * liable for any damages arising out of your use of this sample code, even  *
  23. * if they have been advised of the possiblity of such damages.              *
  24. * BUT STILL:                                                                *
  25. * If you have a proposal about how to make this sample more useful          *
  26. * we would appreciate your comments.                                        *
  27. *****************************************************************************
  28. * CHANGE ACTIVITY                                                           *
  29. * Flag Reason      Level    Date   Origin    Comments                       *
  30. * ------------------------------------------------------------------------- *
  31. *                           930402 Mueller  : Initial Release               *
  32. * IBM Deutschland Entwicklung GmbH, Boeblingen, Germany       GMU at SDFVM1 *
  33. *****************************************************************************
  34. *****************************************************************************
  35. *                                                                           *
  36. * Modify the values as needed.                                              *
  37. * ==> Locate all '%....%' variables (strings starting and ending with '%')  *
  38. *     and replace them with the appropriate values for your environment.    *
  39. *     Note: The %..% notation has been used here as in OS/2 .cmd files.     *
  40. *     However, there is NO automatic replacement of these variables,        *
  41. *     you have to do it manually.                                           *
  42. *                                                                           *
  43. *****************************************************************************
  44.  
  45. *
  46. *   In CICS the following has to be created for each OS/2 system via RDO
  47. *   - a CONNECTION entry in the CSD
  48. *   - a SESSION    entry in the CSD
  49. *********************************************************************
  50. *
  51. *********************************************************************
  52. * The parameters for the CONNECTION are :
  53. *********************************************************************
  54. *
  55.  CONNECTION(OS2C)   GROUP(XXXX)  DESCRIPTION()
  56.                     CONNECTION-IDENTIFIERS
  57.                                  NETNAME(%os2_lu_name%) INDSYS()
  58.                     REMOTE-ATTRIBUTES
  59.                                     REMOTESYSTEM()     REMOTENAME()
  60.                     CONNECTION-PROPERTIES
  61.                                     ACCESSMETHOD(VTAM) PROTOCOL(APPC)
  62.                                     SINGLESESS(NO)     DATASTREAM(USER)
  63.                                     RECORDFORMAT(U)
  64.                     OPERATIONAL-PROPERTIES
  65.                                     AUTOCONNECT(NO)    INSERVICE(YES)
  66.                     SECURITY
  67.                                     SECURITYNAME()     ATTACHSEC(LOCAL)
  68.                                     BINDPASSWORD()     BINDSECURITY(NO)
  69. *********************************************************************
  70. * The parameters for the CONNECTION are :
  71. *********************************************************************
  72. *
  73.  SESSIONS(OS2SES)   GROUP(XXXX)     DESCRIPTION()
  74.                     SESSION-IDENTIFIERS
  75.                                     CONNECTION(OS2C)       SESSNAME()             NETNAMEQ()
  76.                                     MODENAME(APPCLU62)
  77.                     SESSION-PROPERTIES
  78.                                     PROTOCOL(APPC)         MAXIMUM(16,0)          RECEIVEPFX()
  79.                                     RECEIVECOUNT()         SENDPFX()              SENDCOUNT()
  80.                                     SENDSIZE(256)          RECEIVESIZE(256)       SESSPRIORITY(0)
  81.                     PRESET-SECURITY
  82.                                     USERID()
  83.                     OPERATIONAL-PROPERTIES
  84.                                     AUTOCONNECT(NO)        BUILDCHAIN(YES)        USERAREALEN(0)
  85.                                     IOAREALEN(0,0)         RELREQ(NO)             DISCREQ(NO)
  86.                                     NEPCLASS(0)
  87.                     RECOVERY
  88.  
  89.                                     RECOVOPTION(SYSDEFAULT)
  90.                                     RECOVNOTIFY(NONE)
  91. *
  92. *
  93. *********************************************************************
  94. * in SYS1.VTAMLST the following definition is needed:
  95. *********************************************************************
  96. XYZ12    VBUILD TYPE=SWNET,                                            *
  97.                MAXNO=12,                                               *
  98.                MAXGRP=5
  99. *
  100. * For each of the linked OS/2 systems, the following specifications
  101. * are needed:
  102. *
  103. %os2_node_name%   PU    ADDR=01,                                       *
  104.                   IDBLK=05D,IDNUM=%os2_node_ID%,                       *
  105.                   DISCNT=NO,                                           *
  106.                   MAXDATA=265,                                         *
  107.                   MAXOUT=1,                                            *
  108.                   MAXPATH=2,                                           *
  109.                   MODETAB=MODAPPC,                                     *
  110.                   VPACING=0,                                           *
  111.                   PACING=0,                                            *
  112.                   SECNET=YES,                                          *
  113.                   PUTYPE=2
  114. *
  115. *
  116. %os2_lu_name%  LU    LOCADDR=0
  117. *
  118. *********************************************************************
  119. * and in the mode table MODAPPC :
  120. *********************************************************************
  121. *
  122. APPCLU62 MODEENT LOGMODE=APPCLU62,FMPROF=X'13',TSPROF=X'07',           *
  123.                COS=INTERACT,ENCR=B'0000',                              *
  124.                PRIPROT=X'B0',SECPROT=X'B0',COMPROT=X'D0B1',            *
  125.                RUSIZES=X'8585',PSERVIC=X'060200000000000000000300'
  126.  
  127.  
  128.  
  129. *****************************************************************************
  130. * Notes:
  131. ********
  132. *
  133. %os2_node_name%   You find the node name for each of the linked PS/2s
  134.                   in the node definitions file for the
  135.                   OS/2 ES Communication Manager
  136.                   (this is the xxx.NDF file normally residing in c:\cmlib\appn)
  137.                   in the DEFINE_LOCAL_CP statement
  138.                   as the last parameter in the FQ_CP_NAME specification.
  139. %os2_node_ID%     You find the node ID for each of the linked PS/2s
  140.                   in the node definitions file for the
  141.                   OS/2 ES Communication Manager
  142.                   in the DEFINE_LOCAL_CP statement.
  143. %os2_lu_name%     You find logical unit name(s) for each of the linked PS/2s
  144.                   in the node definitions file for the
  145.                   OS/2 ES Communication Manager
  146.                   in DEFINE_LOCAL_LU statement(s), or one is generated from
  147.                   the FQ_CP_NAME parameter in the DEFINE_LOCAL_CP statement.
  148. *****************************************************************************
  149.