giteaadmin/DUTAS
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

https://inow.myjetbrains.com/youtrack/issue/DR-56/QIX-not-accepting-lower-case-characters

Browse Source
This commit is contained in:
faizana
2025-09-08 04:42:26 -04:00
parent 7ca284b0f7
commit bec589af16
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Copybook/DTSIS32.cpy
View File

@ -42,9 +42,9 @@
00042 15 MAP-COMBINE-IND-L PIC S9(04) COMP. DTSIS32
00043 15 MAP-COMBINE-IND-A PIC X(01). DTSIS32
00044 15 MAP-COMBINE-IND PIC X(01). DTSIS32
00045 88 MAP-COMBINE-YES-88 VALUE 'Y'. DTSIS32
00046 88 MAP-COMBINE-NO-88 VALUE 'N'. DTSIS32
00047 88 MAP-COMBINE-VALID-88 VALUE 'Y' 'N'. DTSIS32
00045 88 MAP-COMBINE-YES-88 VALUE 'Y' 'y'. DTSIS32
00046 88 MAP-COMBINE-NO-88 VALUE 'N' 'n'. DTSIS32
00047 88 MAP-COMBINE-VALID-88 VALUE 'Y' 'N' 'n' 'y'. DTSIS32
00048 DTSIS32
00049 10 MAP-COMP-DATE-AREA. DTSIS32
00050 15 MAP-COMP-MO-L PIC S9(04) COMP. DTSIS32