#29 Bugs in PERFORM

closed-rejected
nobody
None
5
2003-03-24
2003-03-16
Hudson Reis
No

Hi,

This is the bug that I found in PERFORM verb.

If I'm using a PERFORM VARYING .. UNTIL, and not be
necessary nothing operation, it shows a compilation
error.

perform varying ws-I from 1 by 1 until
ws-Field(ws-I:1) equal ' '
end-perform

hudson@mynotebook:~/prj/tc/src/cui10$ htcobol
perform00.cob
perform00.cob: 14: parse error
perform00.cob: 14: unknown or wrong statement
perform00.cob: 14: unknown or wrong statement
perform00.cob: 15: unknown or wrong statement
perform00.cob: 15: unknown or wrong statement
hudson@mynotebook:~/prj/tc/src/cui10$ exit

To work, is necessary that I put a CONTINUE verb in
this.

perform varying ws-I from 1 by 1 until
ws-Field(ws-I:1) equal ' '
continue
end-perform

Discussion

  • Hudson Reis

    Hudson Reis - 2003-03-16

    perform example bugs

     
  • Bernard Giroud

    Bernard Giroud - 2003-03-24

    Logged In: YES
    user_id=1011

    The 85 standard from the book I have implies that if you use
    and END-PERFORM, then you need an statement between
    the condition and the END_PERFORM, i.e. you have to code
    a CONTINUE statement for an empty perform.

    On the other hand, you can always suppress the END-
    PERFORM in your case.

     
  • Bernard Giroud

    Bernard Giroud - 2003-03-24
    • status: open --> open-rejected
     
  • Bernard Giroud

    Bernard Giroud - 2003-03-24
    • status: open-rejected --> closed-rejected
     

Log in to post a comment.

Get latest updates about Open Source Projects, Conferences and News.

Sign up for the SourceForge newsletter:





No, thanks