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

Value-String not composed correctly due to mix of comments and continuation #61

Open
Reinhard-Prehofer opened this issue Jan 9, 2018 · 0 comments

Comments

@Reinhard-Prehofer
Copy link

Reinhard-Prehofer commented Jan 9, 2018

The following mix of comments and continuation signs in a pic x value declaration is not resolved correctly (sample cobol file attached):

       01  TAB-TAG.                                                     11.02.14
002300     05 FILLER              PIC X(66) VALUE                       21.09.16
002310*                                            Index 01 - 10        11.02.14
002320                                             '0304060405091039111211.02.14
002330*                                            Index 11 - 20        11.02.14
002340-                                            '1318192124272829303111.02.14
002350*                                            Index 21 - 30        11.02.14
002360-                                            '3537384143444546474921.09.16
002370*                                            Index 31 - 33        21.09.16
002380-                                            '525456'.            21.09.16

the parser changes that statement into the following wrong declaration:

       01  TAB-TAG.
           05 FILLER              PIC X(66) VALUE
      *>                                             Index 01 - 10
                                                   '03040604050910391112
      *>                                             Index 11 - 20'13181921242728293031
      *>                                             Index 21 - 30'35373841434445464749
      *>                                             Index 31 - 33'525456'.
[aNasty.cbl.txt](https://github.com/uwol/cobol85parser/files/1615553/aNasty.cbl.txt)

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

No branches or pull requests

1 participant