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

The newest registered member is Residentalien

Our users have posted a total of 304409 articles within 53625 topics

[ View Members ]

Forum: Recent Posts

» CLIST & REXX
Unable to retrieve Datasets Names using LMDLIST
by hankoerlemans

» DB2
Cobol-db2 : SQL query is running for long time
by Rohit Umarjikar

» DFSORT/ICETOOL
Get two files from one file with diffrent sorted
by sergeyken

» CLIST & REXX
REXX allocated datasets in JCL
by Mahsa Rouzkhatouni

» JCL & VSAM
View GDG data which is copied from a PS File
by Rohit Umarjikar

» TSO/ISPF
TSO ISRDDN
by mari_m

» CLIST & REXX
getting RC=3650 when invoking REXX with JCL
by enrico-sorichetti

» DFSORT/ICETOOL
Extract 2 more lines below line that matches condition
by Rohit Umarjikar

» All Other Mainframe Topics
OMVS Shell Script not working properly.
by enrico-sorichetti

» All Other Mainframe Topics
MUSIC/SP Customization
by wolftown0907

» DFSORT/ICETOOL
Build two or more rows given some condition
by sergeyken

» DFSORT/ICETOOL
How to read unpacked field created in file by PLI
by sergeyken

» JCL & VSAM
JCL (SET) variables in input stream data
by sergeyken

» PL/I & Assembler
Assembler test under mask question
by jackzhang75

» DFSORT/ICETOOL
How to add 2 digits to COMP-3 file?
by Ali_gezer

» DFSORT/ICETOOL
New DFSORT V2R1 (z/OS 2.1)
by Rohit Umarjikar

» DB2
Reading subsequent rows in a query.
by Rohit Umarjikar

» JCL & VSAM
Add column to existing records using alternate index
by Rohit Umarjikar

» JCL & VSAM
Issue with CR+ catalog backup job.
by Willy Jensen

» JCL & VSAM
FTP - connect with certificate, no password
by enrico-sorichetti

[ Site Map ]

© 2003-2021 IBM MAINFRAMES Research & Development Division
About Us \| Trademarks \| Terms of Use \| Contact Us