IBM Mainframe Sample Programs

Where to Go?

Mainframe Forum

Mainframe Wiki

Quick References

Free Downloads

Sample JCLs

Job Openings

Interview Questions

[ Site Map ]

Member: Login

Username:

Password:

Remember me

[Forget Password?]

NewUser: Register

User name:

E-Mail:

Password:

Password (again):

[ New User SignUp ]

IBM Mainframes - Sample Application programs

Sample Mainframe Programs

This page contains Sample Programs, algorithms & data Structures, predefined functions, File and database manipulation, Online data access etc...

Here you can find sample COBOL and CICS Programs like Y2K Problem solving, 4 digit year conversion, world time calculator, date to day, Prime number generation, pseudo conversation, SORT & Merge, Stack & Queue, Pseudo number generation etc...

Programming Language: COBOL

SOLVING Y2K PROBLEM WITHOUT USING INTRINSIC FUNCTIONS

COBOL ERROR DESCRIPTOR COPY LIBRARY

COBOL 4 DIGIT SYSTEM YEAR FINDER (YY to YYYY)

DAY FINDER (Return SUN/MON upto 9999/12/31 )

WORLD TIME CALCULATOR (world time for INDIAN time)

CONVERT GREGORIAN DATE TO JULIAN DATE

SORTING A TABLE - A GENERIC ALGORITHM

SEARCHING A MULTI DIM TABLE FOR ALL ELEMENTS

FINDING THE RUN TIME SIZE OF A VARIABLE LENGTH TABLE

CIRCULAR QUEUE IN COBOL

STACK DATA STRUCTURE IN COBOL

QUINE PROGRAM IN COBOL

ALL PRIME FACTORS FINDER ROUTINE

ALL PSEUDO RANDOM NUMBERS GENERATOR ROUTINE

PS/QSAM/SEQUENTIAL FILE MANIPULATION

VSAM-ESDS/SEQUENTIAL FILE MANIPULATION

VSAM-RRDS/RELATIVE FILE MANIPULATION

VSAM-KSDS/INDEXED FILE MANIPULATION

Note: Links automatically open in new window. Do not Right click!

Programming Language: CICS

SAMPLE HELLO WORLD PROGRAM IN CICS

VSAM/ESDS FILE MANIPULATION IN CICS

VSAM/RRDS FILE MANIPULATION IN CICS

VSAM/KSDS FILE MANIPULATION IN CICS

TSQ FILE MANIPULATION IN CICS

TDQ FILE MANIPULATION IN CICS

DISPLAYING ALL RECORDS IN ONE SCREEN DYNAMIC MULTIPAGE

MORE PSEUDO CONVERSATION IN ONE PROGRAM

SENDING ONLY THE SELECTED FIELDS FROM A MAP

ALL IN ONE CICS PROGRAM

Note: Links automatically open in new window. Do not Right click!

Site Statistics

We have 116535 registered members and 387555527 visits(sessions) since May 2003

The newest registered member is SHRUTI DHARMADHIKARI

Our users have posted a total of 311247 articles within 54793 topics

[ View Members ]

Forum: Recent Posts

» DFSORT/ICETOOL
combine multiple unique records into a single record
by jimsnow

» DFSORT/ICETOOL
Join multiple records using splice
by jimsnow

» CICS
omegamon for cics -UNSUPPORTED ENVIRONMENT- message
by Pedro

» DFSORT/ICETOOL
GDG generation name to GDG Base name conversion using SORT
by justjpr

» JCL & VSAM
Difference between joblib and steplib
by Joerg.Findeisen

» DFSORT/ICETOOL
SORT on detail record, then repeat header with correct batch
by Aditya.Srivastava

» DFSORT/ICETOOL
Date format correction using dfsort
by Joerg.Findeisen

» CLIST & REXX
Starting a PROC with parameters from an ISREDIT maro
by Willy Jensen

» DFSORT/ICETOOL
FB to .CSV conversion using sort
by sergeyken

» CICS
How to Login in to cics region and issue command on CICS.
by Willy Jensen

» CLIST & REXX
Help needed in automation cics transaction command in rexx
by Pedro

» All Other Mainframe Topics
batch SFTP job using AOPBATCH unable to write to MVS dataset
by sergeyken

» DFSORT/ICETOOL
Repeat n times by substuting SEQNUM in CBL CPY variables set
by prino

» DFSORT/ICETOOL
Replacing FILLER with FILLER<SeqNum> in COBOL Copybook
by justjpr

» TSO/ISPF
System add a USER parm when job submits via FTP
by Pedro

» DFSORT/ICETOOL
SORT CARD meaning please
by sergeyken

» DFSORT/ICETOOL
how to complete the end of a record with spaces
by PUMA

» SYNCSORT
SYNCSORT-DB2 interface
by sergeyken

» Compuware & Other Tools
Search two or more word with FILEAID
by Jim Evans

» CICS
Passing containers on START command
by danik56

[ Site Map ]

IBMMainframes.com is not an official and/or affiliated with IBM^® in anyway
About Us \| Trademarks \| Terms of Use \| Contact Us