startdata
/
cobol-sample-app
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity
Sample COBOL application for JIRA AI Fixer testing
2 Commits 2 Branches 0 Tags 29 KiB
COBOL 88.9%
JCL 11.1%
Go to file
Ricel Leite bfa168d12b feat: Initial COBOL sample application 
- AUTH.CBL: Transaction authorization (with deliberate bug)
- VALIDATE.CBL: Input validation module
- CLEARING.CBL: Settlement batch processing
- HOST.CBL: Host communication interface
- Copybooks and JCLs included

Bug for testing: AUTH.CBL uses PIC 9(9)V99 for balance
instead of PIC 9(11)V99, causing truncation.
 		2026-02-18 15:29:32 -03:00
src feat: Initial COBOL sample application 2026-02-18 15:29:32 -03:00
README.md feat: Initial COBOL sample application 2026-02-18 15:29:32 -03:00

README.md

COBOL Sample Application

Sample mainframe application for testing JIRA AI Fixer.

Structure

src/
├── cobol/
│   ├── AUTH.CBL      - Transaction authorization
│   ├── VALIDATE.CBL  - Input validation
│   ├── CLEARING.CBL  - Settlement processing
│   └── HOST.CBL      - Host communication
├── copybooks/
│   └── TRANSREC.cpy  - Transaction record layout
└── jcl/
    ├── AUTHPROC.jcl  - Authorization job
    └── CLEARJOB.jcl  - Clearing batch job

Known Issues

For testing purposes, AUTH.CBL contains a deliberate bug:

  • WS-AVAILABLE-BALANCE is defined as PIC 9(9)V99
  • Should be PIC 9(11)V99 to match HOST response
  • Causes truncation on balances > $9,999,999.99