IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Choose the Best: What's error in the followinf code?


IBM Mainframe Forums -> Mainframe Interview Questions
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
sungang77

New User


Joined: 03 Nov 2005
Posts: 46
Location: Shanghai, China

PostPosted: Tue Nov 22, 2005 11:58 am
Reply with quote

Code:
MAINLINE.                                                               
SET S-NOT-END-OF-FILE TO TRUE                     
  PERFORM A0100-PROCESS-RECS                                   
    UNTIL S-END-OF-FILE       
  END-PERFORM.     
                                                                     
 A0100-PROCES-RECS.
  READ I-PLAYER-FILE                                             
    AT END   
       ADD +1           TO A-FILES-PROCESSED
    NOT AT END
       PERFORM A0200-INC-TOTALS
    END-READ.

Question:The sample code above should handle a process of reading an input file and using an amount from the file to increment totals. The calculation section is NOT shown. What error in the sample code will prevent this process from working correctly?
Choice 1
A priming read should be done before the PERFORM.
Choice 2
S-END-OF-FILE is never set to true.
Choice 3
S-NOT-END-OF-FILE should not be set before the first read.
Choice 4
A mathematical statement cannot be used with an AT END clause.
Choice 5
The PERFORM?UNTIL should be based on a counter not end-of-file switch.
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Wed Nov 23, 2005 8:01 am
Reply with quote

Choice 2. No eof indication to stop the loop = infinit loop.
Back to top
View user's profile Send private message
sungang77

New User


Joined: 03 Nov 2005
Posts: 46
Location: Shanghai, China

PostPosted: Wed Nov 23, 2005 8:17 am
Reply with quote

mmwife wrote:
Choice 2. No eof indication to stop the loop = infinit loop.


Yeah, I think you are right Jack.
Back to top
View user's profile Send private message
Santoshhn

New User


Joined: 18 May 2005
Posts: 5

PostPosted: Wed Nov 23, 2005 7:28 pm
Reply with quote

Program will be in Loop..
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> Mainframe Interview Questions

 


Similar Topics
Topic Forum Replies
No new posts Error to read log with rexx CLIST & REXX 11
No new posts Error when install DB2 DB2 2
No new posts run rexx code with jcl CLIST & REXX 15
No new posts Compile rexx code with jcl CLIST & REXX 6
No new posts CLIST - Virtual storage allocation error CLIST & REXX 5
Search our Forums:

Back to Top