Hi listers,
I have a customer who has currently a VSE 2.3 under VM with direct osa-2
connection of the vse on a multiprise. Now he has got a z890 and zvm 5.2
where this vse 2.3 (with the inofficial patch of IBM Boeblingen, Germany)
shall run on. So far so good. VSE runs perfectly. I want to use the already
known ip adresses of the vse. Now I have the following configured
zVM OSA-QDIO ip 10.0.0.131 mask 255.0.0.0
zvm ctc2vse ip 10.0.0.133 mask 255.0.0.0
zvm defaultgw ip 10.0.0.1
ASSORTEDPARMS
PROXYARP
RESTRICTLOWPORTS
ENDASSORTEDPARMS
vse ctc2vm ip 10.0.0.132 mask 255.0.0.0
vse defaultgw ip 10.0.0.133
communication works ok between vse and zvm, but not to the outside world.
With osasf, I have seen, that the 10.0.0.132 is not known to the osa device.
I have expected to find this address in the dynamic oat entries. The vm
addresses appear as expected. I attach the ip profile for vm and vse for
documentation. I want to avoid, if possible, to define this nice osa-express
as CHP-Type OSE for connecting the vse directly. Hopefully someone can help
me to get it working.
regards
Franz Josef Pohlen
--
10 GB Mailbox, 100 FreeSMS/Monat http://www.gmx.net/de/go/topmail
+++ GMX - die erste Adresse für Mail, Message, More +++; =======================================================================
; COPYRIGHT -
; Licensed Materials - Property of IBM
; This product contains "Restricted Materials of IBM"
; 5741-A05 (C) Copyright IBM Corp. 1991, 2005
; All rights reserved.
; US Government Users Restricted Rights -
; Use, duplication or disclosure restricted by GSA ADP Schedule
; Contract with IBM Corp.
; See IBM Copyright Instructions.
;
; STATUS = TCP/IP level 520 for z/VM Version 5, Release 2.0
;
; -----------------------------------------------------------------------
; %%File Origin Indicator - DO NOT REMOVE OR ALTER the next line%%
; %%TCPIP%%PROFILE%%STCPIP%%
;
; =======================================================================
; File Name: PROFILE TCPIP (Supplied as: PROFILE STCPIP)
;
; Description: TCP/IP Server Configuration File
;
; -----------------------------------------------------------------------
; Purpose:
;
; This configuration file is used to define system operation
; parameters, Telnet and network configuration information for your
; TCP/IP environment. The definitions within this file are used by
; the TCPIP virtual machine to establish your TCP/IP services during
; initialization, although some statements within this file can be
; changed dynamically by using the OBEYFILE command.
;
; -----------------------------------------------------------------------
; >>> I M P O R T A N T <<<
; -----------------------------------------------------------------------
; Syntax Information:
;
; - Comments within this file -MUST- begin with a semicolon (;), which
; itself -MUST ALSO- be followed by at least one blank (space).
;
; -----------------------------------------------------------------------
; Notes:
;
; - For detailed information about supported statements, syntax, and
; the use of this file for configuration of the TCP/IP server,
; see the chapter titled "Configuring the TCP/IP Server" in
; "z/VM: TCP/IP Planning and Customization".
;
; =======================================================================
;
; =======================================================================
; Free Pool Statements
; =======================================================================
; Use the statements below to define the allocation of control blocks
; and data buffers used by the TCP/IP stack (TCPIP) and other TCP/IP
; service virtual machines. Ensure the Free Pool statements precede
; all other statements within this file.
; -----------------------------------------------------------------------
ACBPOOLSIZE 1000
ADDRESSTRANSLATIONPOOLSIZE 1500
CCBPOOLSIZE 150
DATABUFFERPOOLSIZE 160 8192
ENVELOPEPOOLSIZE 750
IPROUTEPOOLSIZE 600
LARGEENVELOPEPOOLSIZE 50 8192
RCBPOOLSIZE 50
SCBPOOLSIZE 256
SKCBPOOLSIZE 256
SMALLDATABUFFERPOOLSIZE 1024
TCBPOOLSIZE 256
TINYDATABUFFERPOOLSIZE 0
UCBPOOLSIZE 100
; -----------------------------------------------------------------------
; Monitorrecords statement
; -----------------------------------------------------------------------
; Use the MONITORRECORDS statement to select the monitor data records
; that are produced by TCPIP, if any.
; -----------------------------------------------------------------------
MONITORRECORDS
; -----------------------------------------------------------------------
; Tracing Statements
; -----------------------------------------------------------------------
; Define tracing statements below, to log events for diagnostic purposes.
; Traces for which corresponding statements are defined within this file
; are activated at TCP/IP server initialization.
;
; Note: For most situations that require tracing, it may be more
; advantageous to use the OBEYFILE or NETSTAT OBEY commands to
; dynamically enable and disable tracing, rather than defining
; tracing statements within this file.
;
; The following are representative tracing statements:
;
; TRACE MOST
; LESSTRACE ALL
; MORETRACE MOST
;
; For detailed information about tracing, see the description of the
; TRACE statement in "z/VM: TCP/IP for VM Planning and Customization".
;
; -----------------------------------------------------------------------
; The 'SCREEN', 'NOSCREEN' and 'FILE' statements can be used to control
; where trace messages and output are produced:
;
; SCREEN
; NOSCREEN
; FILE TCPIP PROB0001 A
;
; -----------------------------------------------------------------------
; NOTRACE disables all TCP/IP tracing.
; -----------------------------------------------------------------------
NOTRACE ALL
; -----------------------------------------------------------------------
; Control trace and console file timestamps.
; -----------------------------------------------------------------------
TIMESTAMP PREFIX
; -----------------------------------------------------------------------
; Define user IDs to receive messages when serious errors occur.
; -----------------------------------------------------------------------
INFORM
OPERATOR TCPMAINT MAINT
ENDINFORM
; =======================================================================
; Various TCP/IP server initialization, operation and authorization
; parameters.
;
; Note that the TCP/IP stack restricts all "Well-Known" ports (ports
; 1-1023) from general use on a default basis. Thus, the default for
; the ASSORTEDPARMS statement is the RESTRICTLOWPORTS operand. Use the
; FREELOWPORTS operand, or specific port reservations via the PORT
; statement, to control authorization to use such ports.
;
; =======================================================================
; Assorted Parameters
; -----------------------------------------------------------------------
; ASSORTEDPARMS
; NOFWD
; NOUDPQUEUELIMIT
; OVERRIDEPRECEDENCE
; PERMITTEDUSERSONLY
; PROXYARP
; RESTRICTLOWPORTS
; FREELOWPORTS
; VMDUMP
; ENDASSORTEDPARMS
;
ASSORTEDPARMS
PROXYARP
RESTRICTLOWPORTS
ENDASSORTEDPARMS
; -----------------------------------------------------------------------
; Define user IDs that are allowed to issue OBEYFILE and other
; restricted commands.
; -----------------------------------------------------------------------
OBEY
OPERATOR TCPMAINT MAINT MPROUTE ROUTED DHCPD REXECD SNMPD SNMPQE
ENDOBEY
; -----------------------------------------------------------------------
; Identify IP addresses for which traffic is to be blocked. Packets
; that emanate from blocked hosts are filtered out of the incoming
; data stream and are ignored.
; -----------------------------------------------------------------------
;
; BLOCK n1.n1.n1.n1 n2.n2.n2.n2 n3.n3.n3.n3
;
;
; -----------------------------------------------------------------------
; Restrict specific user IDs (or a group of similarly named user IDs)
; from using TCP/IP services.
; -----------------------------------------------------------------------
;
; RESTRICT
; VEND*
; BADGUY
; ENDRESTRICT
;
; -----------------------------------------------------------------------
; Permit specific user IDs to use TCP/IP services.
; -----------------------------------------------------------------------
;
; PERMIT
; GOODGUY
; ENDPERMIT
;
;
; -----------------------------------------------------------------------
; Keep-Alive Packet parameters
; -----------------------------------------------------------------------
KEEPALIVEOPTIONS
INTERVAL 20
SENDGARBAGE FALSE
ENDKEEPALIVEOPTIONS
; -----------------------------------------------------------------------
; Define whether or not a stack is available to control a CP-defined
; Virtual Switch's connection to a real LAN segment through an
; OSA Express device. The range of virtual addresses that are to be
; used for such a connection can optionally be specified with the
; VSWITCH statement.
; -----------------------------------------------------------------------
;
; VSWITCH CONTROLLER ON vdev1 vdev2
;
;
; -----------------------------------------------------------------------
; SNMP-related Statements
;
; SYSCONTACT defines the contact person for this managed node, as well
; as how to contact this person. This definition supplies the value
; for the SNMP MIB variable, "sysContact".
;
; SYSLOCATION defines the physical location of this node. This
; definition supplies the value for the SNMP MIB variable,
; "sysLocation".
; -----------------------------------------------------------------------
SYSCONTACT
Main Operator (555-1234)
AlphaBeta Soup Corporation
ENDSYSCONTACT
SYSLOCATION
First Floor Computer Room
ENDSYSLOCATION
; =======================================================================
; Server Virtual Machine-related Statements
; =======================================================================
; Server machines identified with the AUTOLOG statement are started
; by TCPIP via the XAUTOLOG command, when the TCP/IP server is
; initialized.
; -----------------------------------------------------------------------
; Note that the MPROUTE and RouteD servers cannot be concurrently used
; with the same TCP/IP stack server.
; -----------------------------------------------------------------------
AUTOLOG
; BOOTPD password ; BootP Server
; DHCPD password ; DHCP Server
FTPSERVE PASSWORD ; FTP SERVER
; IMAP password ; IMAP Server
; IMAPAUTH password ; IMAP Authentication Virtual Machine
; TFTPD password ; TFTPD (Trivial FTP) Server
; LPSERVE password ; LP Server
; NAMESRV password ; Domain Name Server
; MPROUTE password ; Multiple Protocol Routing Server
; ROUTED password ; RouteD Server
; PORTMAP password ; Portmap server
; REXECD password ; REXEC Server
; SMTP password ; SMTP Server
; SNMPD password ; SNMP VM Agent Virtual Machine
; SNMPQE password ; SNMP VM Client Virtual Machine
; SSLSERV password ; SSL Server
; UFTD password ; UFT Server
; VMNFS password ; NFS Server
ENDAUTOLOG
; -----------------------------------------------------------------------
; Reserve ports for specific server machines. Port values used are
; those defined in RFC 1060, "Assigned Numbers"
; -----------------------------------------------------------------------
; Notes:
;
; - The MPROUTE and RouteD servers cannot be concurrently used with
; the same TCP/IP stack server; likewise for the BootP and DHCP
; servers.
;
; - The TCP/IP stack restricts all "Well-Known" ports (ports 1-1023)
; from general use on a default basis.
;
; - The FREELOWPORTS operand of the ASSORTEDPARMS statement can be
; used to allow unrestricted use of well-known ports that have not
; been otherwise reserved. Alternatively, an asterisk (*) can be
; specified in place of a conventional user ID for a PORT statement
; entry to reserve a specific port number (or port range) for general
; use.
; -----------------------------------------------------------------------
PORT
20 TCP FTPSERVE NOAUTOLOG ; FTP Server
21 TCP FTPSERVE ; FTP Server
23 TCP INTCLIEN ; TELNET Server
25 TCP SMTP ; SMTP Server
53 TCP NAMESRV ; Domain Name Server
53 UDP NAMESRV ; Domain Name Server
; 67 UDP BOOTPD ; BootP Server
; 67 UDP DHCPD ; DHCP Server
69 UDP TFTPD ; TFTPD (Trivial FTP) Server
111 TCP PORTMAP ; Portmap Server
111 UDP PORTMAP ; Portmap Server
143 TCP IMAP ; IMAP Server
161 UDP SNMPD ; SNMP Agent
162 UDP SNMPQE ; SNMPQE Agent
512 TCP REXECD ; REXECD Server (REXEC)
514 TCP REXECD ; REXECD Server (RSH)
515 TCP LPSERVE ; LP Server
; 520 UDP MPROUTE NOAUTOLOG ; Multiple Protocol Routing Server
; 520 UDP ROUTED ; RouteD Server
608 TCP UFTD ; UFT Server
; 721-731 TCP * ; Traditional LPR client "source" ports
; ; (Asterisk (*) reservation allows for
; ; unrestricted use).
750 TCP VMKERB ; Kerberos Server
750 UDP VMKERB ; Kerberos Server
751 TCP ADMSERV ; Kerberos Database Server
751 UDP ADMSERV ; Kerberos Database Server
2049 UDP VMNFS ; NFS Server
2049 TCP VMNFS NOAUTOLOG ; NFS Server
9999 TCP SSLSERV ; SSL Server - Administration
51107 TCP CBDIODSP ; HCD SERVER
51107 UDP CBDIODSP ; HCD SERVER
;
; (End of PORT reservations)
; =======================================================================
; TELNET Server Configuration Statements.
; (The TELNET Server is an "internal client" of the TCP/IP server).
; =======================================================================
;
INTERNALCLIENTPARMS
PORT 23
INACTIVE 0
TIMEMARK 600
CCSTERMNAME TCPIP
CONNECTEXIT SCEXIT2
ENDINTERNALCLIENTPARMS
;
;
; =======================================================================
; DEVICE and LINK statements
; =======================================================================
; Define the network interfaces used in your environment.
; (Sample device and link statements are included below).
; -----------------------------------------------------------------------
;
; -----------------------------------------------------------------------
; OSA-EXPRESS GBE 900-903
DEVICE OXGBE00 OSD 0900 PORTNAME OXGBE00 AUTORESTART
LINK OXGBE00 QDIOETHERNET OXGBE00
;
;
; ----------------------------------------------------
; CTC ZU VSE1
DEVICE VSE1CTC CTC D10
LINK VSE1CTC CTC 1 VSE1CTC
;
;
;
; =======================================================================
; Routing Statements
; =======================================================================
; Define the routing information required for your environment via the
; HOME, GATEWAY, ARPAGE, BSDROUTINPARMS and PRIMARYINTERFACE statements.
; -----------------------------------------------------------------------
;
; -----------------------------------------------------------------------
; Flush the ARP tables every 'nn' minutes (a 5 minute interval is used
; below).
; -----------------------------------------------------------------------
ARPAGE 5
; =======================================================================
; Define the internet (IP) address(es) for this VM host
; =======================================================================
HOME
; Note: The following are the 5.2.0 equivalents of the above HOME
; entries. When the subnet mask is included on the HOME
; statement, the TCP/IP server will create a direct subnet
; route automatically. Therefore, these routes no longer need to
; be added to the GATEWAY statement. Note that subnet masks are
; not included for point-to-point links.
;
; IP Address Subnet Mask Link Name
; --------------- --------------- ------------
;
10.0.0.131 255.0.0.0 OXGBE00
10.0.0.133 255.0.0.0 VSE1CTC
; 9.67.12.11 255.255.255.0 ETH0
; 9.67.14.49 255.255.255.248 GLAN1
; 9.67.12.11 VMLINUX1
; 9.67.12.11 LNXIUCV
; 193.1.2.85 255.255.255.0 ETH1
; 193.2.0.14 255.255.255.0 PCN1
; 193.3.1.2 255.255.255.0 TR1
; 129.34.2.5 255.255.255.0 TR2
; 193.6.0.2 255.255.255.0 HCH1
; 129.34.12.6 TESTLINK
; 9.67.10.10 255.0.0.0 YORKTOWN
;
;
; (End of HOME address information)
;
;
; -----------------------------------------------------------------------
; Primary interface Definition
; -----------------------------------------------------------------------
;
PRIMARYINTERFACE OXGBE00
;
;
; =======================================================================
; Routing Information
; =======================================================================
; Note:
; * Routes defined via the GATEWAY statement are STATIC routes.
; * Routes defined via the BSDROUTINGPARMS statement are DYNAMIC
; routes.
; -----------------------------------------------------------------------
GATEWAY
; Note: The following are the 5.2.0 equivalents of the above GATEWAY
; entries.
;
; (IP) Network Subnet First Link MTU
; Address Mask Hop Name Size
; ----------- ------------- --------------- ---------- -----
;
; -----------------------------------------------------------------------
; Static direct subnet routes are defined below
; -----------------------------------------------------------------------
;
; 9.67.12.0 255.255.255.0 = ETH0 1500
;
10.0.0.0 255.0.0.0 = OXGBE00 1492
;
; -----------------------------------------------------------------------
; Static Indirect and Host routes are defined below
; -----------------------------------------------------------------------
;
; 9.67.12.15 HOST = VMLINUX1 1500
; 129.36.0.0 255.255.255.0 129.34.2.30 TR2 DEFAULTSIZE
;
10.0.0.132 HOST = VSE1CTC 1492
;
;
; -----------------------------------------------------------------------
; Define The DEFAULT route used for any network not explicitly routed
; via the previous entries.
; -----------------------------------------------------------------------
;
DEFAULTNET 10.0.0.1 OXGBE00 1492
;
; (End of GATEWAY Static Routing information)
;
;
; =======================================================================
; Dynamic Routing Information
;
; Note: The BSDROUTINGPARMS statement should only be used if you are
; running ROUTED on your system.
; =======================================================================
;
; BSDROUTINGPARMS FALSE
;
; ; Link Name MTU Metric Subnet Mask Destination Address
; ; --------- ----------- ------- -------------- -------------------
; ;
; ETH0 1500 0 255.255.255.0 0
; GLAN1 1500 0 255.255.255.248 0
; ETH1 1500 0 255.255.255.0 0
;
; PCN1 2000 0 255.255.255.0 0
; TR1 2000 0 255.255.255.0 0
; TR2 2000 0 255.255.255.0 0
; HCH1 1018 0 255.255.255.0 0
; YORKTOWN 1500 0 255.0.0.0 0
;
; VMLINUX1 1500 0 255.255.255.252 9.67.255.15
; LNXIUCV 1500 0 255.255.255.252 9.67.255.18
; TESTLINK 1500 0 255.255.0.0 129.34.12.6
;
; ENDBSDROUTINGPARMS
;
;
; -----------------------------------------------------------------------
; TRANSLATE statements indicate relationships between internet
; addresses and network addresses. The TRANSLATE statement is most
; often used only in conjunction with HYPERchannel (HCH) and X.25
; network connections.
; -----------------------------------------------------------------------
TRANSLATE
; (IP) Network Network Network Address (see Link
; Address Type documentation for details) Name
; ------------ -------- ------------------------- ---------
;
; 193.6.0.1 HCH FF0000001040 HCH1
; 193.6.0.3 HCH FF0000001120 HCH1
;
;
; (End of Translate information)
;
;
; -----------------------------------------------------------------------
; Start all network interface devices used in this environment.
; -----------------------------------------------------------------------
;
START OXGBE00
START VSE1CTC
; START OSAQDIO1
; START GLAN1
; START LNXCTC1
; START LNXIUCV
; START LCS1
; START LCS2
; START HCHN
; START TESTDEV
; START RAL-YKTN
;
;
* $$ JOB JNM=IPINIT00,DISP=D,CLASS=0
* $$ LST DISP=D,CLASS=Z,DEST=(,ESAMAINT)
// JOB IPINIT00
// EXEC LIBR,PARM='MSHP'
A S=PRD2.CONFIG
CATALOG IPINIT00.L REPLACE=YES
*------------------------------------------*
* *
* Define the constants *
* *
*------------------------------------------*
SET IPADDR = 010.000.0.132
SET MASK = 255.000.000.000
*
SET ALL_BOUND = 30000
SET WINDOW = 16384
SET TRANSFER_BUFFERS = 20
SET TELNETD_BUFFERS = 20
SET RETRANSMIT = 100
SET DISPATCH_TIME = 30
SET REDISPATCH = 10
SET GATEWAY = OFF
*------------------------------------------*
* *
* Wait for VTAM Startup *
* *
*------------------------------------------*
WAIT VTAM
*------------------------------------------*
* *
* Define the Communication Links *
* *
*------------------------------------------*
DEFINE LINK,ID=ZVMCTC,TYPE=CTCA,DEV=D00,MTU=1492,IPADDR=10.0.0.132
*------------------------------------------*
* *
* Define Routine Information *
* *
*------------------------------------------*
DEFINE ROUTE,ID=DEFAULTNET,LINKID=ZVMCTC,IPADDR=0.0.0.0, -
GATEWAY=10.0.0.133
*------------------------------------------*
* *
* DEFINE MENU *
* *
*------------------------------------------*
DEFINE MENU,ID=MENU2,MEMBER=MENU2
*------------------------------------------*
* *
* Define Telnet Daemons *
* *
*------------------------------------------*
*------------------------------------------*
* *
* DEFINE TRANSLATION TABLES *
* *
*------------------------------------------*
DEFINE TRANSLATION,TYPE=SINGLE,MEMBER=IPXLATE,DEFAULT=GERMAN_03
*------------------------------------------*
* *
* DEFINE NAMES *
* *
*------------------------------------------*
* DEFINE NAME,NAME=OSA5,IPADDR=010.000.129.032
*------------------------------------------*
* *
* DEFINE USER IDS *
* *
*------------------------------------------*
* DEFINE USER,ID=SYSA,PASSWORD=ORGA
* DEFINE USER,ID=SYSB,PASSWORD=ORGA
* DEFINE USER,ID=SYSC,PASSWORD=ORGA
*
DEFINE USER,ID=XXXXX,PASSWORD=XXXX
DEFINE USER,ID=VSE1,PASSWORD=VSE1
*------------------------------------------*
* *
* Define FTP Daemons *
* *
*------------------------------------------*
DEFINE FTPD,ID=FTP,PORT=21,COUNT=20,UNIX=YES,ZEROERR=NO
*------------------------------------------*
* *
* DEFINE AUTOMATIC FTP EVENT *
* *
*------------------------------------------*
DEFINE EVENT,ID=AUTOFTP,TYPE=POWER,CLASS=F,QUEUE=LST,ACTION=FTP
*------------------------------------------*
* *
* DEFINE NFS DAEMONS *
* *
*------------------------------------------*
* DEFINE NFSD,ID=NFS
*------------------------------------------*
* *
* Line Printer Daemons *
* *
*------------------------------------------*
* DEFINE LPD,PRINTER=FAST,QUEUE='POWER.LST.A'
* DEFINE LPD,PRINTER=FASTLIB,QUEUE='PRD2.SAVE'
* DEFINE LPD,PRINTER=LOCAL,QUEUE='POWER.LST.A',LIB=PRD2,SUBLIB=SAVE
*------------------------------------------*
* *
* Automated Line Printer Client *
* *
*------------------------------------------*
* DEFINE EVENT,ID=LST_LISTEN,TYPE=POWER,CLASS=X,QUEUE=LST,ACTION=LPR
DEFINE EVENT,ID=AUTODRUCK,TYPE=POWER,CLASS=L,QUEUE=LST,ACTION=LPR
*------------------------------------------*
* *
* Setup the File System *
* *
*------------------------------------------*
* DEFINE FILESYS,LOCATION=SYSTEM,TYPE=PERM
*
* DEFINE FILE,PUBLIC='MASTCAT',DLBL=IJSYSCT,TYPE=VSAMCAT
DEFINE FILE,PUBLIC='IJSYSRS',DLBL=IJSYSRS,TYPE=LIBRARY
* DEFINE FILE,PUBLIC='VSESP.USER.CATALOG',DLBL=IJSYSUC,TYPE=VSAMCAT
DEFINE FILE,PUBLIC='PRD1',DLBL=PRD1,TYPE=LIBRARY
DEFINE FILE,PUBLIC='PRD2',DLBL=PRD2,TYPE=LIBRARY,NFSTIMER=30
DEFINE FILE,PUBLIC='POWER',DLBL=IJQFILE,TYPE=POWER
*
DEFINE FILE,PUBLIC='VSE.SCHUMAG.LIBRARY',DLBL=SCHUMAG,TYPE=VSAMCAT
* DEFINE FILE,PUBLIC='VSAM.CAPOSS',DLBL=UCATCAP,TYPE=VSAMCAT
* DEFINE FILE,PUBLIC='CSP.VSAM.CATALOG',DLBL=CSPCAT,TYPE=VSAMCAT
* DEFINE FILE,PUBLIC='MKMF',DLBL=MKMFILE,TYPE=KSDS,READONLY=YES
DEFINE FILE,PUBLIC='VSAM.UCAT01',DLBL=UCAT01,TYPE=VSAMCAT
* DEFINE FILE,PUBLIC='VSAM.UCAT02',DLBL=UCAT02,TYPE=VSAMCAT
* DEFINE FILE,PUBLIC='VSAM.UCAT03',DLBL=UCAT03,TYPE=VSAMCAT
*
* DEFINE FILE,PUBLIC='VSAM.UCAT04',DLBL=UCAT04,TYPE=VSAMCAT
* DEFINE FILE,PUBLIC='VSAM.VS5CAT',DLBL=VS5CAT,TYPE=VSAMCAT
DEFINE FILE,PUBLIC='VSAM.UCATWRK',DLBL=UCATWRK,TYPE=VSAMCAT
DEFINE FILE,PUBLIC='VSAM.UCVONLY',DLBL=UCVONLY,TYPE=VSAMCAT
DEFINE FILE,PUBLIC='VSAM.UCAT86F',DLBL=UCAT86F,TYPE=VSAMCAT
DEFINE FILE,PUBLIC='VSAM.UCVONL2',DLBL=UCVONL2,TYPE=VSAMCAT
* DEFINE FILE,PUBLIC='VSAM.UCVONLY.VZBPCFT.CLUSTER',DLBL=ZBPCFT,TYPE=ESD
* DEFINE FILE,PUBLIC='VSAM.UCVONLY.VZCPCFT.CLUSTER',DLBL=ZCPCFT,TYPE=ESD
* DEFINE FILE,PUBLIC='VSAM.UCVONLY.VZDPCFT.CLUSTER',DLBL=ZDPCFT,TYPE=ESD
* DEFINE FILE,PUBLIC='ZDPCFT',DLBL=ZDPCFT,TYPE=ESDS
* DEFINE FILE,PUBLIC='ZBPCFT',DLBL=ZBPCFT,TYPE=ESDS
* DEFINE FILE,PUBLIC='ZCPCFT',DLBL=ZCPCFT,TYPE=ESDS
DEFINE FILE,PUBLIC='VSAM.UCVBKUP',DLBL=UCVBKUP,TYPE=VSAMCAT
*
* MODIFY FILE,PUBLIC='VSE.SYSRES.LIBRARY',TYPE=LIBRARY
* MODIFY FILE,PUBLIC='VSE.PRD1.LIBRARY',TYPE=LIBRARY
* MODIFY FILE,PUBLIC='VSE.PRD2.LIBRARY',TYPE=LIBRARY
* MODIFY FILE,PUBLIC='VSE.DUMP.LIBRARY',TYPE=LIBRARY
* MODIFY FILE,PUBLIC='VSE.PRIMARY.LIBRARY',TYPE=LIBRARY
*
* MODIFY FILE,PUBLIC='ICCF.LIBRARY',TYPE=ICCF
* MODIFY FILE,PUBLIC='VSE.POWER.QUEUE.FILE',TYPE=POWER
*------------------------------------------*
* *
* Setup member NETWORK.L to *
* execute once the engine has *
* been activated *
* *
*------------------------------------------*
INCLUDE NETWORK,DELAY
*------------------------------------------*
* *
* UMFANGREICHE KONSOLAUSGABEN *
* VOM TCP/IP UNTERDRUECKEN || *
* *
*------------------------------------------*
SET MESSAGE IMPORTANT=ON
SET MESSAGE INFORMATION=ON
/+
/*
/&
* $$ EOJ
