Editing Data-Dictionary (section)

=== 1.6 SQLCA — SQL Communications Area ===

<blockquote>'''Source file:''' <code>SQLCA.cpy</code><br />
'''Included by:''' <code>primes.cbl</code> via <code>EXEC SQL INCLUDE SQLCA END-EXEC</code><br />
'''Purpose:''' Standard GixSQL communications area. Updated after every SQL statement.
</blockquote>
{|
!width="20%"| Level
!width="20%"| Name
!width="20%"| PIC
!width="20%"| Usage
!width="20%"| Description
|-
| 01
| <code>SQLCA</code>
| —
| —
| SQL communications area
|-
| 05
| <code>SQLCAID</code>
| <code>X(8)</code>
| DISPLAY
| SQLCA identifier string
|-
| 05
| <code>SQLCABC</code>
| <code>S9(9)</code>
| COMP-5
| Byte length of SQLCA structure
|-
| 05
| <code>SQLCODE</code>
| <code>S9(9)</code>
| COMP-5
| '''SQL return code:''' 0=success · negative=error · +100=not found
|-
| 05
| <code>SQLERRM</code>
| —
| —
| Error message group
|-
| 49
| <code>SQLERRML</code>
| <code>S9(4)</code>
| COMP-5
| Length of error message text
|-
| 49
| <code>SQLERRMC</code>
| <code>X(70)</code>
| DISPLAY
| Error message text from the database engine
|-
| 05
| <code>SQLERRP</code>
| <code>X(8)</code>
| DISPLAY
| Error procedure name (not used in this application)
|-
| 05
| <code>SQLERRD</code>
| <code>S9(9)</code> OCCURS 6
| COMP-5
| Diagnostic array; <code>SQLERRD(3)</code> = number of rows processed
|-
| 05
| <code>SQLWARN</code>
| —
| —
| Warning flags group (not used in this application)
|-
| 05
| <code>SQLSTATE</code>
| <code>X(5)</code>
| DISPLAY
| ISO/ANSI SQL state code (5-char string)
|}

'''SQLCODE reference (PostgreSQL / GixSQL):'''

{|
! Value
! Meaning
|-
| 0
| Statement succeeded
|-
| +100
| No rows found (SELECT returned empty, cursor exhausted)
|-
| negative
| Database error — see <code>SQLERRMC</code> for description
|}


-----

<span id="working-storage-variables"></span>