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 116884 registered members and 424659214 sessions since May 2003

The newest registered member is nreddy4959

Our users have posted a total of 312115 articles within 54943 topics
 
[ View Members ]
Forum: Recent Posts
» DB2
DB2 Query to get the count of Unique selection
by Chidane

» CLIST & REXX
REXX to get all Dataset names from a list of volumes
by Willy Jensen

» DFSORT/ICETOOL
Sorting date into YYYYMMDD, and creating file with date name
by sergeyken

» DFSORT/ICETOOL
DFSORT Join Keys Controlcard
by Joerg.Findeisen

» CICS
How to close Datacom MUF URT used by CICSRegion in batch jcl
by kaverimanoj

» SYNCSORT
Sort SMF records?
by sergeyken

» TSO/ISPF
SFTP Return Codes
by AlexSalas95

» SYNCSORT
To Discard record with 0 entry if Duplicate is there
by sergeyken

» SYNCSORT
To Sort detail records in a file with Multiple Hdr and Trl
by Chidane

» IBM Tools
IBM IMU Utility for Easytrieve Code to Cobol Code Conversion
by ShashankShukla

» JCL & VSAM
Instream REXX?
by prino

» CICS
Lack of Freemain in the Commarea
by Ziko13

» All Other Mainframe Topics
Design for Message Trapping and WTO Notification
by Willy Jensen

» All Other Mainframe Topics
USAGE parameter of RACDCERT CONNECT command
by Deepak_Raj

» Mainframe Jobs
Techm mainframe deveoper 6 to 12 years hyd and bangalore
by rajendra05

» CICS
Upgrade CICS TS to 6.2: authorization problems with WRITEQ T
by Wilfred Damhuis

» All Other Mainframe Topics
BPXBATCH output
by Rohit Umarjikar

» SYNCSORT
Identify and write records containing accent characters
by Joerg.Findeisen

» All Other Mainframe Topics
OPC/TWS
by Punki

» DFSORT/ICETOOL
Sort card to find duplicates, without changing the record
by Rohit Umarjikar

[ Site Map ]
Back to Top