Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

The parent group name is ignored. #51

Open
yutaro-sakamoto opened this issue Sep 4, 2023 · 0 comments
Open

The parent group name is ignored. #51

yutaro-sakamoto opened this issue Sep 4, 2023 · 0 comments
Assignees
Labels
bug Something isn't working

Comments

@yutaro-sakamoto
Copy link
Contributor

      * working storage section
       01 GRP.
              03 ITEM PIC X.
       01 GRP2.
              03 ITEM PIC X.
      * procedure division
           EXEC SQL
             INSERT INTO TBL VALUES (:GRP.ITEM)
           END-EXEC.

Since OCESQL4J ignore GRP. in the above program, the generated COBOL code is invalid because of a collision of variable names.

OCESQL     CALL "OCESQLSetSQLParams" USING
OCESQL          BY VALUE 16
OCESQL          BY VALUE 1
OCESQL          BY VALUE 0
OCESQL          BY REFERENCE ITEM
OCESQL     END-CALL
@yutaro-sakamoto yutaro-sakamoto self-assigned this May 1, 2024
@yutaro-sakamoto yutaro-sakamoto added the bug Something isn't working label May 1, 2024
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
bug Something isn't working
Projects
None yet
Development

No branches or pull requests

1 participant