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

The newest registered member is Sai teja220284

Our users have posted a total of 305723 articles within 53851 topics
 
[ View Members ]
Forum: Recent Posts
» DB2
create table with more than 32k record length
by Rohit Umarjikar

» DB2
JPM Reports for each DB2 V12 Function Level
by yogi.47eie

» FAQ & Basics
how to find string in the end of a variable
by Rohit Umarjikar

» DB2
How to: PK does not exist in several child-tables?
by Rohit Umarjikar

» DB2
Internal Autonomous Stored Procedure - full of errors.
by Kakis Ziliaskoudis

» JCL & VSAM
DSLIST in batch?
by Joerg.Findeisen

» FAQ & Basics
Read and append the same file in COBOL.
by sandeep.kumar

» JCL & VSAM
IDCAMS listcat service using cobol
by Rohit Umarjikar

» JCL & VSAM
passing symbolic parameter in sysin dd statement
by Garry Carroll

» JCL & VSAM
Convert PS to TXT file using jcl
by Joerg.Findeisen

» DB2
IIPHONORPRIORITY and zIIP offload
by rwsuhr

» CICS
ASP3 in CICS DB2
by Rohit Umarjikar

» JCL & VSAM
JCL and TAPE drives: how to maximize usage of tape drives
by dneufarth

» IMS DB/DC
Data for newly added fields not displayed on IMS screen
by Gary Jacek

» IMS DB/DC
Issued a CMD call for /DIS & it returned IO-PCB-Stat=’CD’
by Gary Jacek

» JCL & VSAM
JOBGROUP
by Joerg.Findeisen

» All Other Mainframe Topics
ARD020 in CMS
by Mahima

» JCL & VSAM
define 1 DCB parms for multiple output datasets
by Pete Wilson

» HomeWorks & Requests
SORT to count header and trailer
by sergeyken

» PL/I & Assembler
SXP Tool for PL1 or Module library managemtn
by grasshopper

[ Site Map ]
Back to Top