Primes

The primes program is purely for demonstration purposes, it would be nonsensical to generate primes and retrieve the dividers from a database. The subprograms are in fact objects, containing methods and data.

Program structure

The program consists of a main program and three subprograms. The main program primesmain.cbl is invoked by the command 'primesmain report'. The subprograms implementing the objects and methods are:

• primesui, providing the user interface as a print file
• primesgen, manages the proces of primes generation and reporting, it does the prime determination too.
• primes

Only the primes program makes use of the PostgreSQL database and so a good demonstration of three tier design.

primesmain

The program source code file is available for download here: primesmain.cbl . When executed primesmain puts out the file primes.prt.
The program only needs a cobol compile process, which is as follows:

/usr/bin/cobc -x primesmain.cbl -T primesmain.out

This results in the executable program file primesmain and the compilation listing pgcobol.out.

primesgen

The program source code file is available for download here: primesgen.cbl . The program has to be compiled as a module or a subprogram, it cannot be executed directly.
The program only needs a cobol compile process, which is as follows:

/usr/bin/cobc -m primesgen.cbl -T primesgen.out

This results in the program module file primesgen.so and the compilation listing primesgen.out.

primesui

The program source code file is available for download here: primesui.cbl . The program has to be compiled as a module or a subprogram, it cannot be executed directly.
The program only needs a cobol compile process, which is as follows:

/usr/bin/cobc -m primesui.cbl -T primesui.out

This results in the program module file primesui.so and the compilation listing primesui.out.

primes

The primes program primes.cbl The program source code file is available for download here: primes.cbl . The program has to be compiled as a module or a subprogram, it cannot be executed directly.
The program needs a precompile process, which is as follows:

/usr/bin/gixsql primes.cbl primes.cbsql -S -I . -e ".,*.cpy,*.CPY"

This results in the cobol program file primes.cbsql primes.cbsql.
The next steps is the cobol compilation itself:

/usr/bin/cobc -m primes.cbsql -l:libgixsql.so -T primes.out

This results in the program module file primes.so and the compilation listing primes.out.

---

Back to: Cobol and PostgreSQL