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

The newest registered member is Ramin

Our users have posted a total of 311479 articles within 54840 topics
 
[ View Members ]
Forum: Recent Posts
» JCL & VSAM
JCL/REXX to know GDG base name
by sergeyken

» DFSORT/ICETOOL
Partial Sort conditions for PD fields
by sergeyken

» IMS DB/DC
Error to invoke MPP program through BMP process
by Gary Jacek

» IMS DB/DC
IMS Predecessor?
by Gary Jacek

» HomeWorks & Requests
Capture the RC of previous step
by Rohit Umarjikar

» TSO/ISPF
ADDRESS TSO CALL to invoke a module
by Willy Jensen

» DFSORT/ICETOOL
Help with SORT - I need to validate date and timestamp
by andy12

» JCL & VSAM
purge jobs with return code 0 and retain jobs with RC>0
by Joerg.Findeisen

» JCL & VSAM
Comment multiple lines in JCL for Temporary Submits
by Wayne_in_Texas

» TSO/ISPF
Swapping 2 sessions with PF2 and PF9? How about 8 sessions?
by enrico-sorichetti

» JCL & VSAM
Comment Lines getting in the way when reviewing JCL?
by Wayne_in_Texas

» DB2
IBM HPU 5.2 - Converting EBCDIC Characters to Blanks
by ojdiaz

» Mainframe Interview Questions
How to read KSDS file from bottom
by Joerg.Findeisen

» All Other Mainframe Topics
Convert Service Unit to CPU Seconds
by Fran Wong

» DFSORT/ICETOOL
Help required to reset decimal points to 0 in a PD field
by Joerg.Findeisen

» TSO/ISPF
ZFNOTE documentation
by hankoerlemans

» IMS DB/DC
ABEND 0717 during starting IMS
by Hooman24

» CICS
MacKinney Batch to CICS upgrade causing issues
by Pedro

» All Other Mainframe Topics
IEW2315E 1369 Link error
by MichelleSpeer

» TSO/ISPF
Customizing the ISPF HILITE Command
by Lynne

[ Site Map ]
Back to Top