CARDDEMO -- Mainframe Card Demo Application

• CARDDEMO -- Mainframe Card Demo Application
• Description
• Technologies used
• Installation on the mainframe
• Application Details
  • User Functions
  • Admin Functions
  • Application Inventory
    • Online
    • Batch
  • Application Screens
    • Signon Screen
    • Main Menu
    • Admin Menu
• Support
• Roadmap
• Contributing
• License
• Project status

Description

Card Demo is a Mainframe application designed and developed to test and showcase AWS and partner technology for mainframe migration and modernization use-cases such as discovery, migration, modernization, performance test, augmentation, service enablement, service extraction, test creation, test harness, etc.

Note that the intent of this application is to provide mainframe coding scenarios to exercise analysis, transformation and migration tooling. So, the coding style is not uniform across the application

Technologies used

1. COBOL
2. CICS
3. VSAM
4. JCL
5. RACF

Installation on the mainframe

To install this repository on the mainframe please follow the following steps

1. Clone this repository to your local development environment

2. Create datasets on the mainframe hold the code

   • It is recommended to group them under a High Level Qualifier (HLQ)for all your datasets.

   • Upload the following application source folders from the main branch of git repository on to your mainframe using $INDFILE or your preferred upload tool.

   • If you have used AWS.M2 as your HLQ, you should end up with the below code structure on the mainframe

     HLQ	Name	Format	Length
     AWS.M2	CARDDEMO.JCL	FB	80
     AWS.M2	CARDDEMO.PROC	FB	80
     AWS.M2	CARDDEMO.CBL	FB	80
     AWS.M2	CARDDEMO.CPY	FB	80
     AWS.M2	CARDDEMO.BMS	FB	80

3. Use data for testing using either of the below approaches

   ** Use the supplied sample data**

   • Upload the sample data provided in the main/-/data/EBCDIC/ folder to the mainframe. Ensure that you use transfer mode binary

     Dataset name	Name	Format	Length	Name of equivalent ascii file
     AWS.M2.CARDDEMO.USRSEC.PS	User Security file	FB	80
     AWS.M2.CARDDEMO.ACCTDATA.PS	Account Data	FB	300	acctdata.txt
     AWS.M2.CARDDEMO.CARDDATA.PS	Card Data	FB	150	carddata.txt
     AWS.M2.CARDDEMO.CUSTDATA.PS	Customer Data	FB	500	custdata.txt
     AWS.M2.CARDDEMO.CARDXREF.PS	Customer Account Card Cross reference	FB	50	cardxref.txt
     AWS.M2.CARDDEMO.DALYTRAN.PS.INIT	Transaction database initialization record	FB	350
     AWS.M2.CARDDEMO.DALYTRAN.PS	Transaction data which has to go through posting	FB	350	dailytran.txt
     AWS.M2.CARDDEMO.DISCGRP.PS	Disclosure Groups	FB	50	discgrp.txt
     AWS.M2.CARDDEMO.TRANCATG.PS	Transaction categories	FB	60	trancatg.txt
     AWS.M2.CARDDEMO.TRANTYPE.PS	Transaction Types	FB	60	trantype.txt
     AWS.M2.CARDDEMO.TCATBALF.PS	Transaction Category Balance	FB	50	tcatbal.txt

   • Execute the following JCLs in order

     Jobname	What it does
     DUSRSECJ	Sets up user security vsam file
     CLOSEFIL	Closes files opened by CICS
     ACCTFILE	Loads Account database using sample data
     CARDFILE	Loads Card database with credit card sample data
     CUSTFILE	Creates customer database
     XREFFILE	Loads Customer Card account cross reference to VSAM
     TRANFILE	Copies initial Trasaction file to VSAM
     DISCGRP	Copies initial Disclosure Group file to VSAM
     TCATBALF	Copies initial TCATBALF file to VSAM
     TRANCATG	Copies initial transaction category file to VSAM
     TRANTYPE	Copies initial transaction type file
     OPENFIL	Makes files available to CICS
     DEFGDGB	Defines GDG Base

4. Compile the Programs.

   You should use the compile process followed by your mainframe shopfloor

   We have however provided some sample JCLs in UTIL folders in git to help you craft the JCL

5. Create resources in the CARDDEMO group in CICS

   You have 2 options

   Be sure to edit the HLQs in the below documents as required before you do the definition

   • (Preferred) . Use the DFHCSDUP JCL that the resources required by the application

     The resources required are in the CSD file provided in the CSD folder

     • Group CARDDEMO
     • Mapsets
     • Transactions
     • Maps
     • Files

   • Use the CEDA transaction to execute the commands in the above listing

     • Define group

       DEFINE LIBRARY(COM2DOLL) GROUP(CARDDEMO) DSNAME01(&HLQ..LOADLIB)

     • Define Mapsets, Maps , Programs and Files

       Sample CEDA commands

       DEF PROGRAM(COCRDLIC) GROUP(CARDDEMO)
       DEF MAPSET(COCRDLI) GROUP(CARDDEMO)
       DEFINE PROGRAM(COSGN00C) GROUP(CARDDEMO) DA(ANY) TRANSID(CC00) DESCRIPTION(LOGIN)
       DEFINE TRANSACTION(CC00) GROUP(CARDDEMO) PROGRAM(COSGN00C) TASKDATAL(ANY)

   • Install /Load the online resources to your CICS region

     CEDA INSTALL TRANS(CCLI) GROUP(CARDDEMO)
     CEDA INSTALL FILE(CARDDAT) GROUP(CARDDEMO)
     CECI LOAD PROG(COCRDUP)
     CECI LOAD PROG(COCRDUPC)

   • Execute a NEWCOPY of mapsets and maps

     CEMT SET PROG(COCRDUP) NEWCOPY
     CEMT SET PROG(COCRDUPC) NEWCOPY  

6. Enjoy the demo

   • For online functions : Start the credit card demo application using the CC00 transaction
   • For running batch : Use the JCLs described in the JCL dataset

Running full batch

• Execute the following JCLs in order

  Jobname	What it does
  CLOSEFIL	Closes files opened by CICS
  ACCTFILE	Loads Account database using sample data
  CARDFILE	Loads Card database with credit card sample data
  XREFFILE	Loads Customer Card account cross reference to VSAM
  CUSTFILE	Creates customer database
  TRANBKP	Creates Transaction database
  DISCGRP	Copies initial disclosure Group file to VSAM
  TCATBALF	Copies initial TCATBALF file to VSAM
  TRANTYPE	Copies initial transaction type file
  DUSRSECJ	Sets up user security vsam file
  POSTTRAN	Core processing job
  INTCALC	Run interest calculations
  TRANBKP	Backup Transaction database
  COMBTRAN	Combine system transactions with daily ones
  TRANIDX	Define alternate index on transaction file
  OPENFIL	Makes files available to CICS

Application Details

The CardDemo is a Credit Card management application, built primarily using COBOL programming language. The application has various functions that allow users to manage Account, Credit card, Transaction and Bill payment.

There are 2 types of users:

• Regular User
• Admin User

The Regular user can perform the user functions and the Admin users can only perform Admin functions.

User Functions

Admin Functions

Application Inventory

Online

Transaction		BMS Map	Program	Function
CC00		COSGN00	COSGN00C	Signon Screen
CM00		COMEN01	COMEN01C	Main Menu
	CAVW	COACTVW	COACTVWC	Account View
	CAUP	COACTUP	COACTUPC	Account Update
	CCLI	COCRDLI	COCRDLIC	Credit Card List
	CCDL	COCRDSL	COCRDSLC	Credit Card View
	CCUP	COCRDUP	COCRDUPC	Credit Card Update
	CT00	COTRN00	COTRN00C	Transaction List
	CT01	COTRN01	COTRN01C	Transaction View
	CT02	COTRN02	COTRN02C	Transaction Add
	CR00	CORPT00	CORPT00C	Transaction Reports
	CB00	COBIL00	COBIL00C	Bill Payment
CA00		COADM01	COADM01C	Admin Menu
	CU00	COUSR00	COUSR00C	List Users
	CU01	COUSR01	COUSR01C	Add User
	CU02	COUSR02	COUSR02C	Update User
	CU03	COUSR03	COUSR03C	Delete User

Batch

Job	Program	Function
CBTRNLDJ	CBTRNLDC	Load Transactions
CBTRNRPJ	CBTRNRPC	Reports
ACCTFILE	IDCAMS	Refresh Account Master
CARDFILE	IDCAMS	Refresh Card Master
XREFFILE	IDCAMS	Account, Card and Customer cross reference
CLOSEFIL	IEFBR14	Close VSAM files in CICS
TCATBALF	IDCAMS	Refresh Transaction Category Balance
TRANBKP	IDCAMS	Refresh Transaction Master
POSTTRAN	CBTRN02C	Transaction processing job
TRANIDX	IDCAMS	Define AIX for transaction file
OPENFIL	IEFBR14	Open files in CICS
INTCALC	CBACT04C	Run interest calculations
COMBTRAN	SORT	Combine transaction files

Application Screens

Signon Screen

Main Menu

Admin Menu

Support

If you have questions or requests for improvement please raise a ticket .... TBD

Roadmap

The following features are planned for upcoming releases

1. More database types

   1. Relational database usage : Db2

   2. Hierachical database calls : IMS

2. Integration

   • ftp, sftp

   • Message queue integration

   • Exposure of transactions for distributed application integration

Contributing

We are looking forward to receiving contributions and enhancements to this initial codebase from the mainframe code base

Feel free to raise issues, create code and raise merge requests for enhancements so that we can build out this application as a resource for programmers wanting to understand and modernize their mainframes.

License

This is intended to be a community resource and it is released under the Apache 2.0 license.

Project status

We are planning a v2 of this application in October 2022.

Watch this space for updates