IBM Mainframe Computer
 
Log In
 
IBM Mainframe Home Mainframe Downloads IBM Manuals Mainframe Forum
 
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 116301 registered members and 371507082 visits(sessions) since May 2003

The newest registered member is mgunning

Our users have posted a total of 310557 articles within 54665 topics
 
[ View Members ]
Forum: Recent Posts
» All Other Mainframe Topics
SFTP Issue - destination file record ending with Junk # char
by shalva.krish

» DB2
Load new table with Old unload - DB2
by Pete Wilson

» DB2
To get the count of rows for every 1 hour of timestamp range
by Chidane

» DB2
Error when install DB2
by Pedro

» Mainframe Jobs
Mainframe openings in Techmahnidra for Mumbai location
by rajendra05

» CICS
Duplicate transid's declared using CEDA
by DONNA GRAVES

» DFSORT/ICETOOL
Modifying Date Format Using DFSORT
by cravisankar

» CLIST & REXX
isfline didnt work in rexx at z/OS version 2.1
by Pedro

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

» CLIST & REXX
run rexx code with jcl
by Pedro

» IBM Tools
DSNTIAUL driven delete
by jzhardy

» JCL & VSAM
Saving the JEM/JSCAN output
by Joerg.Findeisen

» DFSORT/ICETOOL
Write line by line from two files
by sergeyken

» All Other Mainframe Topics
ZOS Connect EE Vs z/OS client web enablement toolkit
by pulibhaskar123

» JCL & VSAM
Access to non cataloged VSAM file
by Joerg.Findeisen

» CLIST & REXX
Execute secondary panel of sdsf with rexx
by Garry Carroll

» CLIST & REXX
Compile rexx code with jcl
by Willy Jensen

» Compuware & Other Tools
Need help for File Aid JCL to extract paragraph from a ds
by sergeyken

» DFSORT/ICETOOL
Sortjoin and Search for a String and remove it in the output
by sergeyken

» General Talk & Fun Stuff
MF CodeNames
by RazVorox

[ Site Map ]
Back to Top