SlideShare a Scribd company logo
© 2014 IBM Corporation
The future runs on System z
IMS Application Development
Modernization
Christopher Holtz
IMS Tools Modernization Architect
© 2014 IBM Corporation
© Copyright IBM Corporation 2014. All rights reserved.
U.S. Government Users Restricted Rights - Use, duplication or disclosure restricted by GSA ADP Schedule
Contract with IBM Corp.
THE INFORMATION CONTAINED IN THIS PRESENTATION IS PROVIDED FOR INFORMATIONAL PURPOSES
ONLY. WHILE EFFORTS WERE MADE TO VERIFY THE COMPLETENESS AND ACCURACY OF THE
INFORMATION CONTAINED IN THIS PRESENTATION, IT IS PROVIDED “AS IS” WITHOUT WARRANTY OF
ANY KIND, EXPRESS OR IMPLIED. IN ADDITION, THIS INFORMATION IS BASED ON IBM’S CURRENT
PRODUCT PLANS AND STRATEGY, WHICH ARE SUBJECT TO CHANGE BY IBM WITHOUT NOTICE. IBM
SHALL NOT BE RESPONSIBLE FOR ANY DAMAGES ARISING OUT OF THE USE OF, OR OTHERWISE
RELATED TO, THIS PRESENTATION OR ANY OTHER DOCUMENTATION. NOTHING CONTAINED IN THIS
PRESENTATION IS INTENDED TO, NOR SHALL HAVE THE EFFECT OF, CREATING ANY WARRANTIES OR
REPRESENTATIONS FROM IBM (OR ITS SUPPLIERS OR LICENSORS), OR ALTERING THE TERMS AND
CONDITIONS OF ANY AGREEMENT OR LICENSE GOVERNING THE USE OF IBM PRODUCTS AND/OR
SOFTWARE.
IBM, the IBM logo, ibm.com, IMS, and z/OS are trademarks or registered trademarks of International Business Machines
Corporation in the United States, other countries, or both. If these and other IBM trademarked terms are marked on their
first occurrence in this information with a trademark symbol (® or ™), these symbols indicate U.S. registered or common law
trademarks owned by IBM at the time this information was published. Such trademarks may also be registered or common
law trademarks in other countries. A current list of IBM trademarks is available on the Web at “Copyright and trademark
information” at www.ibm.com/legal/copytrade.shtml
Disclaimer
© 2014 IBM Corporation
Agenda
• User interface strategy
• Integrated Eclipse environment for IMS development, testing, and
debugging
IMS Explorer for Development
Rational Developer for System z
IMS Batch Terminal Simulator Eclipse interface
Debug Tool for z/OS
• Demo
• Q&A
3
© 2014 IBM Corporation
IBM IMS User Interface Strategy
4
Eclipse
(development)
Web browser
(administration)
TCP/IP
ISPF
AdministratorsDevelopers
© 2014 IBM Corporation5
Integrated Eclipse Environment for IMS Development,
Testing, and Debugging
Visualize
databases
Define
queries
Code
+ Build
Unit
test
Debug
IMS Explorer
for Development
IMS Explorer
for Development
Debug Tool
for z/OS
IMS Batch
Terminal
Simulator
Rational
Developer
for System z
© 2014 IBM Corporation6
• Visualize and change IMS database (DBDs) and program definition sources
(PSBs)
– View IMS database hierarchical structures
– View, create, and edit PSBs
– Change/add fields in DBDs
– Import COBOL copybooks and PL/I structures to a database segment
– Generate DBD source and PSB source
• IMS Catalog Navigation (V12 or later)
• Access IMS data using SQL statements
– Leverage IMS V13 Universal JDBC driver
• Connect to the z/OS system
– Browse data sets
– Submit JCL and inspect the output in JES
– Import and export DBD and PSB source files from a data set to the IMS Explorer, and vice-versa
IMS Explorer for Development
© 2014 IBM Corporation7
IMS Explorer for Development
Logical
relationship
between
databases
Logical
relationship
between
databases
Additional
properties of a
segment or field
Additional
properties of a
segment or field
© 2014 IBM Corporation8
IMS Explorer
© 2014 IBM Corporation9
Integrated Eclipse Environment for IMS Development,
Testing, and Debugging
Visualize
databases
Define
queries
Code
+ Build
Unit
test
Debug
IMS Explorer
for Development
IMS Explorer
for Development
Debug Tool
for z/OS
IMS Batch
Terminal
Simulator
Rational
Developer
for System z
© 2014 IBM Corporation
Integrated Eclipse Environment for IMS Development,
Testing, and Debugging
10
Remote zOS JES
MVS files
TSO Emulator
Remote zOS JES
MVS files
TSO Emulator
Program
outline
Program
outline
Errors and
warnings
Errors and
warnings
Remote
editing,
Syntax
highlighting
/ checking
Remote
editing,
Syntax
highlighting
/ checking
DebugDebug
TestTest
Remote
compile,
link
Remote
compile,
link
© 2014 IBM Corporation
The Debug Tool for z/OS
• Interactive debugging for applications
• Multiple languages:
– COBOL, PL/I, C/C++, Assembler
• Multiple z/OS environments
– Batch, TSO, CICS, IMS/TM, DB2 stored procedures,
– Websphere application server, Unix system services
• GUI Eclipse plug-in at no additional cost!
© 2014 IBM Corporation
Tool for Unit Testing and Debugging IMS
applications
Runs in TSO, IMS Batch (DL/I DBB) or IMS
Online (BMP/JBP)
Simulates IMS DC calls
Unit / Function Test
System Test / Production
IMS
App
Database
BTS
DD Card
MFS Terminal
BTSIN
Driven through BTSIN control
statements or interactive full
screen TSO simulation
Playback utility
Generates BTSIN with the corresponding MFS
associated with the MOD name from IMS
transaction log records ('01'X, '03'X).
Prints containing screen images of transactions
including data, USER/LTERM identification, time by
extracting from BTSOUT
12
IMS Batch Terminal Simulator Modernization
© 2014 IBM Corporation
BTS V4: What’s new in base BTS
• Supports IMS callout (ICAL) under BMP and JBP regions
• Supports for variable-length BTSIN data sets
• Provides new reporting features for improved analysis and
prediction of performance behavior
• APPLFE support
© 2014 IBM Corporation
ICAL support
• Supports IMS callout (ICAL) under BMP and JBP regions
– ICAL call enables an application program to send a synchronous
request to a non-IMS program or a service that runs in a z/OS or
distributed environment
– Request and response areas on ICAL call are traced
**** AIB CALL- FUNC=ICAL, RETURN CODE=0000, REASON CODE=0000 -AIB
ICAL 0000 ----.----1----.----2----.----3----.----4----.----5----.----6----.----7----.----8----.----9----.---10
AIB=DFSAIB SENDRECVIVPDTOB4
CCECCC440000ECDCDCCECEDCEDCF000000000000000000030003002100000000000000000000000000000000000000000000
4621920000182554953595743624000000000000000000020002007000000000000000000000000000000000000000000000
0000000000000000000000000000
0000000000000000000000000000
REQUEST= MESSAGE1
4DCEECCCF44444444444444444444444444444444444444444
04522175100000000000000000000000000000000000000000
RESPONSE=HELLO FROM WEBSPHERE MDB
CCDDD4CDDD4ECCEDCCDC4DCC44444444444444444444444444
85336069640652278595044200000000000000000000000000
© 2014 IBM Corporation
Variable-length BTSIN
• Supports for variable-length BTSIN data sets
– A whole data in a record is handled as a command or a transaction
data without any continuation non-blank characters though a non-blank
character in column 72 indicates continuation in a fixed format
– A developer/tester can simulate input coming from a mid tier
application using this BTSIN without worrying about existing 80 byte
length limit
– The record length in a variable format can be from 5 to 32756
© 2014 IBM Corporation
Report enhancements - Single output line per call
• New reporting feature by
./O DB=S MSG=S command (new
suboption S) for putting single
output line per MSG or DB call
without detail information (Key
feedback area, I/O area etc.) to
BTSOUT.
BTS0006I TRANSACTION STARTED: PART .
MBR=DFSSAM02 PSB=DFSSAM02 EDIT= SPA=0 PLC=1 LANG=CBL TYPE=MSG
**** MSG CALL- FUNC=GU , PCB=IOPCB , STATUS= , MESSAGE NUMBER=000001 LENGTH=000018, PCBN=001 -MSG
****** DB CALL- FUNC=GU , PCB=DI21PART, STATUS= , LEVEL=01, SEGMENT=PARTROOT IOLENGTH=000050, PCBN=002 -DB
****** DB CALL- FUNC=GN , PCB=DI21PART, STATUS= , LEVEL=02, SEGMENT=STANINFO IOLENGTH=000085, PCBN=002 -DB
**** MSG CALL- FUNC=ISRT, PCB=IOPCB , STATUS= , MESSAGE NUMBER=000001 LENGTH=000067, PCBN=001 -MSG
**** MSG CALL- FUNC=ISRT, PCB=IOPCB , STATUS= , MESSAGE NUMBER=000001 LENGTH=000081, PCBN=001 -MSG
BTS0020I STATISTICS REPORT FOR TRANSACTION:PART .
PCBNAME GU GN GNP GHU GHN GHNP ISRT PURG REPL DLET DEQ CHKP LOG STAT XRST CHNG ROLB OPEN CLSE OTHR
IOPCB 1 2
DI21PART 1 1
//G.BTSIN DD *
./T TC=PART LANG=CBL MBR=DFSSAM02
./T TC=DSPINV LANG=CBL MBR=DFSSAM03
./O MSG=S DB=S
PART AN960C10$
DSPINV AN960C10,28009126$
DSPINV AB960C10,8009126A$
/*
© 2014 IBM Corporation
Report enhancements - Elapsed time per call
• New reporting feature by
./O ELAPTIME command for
improved and expanded display of
application results for performance
projections
****** DB CALL- FUNC=GU , PCB=DI21PART, STATUS= , LEVEL=01, SEGMENT=PARTROOT IOLENGTH=000050, PCBN=002 -DB-
ELAPSED SEC=0.274668
KFB=02AN960C10
FFCDFFFCFF4444444
02159603100000000
SSA1=PARTROOT(PARTKEY =02AN960C10 )
DCDEDDDE4DCDEDCE447FFCDFFFCFF44444445
71939663D719325800E02159603100000000D
----.----1----.----2----.----3----.----4----.----5----.----6----.----7----.----8----.----9----.---10
IOAREA=02AN960C10 WASHER
FFCDFFFCFF4444444444444444ECECCD444444444444444444
02159603100000000000000000612859000000000700000000
****** DB CALL- FUNC=GN , PCB=DI21PART, STATUS= , LEVEL=02, SEGMENT=STANINFO IOLENGTH=000085, PCBN=002 -DB-
ELAPSED SEC=0.000013
KFB=02AN960C10 02
FFCDFFFCFF4444444FF
0215960310000000002
.....
//G.BTSIN DD *
./T TC=PART LANG=CBL MBR=DFSSAM02
./T TC=DSPINV LANG=CBL MBR=DFSSAM03
./O ELAPTIME=YES
PART AN960C10$
DSPINV AN960C10,28009126$
DSPINV AB960C10,8009126A$
/*
© 2014 IBM Corporation
Report enhancements - New report function
• Adds new summary reports (program analysis statistics) by
./O REPORT command to better facilitate BTS as a regression
test analysis tool
– by PCB total
– by function code
– by function code and segment name
– by status code
– by ICAL OTMA descriptor
– by SQL statement
– by MQI function
//G.BTSIN DD *
./T TC=PART LANG=CBL MBR=DFSSAM02
./T TC=DSPINV LANG=CBL MBR=DFSSAM03
./O REPORT=YES
PART AN960C10$
DSPINV AN960C10,28009126$
DSPINV AB960C10,8009126A$
/*
© 2014 IBM Corporation
Report enhancements - New report function..
• Program analysis statistics by PCB total
PROGRAM ANALYSIS STATISTICS BY PCB TOTAL FOR TRANSACTION: PART
MBR=DFSSAM02 PSB=DFSSAM02 FROM 2011/06/29 12:43:39 FOR 0.348386SEC
PCBNAME FUNC LVL SEGNAME SC CALLS MAX-ELAPS-SEC AVG-ELAPS-SEC
IOPCB ** TOTAL 3 0.000046 0.000016
DI21PART ** TOTAL 2 0.275534 0.137773
------------------------------------------------------------------
** TOTAL 5 0.275534 0.055119
PROGRAM ANALYSIS STATISTICS BY FUNCTION CODE FOR TRANSACTION: PART
MBR=DFSSAM02 PSB=DFSSAM02 FROM 2011/06/29 12:43:39 FOR 0.348386SEC
PCBNAME FUNC LVL SEGNAME SC CALLS MAX-ELAPS-SEC AVG-ELAPS-SEC
IOPCB GU 1 0.000046 0.000046
ISRT 2 0.000002 0.000001
IOPCB ** TOTAL 3 0.000046 0.000016
DI21PART GU 1 0.275534 0.275534
GN 1 0.000013 0.000013
DI21PART ** TOTAL 2 0.275534 0.137773
------------------------------------------------------------------
** TOTAL 5 0.275534 0.055119
./O REPORT=T or Y
./O REPORT=F or Y• Program analysis statistics by function code
© 2014 IBM Corporation
Report enhancements - New report function…
• Program analysis statistics by function code and segment name
• Program analysis statistics by status code
PROGRAM ANALYSIS STATISTICS BY FUNCTION-SEGNAME FOR TRANSACTION: PART
MBR=DFSSAM02 PSB=DFSSAM02 FROM 2011/06/29 12:43:39 FOR 0.348386SEC
PCBNAME FUNC LVL SEGNAME SC CALLS MAX-ELAPS-SEC AVG-ELAPS-SEC
IOPCB GU 1 0.000046 0.000046
ISRT 2 0.000002 0.000001
IOPCB ** TOTAL 3 0.000046 0.000016
DI21PART GU 01 PARTROOT 1 0.275534 0.275534
GN 02 STANINFO 1 0.000013 0.000013
DI21PART ** TOTAL 2 0.275534 0.137773
------------------------------------------------------------------
** TOTAL 5 0.275534 0.055119
PROGRAM ANALYSIS STATISTICS BY STATUS CODE FOR TRANSACTION: PART
MBR=DFSSAM02 PSB=DFSSAM02 FROM 2011/06/29 12:43:39 FOR 0.348386SEC
SC PCBNAME CALLS MAX-ELAPS-SEC AVG-ELAPS-SEC
IOPCB 3 0.000046 0.000016
DI21PART 2 0.275534 0.137773
----------------------------------------------
** TOTAL 5 0.275534 0.055119
./O REPORT=C or Y
./O REPORT=G or Y
© 2014 IBM Corporation
Report enhancements - New report function..
• Program analysis statistics by ICAL OTMA descriptor
ROGRAM ANALYSIS STATISTICS BY ICAL OTMA DESCRIPTOR FOR TRANSACTION: ICALCBL
MBR=SSBICAL PSB=DFSSAM02 FROM 2011/06/27 14:15:51 FOR 0.208677SEC
ICAL-OTMA-DESCRIPTOR CALLS WARNS ERRORS MAX-ELAPS-SEC AVG-ELAPS-SEC
IVPDTOB4 7 1 4 0.047512 0.019893
#INVALID 1 0 1 0.000054 0.000054
--------------------------------------------------------------------
** TOTAL 8 1 5 0.047512 0.017413
./O REPORT=I or Y
© 2014 IBM Corporation
Report enhancements - New report function..
• Program analysis statistics by SQL statement
PROGRAM ANALYSIS STATISTICS BY SQL STATEMENT FOR TRANSACTION: REPOSQL
MBR=SSASQL PSB=DFSSAM02 FROM 2011/06/27 15:44:07 FOR 1.742729SEC
SQL-STATEMENT CALLS WARNS ERRORS MAX-ELAPS-SEC AVG-ELAPS-SEC
OPEN 1 0 0 0.000998 0.000998
CLOSE 1 0 0 0.000014 0.000014
SELECT 3 0 0 0.001495 0.001312
FETCH 1 0 0 0.000025 0.000025
INSERT 2 0 0 0.006540 0.003832
DELETE 0 0 0 0.000000 0.000000
UPDATE 1 0 0 0.002153 0.002153
PREPARE 0 0 0 0.000000 0.000000
DESCRIBE 0 0 0 0.000000 0.000000
EXECUTE 0 0 0 0.000000 0.000000
EXECUTE IMMEDIATE 0 0 0 0.000000 0.000000
OTHER 7 0 0 0.782744 0.153567
--------------------------------------------------------------------
** TOTAL 16 0 0 0.782744 0.068110
./O REPORT=S or Y
© 2014 IBM Corporation
Report enhancements - New report function..
• Program analysis statistics by MQI function
PROGRAM ANALYSIS STATISTICS BY MQI FUNCTION FOR TRANSACTION: MQREPORT
MBR=SSAMQI PSB=DFSSAM02 FROM 2011/06/29 15:08:14 FOR 0.275878SEC
MQI-FUNCTION CALLS WARNS ERRORS MAX-ELAPS-SEC AVG-ELAPS-SEC
MQCONN 1 0 0 0.050573 0.050573
MQDISC 1 0 0 0.014761 0.014761
MQOPEN 1 0 0 0.008358 0.008358
MQCLOSE 1 0 0 0.007690 0.007690
MQGET 5 0 1 0.018390 0.012261
MQPUT 2 0 0 0.022744 0.022310
MQPUT1 2 0 0 0.007415 0.007391
MQINQ 1 0 0 0.007277 0.007277
MQSET 1 0 0 0.008225 0.008225
MQCMIT 1 0 0 0.009272 0.009272
MQBACK 1 0 0 0.007621 0.007621
MQCONNX 0 0 0 0.000000 0.000000
MQSUB 0 0 0 0.000000 0.000000
MQSUBRQ 0 0 0 0.000000 0.000000
MQSTAT 0 0 0 0.000000 0.000000
OTHER 0 0 0 0.000000 0.000000
--------------------------------------------------------------------
** TOTAL 17 0 1 0.050573 0.013793
./O REPORT=M or Y
© 2014 IBM Corporation
APPLFE support provided by PM52131
• BTS V4 APPLFE support (FITS MR0215112747)
– Supports APPLFE that is originally a parameter for MPR
an application front-end routine that is called when a message
processing program (MPP) is scheduled in a message processing
region (MPR)
//MPP EXEC DFSMPR,APPLFE=YYYY,…
MPR region JCL
Initialize:
load & call YYYY
MPP schedule:
call YYYY
call DFSSAM03
Terminate:
call YYYY
//G.BTSIN DD *
./E APPLFE=YYYY
./T TC=DSPINV LANG=CBL MBR=DFSSAM03
DSPINV AN960C10,28009126$
/*
BTS (BTSIN)
load &call YYYY (for init)
call YYYY (for schedule)
load&call DFSSAM03
call YYYY (for terminate)
MPR flow
BTS flow
New keyword
© 2014 IBM Corporation
IMS Batch Terminal Simulator Modernization
25
Unit / Function Test
System Test / Production
IMS
App
Database
O
T
M
A
IMS
Connect
DAI
BTS
EclipseBrings IMS App Dev / Test to Desktop
RDz Integration
Debug Tool Integration
Supports end-to-end testing driven
by distributed client side app
Supports low cost host simulation
for client app development / test
Utilizes IMS Tools Distributed
Access Infrastructure (DAI)
as a TCP endpoint
WAS
App
IMS
TM
RA
BTS
TM
RA
DD Card
MFS Terminal
BTSIN
© 2014 IBM Corporation
Application Development Modernization with BTS
XML
System Programmer defines
common datasets, attributes, etc
(similar to PROC) and exports
BTS Runtime as XML
Developers import XML and
use it to create a Launch Configuration…
to test applications
DAI
BTS BTS BTS
WAS
App
BTS
TM
RA
XML
Export Launch Configuration as
XML for BTSRA
1
2
3
26
© 2014 IBM Corporation27
BTS / RDz / Debug Tool
© 2014 IBM Corporation
Questions?
• Thank you!
• Feel free to contact me:
– Chris Holtz, IMz Tools Modernization Architect
holtz@us.ibm.com
28
© 2014 IBM Corporation29
Back-up
© 2014 IBM Corporation
IMS Explorer for Development
View physical IMS database structure
30
Logical
relationship
between
databases
Logical
relationship
between
databases
Additional
properties of a
segment or field
Additional
properties of a
segment or field
© 2014 IBM Corporation
IMS Explorer for Development
View logical IMS database structure
31
A concatenated
segment and its
underlying source
segments
A concatenated
segment and its
underlying source
segments
© 2014 IBM Corporation
IMS Explorer for Development
Build PCB definition
32
Point and click
to select
SENSEGs
Point and click
to select
SENSEGs
Generated
PSB source
Generated
PSB source
© 2014 IBM Corporation
IMS Explorer for Development
Query IMS databases
33
Create a new
connection
Create a new
connection
IMS Connect
address and
port
IMS Connect
address and
port
Point to an
IMS Explorer project
and PSB
to connect to the IMS
database
Point to an
IMS Explorer project
and PSB
to connect to the IMS
database
© 2014 IBM Corporation34
IMS Explorer for Development
Query IMS databases (Continued)
Create SQL scripts
with Select, Update,
Delete, and Insert
statements
Create SQL scripts
with Select, Update,
Delete, and Insert
statements
Build a SQL statement
using the SQL Builder
with content assistance
Build a SQL statement
using the SQL Builder
with content assistance
View
the SQL results
View
the SQL results
PSB =
schema
PSB =
schema
DB PCB =
database
DB PCB =
database
Database
segments =
tables
Database
segments =
tables
© 2014 IBM Corporation35
IMS Explorer for Development
Query IMS databases (Continued)
Browse
data sets
Browse
data sets
Edit
a data set
member
Edit
a data set
member
View
JES output
View
JES output
© 2014 IBM Corporation
Rational Developer for System z
Remotely code and build
36
COBOL application
defined with RDz
Property Group for
syntax highlighting and
remote compile
COBOL application
defined with RDz
Property Group for
syntax highlighting and
remote compile
COBOL application
defined with RDz
Property Group for
syntax highlighting and
remote compile
COBOL application
defined with RDz
Property Group for
syntax highlighting and
remote compile
COBOL, PL/I,
Assembler, Java,
C/C++
COBOL, PL/I,
Assembler, Java,
C/C++
© 2014 IBM Corporation
IMS Batch Terminal Simulator
Add BTS server
37
Servers View:
Add a new
BTS server
Servers View:
Add a new
BTS server
© 2014 IBM Corporation
IMS Batch Terminal Simulator
Define BTS server
38
Use the step-by-
step wizard to
define a new BTS
configuration
Use the step-by-
step wizard to
define a new BTS
configuration
© 2014 IBM Corporation
IMS Batch Terminal Simulator
Runtime configuration
39
Create a new
configuration
or
import an existing
configuration
Create a new
configuration
or
import an existing
configuration
© 2014 IBM Corporation
IMS Batch Terminal Simulator
Specify BTS options
40
Specify BTS
options for
DLI, DBB,
BMP, or JBP
Specify BTS
options for
DLI, DBB,
BMP, or JBP
© 2014 IBM Corporation
IMS Batch Terminal Simulator
Use embedded assistance
41
Context-sensitive
Help
Context-sensitive
Help
Field labels with
equivalent
BTS PROC option
names
Field labels with
equivalent
BTS PROC option
names
© 2014 IBM Corporation
IMS Batch Terminal Simulator
Specify libraries
42
Specify
DFSRESLB,
STEPLIB,
PSBLIB, DBDLIB,
and ACBLIB
Specify
DFSRESLB,
STEPLIB,
PSBLIB, DBDLIB,
and ACBLIB
© 2014 IBM Corporation
IMS Batch Terminal Simulator
Specify additional data sets
43
Specify additional
data sets
Specify additional
data sets
© 2014 IBM Corporation
IMS Batch Terminal Simulator
Create launch configuration
44
IMS Batch Terminal
Simulator server
IMS Batch Terminal
Simulator server Next: Create a
launch
configuration for
your program
Next: Create a
launch
configuration for
your program
© 2014 IBM Corporation
IMS Batch Terminal Simulator
Select BTS server
45
Select the
BTS server
Select the
BTS server
© 2014 IBM Corporation
IMS Batch Terminal Simulator
Specify BTSIN
46
Specify
BTSIN
Specify
BTSIN
© 2014 IBM Corporation
IMS Batch Terminal Simulator
Specify program libraries
47
HOLTZ.IMS.LOAD
Specify
Program libraries and
additional data sets
Specify
Program libraries and
additional data sets
Specify
program libraries and
additional data sets
Specify
program libraries and
additional data sets
HOLTZ.IMS.LOAD
Specify
Program libraries and
additional data sets
Specify
Program libraries and
additional data sets
Specify
program libraries and
additional data sets
Specify
program libraries and
additional data sets
© 2014 IBM Corporation
IMS Batch Terminal Simulator
Run program
48
The BTS server has
started
The program now runs on
z/OS in the BTS region
The BTS server has
started
The program now runs on
z/OS in the BTS region
Run programRun program
© 2014 IBM Corporation
IMS Batch Terminal Simulator
Examine BTS output
49
Make code changes
RDz automatically
compiles the code
Run the program again
Make code changes
RDz automatically
compiles the code
Run the program again
Examine the
BTS output
Examine the
BTS output
Examine the
BTS output
Examine the
BTS output
© 2014 IBM Corporation50
Debug Tool for z/OS
Debug runtime configuration
Specify
Debug Tool
data sets
Specify
Debug Tool
data sets
© 2014 IBM Corporation51
Debug Tool for z/OS
Debug launch configuration
Specify
Debug Tool
program libraries and
additional data sets
Specify
Debug Tool
program libraries and
additional data sets
Specify
Debug Tool
program libraries and
additional data sets
Specify
Debug Tool
program libraries and
additional data sets
© 2014 IBM Corporation52
Debug Tool for z/OS
Debug and step through code
Debug to step
through the code
Debug to step
through the code

More Related Content

PDF
IMS DC Self Study Complete Tutorial
PDF
Enterprise PL1 - Peter Elderon
 
PDF
IMS capabilities today
PDF
Ims keeping current for phoenix
PDF
Ims13 ims tools ims v13 migration workshop - IMS UG May 2014 Sydney & Melbo...
PDF
CICS TS for z/VSE Update including CICS connectivity options
 
PDF
z/VSE - News - Announcements -Trends
 
PDF
z/OS Small Enhancements - Episode 2013A
IMS DC Self Study Complete Tutorial
Enterprise PL1 - Peter Elderon
 
IMS capabilities today
Ims keeping current for phoenix
Ims13 ims tools ims v13 migration workshop - IMS UG May 2014 Sydney & Melbo...
CICS TS for z/VSE Update including CICS connectivity options
 
z/VSE - News - Announcements -Trends
 
z/OS Small Enhancements - Episode 2013A

Similar to IMS Application Development and Simplification - Phoenix UG - June 19th, 2014 (19)

PDF
z/VM and OpenStack
PDF
Maximize o valor do z/OS
PDF
z/OS Small Enhancements - Episode 2014B
PDF
z/VSE Connectors Introduction, Use Cases, and News
 
PDF
z/OS Small Enhancements - Episode 2014A
PDF
z/OS Small Enhancements - Episode 2015A
PDF
Upgrading to z_OS V2R4 Part 01 of 02.pdf
PDF
z/VSE Base Installation - Step by Step
 
PDF
z/VSE Service and Support
 
PDF
z/OS Small Enhancements - Episode 2015B
PDF
z/OS V2.4 Preview: z/OS Container Extensions - Running Linux on Z docker cont...
PDF
Server pac 101
PDF
IBM Wave for z/VM
PDF
z/OS small enhancements, episode 2018A
PDF
IMS03 how design thinking is shaping ims
PDF
z/VSE Networking Options and News
 
PPT
IBM Impact session 1654-how to move an existing cics application to a smartphone
PDF
Ims01 ims trends and directions - IMS UG May 2014 Sydney & Melbourne
PDF
Automatic Performance Improvement for Legacy COBOL
z/VM and OpenStack
Maximize o valor do z/OS
z/OS Small Enhancements - Episode 2014B
z/VSE Connectors Introduction, Use Cases, and News
 
z/OS Small Enhancements - Episode 2014A
z/OS Small Enhancements - Episode 2015A
Upgrading to z_OS V2R4 Part 01 of 02.pdf
z/VSE Base Installation - Step by Step
 
z/VSE Service and Support
 
z/OS Small Enhancements - Episode 2015B
z/OS V2.4 Preview: z/OS Container Extensions - Running Linux on Z docker cont...
Server pac 101
IBM Wave for z/VM
z/OS small enhancements, episode 2018A
IMS03 how design thinking is shaping ims
z/VSE Networking Options and News
 
IBM Impact session 1654-how to move an existing cics application to a smartphone
Ims01 ims trends and directions - IMS UG May 2014 Sydney & Melbourne
Automatic Performance Improvement for Legacy COBOL
Ad

More from Jeff Pearce (8)

PDF
“Intelligent” extract of IMS data for Big Data, Business Analytics, and Unifi...
PDF
The Ims Catalog - IMS Phoenix UG, June 19th, 2014
PDF
Direct Access to IMS Data - IMS Phoenix UG- June 19th 2014
PDF
IMS in the Connected World - IMS Phoenix UG- June 19th 2014
PDF
“Intelligent” extract of IMS data for Big Data, Business Analytics, and Unif...
PPT
An overview of the ims connect client interface
PPT
Understanding ims otma commit mode and synclevel
PDF
Latest news phoenix
“Intelligent” extract of IMS data for Big Data, Business Analytics, and Unifi...
The Ims Catalog - IMS Phoenix UG, June 19th, 2014
Direct Access to IMS Data - IMS Phoenix UG- June 19th 2014
IMS in the Connected World - IMS Phoenix UG- June 19th 2014
“Intelligent” extract of IMS data for Big Data, Business Analytics, and Unif...
An overview of the ims connect client interface
Understanding ims otma commit mode and synclevel
Latest news phoenix
Ad

Recently uploaded (20)

PDF
NewMind AI Monthly Chronicles - July 2025
PDF
NewMind AI Weekly Chronicles - August'25 Week I
DOCX
The AUB Centre for AI in Media Proposal.docx
PPT
Teaching material agriculture food technology
PDF
Diabetes mellitus diagnosis method based random forest with bat algorithm
PDF
Blue Purple Modern Animated Computer Science Presentation.pdf.pdf
PDF
Architecting across the Boundaries of two Complex Domains - Healthcare & Tech...
PPTX
20250228 LYD VKU AI Blended-Learning.pptx
PDF
Spectral efficient network and resource selection model in 5G networks
PPTX
Big Data Technologies - Introduction.pptx
PDF
TokAI - TikTok AI Agent : The First AI Application That Analyzes 10,000+ Vira...
PDF
Mobile App Security Testing_ A Comprehensive Guide.pdf
PDF
Build a system with the filesystem maintained by OSTree @ COSCUP 2025
PDF
Modernizing your data center with Dell and AMD
PDF
Dropbox Q2 2025 Financial Results & Investor Presentation
PDF
Agricultural_Statistics_at_a_Glance_2022_0.pdf
PPTX
A Presentation on Artificial Intelligence
PDF
Peak of Data & AI Encore- AI for Metadata and Smarter Workflows
PDF
Approach and Philosophy of On baking technology
PDF
7 ChatGPT Prompts to Help You Define Your Ideal Customer Profile.pdf
NewMind AI Monthly Chronicles - July 2025
NewMind AI Weekly Chronicles - August'25 Week I
The AUB Centre for AI in Media Proposal.docx
Teaching material agriculture food technology
Diabetes mellitus diagnosis method based random forest with bat algorithm
Blue Purple Modern Animated Computer Science Presentation.pdf.pdf
Architecting across the Boundaries of two Complex Domains - Healthcare & Tech...
20250228 LYD VKU AI Blended-Learning.pptx
Spectral efficient network and resource selection model in 5G networks
Big Data Technologies - Introduction.pptx
TokAI - TikTok AI Agent : The First AI Application That Analyzes 10,000+ Vira...
Mobile App Security Testing_ A Comprehensive Guide.pdf
Build a system with the filesystem maintained by OSTree @ COSCUP 2025
Modernizing your data center with Dell and AMD
Dropbox Q2 2025 Financial Results & Investor Presentation
Agricultural_Statistics_at_a_Glance_2022_0.pdf
A Presentation on Artificial Intelligence
Peak of Data & AI Encore- AI for Metadata and Smarter Workflows
Approach and Philosophy of On baking technology
7 ChatGPT Prompts to Help You Define Your Ideal Customer Profile.pdf

IMS Application Development and Simplification - Phoenix UG - June 19th, 2014

  • 1. © 2014 IBM Corporation The future runs on System z IMS Application Development Modernization Christopher Holtz IMS Tools Modernization Architect
  • 2. © 2014 IBM Corporation © Copyright IBM Corporation 2014. All rights reserved. U.S. Government Users Restricted Rights - Use, duplication or disclosure restricted by GSA ADP Schedule Contract with IBM Corp. THE INFORMATION CONTAINED IN THIS PRESENTATION IS PROVIDED FOR INFORMATIONAL PURPOSES ONLY. WHILE EFFORTS WERE MADE TO VERIFY THE COMPLETENESS AND ACCURACY OF THE INFORMATION CONTAINED IN THIS PRESENTATION, IT IS PROVIDED “AS IS” WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED. IN ADDITION, THIS INFORMATION IS BASED ON IBM’S CURRENT PRODUCT PLANS AND STRATEGY, WHICH ARE SUBJECT TO CHANGE BY IBM WITHOUT NOTICE. IBM SHALL NOT BE RESPONSIBLE FOR ANY DAMAGES ARISING OUT OF THE USE OF, OR OTHERWISE RELATED TO, THIS PRESENTATION OR ANY OTHER DOCUMENTATION. NOTHING CONTAINED IN THIS PRESENTATION IS INTENDED TO, NOR SHALL HAVE THE EFFECT OF, CREATING ANY WARRANTIES OR REPRESENTATIONS FROM IBM (OR ITS SUPPLIERS OR LICENSORS), OR ALTERING THE TERMS AND CONDITIONS OF ANY AGREEMENT OR LICENSE GOVERNING THE USE OF IBM PRODUCTS AND/OR SOFTWARE. IBM, the IBM logo, ibm.com, IMS, and z/OS are trademarks or registered trademarks of International Business Machines Corporation in the United States, other countries, or both. If these and other IBM trademarked terms are marked on their first occurrence in this information with a trademark symbol (® or ™), these symbols indicate U.S. registered or common law trademarks owned by IBM at the time this information was published. Such trademarks may also be registered or common law trademarks in other countries. A current list of IBM trademarks is available on the Web at “Copyright and trademark information” at www.ibm.com/legal/copytrade.shtml Disclaimer
  • 3. © 2014 IBM Corporation Agenda • User interface strategy • Integrated Eclipse environment for IMS development, testing, and debugging IMS Explorer for Development Rational Developer for System z IMS Batch Terminal Simulator Eclipse interface Debug Tool for z/OS • Demo • Q&A 3
  • 4. © 2014 IBM Corporation IBM IMS User Interface Strategy 4 Eclipse (development) Web browser (administration) TCP/IP ISPF AdministratorsDevelopers
  • 5. © 2014 IBM Corporation5 Integrated Eclipse Environment for IMS Development, Testing, and Debugging Visualize databases Define queries Code + Build Unit test Debug IMS Explorer for Development IMS Explorer for Development Debug Tool for z/OS IMS Batch Terminal Simulator Rational Developer for System z
  • 6. © 2014 IBM Corporation6 • Visualize and change IMS database (DBDs) and program definition sources (PSBs) – View IMS database hierarchical structures – View, create, and edit PSBs – Change/add fields in DBDs – Import COBOL copybooks and PL/I structures to a database segment – Generate DBD source and PSB source • IMS Catalog Navigation (V12 or later) • Access IMS data using SQL statements – Leverage IMS V13 Universal JDBC driver • Connect to the z/OS system – Browse data sets – Submit JCL and inspect the output in JES – Import and export DBD and PSB source files from a data set to the IMS Explorer, and vice-versa IMS Explorer for Development
  • 7. © 2014 IBM Corporation7 IMS Explorer for Development Logical relationship between databases Logical relationship between databases Additional properties of a segment or field Additional properties of a segment or field
  • 8. © 2014 IBM Corporation8 IMS Explorer
  • 9. © 2014 IBM Corporation9 Integrated Eclipse Environment for IMS Development, Testing, and Debugging Visualize databases Define queries Code + Build Unit test Debug IMS Explorer for Development IMS Explorer for Development Debug Tool for z/OS IMS Batch Terminal Simulator Rational Developer for System z
  • 10. © 2014 IBM Corporation Integrated Eclipse Environment for IMS Development, Testing, and Debugging 10 Remote zOS JES MVS files TSO Emulator Remote zOS JES MVS files TSO Emulator Program outline Program outline Errors and warnings Errors and warnings Remote editing, Syntax highlighting / checking Remote editing, Syntax highlighting / checking DebugDebug TestTest Remote compile, link Remote compile, link
  • 11. © 2014 IBM Corporation The Debug Tool for z/OS • Interactive debugging for applications • Multiple languages: – COBOL, PL/I, C/C++, Assembler • Multiple z/OS environments – Batch, TSO, CICS, IMS/TM, DB2 stored procedures, – Websphere application server, Unix system services • GUI Eclipse plug-in at no additional cost!
  • 12. © 2014 IBM Corporation Tool for Unit Testing and Debugging IMS applications Runs in TSO, IMS Batch (DL/I DBB) or IMS Online (BMP/JBP) Simulates IMS DC calls Unit / Function Test System Test / Production IMS App Database BTS DD Card MFS Terminal BTSIN Driven through BTSIN control statements or interactive full screen TSO simulation Playback utility Generates BTSIN with the corresponding MFS associated with the MOD name from IMS transaction log records ('01'X, '03'X). Prints containing screen images of transactions including data, USER/LTERM identification, time by extracting from BTSOUT 12 IMS Batch Terminal Simulator Modernization
  • 13. © 2014 IBM Corporation BTS V4: What’s new in base BTS • Supports IMS callout (ICAL) under BMP and JBP regions • Supports for variable-length BTSIN data sets • Provides new reporting features for improved analysis and prediction of performance behavior • APPLFE support
  • 14. © 2014 IBM Corporation ICAL support • Supports IMS callout (ICAL) under BMP and JBP regions – ICAL call enables an application program to send a synchronous request to a non-IMS program or a service that runs in a z/OS or distributed environment – Request and response areas on ICAL call are traced **** AIB CALL- FUNC=ICAL, RETURN CODE=0000, REASON CODE=0000 -AIB ICAL 0000 ----.----1----.----2----.----3----.----4----.----5----.----6----.----7----.----8----.----9----.---10 AIB=DFSAIB SENDRECVIVPDTOB4 CCECCC440000ECDCDCCECEDCEDCF000000000000000000030003002100000000000000000000000000000000000000000000 4621920000182554953595743624000000000000000000020002007000000000000000000000000000000000000000000000 0000000000000000000000000000 0000000000000000000000000000 REQUEST= MESSAGE1 4DCEECCCF44444444444444444444444444444444444444444 04522175100000000000000000000000000000000000000000 RESPONSE=HELLO FROM WEBSPHERE MDB CCDDD4CDDD4ECCEDCCDC4DCC44444444444444444444444444 85336069640652278595044200000000000000000000000000
  • 15. © 2014 IBM Corporation Variable-length BTSIN • Supports for variable-length BTSIN data sets – A whole data in a record is handled as a command or a transaction data without any continuation non-blank characters though a non-blank character in column 72 indicates continuation in a fixed format – A developer/tester can simulate input coming from a mid tier application using this BTSIN without worrying about existing 80 byte length limit – The record length in a variable format can be from 5 to 32756
  • 16. © 2014 IBM Corporation Report enhancements - Single output line per call • New reporting feature by ./O DB=S MSG=S command (new suboption S) for putting single output line per MSG or DB call without detail information (Key feedback area, I/O area etc.) to BTSOUT. BTS0006I TRANSACTION STARTED: PART . MBR=DFSSAM02 PSB=DFSSAM02 EDIT= SPA=0 PLC=1 LANG=CBL TYPE=MSG **** MSG CALL- FUNC=GU , PCB=IOPCB , STATUS= , MESSAGE NUMBER=000001 LENGTH=000018, PCBN=001 -MSG ****** DB CALL- FUNC=GU , PCB=DI21PART, STATUS= , LEVEL=01, SEGMENT=PARTROOT IOLENGTH=000050, PCBN=002 -DB ****** DB CALL- FUNC=GN , PCB=DI21PART, STATUS= , LEVEL=02, SEGMENT=STANINFO IOLENGTH=000085, PCBN=002 -DB **** MSG CALL- FUNC=ISRT, PCB=IOPCB , STATUS= , MESSAGE NUMBER=000001 LENGTH=000067, PCBN=001 -MSG **** MSG CALL- FUNC=ISRT, PCB=IOPCB , STATUS= , MESSAGE NUMBER=000001 LENGTH=000081, PCBN=001 -MSG BTS0020I STATISTICS REPORT FOR TRANSACTION:PART . PCBNAME GU GN GNP GHU GHN GHNP ISRT PURG REPL DLET DEQ CHKP LOG STAT XRST CHNG ROLB OPEN CLSE OTHR IOPCB 1 2 DI21PART 1 1 //G.BTSIN DD * ./T TC=PART LANG=CBL MBR=DFSSAM02 ./T TC=DSPINV LANG=CBL MBR=DFSSAM03 ./O MSG=S DB=S PART AN960C10$ DSPINV AN960C10,28009126$ DSPINV AB960C10,8009126A$ /*
  • 17. © 2014 IBM Corporation Report enhancements - Elapsed time per call • New reporting feature by ./O ELAPTIME command for improved and expanded display of application results for performance projections ****** DB CALL- FUNC=GU , PCB=DI21PART, STATUS= , LEVEL=01, SEGMENT=PARTROOT IOLENGTH=000050, PCBN=002 -DB- ELAPSED SEC=0.274668 KFB=02AN960C10 FFCDFFFCFF4444444 02159603100000000 SSA1=PARTROOT(PARTKEY =02AN960C10 ) DCDEDDDE4DCDEDCE447FFCDFFFCFF44444445 71939663D719325800E02159603100000000D ----.----1----.----2----.----3----.----4----.----5----.----6----.----7----.----8----.----9----.---10 IOAREA=02AN960C10 WASHER FFCDFFFCFF4444444444444444ECECCD444444444444444444 02159603100000000000000000612859000000000700000000 ****** DB CALL- FUNC=GN , PCB=DI21PART, STATUS= , LEVEL=02, SEGMENT=STANINFO IOLENGTH=000085, PCBN=002 -DB- ELAPSED SEC=0.000013 KFB=02AN960C10 02 FFCDFFFCFF4444444FF 0215960310000000002 ..... //G.BTSIN DD * ./T TC=PART LANG=CBL MBR=DFSSAM02 ./T TC=DSPINV LANG=CBL MBR=DFSSAM03 ./O ELAPTIME=YES PART AN960C10$ DSPINV AN960C10,28009126$ DSPINV AB960C10,8009126A$ /*
  • 18. © 2014 IBM Corporation Report enhancements - New report function • Adds new summary reports (program analysis statistics) by ./O REPORT command to better facilitate BTS as a regression test analysis tool – by PCB total – by function code – by function code and segment name – by status code – by ICAL OTMA descriptor – by SQL statement – by MQI function //G.BTSIN DD * ./T TC=PART LANG=CBL MBR=DFSSAM02 ./T TC=DSPINV LANG=CBL MBR=DFSSAM03 ./O REPORT=YES PART AN960C10$ DSPINV AN960C10,28009126$ DSPINV AB960C10,8009126A$ /*
  • 19. © 2014 IBM Corporation Report enhancements - New report function.. • Program analysis statistics by PCB total PROGRAM ANALYSIS STATISTICS BY PCB TOTAL FOR TRANSACTION: PART MBR=DFSSAM02 PSB=DFSSAM02 FROM 2011/06/29 12:43:39 FOR 0.348386SEC PCBNAME FUNC LVL SEGNAME SC CALLS MAX-ELAPS-SEC AVG-ELAPS-SEC IOPCB ** TOTAL 3 0.000046 0.000016 DI21PART ** TOTAL 2 0.275534 0.137773 ------------------------------------------------------------------ ** TOTAL 5 0.275534 0.055119 PROGRAM ANALYSIS STATISTICS BY FUNCTION CODE FOR TRANSACTION: PART MBR=DFSSAM02 PSB=DFSSAM02 FROM 2011/06/29 12:43:39 FOR 0.348386SEC PCBNAME FUNC LVL SEGNAME SC CALLS MAX-ELAPS-SEC AVG-ELAPS-SEC IOPCB GU 1 0.000046 0.000046 ISRT 2 0.000002 0.000001 IOPCB ** TOTAL 3 0.000046 0.000016 DI21PART GU 1 0.275534 0.275534 GN 1 0.000013 0.000013 DI21PART ** TOTAL 2 0.275534 0.137773 ------------------------------------------------------------------ ** TOTAL 5 0.275534 0.055119 ./O REPORT=T or Y ./O REPORT=F or Y• Program analysis statistics by function code
  • 20. © 2014 IBM Corporation Report enhancements - New report function… • Program analysis statistics by function code and segment name • Program analysis statistics by status code PROGRAM ANALYSIS STATISTICS BY FUNCTION-SEGNAME FOR TRANSACTION: PART MBR=DFSSAM02 PSB=DFSSAM02 FROM 2011/06/29 12:43:39 FOR 0.348386SEC PCBNAME FUNC LVL SEGNAME SC CALLS MAX-ELAPS-SEC AVG-ELAPS-SEC IOPCB GU 1 0.000046 0.000046 ISRT 2 0.000002 0.000001 IOPCB ** TOTAL 3 0.000046 0.000016 DI21PART GU 01 PARTROOT 1 0.275534 0.275534 GN 02 STANINFO 1 0.000013 0.000013 DI21PART ** TOTAL 2 0.275534 0.137773 ------------------------------------------------------------------ ** TOTAL 5 0.275534 0.055119 PROGRAM ANALYSIS STATISTICS BY STATUS CODE FOR TRANSACTION: PART MBR=DFSSAM02 PSB=DFSSAM02 FROM 2011/06/29 12:43:39 FOR 0.348386SEC SC PCBNAME CALLS MAX-ELAPS-SEC AVG-ELAPS-SEC IOPCB 3 0.000046 0.000016 DI21PART 2 0.275534 0.137773 ---------------------------------------------- ** TOTAL 5 0.275534 0.055119 ./O REPORT=C or Y ./O REPORT=G or Y
  • 21. © 2014 IBM Corporation Report enhancements - New report function.. • Program analysis statistics by ICAL OTMA descriptor ROGRAM ANALYSIS STATISTICS BY ICAL OTMA DESCRIPTOR FOR TRANSACTION: ICALCBL MBR=SSBICAL PSB=DFSSAM02 FROM 2011/06/27 14:15:51 FOR 0.208677SEC ICAL-OTMA-DESCRIPTOR CALLS WARNS ERRORS MAX-ELAPS-SEC AVG-ELAPS-SEC IVPDTOB4 7 1 4 0.047512 0.019893 #INVALID 1 0 1 0.000054 0.000054 -------------------------------------------------------------------- ** TOTAL 8 1 5 0.047512 0.017413 ./O REPORT=I or Y
  • 22. © 2014 IBM Corporation Report enhancements - New report function.. • Program analysis statistics by SQL statement PROGRAM ANALYSIS STATISTICS BY SQL STATEMENT FOR TRANSACTION: REPOSQL MBR=SSASQL PSB=DFSSAM02 FROM 2011/06/27 15:44:07 FOR 1.742729SEC SQL-STATEMENT CALLS WARNS ERRORS MAX-ELAPS-SEC AVG-ELAPS-SEC OPEN 1 0 0 0.000998 0.000998 CLOSE 1 0 0 0.000014 0.000014 SELECT 3 0 0 0.001495 0.001312 FETCH 1 0 0 0.000025 0.000025 INSERT 2 0 0 0.006540 0.003832 DELETE 0 0 0 0.000000 0.000000 UPDATE 1 0 0 0.002153 0.002153 PREPARE 0 0 0 0.000000 0.000000 DESCRIBE 0 0 0 0.000000 0.000000 EXECUTE 0 0 0 0.000000 0.000000 EXECUTE IMMEDIATE 0 0 0 0.000000 0.000000 OTHER 7 0 0 0.782744 0.153567 -------------------------------------------------------------------- ** TOTAL 16 0 0 0.782744 0.068110 ./O REPORT=S or Y
  • 23. © 2014 IBM Corporation Report enhancements - New report function.. • Program analysis statistics by MQI function PROGRAM ANALYSIS STATISTICS BY MQI FUNCTION FOR TRANSACTION: MQREPORT MBR=SSAMQI PSB=DFSSAM02 FROM 2011/06/29 15:08:14 FOR 0.275878SEC MQI-FUNCTION CALLS WARNS ERRORS MAX-ELAPS-SEC AVG-ELAPS-SEC MQCONN 1 0 0 0.050573 0.050573 MQDISC 1 0 0 0.014761 0.014761 MQOPEN 1 0 0 0.008358 0.008358 MQCLOSE 1 0 0 0.007690 0.007690 MQGET 5 0 1 0.018390 0.012261 MQPUT 2 0 0 0.022744 0.022310 MQPUT1 2 0 0 0.007415 0.007391 MQINQ 1 0 0 0.007277 0.007277 MQSET 1 0 0 0.008225 0.008225 MQCMIT 1 0 0 0.009272 0.009272 MQBACK 1 0 0 0.007621 0.007621 MQCONNX 0 0 0 0.000000 0.000000 MQSUB 0 0 0 0.000000 0.000000 MQSUBRQ 0 0 0 0.000000 0.000000 MQSTAT 0 0 0 0.000000 0.000000 OTHER 0 0 0 0.000000 0.000000 -------------------------------------------------------------------- ** TOTAL 17 0 1 0.050573 0.013793 ./O REPORT=M or Y
  • 24. © 2014 IBM Corporation APPLFE support provided by PM52131 • BTS V4 APPLFE support (FITS MR0215112747) – Supports APPLFE that is originally a parameter for MPR an application front-end routine that is called when a message processing program (MPP) is scheduled in a message processing region (MPR) //MPP EXEC DFSMPR,APPLFE=YYYY,… MPR region JCL Initialize: load & call YYYY MPP schedule: call YYYY call DFSSAM03 Terminate: call YYYY //G.BTSIN DD * ./E APPLFE=YYYY ./T TC=DSPINV LANG=CBL MBR=DFSSAM03 DSPINV AN960C10,28009126$ /* BTS (BTSIN) load &call YYYY (for init) call YYYY (for schedule) load&call DFSSAM03 call YYYY (for terminate) MPR flow BTS flow New keyword
  • 25. © 2014 IBM Corporation IMS Batch Terminal Simulator Modernization 25 Unit / Function Test System Test / Production IMS App Database O T M A IMS Connect DAI BTS EclipseBrings IMS App Dev / Test to Desktop RDz Integration Debug Tool Integration Supports end-to-end testing driven by distributed client side app Supports low cost host simulation for client app development / test Utilizes IMS Tools Distributed Access Infrastructure (DAI) as a TCP endpoint WAS App IMS TM RA BTS TM RA DD Card MFS Terminal BTSIN
  • 26. © 2014 IBM Corporation Application Development Modernization with BTS XML System Programmer defines common datasets, attributes, etc (similar to PROC) and exports BTS Runtime as XML Developers import XML and use it to create a Launch Configuration… to test applications DAI BTS BTS BTS WAS App BTS TM RA XML Export Launch Configuration as XML for BTSRA 1 2 3 26
  • 27. © 2014 IBM Corporation27 BTS / RDz / Debug Tool
  • 28. © 2014 IBM Corporation Questions? • Thank you! • Feel free to contact me: – Chris Holtz, IMz Tools Modernization Architect holtz@us.ibm.com 28
  • 29. © 2014 IBM Corporation29 Back-up
  • 30. © 2014 IBM Corporation IMS Explorer for Development View physical IMS database structure 30 Logical relationship between databases Logical relationship between databases Additional properties of a segment or field Additional properties of a segment or field
  • 31. © 2014 IBM Corporation IMS Explorer for Development View logical IMS database structure 31 A concatenated segment and its underlying source segments A concatenated segment and its underlying source segments
  • 32. © 2014 IBM Corporation IMS Explorer for Development Build PCB definition 32 Point and click to select SENSEGs Point and click to select SENSEGs Generated PSB source Generated PSB source
  • 33. © 2014 IBM Corporation IMS Explorer for Development Query IMS databases 33 Create a new connection Create a new connection IMS Connect address and port IMS Connect address and port Point to an IMS Explorer project and PSB to connect to the IMS database Point to an IMS Explorer project and PSB to connect to the IMS database
  • 34. © 2014 IBM Corporation34 IMS Explorer for Development Query IMS databases (Continued) Create SQL scripts with Select, Update, Delete, and Insert statements Create SQL scripts with Select, Update, Delete, and Insert statements Build a SQL statement using the SQL Builder with content assistance Build a SQL statement using the SQL Builder with content assistance View the SQL results View the SQL results PSB = schema PSB = schema DB PCB = database DB PCB = database Database segments = tables Database segments = tables
  • 35. © 2014 IBM Corporation35 IMS Explorer for Development Query IMS databases (Continued) Browse data sets Browse data sets Edit a data set member Edit a data set member View JES output View JES output
  • 36. © 2014 IBM Corporation Rational Developer for System z Remotely code and build 36 COBOL application defined with RDz Property Group for syntax highlighting and remote compile COBOL application defined with RDz Property Group for syntax highlighting and remote compile COBOL application defined with RDz Property Group for syntax highlighting and remote compile COBOL application defined with RDz Property Group for syntax highlighting and remote compile COBOL, PL/I, Assembler, Java, C/C++ COBOL, PL/I, Assembler, Java, C/C++
  • 37. © 2014 IBM Corporation IMS Batch Terminal Simulator Add BTS server 37 Servers View: Add a new BTS server Servers View: Add a new BTS server
  • 38. © 2014 IBM Corporation IMS Batch Terminal Simulator Define BTS server 38 Use the step-by- step wizard to define a new BTS configuration Use the step-by- step wizard to define a new BTS configuration
  • 39. © 2014 IBM Corporation IMS Batch Terminal Simulator Runtime configuration 39 Create a new configuration or import an existing configuration Create a new configuration or import an existing configuration
  • 40. © 2014 IBM Corporation IMS Batch Terminal Simulator Specify BTS options 40 Specify BTS options for DLI, DBB, BMP, or JBP Specify BTS options for DLI, DBB, BMP, or JBP
  • 41. © 2014 IBM Corporation IMS Batch Terminal Simulator Use embedded assistance 41 Context-sensitive Help Context-sensitive Help Field labels with equivalent BTS PROC option names Field labels with equivalent BTS PROC option names
  • 42. © 2014 IBM Corporation IMS Batch Terminal Simulator Specify libraries 42 Specify DFSRESLB, STEPLIB, PSBLIB, DBDLIB, and ACBLIB Specify DFSRESLB, STEPLIB, PSBLIB, DBDLIB, and ACBLIB
  • 43. © 2014 IBM Corporation IMS Batch Terminal Simulator Specify additional data sets 43 Specify additional data sets Specify additional data sets
  • 44. © 2014 IBM Corporation IMS Batch Terminal Simulator Create launch configuration 44 IMS Batch Terminal Simulator server IMS Batch Terminal Simulator server Next: Create a launch configuration for your program Next: Create a launch configuration for your program
  • 45. © 2014 IBM Corporation IMS Batch Terminal Simulator Select BTS server 45 Select the BTS server Select the BTS server
  • 46. © 2014 IBM Corporation IMS Batch Terminal Simulator Specify BTSIN 46 Specify BTSIN Specify BTSIN
  • 47. © 2014 IBM Corporation IMS Batch Terminal Simulator Specify program libraries 47 HOLTZ.IMS.LOAD Specify Program libraries and additional data sets Specify Program libraries and additional data sets Specify program libraries and additional data sets Specify program libraries and additional data sets HOLTZ.IMS.LOAD Specify Program libraries and additional data sets Specify Program libraries and additional data sets Specify program libraries and additional data sets Specify program libraries and additional data sets
  • 48. © 2014 IBM Corporation IMS Batch Terminal Simulator Run program 48 The BTS server has started The program now runs on z/OS in the BTS region The BTS server has started The program now runs on z/OS in the BTS region Run programRun program
  • 49. © 2014 IBM Corporation IMS Batch Terminal Simulator Examine BTS output 49 Make code changes RDz automatically compiles the code Run the program again Make code changes RDz automatically compiles the code Run the program again Examine the BTS output Examine the BTS output Examine the BTS output Examine the BTS output
  • 50. © 2014 IBM Corporation50 Debug Tool for z/OS Debug runtime configuration Specify Debug Tool data sets Specify Debug Tool data sets
  • 51. © 2014 IBM Corporation51 Debug Tool for z/OS Debug launch configuration Specify Debug Tool program libraries and additional data sets Specify Debug Tool program libraries and additional data sets Specify Debug Tool program libraries and additional data sets Specify Debug Tool program libraries and additional data sets
  • 52. © 2014 IBM Corporation52 Debug Tool for z/OS Debug and step through code Debug to step through the code Debug to step through the code