IMS Multiple Systems Coupling system definition examples
Examples of system definitions for IMS Multiple Systems Coupling (MSC) are provided in this topic.
The Multiple Systems Coupling (MSC) sample shown in the following figure includes the relevant macros from the system definition of each of the three systems in a sample multiple-IMS system configuration. The multiple-systems configuration is shown first, followed by extractions from the three system definitions in System A IMS system definition example, System B IMS system definition example, and System C IMS system definition example. These system definitions do not include Intersystem Communication (ISC).
MSC resources can be defined dynamically with CREATE MSPLINK, CREATE MSLINK, CREATE MSNAME, and CREATE LTERM commands.
System A IMS system definition example
Characteristics Col.
to define Label Macro statements prepared 72
IMS System IMSCTRL MSVID=1,IMSID=SYSA
Configuration
Databases and DATABASE
Application
Macros APPLCTN
TRANSACT
(Application APPLCTN PSB=A
programs that TRANSACT CODE=A
execute in APPLCTN PSB=B,SYSID=(2,1)
other systems TRANSACT CODE=B
but process APPLCTN PSB=C,SYSID=(3,1)
transactions TRANSACT CODE=C
entered by
System A APPLCTN
terminals are TRANSACT
defined as
remote.)
Data
Communication COMM
TYPE
(These logical TERMINAL
terminals are
defined in TYPE
Systems B and C TERMINAL
as remote
logical
terminals.) TYPE
TERMINAL
NAME IMSATRM1
TERMINAL
NAME IMSATRM2
TERMINAL
NAME IMSATRM3
Multiple PLINK1 MSPLINK DDNAME=PLAB1, X
Systems ADDR=230,TYPE=CTC, X
Coupling BUFSIZE=4096
PLINK2 MSPLINK TYPE=MTM, X
BUFSIZE=4096
MSCLK1 MSLINK PARTNER=AB, X
MSPLINK=PLINK1
END(Terminals in
Systems B and C
that can enter
transaction
code A are
defined as
remote
terminals.)
MSC12 MSNAME SYSID=(2,1)
NAME IMSBTRM1
NAME IMSBTRM2
NAME IMSBTRM3
MSC13 MSNAME SYSID=(3,1)
NAME IMSCTRM1
NAME IMSCTRM2
NAME IMSCTRM3
IMSGENSystem B IMS system definition example
Characteristics Col.
to define Label Macro statements prepared 72
IMS System IMSCTRL MSVID=2,IMSID=SYSB
Configuration
Databases and DATABASE
Applications APPLCTN
TRANSACT
(Application APPLCTN PSB=B
programs that TRANSACT CODE=B
execute in APPLCTN PSB=A,SYSID=(1,2)
other systems TRANSACT CODE=A
but process APPLCTN PSB=C,SYSID=(3,2)
transactions TRANSACT CODE=C
entered by
System B APPLCTN
terminals are TRANSACT
defined as
remote.)
Data
Communication COMM
TYPE
(These logical TERMINAL
terminals are
defined in TYPE
Systems A and C TERMINAL
as remote
logical TYPE
terminals.) TERMINAL
NAME IMSBTRM1
TERMINAL
NAME IMSBTRM2
TERMINAL
NAME IMSBTRM3
TERMINAL
NAME IMSVBT1
TERMINAL
NAME IMSVBT2
TERMINAL
NAME IMSVBT3
TERMINAL
NAME IMSVBT4Multiple PLINK1 MSPLINK DDNAME=PLBA1, X
Systems ADDR=231,TYPE=CTC, X
Coupling BUFSIZE=4096
PLINK2 MSPLINK TYPE=MTM, X
BUFSIZE=1024
PLINK4 MSPLINK TYPE=VTAM, X
NAME=SANFRAN, X
SESSION=2, X
BUFSIZE=8192
MSCLK2 MSLINK PARTNER=AB, X
MSPLINK=PLINK1
MSC21 MSNAME SYSID=(1,2)
NAME IMSATRM1
NAME IMSATRM2
NAME IMSATRM3
MSCLK3 MSLINK PARTNER=BC, X
MSPLINK=PLINK2
MSC23 MSNAME SYSID=(3,2)
NAME IMSCTRM1
NAME IMSCTRM2
NAME IMSCTRM3
MSCLK4 MSLINK PARTNER=CB, X
MSPLINK=PLINK4
MSC24 MSNAME SYSID=(4,6)
NAME IMSVCT1
NAME IMSVCT2
MSCLK5 MSLINK PARTNER=CC, X
MSPLINK=PLINK4, X
OPTIONS=FORCSESS
MSC25 MSNAME SYSID=(5,7)
NAME IMSVCT3
NAME IMSVCT4
IMSGEN
ENDSystem C IMS system definition example
Characteristics Col.
to define Label Macro statements prepared 72
IMS System IMSCTRL MSVID=3,IMSID=SYSC
Configuration
Databases and DATABASE
Applications
APPLCTN
(Application TRANSACT
programs that APPLCTN PSB=C
execute in TRANSACT CODE=C
other systems APPLCTN PSB=A,SYSID=(1,3)
but process TRANSACT CODE=A
transactions
entered by APPLCTN PSB=B,SYSID=(2,3)
System C TRANSACT CODE=B
terminals are
defined as APPLCTN
remote.) TRANSACT
Data
Communication COMM
TYPE
(These logical TERMINAL
terminals are
defined in TYPE
Systems A and B TERMINAL
as remote
logical TYPE
terminals.) TERMINAL
NAME IMSCTRM1
TERMINAL
NAME IMSCTRM2
TERMINAL
NAME IMSCTRM3
TERMINAL
NAME IMSVCT1
TERMINAL
NAME IMSVCT2
TERMINAL
NAME IMSVCT3
TERMINAL
NAME IMSVCT4
Multiple PLINK1 MSPLINK DDNAME=PLCB1, X
Systems ADDR=0BB,TYPE=BSC, X
Coupling BUFSIZE=4096,CONTROL=NO
PLINK4 MSPLINK TYPE=VTAM, X
NAME=SANJOSE, X
SESSION=2, X
BUFSIZE=8196
MSCLK6 MSLINK PARTNER=BC, X
MSPLINK=PLINK1
MSC31 MSNAME SYSID=(1,3)
NAME IMSATRM1
NAME IMSATRM2
NAME IMSATRM3
MSC32 MSNAME SYSID=(2,3)
NAME IMSBTRM1
NAME IMSBTRM2
NAME IMSBTRM3
MSCLK7 MSLINK PARTNER=CB, X
MSPLINK=PLINK4
MSC34 MSNAME SYSID=(6,4)
NAME IMSVBT1
NAME IMSVBT2
MSCLK8 MSLINK PARTNER=CC, X
MSPLINK=PLINK4, X
OPTIONS=FORCSESS
MSC35 MSNAME SYSID=(7,5)
NAME IMSVBT3
NAME IMSVBT4
IMSGEN
END