startdata
/
cobol-sample-app
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

[SUPP-5] Fix balance truncation in AUTH module #1

Open
startdata wants to merge 1 commits from fix/supp-5-auto-fix into main
pull from: fix/supp-5-auto-fix
merge into: startdata:main
Conversation 0 Commits 1 Files Changed 1 +2 -2
startdata commented 2026-02-18 21:12:53 +00:00
Owner
Copy Link

🤖 Automated Fix

Ticket: SUPP-5
Issue: Fix balance truncation in AUTH module

Root Cause Analysis

WS-AVAILABLE-BALANCE field is declared as PIC 9(9)V99 which can only hold values up to 9,999,999.99. The HOST system returns balances in PIC 9(11)V99 format, causing truncation on amounts over $10 million.

The AUTH.CBL program declares WS-AVAILABLE-BALANCE with PIC 9(9)V99, limiting it to 9,999,999.99. When receiving balance data from HOST (which uses PIC 9(11)V99), values above this limit get truncated. For example, a balance of 150,000,000.00 would be truncated to 0,000,000.00, causing false 'insufficient funds' responses. The fix is to align the field size with the HOST response format.

Changes Made

  • File: src/cobol/AUTH.CBL
  • Fix: Change line 15 from:
    05 WS-AVAILABLE-BALANCE PIC 9(9)V99.
    To:
    05 WS-AVAILABLE-BALANCE PIC 9(11)V99.

Confidence

92%

This PR was automatically generated by JIRA AI Fixer

## 🤖 Automated Fix **Ticket:** SUPP-5 **Issue:** Fix balance truncation in AUTH module ### Root Cause Analysis WS-AVAILABLE-BALANCE field is declared as PIC 9(9)V99 which can only hold values up to 9,999,999.99. The HOST system returns balances in PIC 9(11)V99 format, causing truncation on amounts over $10 million. The AUTH.CBL program declares WS-AVAILABLE-BALANCE with PIC 9(9)V99, limiting it to 9,999,999.99. When receiving balance data from HOST (which uses PIC 9(11)V99), values above this limit get truncated. For example, a balance of 150,000,000.00 would be truncated to 0,000,000.00, causing false 'insufficient funds' responses. The fix is to align the field size with the HOST response format. ### Changes Made - **File:** `src/cobol/AUTH.CBL` - **Fix:** Change line 15 from: 05 WS-AVAILABLE-BALANCE PIC 9(9)V99. To: 05 WS-AVAILABLE-BALANCE PIC 9(11)V99. ### Confidence 92% --- _This PR was automatically generated by JIRA AI Fixer_
startdata added 1 commit 2026-02-18 21:12:53 +00:00
b4066be55c fix(SUPP-5): Fix balance truncation in AUTH module 
Automatically generated fix by JIRA AI Fixer.
Confidence: 92%
startdata added 1 commit 2026-02-18 21:12:53 +00:00
b4066be55c fix(SUPP-5): Fix balance truncation in AUTH module 
Automatically generated fix by JIRA AI Fixer.
Confidence: 92%
This pull request can be merged automatically.
You are not authorized to merge this pull request.
You can also view command line instructions.

Step 1:

From your project repository, check out a new branch and test the changes.
git checkout -b fix/supp-5-auto-fix main
git pull origin fix/supp-5-auto-fix

Step 2:

Merge the changes and update on Gitea.
git checkout main
git merge --no-ff fix/supp-5-auto-fix
git push origin main
Sign in to join this conversation.
Reviewers
No reviewers
Labels
Clear labels
No items
No Label
Milestone
Clear milestone
No items
No Milestone
Projects
Clear projects
No project
Assignees
Clear assignees
No Assignees
1 Participants
Notifications
Due Date
The due date is invalid or out of range. Please use the format 'yyyy-mm-dd'.

No due date set.

Dependencies

No dependencies set.

Reference: startdata/cobol-sample-app#1
No description provided.
Delete Branch "fix/supp-5-auto-fix"

Deleting a branch is permanent. Although the deleted branch may continue to exist for a short time before it actually gets removed, it CANNOT be undone in most cases. Continue?