Primes system Design - Revision history

Martin: /* Quick Navigation */

2026-03-24T23:28:56Z

Quick Navigation

← Older revision		Revision as of 23:28, 24 March 2026
Line 28:		Line 28:
	!width="33%"\| What you will find		!width="33%"\| What you will find
	\|-		\|-
	\| 🏠\| '''[[Primes system Design]]'''		\| 🏠\| '''[[Primes system Design]]''' \| [[Cobol and PostgreSQL]]
	\| This page — overview, architecture snapshot, quick-start		\| This page — overview, architecture snapshot, quick-start
	\|-		\|-
Line 49:		Line 49:

	<span id="system-overview"></span>		<span id="system-overview"></span>

	== System Overview ==		== System Overview ==

Martin: /* pgcobol — documentation */

2026-03-24T23:25:24Z

pgcobol — documentation

← Older revision		Revision as of 23:25, 24 March 2026
Line 11:		Line 11:
	<span id="pgcobol-documentation-wiki"></span>		<span id="pgcobol-documentation-wiki"></span>

	= pgcobol — documentation =		= pgcobol — design documentation =

	<blockquote>'''System:''' pgcobol — Three-Tier COBOL / PostgreSQL Prime Numbers Application<br />		<blockquote>'''System:''' pgcobol — Three-Tier COBOL / PostgreSQL Prime Numbers Application<br />

Martin: /* pgcobol — Documentation Wiki */

2026-03-24T23:25:06Z

pgcobol — Documentation Wiki

← Older revision		Revision as of 23:25, 24 March 2026
Line 11:		Line 11:
	<span id="pgcobol-documentation-wiki"></span>		<span id="pgcobol-documentation-wiki"></span>

	= pgcobol — ~~Documentation Wiki~~ =		= pgcobol — documentation =

	<blockquote>'''System:''' pgcobol — Three-Tier COBOL / PostgreSQL Prime Numbers Application<br />		<blockquote>'''System:''' pgcobol — Three-Tier COBOL / PostgreSQL Prime Numbers Application<br />

Martin: /* Generated Documentation */

2026-03-24T23:24:03Z

Generated Documentation

← Older revision		Revision as of 23:24, 24 March 2026
Line 5:		Line 5:
	The process was as follows:		The process was as follows:
	# Generate technical specifications from the cobol program sources		# Generate technical specifications from the cobol program sources
			# Use the technical specifications to generate a design
			# Use the generated design for the creation of a design standard
			# Use everything to create a programming standard
	<!-- _sidebar.md is loaded automatically by most wiki renderers (GitHub Wiki, Docsify, etc.) -->		<!-- _sidebar.md is loaded automatically by most wiki renderers (GitHub Wiki, Docsify, etc.) -->
	<span id="pgcobol-documentation-wiki"></span>		<span id="pgcobol-documentation-wiki"></span>

	= pgcobol — Documentation Wiki =		= pgcobol — Documentation Wiki =

Martin at 23:21, 24 March 2026

2026-03-24T23:21:48Z

← Older revision		Revision as of 23:21, 24 March 2026
Line 1:		Line 1:
	The Primes system was written on top of my head, aimed at creating a consistent three tier object oriented set of Cobol programs using a PostgreSQL backend. It does not serve any purpose, storing prime numbers in a database actually is a bad idea.		The Primes system was written on top of my head, aimed at creating a consistent three tier object oriented set of Cobol programs using a PostgreSQL backend. It does not serve any purpose, storing prime numbers in a database actually is a bad idea.
			=== Generated Documentation ===
			Courtesy to claude.ai.</br>
			Most of the documentation in this and the underlying chapters, design and specifications have been generated as a result of the reverse engineering of the Cobol program sources. In the process known defects emerged, which is very interesting, so I decided to leave everything 'as is'.</br>
			The process was as follows:
			# Generate technical specifications from the cobol program sources
	<!-- _sidebar.md is loaded automatically by most wiki renderers (GitHub Wiki, Docsify, etc.) -->		<!-- _sidebar.md is loaded automatically by most wiki renderers (GitHub Wiki, Docsify, etc.) -->
	<span id="pgcobol-documentation-wiki"></span>		<span id="pgcobol-documentation-wiki"></span>

Martin at 23:04, 24 March 2026

2026-03-24T23:04:01Z

← Older revision		Revision as of 23:04, 24 March 2026
Line 212:		Line 212:

	''All pages derived by reverse engineering of source artifacts. Items marked ⚠ indicate known defects or unconfirmed assumptions.''		''All pages derived by reverse engineering of source artifacts. Items marked ⚠ indicate known defects or unconfirmed assumptions.''

			<hr/>
			Terug naar: [[Cobol and PostgreSQL]]

Martin at 21:26, 24 March 2026

2026-03-24T21:26:58Z

← Older revision		Revision as of 21:26, 24 March 2026
Line 19:		Line 19:
	!width="33%"\| What you will find		!width="33%"\| What you will find
	\|-		\|-
	\| 🏠\| '''[[~~Home~~]]'''		\| 🏠\| '''[[Primes system Design]]'''
	\| This page — overview, architecture snapshot, quick-start		\| This page — overview, architecture snapshot, quick-start
	\|-		\|-

Martin: Created page with "The Primes system was written on top of my head, aimed at creating a consistent three tier object oriented set of Cobol programs using a PostgreSQL backend. It does not serve any purpose, storing prime numbers in a database actually is a bad idea. = pgcobol — Documentation Wiki =
'''System:''' pgcobol — Three-Tier..."

2026-03-24T21:17:36Z

Created page with "The Primes system was written on top of my head, aimed at creating a consistent three tier object oriented set of Cobol programs using a PostgreSQL backend. It does not serve any purpose, storing prime numbers in a database actually is a bad idea.  = pgcobol — Documentation Wiki = <blockquote>'''System:''' pgcobol — Three-Tier..."

New page

The Primes system was written on top of my head, aimed at creating a consistent three tier object oriented set of Cobol programs using a PostgreSQL backend. It does not serve any purpose, storing prime numbers in a database actually is a bad idea.


= pgcobol — Documentation Wiki =

<blockquote>'''System:''' pgcobol — Three-Tier COBOL / PostgreSQL Prime Numbers Application 
'''Version:''' 1.0 · Reverse-engineered baseline · 2026-03-17 
'''Runtime:''' GnuCOBOL 4.0 · GixSQL · PostgreSQL 11 · Linux
</blockquote>

-----


== Quick Navigation ==

{|
!width="33%"|
!width="33%"| Page
!width="33%"| What you will find
|-
| 🏠| '''[[Home]]'''
| This page — overview, architecture snapshot, quick-start
|-
| 📋| '''[[Business-Requirements|Business Requirements]]'''
| What the system must do; stakeholders; constraints
|-
| ⚙
| '''[[Technical-Specification|Technical Specification]]'''
| Stack; architecture; pseudocode for all four programs; SQL inventory; file spec; defect register
|-
| 📖| '''[[Data-Dictionary|Data Dictionary]]'''
| Every field in every copybook and working-storage section
|-
| 🔀| '''[[Flow-Diagrams|Flow Diagrams]]'''
| Eight Mermaid diagrams — call graphs, sieve loop, report loop, sequence diagrams
|}

-----


== System Overview ==

pgcobol is a '''batch COBOL application''' that generates prime numbers by trial division, stores them in a PostgreSQL database, and produces a formatted line-printer report. It demonstrates a clean '''three-tier architecture''' entirely within COBOL.

<pre> ┌──────────────────────────────────────────────┐
│ primesmain │ Orchestrator
│ Reads command-line arg → routes to tier │ primesmain.cbl
└───────────────────┬──────────────────────────┘
│ CALL using primes-session
┌───────────▼──────────────┐
│ primesgen │ Business Logic / Sieve Engine
│ Sieve algorithm or │ primesgen.cbl
│ cursor read-loop │
└────────┬─────────────────┘
CALL primes-dal│ │CALL primes-ui
┌───────────▼──┐ ┌──▼──────────────┐
│ primes │ │ primesui │ Presentation
│ DAL + SQL │ │ Print file + │ primesui.cbl
│ primes.cbl │ │ console log │
└──────┬───────┘ └──────────────────┘
│ EXEC SQL via GixSQL
┌──────▼───────────────┐
│ PostgreSQL 11 │
│ schema: primes │
│ table: primes │
└──────────────────────┘</pre>

-----


== Two Operational Modes ==

{|
!width="50%"| Argument
!width="50%"| What happens
|-
| <code>generate</code>
| primesgen runs the sieve from 3 → 999,999,999; each confirmed prime is inserted into the database
|-
| <code>report</code>
| primesgen opens a cursor over the primes table; each row is written into the formatted print file <code>primes.prt</code>
|}

<blockquote>⚠ '''Known defect:''' The <code>generate</code> path exists in the code but the PERFORM that invokes the sieve loop is commented out in <code>primesmain.cbl</code> (line 51). See [[Technical-Specification#7-known-technical-issues|Technical Specification — Defect Register]].
</blockquote>

-----


== Source File Inventory ==

{|
!width="33%"| File
!width="33%"| Type
!width="33%"| Role
|-
| <code>primesmain.cbl</code>
| COBOL program
| Entry point — session controller
|-
| <code>primesgen.cbl</code>
| COBOL program
| Business logic — sieve and report loops
|-
| <code>primes.cbl</code>
| COBOL + GixSQL
| Data access layer — all SQL
|-
| <code>primesui.cbl</code>
| COBOL program
| Presentation — print file and console
|-
| <code>primes-session.cpy</code>
| Copybook
| Session-tier control block
|-
| <code>primes-dal.cpy</code>
| Copybook
| DAL-tier control block
|-
| <code>primes-ui.cpy</code>
| Copybook
| UI-tier control block (all programs)
|-
| <code>primes-table.cpy</code>
| Copybook
| SQL host variable — character format
|-
| <code>primes_table.cpy</code>
| Copybook
| SQL host variable — COMP-3 format (duplicate — see [[Data-Dictionary#15-primes_table--sql-host-variable-packed|Data Dictionary]])
|-
| <code>SQLCA.cpy</code>
| Copybook
| GixSQL SQL Communications Area
|-
| <code>primes_schema.sql</code>
| DDL
| Creates schema, sequence, and table
|-
| <code>reset-primes.sql</code>
| DDL
| Drops and recreates schema for a fresh run
|-
| <code>primes_cbsql.out</code>
| Listing
| GixSQL pre-compiler expanded output
|}

-----


== Inter-Tier Communication Pattern ==

All programs communicate through '''method-dispatch control blocks''' defined in copybooks. The pattern is the same at every tier:

<pre>1. Caller MOVEs a verb string into the control block's methods field
2. Caller CALLs the subprogram, passing the control block BY REFERENCE
3. Subprogram EVALUATEs the verb, executes the matching paragraph
4. Subprogram sets a numeric result code before EXIT PROGRAM
5. Caller inspects the result field and branches accordingly</pre>
{|
!width="33%"| Tier boundary
!width="33%"| Control block
!width="33%"| Result codes
|-
| primesmain → primesgen
| <code>primes-session</code>
| 0 = ok · 1 = nok · 9 = eof
|-
| primesgen → primes
| <code>primes-dal</code>
| 0 = ok · 1 = nok · 99 = eof
|-
| any → primesui
| <code>primes-ui</code>
| 0 = ok · 1 = nok
|}

-----


== Document Revision ==

{|
!width="33%"| Page
!width="33%"| Document ID
!width="33%"| Last updated
|-
| [[Business-Requirements|Business Requirements]]
| PGCBL-BRD-001
| 2026-03-17
|-
| [[Technical-Specification|Technical Specification]]
| PGCBL-TSD-001
| 2026-03-17
|-
| [[Data-Dictionary|Data Dictionary]]
| PGCBL-DDD-001
| 2026-03-17
|-
| [[Flow-Diagrams|Flow Diagrams]]
| PGCBL-FLD-001
| 2026-03-17
|}

-----

''All pages derived by reverse engineering of source artifacts. Items marked ⚠ indicate known defects or unconfirmed assumptions.''