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 116701 registered members and 411722273 visits(sessions) since May 2003

The newest registered member is richards120388

Our users have posted a total of 311655 articles within 54871 topics

[ View Members ]

Forum: Recent Posts

» SYNCSORT
Setting RC using NULLOFL/NOTMTOFL for empty,input condition
by kris_madras

» DFSORT/ICETOOL
Sort card to know that creation date of gdg file
by Joerg.Findeisen

» DFSORT/ICETOOL
Section within Section Reporting
by MichelleSpeer

» DB2
SAVEPOINT ON ROLLBACK RETAIN CURSORS issue
by cgilker

» CICS
Old SDFHCOB Copybook
by jlatus11

» PL/I & Assembler
Is there a way to turn off the free=close bit
by sergeyken

» DFSORT/ICETOOL
Convert CSV to flat file.
by chillmo

» SYNCSORT
Create a specific record/file based on 5 DB2 table files
by chillmo

» Mainframe Jobs
IPL z/OS 1.13 from IBM Z13 Machine
by Robert Sample

» CICS
Starting a CICS Transaction from a Threadsafe Program
by Michael Kehoe

» Compuware & Other Tools
Writing next records after a match and repeat
by Joerg.Findeisen

» JCL & VSAM
c all command
by Joerg.Findeisen

» JCL & VSAM
Use of PARM=JPn,&Name
by Joerg.Findeisen

» PL/I & Assembler
Message Security Assist extension 7 availability
by Pedro

» CLIST & REXX
Rexx to read current Panvalet editor/view session
by V S Amarendra Reddy

» SYNCSORT
Need assistance with PUSH.
by Joerg.Findeisen

» All Other Mainframe Topics
using symbolics in the destination file name of FTP
by gpnavinkumar

» DB2
Dynamically build unload and load statements.
by sergeyken

» JCL & VSAM
variable in library name within a PROC.
by Jordi Bornay

» All Other Mainframe Topics
Using symbolics in FTP
by Rohit Umarjikar

[ Site Map ]

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