DB2 COBOL Programming

Code Example

## DB2 COBOL Programming

Embedding SQL in COBOL programs for database access.

### SQL Communication Area (SQLCA)
\`\`\`cobol
EXEC SQL INCLUDE SQLCA END-EXEC
\`\`\`
Contains execution status after each SQL statement.

### Host Variables
COBOL variables used in SQL:
\`\`\`cobol
01 HV-EMP-ID PIC X(5).
EXEC SQL
    SELECT NAME INTO :HV-NAME
    FROM EMP WHERE EMP_ID = :HV-EMP-ID
END-EXEC
\`\`\`

### SQLCODE Values
| Code | Meaning |
|------|---------|
| 0 | Success |
| 100 | No data found |
| <0 | Error |

### Cursors
For multi-row results:
1. DECLARE - Define cursor
2. OPEN - Execute query
3. FETCH - Get rows
4. CLOSE - Release cursor

### Commit/Rollback
\`\`\`cobol
EXEC SQL COMMIT END-EXEC
EXEC SQL ROLLBACK END-EXEC
\`\`\`