SlideShare a Scribd company logo
1 
Bill Bostridge, Director, Business Development 
Stan Hoey, Product Manager 
Mike Picou, Sr. Software Engineer, Former DL/2 Customer
1. Intro – The Enterprise Modernization Agenda 
2. Case Study – Global Supplier of Communications & 
Security Products 
3. Technical Overview – Transparent Data Migration 
4. Case Study – Government Department of Corrections 
5. Conclusions – Q&A 
2 
Agenda
3 
Enterprise Modernization Agenda 
Enterprise modernization initiatives dominate IT projects 
Deliver new revenue streams, respond to change, optimize business operations 
According to a recent survey of mainframe executives:
4 
Enterprise Modernization Agenda 
Enterprise modernization initiatives dominate IT projects 
Deliver new revenue streams, respond to change, optimize business operations 
According to a recent survey of mainframe executives: 
Mainframe as the preferred DBMS server
5 
Many Organizations Still Rely on IMS… Why? 
Some may still be on IMS through choice 
Some may be in IMS because they don’t believe they have a choice 
Intimate knowledge of the applications has often moved on or retired 
Rewriting or replacing is deemed too risky 
Lack of applications knowledge 
Unknown cost and timescale 
Maybe a previously failed re-write project in the past? 
For most organizations it’s easier to stay put…. BUT!
Limited flexibility - hard to react to changing business needs 
Restricted capabilities for dynamic and ad hoc access 
Inconsistent operational data - corporate z/OS standard is DB2, but some critical 
application data still in IMS 
Duplication of tools, and the skills and effort to support them 
On-going software licensing costs for IMS DB and IMS tools 
Cost of retaining/acquiring IMS skills for future upgrades 
6 
The Real Cost of Staying in IMS 
The cost and risk associated with your IMS 
applications will continue to increase every year
No changes to application programs. IMS programs 
execute in exactly the same as before but the data 
is in DB2 
No IMS data propagation required 
Easily change & support different DB2 design 
models depending on dynamic access needs 
PLUS: 
Option to eliminate all IMS databases once data 
is migrated 
Eliminate IMS database tools 
7 
A Better Approach: Transparent Data Migration
Case Study: Global Supplier, Communications & Security Products 
8 
Eliminating Data Latency & Replication Challenges 
Company Overview 
8,000+ employees world-wide, $6.3b sales 
Locations in 250 cities, 30 languages, 35 
currencies 
Challenges 
Data latency 
Online availability 
Application agility
9 
Case Study: Before DL/2 
SYS 1 
TOR 
AOR1 
AOR2 AOR3 
AOR4 AOR5 
IMSNA1 
CICSPLEX 
IMS data sharing 
DB2 data sharing 
IMS to DB2 
propagation 
NA DBs 
SYS 2 
TOR 
AOR1 
AOR2 AOR3 
AOR4 AOR5 
IMS to DB2 
propagation 
EU DBs 
Websphere 
IMSEU2 
IMSEU1 
IMSNA2 
S Y S P L E X
10 
Case Study: After DL/2 
SYS 1 
TOR 
AOR1 
AOR2 AOR3 
AOR4 
CICSPLEX 
DB2 data sharing 
TOR 
AOR1 
AOR2 AOR3 
AOR4 
SYS 2 
S Y S P L E X 
DL/2 DL/2 
Websphere
11 
Case Study: Global Supplier, Communications & Security Products 
Eliminating Data Latency & Replication Challenges 
Company Overview 
8,000+ employees world-wide, $6.3b sales 
Locations in 250 cities, 30 languages, 35 
currencies 
Challenges 
Data latency 
Online availability 
Application agility 
Solution & Benefits 
Single copy of operational data shareable across the entire organization 
Ability to exploit full DB2 capabilities, such as SQL stored procedures and UDFs 
DL/2 solution deployed with no unplanned service outage
North America 
3rd largest global FX dealer 
3 State governments 
Manufacturing 
High street retailers 
12 
DL/2 – Solving IMS Data Migration Challenges 
Europe 
Leading Banks 
Insurance 
Middle East 
Transportation 
Asia / Africa 
Manufacturing 
Insurance
 Run Time 
 DB2 Design Summary 
13 
Technical 
Overview
14 
DL/2 Transparent Migration Process Overview 
Before During After 
Application Program 
IMS 
DL2 Stub 
NO 
DB2 
YES 
Static SQL 
Data 
in 
DB2? 
Application Program 
IMS Stub 
Application Program 
DL2 Stub 
IMS 
DB2
Each IMS segment maps to one DB2 table 
IMS concatenated key becomes DB2 primary key 
DB2 referential integrity ensures hierarchic integrity 
User defined DB2 table names, column names, index names, etc 
Optionally, DB2 design based on segment copybook 
Different design models can be deployed by different segments in same 
database or across different databases 
15 
DB2 Design Summary
DB2 Design Summary 
Potential DB2 design for DL/2 
01 SG0510BS . 
05 STK-WHS-SIZE-NUM PIC 999. 
05 STK-WHS-ALLOC-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-INTRN-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-ON-ORD-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-PCK-RSV-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SHIP-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SPEC-BO-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SP-RSR-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-BS-HLD-CD USAGE DISPLAY PIC XXX. 
05 STK-WHS-BS-RLS-DATE PIC 999999. 
05 STK-WHS-BS-HLD-EF-DATE PIC 999999. 
05 STK-WHS-BS-DLET-IND USAGE DISPLAY PIC X. 
88 NO-DLET VALUE '0'. 
88 DLET-SIZE VALUE '1'. 
05 STK-WHS-BIN-MIN-QTY USAGE COMP-3 PIC S9(5).
DB2 Design Summary 
Potential DB2 design for DL/2 
01 SG0510BS . 
05 STK-WHS-SIZE-NUM PIC 999. 
05 STK-WHS-ALLOC-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-INTRN-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-ON-ORD-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-PCK-RSV-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SHIP-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SPEC-BO-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SP-RSR-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-BS-HLD-CD USAGE DISPLAY PIC XXX. 
05 STK-WHS-BS-RLS-DATE PIC 999999. 
05 STK-WHS-BS-HLD-EF-DATE PIC 999999. 
05 STK-WHS-BS-DLET-IND USAGE DISPLAY PIC X. 
88 NO-DLET VALUE '0'. 
88 DLET-SIZE VALUE '1'. 
05 STK-WHS-BIN-MIN-QTY USAGE COMP-3 PIC S9(5). 
CREATE TABLE <qual>.STOCK-ORDER-STATUS 
(STK_DEPT_NUM CHAR(2) NOT NULL, 
STK_NUM CHAR(5) NOT NULL, 
STK_RETAIL_CD CHAR(2) NOT NULL, 
STK_SIZE_NUM DEC(3,0) NOT NULL, 
ALLOCATABLE_BS_QTY DEC(7,0) , 
INTRN_BS_QTY DEC(7,0) NOT NULL, 
ON_ORDER_BS_QTY DEC(7,0) NOT NULL, 
PICK_RSRV_BS_QTY DEC(7,0) NOT NULL, 
SHIP_BS_QTY DEC(7,0) NOT NULL, 
SPEC_BO_BS_QTY DEC(7,0) NOT NULL, 
SPEC_RSRV_BS_QTY DEC(7,0) NOT NULL, 
BS_HOLD_CD CHAR(3) NOT NULL, 
BS_RLSE_DT DATE NOT NULL, 
BS_HOLD_EFF DATE , 
BS_DLET_IND CHAR(1) NOT NULL, 
BIN_MIN_QTY DEC(5,0) NOT NULL,
DB2 Design Summary 
Potential DB2 design for DL/2 
01 SG0510BS . 
05 STK-WHS-SIZE-NUM PIC 999. 
05 STK-WHS-ALLOC-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-INTRN-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-ON-ORD-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-PCK-RSV-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SHIP-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SPEC-BO-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SP-RSR-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-BS-HLD-CD USAGE DISPLAY PIC XXX. 
05 STK-WHS-BS-RLS-DATE PIC 999999. 
05 STK-WHS-BS-HLD-EF-DATE PIC 999999. 
05 STK-WHS-BS-DLET-IND USAGE DISPLAY PIC X. 
88 NO-DLET VALUE '0'. 
88 DLET-SIZE VALUE '1'. 
05 STK-WHS-BIN-MIN-QTY USAGE COMP-3 PIC S9(5). 
CREATE TABLE <qual>.STOCK-ORDER-STATUS 
(STK_DEPT_NUM CHAR(2) NOT NULL, 
STK_NUM CHAR(5) NOT NULL, 
STK_RETAIL_CD CHAR(2) NOT NULL, 
STK_SIZE_NUM DEC(3,0) NOT NULL, 
ALLOCATABLE_BS_QTY DEC(7,0) , 
INTRN_BS_QTY DEC(7,0) NOT NULL, 
ON_ORDER_BS_QTY DEC(7,0) NOT NULL, 
PICK_RSRV_BS_QTY DEC(7,0) NOT NULL, 
SHIP_BS_QTY DEC(7,0) NOT NULL, 
SPEC_BO_BS_QTY DEC(7,0) NOT NULL, 
SPEC_RSRV_BS_QTY DEC(7,0) NOT NULL, 
BS_HOLD_CD CHAR(3) NOT NULL, 
BS_RLSE_DT DATE NOT NULL, 
BS_HOLD_EFF DATE , 
BS_DLET_IND CHAR(1) NOT NULL, 
BIN_MIN_QTY DEC(5,0) NOT NULL,
DB2 Design Summary 
Potential DB2 design for DL/2 
01 SG0510BS . 
05 STK-WHS-SIZE-NUM PIC 999. 
05 STK-WHS-ALLOC-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-INTRN-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-ON-ORD-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-PCK-RSV-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SHIP-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SPEC-BO-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SP-RSR-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-BS-HLD-CD USAGE DISPLAY PIC XXX. 
05 STK-WHS-BS-RLS-DATE PIC 999999. 
05 STK-WHS-BS-HLD-EF-DATE PIC 999999. 
05 STK-WHS-BS-DLET-IND USAGE DISPLAY PIC X. 
88 NO-DLET VALUE '0'. 
88 DLET-SIZE VALUE '1'. 
05 STK-WHS-BIN-MIN-QTY USAGE COMP-3 PIC S9(5). 
CREATE TABLE <qual>.STOCK-ORDER-STATUS 
(STK_DEPT_NUM CHAR(2) NOT NULL, 
STK_NUM CHAR(5) NOT NULL, 
STK_RETAIL_CD CHAR(2) NOT NULL, 
STK_SIZE_NUM DEC(3,0) NOT NULL, 
ALLOCATABLE_BS_QTY DEC(7,0) , 
INTRN_BS_QTY DEC(7,0) NOT NULL, 
ON_ORDER_BS_QTY DEC(7,0) NOT NULL, 
PICK_RSRV_BS_QTY DEC(7,0) NOT NULL, 
SHIP_BS_QTY DEC(7,0) NOT NULL, 
SPEC_BO_BS_QTY DEC(7,0) NOT NULL, 
SPEC_RSRV_BS_QTY DEC(7,0) NOT NULL, 
BS_HOLD_CD CHAR(3) NOT NULL, 
BS_RLSE_DT DATE NOT NULL, 
BS_HOLD_EFF DATE , 
BS_DLET_IND CHAR(1) NOT NULL, 
BIN_MIN_QTY DEC(5,0) NOT NULL,
DB2 Design Summary 
Potential DB2 design for DL/2 
01 SG0510BS . 
05 STK-WHS-SIZE-NUM PIC 999. 
05 STK-WHS-ALLOC-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-INTRN-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-ON-ORD-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-PCK-RSV-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SHIP-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SPEC-BO-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SP-RSR-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-BS-HLD-CD USAGE DISPLAY PIC XXX. 
05 STK-WHS-BS-RLS-DATE PIC 999999. 
05 STK-WHS-BS-HLD-EF-DATE PIC 999999. 
05 STK-WHS-BS-DLET-IND USAGE DISPLAY PIC X. 
88 NO-DLET VALUE '0'. 
88 DLET-SIZE VALUE '1'. 
05 STK-WHS-BIN-MIN-QTY USAGE COMP-3 PIC S9(5). 
CREATE TABLE <qual>.STOCK-ORDER-STATUS 
(STK_DEPT_NUM CHAR(2) NOT NULL, 
STK_NUM CHAR(5) NOT NULL, 
STK_RETAIL_CD CHAR(2) NOT NULL, 
STK_SIZE_NUM DEC(3,0) NOT NULL, 
ALLOCATABLE_BS_QTY DEC(7,0) , 
INTRN_BS_QTY DEC(7,0) NOT NULL, 
ON_ORDER_BS_QTY DEC(7,0) NOT NULL, 
PICK_RSRV_BS_QTY DEC(7,0) NOT NULL, 
SHIP_BS_QTY DEC(7,0) NOT NULL, 
SPEC_BO_BS_QTY DEC(7,0) NOT NULL, 
SPEC_RSRV_BS_QTY DEC(7,0) NOT NULL, 
BS_HOLD_CD CHAR(3) NOT NULL, 
BS_RLSE_DT DATE NOT NULL, 
BS_HOLD_EFF DATE , 
BS_DLET_IND CHAR(1) NOT NULL, 
BIN_MIN_QTY DEC(5,0) NOT NULL,
DB2 Design Summary 
Potential DB2 design for DL/2 
01 SG0510BS . 
05 STK-WHS-SIZE-NUM PIC 999. 
05 STK-WHS-ALLOC-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-INTRN-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-ON-ORD-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-PCK-RSV-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SHIP-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SPEC-BO-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SP-RSR-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-BS-HLD-CD USAGE DISPLAY PIC XXX. 
05 STK-WHS-BS-RLS-DATE PIC 999999. 
05 STK-WHS-BS-HLD-EF-DATE PIC 999999. 
05 STK-WHS-BS-DLET-IND USAGE DISPLAY PIC X. 
88 NO-DLET VALUE '0'. 
88 DLET-SIZE VALUE '1'. 
05 STK-WHS-BIN-MIN-QTY USAGE COMP-3 PIC S9(5). 
CREATE TABLE <qual>.STOCK-ORDER-STATUS 
(STK_DEPT_NUM CHAR(2) NOT NULL, 
STK_NUM CHAR(5) NOT NULL, 
STK_RETAIL_CD CHAR(2) NOT NULL, 
STK_SIZE_NUM DEC(3,0) NOT NULL, 
ALLOCATABLE_BS_QTY DEC(7,0) , 
INTRN_BS_QTY DEC(7,0) NOT NULL, 
ON_ORDER_BS_QTY DEC(7,0) NOT NULL, 
PICK_RSRV_BS_QTY DEC(7,0) NOT NULL, 
SHIP_BS_QTY DEC(7,0) NOT NULL, 
SPEC_BO_BS_QTY DEC(7,0) NOT NULL, 
SPEC_RSRV_BS_QTY DEC(7,0) NOT NULL, 
BS_HOLD_CD CHAR(3) NOT NULL, 
BS_RLSE_DT DATE NOT NULL, 
BS_HOLD_EFF DATE , 
BS_DLET_IND CHAR(1) NOT NULL, 
BIN_MIN_QTY DEC(5,0) NOT NULL,
DB2 Design Summary 
Potential DB2 design for DL/2 
01 SG0510BS . 
05 STK-WHS-SIZE-NUM PIC 999. 
05 STK-WHS-ALLOC-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-INTRN-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-ON-ORD-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-PCK-RSV-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SHIP-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SPEC-BO-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SP-RSR-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-BS-HLD-CD USAGE DISPLAY PIC XXX. 
05 STK-WHS-BS-RLS-DATE PIC 999999. 
05 STK-WHS-BS-HLD-EF-DATE PIC 999999. 
05 STK-WHS-BS-DLET-IND USAGE DISPLAY PIC X. 
88 NO-DLET VALUE '0'. 
88 DLET-SIZE VALUE '1'. 
05 STK-WHS-BIN-MIN-QTY USAGE COMP-3 PIC S9(5). 
Significant built-in data transformation 
capabilities 
Easily extended by simple exits 
CREATE TABLE <qual>.STOCK-ORDER-STATUS 
(STK_DEPT_NUM CHAR(2) NOT NULL, 
STK_NUM CHAR(5) NOT NULL, 
STK_RETAIL_CD CHAR(2) NOT NULL, 
STK_SIZE_NUM DEC(3,0) NOT NULL, 
ALLOCATABLE_BS_QTY DEC(7,0) , 
INTRN_BS_QTY DEC(7,0) NOT NULL, 
ON_ORDER_BS_QTY DEC(7,0) NOT NULL, 
PICK_RSRV_BS_QTY DEC(7,0) NOT NULL, 
SHIP_BS_QTY DEC(7,0) NOT NULL, 
SPEC_BO_BS_QTY DEC(7,0) NOT NULL, 
SPEC_RSRV_BS_QTY DEC(7,0) NOT NULL, 
BS_HOLD_CD CHAR(3) NOT NULL, 
BS_RLSE_DT DATE NOT NULL, 
BS_HOLD_EFF DATE , 
BS_DLET_IND CHAR(1) NOT NULL, 
BIN_MIN_QTY DEC(5,0) NOT NULL,
DB2 Design Summary 
CREATE TABLE <qual>.SG0510BS 
(STK_DEPT_NUM CHAR(2) NOT NULL, 
STK_NUM CHAR(5) NOT NULL, 
STK_RETAIL_CD CHAR(2) NOT NULL, 
SG0510BS_KEY CHAR(3) NOT NULL, 
SG051BS_DATA CHAR(47) NOT NULL 
Potential DB2 design for DL/2 
01 SG0510BS . 
05 STK-WHS-SIZE-NUM PIC 999. 
05 STK-WHS-ALLOC-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-INTRN-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-ON-ORD-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-PCK-RSV-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SHIP-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SPEC-BO-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-SP-RSR-BS-QTY USAGE COMP-3 PIC S9(7). 
05 STK-WHS-BS-HLD-CD USAGE DISPLAY PIC XXX. 
05 STK-WHS-BS-RLS-DATE PIC 999999. 
05 STK-WHS-BS-HLD-EF-DATE PIC 999999. 
05 STK-WHS-BS-DLET-IND USAGE DISPLAY PIC X. 
88 NO-DLET VALUE '0'. 
88 DLET-SIZE VALUE '1'. 
05 STK-WHS-BIN-MIN-QTY USAGE COMP-3 PIC S9(5). 
Significant built-in data transformation 
capabilities 
Easily extended by simple exits 
CREATE TABLE <qual>.STOCK-ORDER-STATUS 
(STK_DEPT_NUM CHAR(2) NOT NULL, 
STK_NUM CHAR(5) NOT NULL, 
STK_RETAIL_CD CHAR(2) NOT NULL, 
STK_SIZE_NUM DEC(3,0) NOT NULL, 
ALLOCATABLE_BS_QTY DEC(7,0) , 
INTRN_BS_QTY DEC(7,0) NOT NULL, 
ON_ORDER_BS_QTY DEC(7,0) NOT NULL, 
PICK_RSRV_BS_QTY DEC(7,0) NOT NULL, 
SHIP_BS_QTY DEC(7,0) NOT NULL, 
SPEC_BO_BS_QTY DEC(7,0) NOT NULL, 
SPEC_RSRV_BS_QTY DEC(7,0) NOT NULL, 
BS_HOLD_CD CHAR(3) NOT NULL, 
BS_RLSE_DT DATE NOT NULL, 
BS_HOLD_EFF DATE , 
BS_DLET_IND CHAR(1) NOT NULL, 
BIN_MIN_QTY DEC(5,0) NOT NULL,
$2MM+	 
$2MM+	 
$2MM+	 
$2MM+	 
$2MM+	 
$2MM+	 
Applica on	Rewrite	 DL/2	 
24 
Case Study: Major Swiss Bank 
Migrating Global FX Application to DB2 
Company Overview 
3rd Largest global FX trading platform 
Many millions of transactions per day 
Mission critical application 
Challenges 
z/OS and CICS upgrade constraints 
Significant IMS DB software costs >$2m/yr 
Support overhead for aging DB platform 
84	 
72	 
60	 
48	 
36	 
24	 
12	 
0	 
Implementa on	Time	(months)	 
Solution & Benefits 
DL/2 enabled a swift move from IMS to DB2 with no application changes alleviating zOS and CICS 
upgrade challenges 
Significant License and operational costs eliminated - during 5-7 year application rewrite project 
May 2013 largest 1 day FX trade volume in history
Challenges 
Physical database limitations 
Limited application agility 
Lack of data integrity 
Subpar system stability 
25 
Case Study: Government Department of Corrections 
Improving Agility & Data Integrity 
Company Overview 
3rd largest Correctional system in US 
21,000 employees. 
Numerous locations across the state
26 
CICS 
BATCH 
IMS DB 
DB2 
Must rely on programs 
To validate dates/numerics 
Must rely on programs 
to validate dates/numerics 
Propagation, 
difficult to change 
Data if not in correct 
format 
Difficult to keep data 
Coordinated between 
databases 
AdHoc 
Easy, but 
data latency from 
propagation 
Time consuming 
programming 
needed. 
Case Study: Before DL/2
27 
CICS 
BATCH 
DB2 
AdHoc 
 Simpler architecture 
 Easier development 
 No data latency issues 
 No data propagation issues 
Case Study: After DL/2
Challenges 
Physical database limitations 
Limited application agility 
Lack of data integrity 
Subpar system stability 
28 
Case Study: Government Department of Corrections 
Improving Agility & Data Integrity 
Company Overview 
3rd largest Correctional system in US 
21,000 employees. 
Numerous locations across the state 
Solution & Benefits 
No database size limitations 
Faster response to Ad-Hoc requests 
Better Data integrity / Database design 
Higher developer’s productivity 
Reduced software and maintenance costs
 NO APPLICATION PROGRAM CHANGES are required 
 LOWEST RISK migration strategy – bite-sized chunks 
 REDUCED COSTS through elimination of IMS DB and IMS tools licenses 
 SIMPLIFICATION of DBA support through DBMS convergence 
 CHOICE of migration methods to meet differing requirements 
Simple, rapid method to reduce costs very quickly 
More measured method to meet DB2 design objectives 
A combination of both: simple method first, measured method later 
29 
Unleash The Power of IMS Data with DL/2
Get the free eBook: A Three Step 
Approach to 
Low-Risk IMS modernization 
http://bit.ly/1sLzKUF 
Watch the webcast of this 
presentation in its entirety! 
http://bit.ly/1wOgeP2 
30 
Want to learn more?

More Related Content

PDF
Eliminate the Risk from Your IMS to Db2 Plans
PDF
IMS to DB2 Migration: How a Fortune 500 Company Made the Move in Record Time ...
PDF
Modernizing Your IMS Environment Without an Application Rewrite Series Part 2...
PDF
Syncsort and Db2 – How to Get More from Your Db2 Systems
PDF
Educational seminar lessons learned from customer db2 for z os health check...
PDF
Reliability and performance with ibm db2 analytics accelerator
PDF
Modernizing Your IMS Environment Without Rewriting Your Applications
PDF
Modernizing Your IMS Environment Series Part 3: The Business - Financial Bene...
Eliminate the Risk from Your IMS to Db2 Plans
IMS to DB2 Migration: How a Fortune 500 Company Made the Move in Record Time ...
Modernizing Your IMS Environment Without an Application Rewrite Series Part 2...
Syncsort and Db2 – How to Get More from Your Db2 Systems
Educational seminar lessons learned from customer db2 for z os health check...
Reliability and performance with ibm db2 analytics accelerator
Modernizing Your IMS Environment Without Rewriting Your Applications
Modernizing Your IMS Environment Series Part 3: The Business - Financial Bene...

What's hot (13)

DOC
Robert Hensel resume v111416 Lnkedin
PPT
An Hour of DB2 Tips
PPT
The Five R's: There Can be no DB2 Performance Improvement Without Them!
PDF
Db2 for z os trends
PPT
DB2 V10 Migration Guidance
PPTX
Rational Development & Test for z Systems 9.5 Webinar with Rogers Communications
PDF
DB2 for z/OS Architecture in Nutshell
PDF
zIIP Capacity Planning - May 2018
DOC
VendorReview_IBMDB2
PPTX
Bringing Mainframe Security Information Into Your Splunk Security Operations ...
DOC
Klausing, Patrick Resume Consultant
PDF
DB2 pureScale Overview Sept 2010
PDF
Presentation db2 connections to db2 for z os
Robert Hensel resume v111416 Lnkedin
An Hour of DB2 Tips
The Five R's: There Can be no DB2 Performance Improvement Without Them!
Db2 for z os trends
DB2 V10 Migration Guidance
Rational Development & Test for z Systems 9.5 Webinar with Rogers Communications
DB2 for z/OS Architecture in Nutshell
zIIP Capacity Planning - May 2018
VendorReview_IBMDB2
Bringing Mainframe Security Information Into Your Splunk Security Operations ...
Klausing, Patrick Resume Consultant
DB2 pureScale Overview Sept 2010
Presentation db2 connections to db2 for z os
Ad

Similar to A Three Step Approach to Low-Risk IMS Modernization (20)

PPTX
Ibm db2
PPTX
SKILLWISE-DB2 DBA
PDF
DB2 10 Webcast #1 - Overview And Migration Planning
PDF
DB2 10 Webcast #1 Overview And Migration Planning
PDF
Db2 v9 admin guide z os
PDF
DB210 Smarter Database IBM Tech Forum 2011
PDF
DBA's World - Past, Present, Future
PPT
MDI Training DB2 Course
PDF
DB2 10 Smarter Database - IBM Tech Forum
PDF
DB2 Design for High Availability and Scalability
PPT
Project Management System
PDF
DbB 10 Webcast #3 The Secrets Of Scalability
PDF
DB2 11 for z/OS Migration Planning and Early Customer Experiences
PPTX
PASS Summit 2009 Keynote Dave DeWitt
PPTX
PPT
Database 1 Introduction
PPTX
Physical Design and Development
PPTX
Database Management Systems Lecture # 01
PPT
Slides_RDBMS_TBD_LC_02_Bridge course day 2
PPTX
Sap abap
Ibm db2
SKILLWISE-DB2 DBA
DB2 10 Webcast #1 - Overview And Migration Planning
DB2 10 Webcast #1 Overview And Migration Planning
Db2 v9 admin guide z os
DB210 Smarter Database IBM Tech Forum 2011
DBA's World - Past, Present, Future
MDI Training DB2 Course
DB2 10 Smarter Database - IBM Tech Forum
DB2 Design for High Availability and Scalability
Project Management System
DbB 10 Webcast #3 The Secrets Of Scalability
DB2 11 for z/OS Migration Planning and Early Customer Experiences
PASS Summit 2009 Keynote Dave DeWitt
Database 1 Introduction
Physical Design and Development
Database Management Systems Lecture # 01
Slides_RDBMS_TBD_LC_02_Bridge course day 2
Sap abap
Ad

More from Precisely (20)

PDF
The Future of Automation: AI, APIs, and Cloud Modernization.pdf
PDF
Unlock new opportunities with location data.pdf
PDF
Reimagining Insurance: Connected Data for Confident Decisions.pdf
PDF
Introducing Syncsort™ Storage Management.pdf
PDF
Enable Enterprise-Ready Security on IBM i Systems.pdf
PDF
A Day in the Life of Location Data - Turning Where into How.pdf
PDF
Get More from Fiori Automation - What’s New, What Works, and What’s Next.pdf
PDF
Solving the CIO’s Dilemma: Speed, Scale, and Smarter SAP Modernization.pdf
PDF
Solving the Data Disconnect: Why Success Hinges on Pre-Linked Data.pdf
PDF
Cooking Up Clean Addresses - 3 Ways to Whip Messy Data into Shape.pdf
PDF
Building Confidence in AI & Analytics with High-Integrity Location Data.pdf
PDF
SAP Modernization Strategies for a Successful S/4HANA Journey.pdf
PDF
Precisely Demo Showcase: Powering ServiceNow Discovery with Precisely Ironstr...
PDF
The 2025 Guide on What's Next for Automation.pdf
PDF
Outdated Tech, Invisible Expenses – How Data Silos Undermine Operational Effi...
PDF
Modernización de SAP: Maximizando el Valor de su Migración a SAP S/4HANA.pdf
PDF
Outdated Tech, Invisible Expenses – The Hidden Cost of Disconnected Data Syst...
PDF
Migration vers SAP S/4HANA: Un levier stratégique pour votre transformation d...
PDF
Outdated Tech, Invisible Expenses: The Hidden Cost of Poor Data Integration o...
PDF
The Changing Compliance Landscape in 2025.pdf
The Future of Automation: AI, APIs, and Cloud Modernization.pdf
Unlock new opportunities with location data.pdf
Reimagining Insurance: Connected Data for Confident Decisions.pdf
Introducing Syncsort™ Storage Management.pdf
Enable Enterprise-Ready Security on IBM i Systems.pdf
A Day in the Life of Location Data - Turning Where into How.pdf
Get More from Fiori Automation - What’s New, What Works, and What’s Next.pdf
Solving the CIO’s Dilemma: Speed, Scale, and Smarter SAP Modernization.pdf
Solving the Data Disconnect: Why Success Hinges on Pre-Linked Data.pdf
Cooking Up Clean Addresses - 3 Ways to Whip Messy Data into Shape.pdf
Building Confidence in AI & Analytics with High-Integrity Location Data.pdf
SAP Modernization Strategies for a Successful S/4HANA Journey.pdf
Precisely Demo Showcase: Powering ServiceNow Discovery with Precisely Ironstr...
The 2025 Guide on What's Next for Automation.pdf
Outdated Tech, Invisible Expenses – How Data Silos Undermine Operational Effi...
Modernización de SAP: Maximizando el Valor de su Migración a SAP S/4HANA.pdf
Outdated Tech, Invisible Expenses – The Hidden Cost of Disconnected Data Syst...
Migration vers SAP S/4HANA: Un levier stratégique pour votre transformation d...
Outdated Tech, Invisible Expenses: The Hidden Cost of Poor Data Integration o...
The Changing Compliance Landscape in 2025.pdf

Recently uploaded (20)

PDF
How UI/UX Design Impacts User Retention in Mobile Apps.pdf
PDF
Encapsulation theory and applications.pdf
PPTX
Spectroscopy.pptx food analysis technology
PDF
Chapter 3 Spatial Domain Image Processing.pdf
PPTX
20250228 LYD VKU AI Blended-Learning.pptx
PDF
MIND Revenue Release Quarter 2 2025 Press Release
PDF
KodekX | Application Modernization Development
PDF
Blue Purple Modern Animated Computer Science Presentation.pdf.pdf
PDF
Approach and Philosophy of On baking technology
PPTX
MYSQL Presentation for SQL database connectivity
PPTX
Cloud computing and distributed systems.
PDF
Machine learning based COVID-19 study performance prediction
PDF
Electronic commerce courselecture one. Pdf
PDF
Architecting across the Boundaries of two Complex Domains - Healthcare & Tech...
PDF
Building Integrated photovoltaic BIPV_UPV.pdf
PDF
The Rise and Fall of 3GPP – Time for a Sabbatical?
PDF
Dropbox Q2 2025 Financial Results & Investor Presentation
PDF
Encapsulation_ Review paper, used for researhc scholars
PDF
Empathic Computing: Creating Shared Understanding
PDF
Profit Center Accounting in SAP S/4HANA, S4F28 Col11
How UI/UX Design Impacts User Retention in Mobile Apps.pdf
Encapsulation theory and applications.pdf
Spectroscopy.pptx food analysis technology
Chapter 3 Spatial Domain Image Processing.pdf
20250228 LYD VKU AI Blended-Learning.pptx
MIND Revenue Release Quarter 2 2025 Press Release
KodekX | Application Modernization Development
Blue Purple Modern Animated Computer Science Presentation.pdf.pdf
Approach and Philosophy of On baking technology
MYSQL Presentation for SQL database connectivity
Cloud computing and distributed systems.
Machine learning based COVID-19 study performance prediction
Electronic commerce courselecture one. Pdf
Architecting across the Boundaries of two Complex Domains - Healthcare & Tech...
Building Integrated photovoltaic BIPV_UPV.pdf
The Rise and Fall of 3GPP – Time for a Sabbatical?
Dropbox Q2 2025 Financial Results & Investor Presentation
Encapsulation_ Review paper, used for researhc scholars
Empathic Computing: Creating Shared Understanding
Profit Center Accounting in SAP S/4HANA, S4F28 Col11

A Three Step Approach to Low-Risk IMS Modernization

  • 1. 1 Bill Bostridge, Director, Business Development Stan Hoey, Product Manager Mike Picou, Sr. Software Engineer, Former DL/2 Customer
  • 2. 1. Intro – The Enterprise Modernization Agenda 2. Case Study – Global Supplier of Communications & Security Products 3. Technical Overview – Transparent Data Migration 4. Case Study – Government Department of Corrections 5. Conclusions – Q&A 2 Agenda
  • 3. 3 Enterprise Modernization Agenda Enterprise modernization initiatives dominate IT projects Deliver new revenue streams, respond to change, optimize business operations According to a recent survey of mainframe executives:
  • 4. 4 Enterprise Modernization Agenda Enterprise modernization initiatives dominate IT projects Deliver new revenue streams, respond to change, optimize business operations According to a recent survey of mainframe executives: Mainframe as the preferred DBMS server
  • 5. 5 Many Organizations Still Rely on IMS… Why? Some may still be on IMS through choice Some may be in IMS because they don’t believe they have a choice Intimate knowledge of the applications has often moved on or retired Rewriting or replacing is deemed too risky Lack of applications knowledge Unknown cost and timescale Maybe a previously failed re-write project in the past? For most organizations it’s easier to stay put…. BUT!
  • 6. Limited flexibility - hard to react to changing business needs Restricted capabilities for dynamic and ad hoc access Inconsistent operational data - corporate z/OS standard is DB2, but some critical application data still in IMS Duplication of tools, and the skills and effort to support them On-going software licensing costs for IMS DB and IMS tools Cost of retaining/acquiring IMS skills for future upgrades 6 The Real Cost of Staying in IMS The cost and risk associated with your IMS applications will continue to increase every year
  • 7. No changes to application programs. IMS programs execute in exactly the same as before but the data is in DB2 No IMS data propagation required Easily change & support different DB2 design models depending on dynamic access needs PLUS: Option to eliminate all IMS databases once data is migrated Eliminate IMS database tools 7 A Better Approach: Transparent Data Migration
  • 8. Case Study: Global Supplier, Communications & Security Products 8 Eliminating Data Latency & Replication Challenges Company Overview 8,000+ employees world-wide, $6.3b sales Locations in 250 cities, 30 languages, 35 currencies Challenges Data latency Online availability Application agility
  • 9. 9 Case Study: Before DL/2 SYS 1 TOR AOR1 AOR2 AOR3 AOR4 AOR5 IMSNA1 CICSPLEX IMS data sharing DB2 data sharing IMS to DB2 propagation NA DBs SYS 2 TOR AOR1 AOR2 AOR3 AOR4 AOR5 IMS to DB2 propagation EU DBs Websphere IMSEU2 IMSEU1 IMSNA2 S Y S P L E X
  • 10. 10 Case Study: After DL/2 SYS 1 TOR AOR1 AOR2 AOR3 AOR4 CICSPLEX DB2 data sharing TOR AOR1 AOR2 AOR3 AOR4 SYS 2 S Y S P L E X DL/2 DL/2 Websphere
  • 11. 11 Case Study: Global Supplier, Communications & Security Products Eliminating Data Latency & Replication Challenges Company Overview 8,000+ employees world-wide, $6.3b sales Locations in 250 cities, 30 languages, 35 currencies Challenges Data latency Online availability Application agility Solution & Benefits Single copy of operational data shareable across the entire organization Ability to exploit full DB2 capabilities, such as SQL stored procedures and UDFs DL/2 solution deployed with no unplanned service outage
  • 12. North America 3rd largest global FX dealer 3 State governments Manufacturing High street retailers 12 DL/2 – Solving IMS Data Migration Challenges Europe Leading Banks Insurance Middle East Transportation Asia / Africa Manufacturing Insurance
  • 13.  Run Time  DB2 Design Summary 13 Technical Overview
  • 14. 14 DL/2 Transparent Migration Process Overview Before During After Application Program IMS DL2 Stub NO DB2 YES Static SQL Data in DB2? Application Program IMS Stub Application Program DL2 Stub IMS DB2
  • 15. Each IMS segment maps to one DB2 table IMS concatenated key becomes DB2 primary key DB2 referential integrity ensures hierarchic integrity User defined DB2 table names, column names, index names, etc Optionally, DB2 design based on segment copybook Different design models can be deployed by different segments in same database or across different databases 15 DB2 Design Summary
  • 16. DB2 Design Summary Potential DB2 design for DL/2 01 SG0510BS . 05 STK-WHS-SIZE-NUM PIC 999. 05 STK-WHS-ALLOC-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-INTRN-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-ON-ORD-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-PCK-RSV-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SHIP-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SPEC-BO-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SP-RSR-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-BS-HLD-CD USAGE DISPLAY PIC XXX. 05 STK-WHS-BS-RLS-DATE PIC 999999. 05 STK-WHS-BS-HLD-EF-DATE PIC 999999. 05 STK-WHS-BS-DLET-IND USAGE DISPLAY PIC X. 88 NO-DLET VALUE '0'. 88 DLET-SIZE VALUE '1'. 05 STK-WHS-BIN-MIN-QTY USAGE COMP-3 PIC S9(5).
  • 17. DB2 Design Summary Potential DB2 design for DL/2 01 SG0510BS . 05 STK-WHS-SIZE-NUM PIC 999. 05 STK-WHS-ALLOC-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-INTRN-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-ON-ORD-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-PCK-RSV-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SHIP-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SPEC-BO-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SP-RSR-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-BS-HLD-CD USAGE DISPLAY PIC XXX. 05 STK-WHS-BS-RLS-DATE PIC 999999. 05 STK-WHS-BS-HLD-EF-DATE PIC 999999. 05 STK-WHS-BS-DLET-IND USAGE DISPLAY PIC X. 88 NO-DLET VALUE '0'. 88 DLET-SIZE VALUE '1'. 05 STK-WHS-BIN-MIN-QTY USAGE COMP-3 PIC S9(5). CREATE TABLE <qual>.STOCK-ORDER-STATUS (STK_DEPT_NUM CHAR(2) NOT NULL, STK_NUM CHAR(5) NOT NULL, STK_RETAIL_CD CHAR(2) NOT NULL, STK_SIZE_NUM DEC(3,0) NOT NULL, ALLOCATABLE_BS_QTY DEC(7,0) , INTRN_BS_QTY DEC(7,0) NOT NULL, ON_ORDER_BS_QTY DEC(7,0) NOT NULL, PICK_RSRV_BS_QTY DEC(7,0) NOT NULL, SHIP_BS_QTY DEC(7,0) NOT NULL, SPEC_BO_BS_QTY DEC(7,0) NOT NULL, SPEC_RSRV_BS_QTY DEC(7,0) NOT NULL, BS_HOLD_CD CHAR(3) NOT NULL, BS_RLSE_DT DATE NOT NULL, BS_HOLD_EFF DATE , BS_DLET_IND CHAR(1) NOT NULL, BIN_MIN_QTY DEC(5,0) NOT NULL,
  • 18. DB2 Design Summary Potential DB2 design for DL/2 01 SG0510BS . 05 STK-WHS-SIZE-NUM PIC 999. 05 STK-WHS-ALLOC-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-INTRN-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-ON-ORD-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-PCK-RSV-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SHIP-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SPEC-BO-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SP-RSR-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-BS-HLD-CD USAGE DISPLAY PIC XXX. 05 STK-WHS-BS-RLS-DATE PIC 999999. 05 STK-WHS-BS-HLD-EF-DATE PIC 999999. 05 STK-WHS-BS-DLET-IND USAGE DISPLAY PIC X. 88 NO-DLET VALUE '0'. 88 DLET-SIZE VALUE '1'. 05 STK-WHS-BIN-MIN-QTY USAGE COMP-3 PIC S9(5). CREATE TABLE <qual>.STOCK-ORDER-STATUS (STK_DEPT_NUM CHAR(2) NOT NULL, STK_NUM CHAR(5) NOT NULL, STK_RETAIL_CD CHAR(2) NOT NULL, STK_SIZE_NUM DEC(3,0) NOT NULL, ALLOCATABLE_BS_QTY DEC(7,0) , INTRN_BS_QTY DEC(7,0) NOT NULL, ON_ORDER_BS_QTY DEC(7,0) NOT NULL, PICK_RSRV_BS_QTY DEC(7,0) NOT NULL, SHIP_BS_QTY DEC(7,0) NOT NULL, SPEC_BO_BS_QTY DEC(7,0) NOT NULL, SPEC_RSRV_BS_QTY DEC(7,0) NOT NULL, BS_HOLD_CD CHAR(3) NOT NULL, BS_RLSE_DT DATE NOT NULL, BS_HOLD_EFF DATE , BS_DLET_IND CHAR(1) NOT NULL, BIN_MIN_QTY DEC(5,0) NOT NULL,
  • 19. DB2 Design Summary Potential DB2 design for DL/2 01 SG0510BS . 05 STK-WHS-SIZE-NUM PIC 999. 05 STK-WHS-ALLOC-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-INTRN-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-ON-ORD-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-PCK-RSV-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SHIP-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SPEC-BO-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SP-RSR-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-BS-HLD-CD USAGE DISPLAY PIC XXX. 05 STK-WHS-BS-RLS-DATE PIC 999999. 05 STK-WHS-BS-HLD-EF-DATE PIC 999999. 05 STK-WHS-BS-DLET-IND USAGE DISPLAY PIC X. 88 NO-DLET VALUE '0'. 88 DLET-SIZE VALUE '1'. 05 STK-WHS-BIN-MIN-QTY USAGE COMP-3 PIC S9(5). CREATE TABLE <qual>.STOCK-ORDER-STATUS (STK_DEPT_NUM CHAR(2) NOT NULL, STK_NUM CHAR(5) NOT NULL, STK_RETAIL_CD CHAR(2) NOT NULL, STK_SIZE_NUM DEC(3,0) NOT NULL, ALLOCATABLE_BS_QTY DEC(7,0) , INTRN_BS_QTY DEC(7,0) NOT NULL, ON_ORDER_BS_QTY DEC(7,0) NOT NULL, PICK_RSRV_BS_QTY DEC(7,0) NOT NULL, SHIP_BS_QTY DEC(7,0) NOT NULL, SPEC_BO_BS_QTY DEC(7,0) NOT NULL, SPEC_RSRV_BS_QTY DEC(7,0) NOT NULL, BS_HOLD_CD CHAR(3) NOT NULL, BS_RLSE_DT DATE NOT NULL, BS_HOLD_EFF DATE , BS_DLET_IND CHAR(1) NOT NULL, BIN_MIN_QTY DEC(5,0) NOT NULL,
  • 20. DB2 Design Summary Potential DB2 design for DL/2 01 SG0510BS . 05 STK-WHS-SIZE-NUM PIC 999. 05 STK-WHS-ALLOC-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-INTRN-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-ON-ORD-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-PCK-RSV-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SHIP-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SPEC-BO-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SP-RSR-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-BS-HLD-CD USAGE DISPLAY PIC XXX. 05 STK-WHS-BS-RLS-DATE PIC 999999. 05 STK-WHS-BS-HLD-EF-DATE PIC 999999. 05 STK-WHS-BS-DLET-IND USAGE DISPLAY PIC X. 88 NO-DLET VALUE '0'. 88 DLET-SIZE VALUE '1'. 05 STK-WHS-BIN-MIN-QTY USAGE COMP-3 PIC S9(5). CREATE TABLE <qual>.STOCK-ORDER-STATUS (STK_DEPT_NUM CHAR(2) NOT NULL, STK_NUM CHAR(5) NOT NULL, STK_RETAIL_CD CHAR(2) NOT NULL, STK_SIZE_NUM DEC(3,0) NOT NULL, ALLOCATABLE_BS_QTY DEC(7,0) , INTRN_BS_QTY DEC(7,0) NOT NULL, ON_ORDER_BS_QTY DEC(7,0) NOT NULL, PICK_RSRV_BS_QTY DEC(7,0) NOT NULL, SHIP_BS_QTY DEC(7,0) NOT NULL, SPEC_BO_BS_QTY DEC(7,0) NOT NULL, SPEC_RSRV_BS_QTY DEC(7,0) NOT NULL, BS_HOLD_CD CHAR(3) NOT NULL, BS_RLSE_DT DATE NOT NULL, BS_HOLD_EFF DATE , BS_DLET_IND CHAR(1) NOT NULL, BIN_MIN_QTY DEC(5,0) NOT NULL,
  • 21. DB2 Design Summary Potential DB2 design for DL/2 01 SG0510BS . 05 STK-WHS-SIZE-NUM PIC 999. 05 STK-WHS-ALLOC-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-INTRN-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-ON-ORD-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-PCK-RSV-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SHIP-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SPEC-BO-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SP-RSR-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-BS-HLD-CD USAGE DISPLAY PIC XXX. 05 STK-WHS-BS-RLS-DATE PIC 999999. 05 STK-WHS-BS-HLD-EF-DATE PIC 999999. 05 STK-WHS-BS-DLET-IND USAGE DISPLAY PIC X. 88 NO-DLET VALUE '0'. 88 DLET-SIZE VALUE '1'. 05 STK-WHS-BIN-MIN-QTY USAGE COMP-3 PIC S9(5). CREATE TABLE <qual>.STOCK-ORDER-STATUS (STK_DEPT_NUM CHAR(2) NOT NULL, STK_NUM CHAR(5) NOT NULL, STK_RETAIL_CD CHAR(2) NOT NULL, STK_SIZE_NUM DEC(3,0) NOT NULL, ALLOCATABLE_BS_QTY DEC(7,0) , INTRN_BS_QTY DEC(7,0) NOT NULL, ON_ORDER_BS_QTY DEC(7,0) NOT NULL, PICK_RSRV_BS_QTY DEC(7,0) NOT NULL, SHIP_BS_QTY DEC(7,0) NOT NULL, SPEC_BO_BS_QTY DEC(7,0) NOT NULL, SPEC_RSRV_BS_QTY DEC(7,0) NOT NULL, BS_HOLD_CD CHAR(3) NOT NULL, BS_RLSE_DT DATE NOT NULL, BS_HOLD_EFF DATE , BS_DLET_IND CHAR(1) NOT NULL, BIN_MIN_QTY DEC(5,0) NOT NULL,
  • 22. DB2 Design Summary Potential DB2 design for DL/2 01 SG0510BS . 05 STK-WHS-SIZE-NUM PIC 999. 05 STK-WHS-ALLOC-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-INTRN-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-ON-ORD-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-PCK-RSV-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SHIP-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SPEC-BO-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SP-RSR-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-BS-HLD-CD USAGE DISPLAY PIC XXX. 05 STK-WHS-BS-RLS-DATE PIC 999999. 05 STK-WHS-BS-HLD-EF-DATE PIC 999999. 05 STK-WHS-BS-DLET-IND USAGE DISPLAY PIC X. 88 NO-DLET VALUE '0'. 88 DLET-SIZE VALUE '1'. 05 STK-WHS-BIN-MIN-QTY USAGE COMP-3 PIC S9(5). Significant built-in data transformation capabilities Easily extended by simple exits CREATE TABLE <qual>.STOCK-ORDER-STATUS (STK_DEPT_NUM CHAR(2) NOT NULL, STK_NUM CHAR(5) NOT NULL, STK_RETAIL_CD CHAR(2) NOT NULL, STK_SIZE_NUM DEC(3,0) NOT NULL, ALLOCATABLE_BS_QTY DEC(7,0) , INTRN_BS_QTY DEC(7,0) NOT NULL, ON_ORDER_BS_QTY DEC(7,0) NOT NULL, PICK_RSRV_BS_QTY DEC(7,0) NOT NULL, SHIP_BS_QTY DEC(7,0) NOT NULL, SPEC_BO_BS_QTY DEC(7,0) NOT NULL, SPEC_RSRV_BS_QTY DEC(7,0) NOT NULL, BS_HOLD_CD CHAR(3) NOT NULL, BS_RLSE_DT DATE NOT NULL, BS_HOLD_EFF DATE , BS_DLET_IND CHAR(1) NOT NULL, BIN_MIN_QTY DEC(5,0) NOT NULL,
  • 23. DB2 Design Summary CREATE TABLE <qual>.SG0510BS (STK_DEPT_NUM CHAR(2) NOT NULL, STK_NUM CHAR(5) NOT NULL, STK_RETAIL_CD CHAR(2) NOT NULL, SG0510BS_KEY CHAR(3) NOT NULL, SG051BS_DATA CHAR(47) NOT NULL Potential DB2 design for DL/2 01 SG0510BS . 05 STK-WHS-SIZE-NUM PIC 999. 05 STK-WHS-ALLOC-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-INTRN-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-ON-ORD-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-PCK-RSV-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SHIP-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SPEC-BO-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-SP-RSR-BS-QTY USAGE COMP-3 PIC S9(7). 05 STK-WHS-BS-HLD-CD USAGE DISPLAY PIC XXX. 05 STK-WHS-BS-RLS-DATE PIC 999999. 05 STK-WHS-BS-HLD-EF-DATE PIC 999999. 05 STK-WHS-BS-DLET-IND USAGE DISPLAY PIC X. 88 NO-DLET VALUE '0'. 88 DLET-SIZE VALUE '1'. 05 STK-WHS-BIN-MIN-QTY USAGE COMP-3 PIC S9(5). Significant built-in data transformation capabilities Easily extended by simple exits CREATE TABLE <qual>.STOCK-ORDER-STATUS (STK_DEPT_NUM CHAR(2) NOT NULL, STK_NUM CHAR(5) NOT NULL, STK_RETAIL_CD CHAR(2) NOT NULL, STK_SIZE_NUM DEC(3,0) NOT NULL, ALLOCATABLE_BS_QTY DEC(7,0) , INTRN_BS_QTY DEC(7,0) NOT NULL, ON_ORDER_BS_QTY DEC(7,0) NOT NULL, PICK_RSRV_BS_QTY DEC(7,0) NOT NULL, SHIP_BS_QTY DEC(7,0) NOT NULL, SPEC_BO_BS_QTY DEC(7,0) NOT NULL, SPEC_RSRV_BS_QTY DEC(7,0) NOT NULL, BS_HOLD_CD CHAR(3) NOT NULL, BS_RLSE_DT DATE NOT NULL, BS_HOLD_EFF DATE , BS_DLET_IND CHAR(1) NOT NULL, BIN_MIN_QTY DEC(5,0) NOT NULL,
  • 24. $2MM+ $2MM+ $2MM+ $2MM+ $2MM+ $2MM+ Applica on Rewrite DL/2 24 Case Study: Major Swiss Bank Migrating Global FX Application to DB2 Company Overview 3rd Largest global FX trading platform Many millions of transactions per day Mission critical application Challenges z/OS and CICS upgrade constraints Significant IMS DB software costs >$2m/yr Support overhead for aging DB platform 84 72 60 48 36 24 12 0 Implementa on Time (months) Solution & Benefits DL/2 enabled a swift move from IMS to DB2 with no application changes alleviating zOS and CICS upgrade challenges Significant License and operational costs eliminated - during 5-7 year application rewrite project May 2013 largest 1 day FX trade volume in history
  • 25. Challenges Physical database limitations Limited application agility Lack of data integrity Subpar system stability 25 Case Study: Government Department of Corrections Improving Agility & Data Integrity Company Overview 3rd largest Correctional system in US 21,000 employees. Numerous locations across the state
  • 26. 26 CICS BATCH IMS DB DB2 Must rely on programs To validate dates/numerics Must rely on programs to validate dates/numerics Propagation, difficult to change Data if not in correct format Difficult to keep data Coordinated between databases AdHoc Easy, but data latency from propagation Time consuming programming needed. Case Study: Before DL/2
  • 27. 27 CICS BATCH DB2 AdHoc  Simpler architecture  Easier development  No data latency issues  No data propagation issues Case Study: After DL/2
  • 28. Challenges Physical database limitations Limited application agility Lack of data integrity Subpar system stability 28 Case Study: Government Department of Corrections Improving Agility & Data Integrity Company Overview 3rd largest Correctional system in US 21,000 employees. Numerous locations across the state Solution & Benefits No database size limitations Faster response to Ad-Hoc requests Better Data integrity / Database design Higher developer’s productivity Reduced software and maintenance costs
  • 29.  NO APPLICATION PROGRAM CHANGES are required  LOWEST RISK migration strategy – bite-sized chunks  REDUCED COSTS through elimination of IMS DB and IMS tools licenses  SIMPLIFICATION of DBA support through DBMS convergence  CHOICE of migration methods to meet differing requirements Simple, rapid method to reduce costs very quickly More measured method to meet DB2 design objectives A combination of both: simple method first, measured method later 29 Unleash The Power of IMS Data with DL/2
  • 30. Get the free eBook: A Three Step Approach to Low-Risk IMS modernization http://bit.ly/1sLzKUF Watch the webcast of this presentation in its entirety! http://bit.ly/1wOgeP2 30 Want to learn more?