Martin: Created page with "== 10. Configuration and Credentials == === 10.1 Externalise Credentials === Hard-coded database credentials in WORKING-STORAGE (pgcobol defect D-04) are prohibited in production code. Use one of the following patterns, in preference order: # Environment variables accepted via `ACCEPT … FROM ENVIRONMENT-VALUE` at runtime. # A configuration file read at startup, with path supplied via an environment variable. # A GnuCOBOL external data item shared from a c..."

2026-03-25T11:19:24Z

Created page with "== 10. Configuration and Credentials == === 10.1 Externalise Credentials === Hard-coded database credentials in WORKING-STORAGE (pgcobol defect D-04) are prohibited in production code. Use one of the following patterns, in preference order: # Environment variables accepted via <code>ACCEPT … FROM ENVIRONMENT-VALUE</code> at runtime. # A configuration file read at startup, with path supplied via an environment variable. # A GnuCOBOL external data item shared from a c..."

New page

== 10. Configuration and Credentials ==

=== 10.1 Externalise Credentials ===

Hard-coded database credentials in WORKING-STORAGE (pgcobol defect D-04) are prohibited in production code. Use one of the following patterns, in preference order:

# Environment variables accepted via <code>ACCEPT … FROM ENVIRONMENT-VALUE</code> at runtime.
# A configuration file read at startup, with path supplied via an environment variable.
# A GnuCOBOL external data item shared from a configuration sub-program.

<syntaxhighlight lang="cobol">
01 WS-DB-USER PIC X(64).
01 WS-DB-PWD PIC X(64).
...
B000-INITIALISE.
ACCEPT WS-DB-USER FROM ENVIRONMENT-VALUE 'PRIMES_DB_USER'
ACCEPT WS-DB-PWD FROM ENVIRONMENT-VALUE 'PRIMES_DB_PWD'
</syntaxhighlight>

=== 10.2 Connection String ===

Store the full connection string in a named constant in WORKING-STORAGE. The GixSQL pgsql driver string format is:

<syntaxhighlight lang="cobol">
01 WS-DATASRC PIC X(64)
VALUE 'pgsql://localhost:5432/primes&default_schema=primes'.
</syntaxhighlight>

{{Ambox
| type = notice
| text = '''GixSQL note''' — The <code>&default_schema=</code> parameter sets the PostgreSQL <code>search_path</code> for the session. Always include it to avoid schema-qualification issues in SQL statements.
}}

----

----
''[[Cobol programming standards|← Back to index]]''

COBOL Std 10 Configuration and Credentials - Revision history