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

Replace all GOTO statements with Perform


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Ed Goodman

Active Member


Joined: 08 Jun 2011
Posts: 556
Location: USA

PostPosted: Thu Oct 20, 2011 1:10 am
Reply with quote

There were alternate opinions of how to move the ship out of the way. Enterprise was without warp drive or impulse drive. Riker's suggestion was to pop open the shuttle bay and let the rush of air jet-propel the ship out of the way. The other option was to use the tractor beam.

Since data had kept seeing the number "3", he went with Riker's option because Riker has three pips on his collar.

I messed up the above link...here is the correct link:
http://en.memory-alpha.org/wiki/Cause_and_Effect_%28episode%29
Back to top
View user's profile Send private message
Phrzby Phil

Senior Member


Joined: 31 Oct 2006
Posts: 1042
Location: Richmond, Virginia

PostPosted: Thu Oct 20, 2011 5:30 pm
Reply with quote

Ed has answered - thanks.

I'll add: previously Riker made his suggestion each time, but Data overrode it each time, leading to catastrophe. Finally, as Ed says, the clue transmitted to the final loop led Data to take Riker's idea.

A GREAT show if you ask me. Someone asked, right?

Oh, now I remember, the question was about GOTO and PERFORM!

hahahahahahaha
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 -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts Replace each space in cobol string wi... COBOL Programming 3
No new posts Replace Multiple Field values to Othe... DFSORT/ICETOOL 12
No new posts Calling DFSORT from Cobol, using OUTF... DFSORT/ICETOOL 5
No new posts Use of Perform Thru Exit COBOL Programming 6
No new posts replace word 'MONTH' with current mon... SYNCSORT 11
Search our Forums:

Back to Top