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

The newest registered member is MasahideSouma

Our users have posted a total of 310754 articles within 54697 topics
 
[ View Members ]
Forum: Recent Posts
» DFSORT/ICETOOL
Compare 2 files and retrive records from one file with key
by sergeyken

» All Other Mainframe Topics
How to save SYSLOG as text data via PCOMM
by Pete Wilson

» SYNCSORT
WER247A SORTOUT HAS INCOMPATIBLE LRECL
by Joerg.Findeisen

» DFSORT/ICETOOL
Compare two files and copy the main and group records in fil
by Rohit Umarjikar

» JCL & VSAM
Compare 2 files(F1 & F2) and write Matched/Unmatched records
by Joerg.Findeisen

» JCL & VSAM
FTP VB File from Mainframe retaining RDW & BDW
by sergeyken

» DFSORT/ICETOOL
TRIM everything from input, output contains only DSN name.
by Joerg.Findeisen

» All Other Mainframe Topics
Finding and researching jobs
by M Lee Klein

» CLIST & REXX
Compile Several JCL JOB Through one rexx job
by Pedro

» SYNCSORT
Replacing 'YYMMDD' with date, varying column positions
by Joerg.Findeisen

» JCL & VSAM
ISAM and abend S03B
by I?aki Viggers

» DFSORT/ICETOOL
Issues Converting From ZD to Signed Numeric and Back Again
by Rohit Umarjikar

» DFSORT/ICETOOL
Need to set RC4 through JCL SORT
by Rohit Umarjikar

» DFSORT/ICETOOL
Extract the file name from another file and use it further.
by Digvijay Singh

» JCL & VSAM
Need help on JCL
by cravisankar

» DFSORT/ICETOOL
How to split large record length file using STARTAFT in SORT
by Figo1988

» All Other Mainframe Topics
RACF - Rebuild SETROPTS command which was executed with SMF
by Joerg.Findeisen

» JCL & VSAM
SH256/MD5 Checksum in Mainframes JCL
by pinakimishra

» TSO/ISPF
HILITE on Browse mode?
by Pedro

» All Other Mainframe Topics
Sysplex System won't IPL at DR site IXC412I & IXC413I
by Kyle Stewart

[ Site Map ]
Back to Top