> -----Ursprungligt meddelande----- > Från: IBM Mainframe Discussion List [mailto:[email protected]] > För Leslie Turriff > Skickat: den 17 februari 2013 22:54 > Till: [email protected] > Ämne: Re: SV: SV: Article for the boss: COBOL will outlive us all > > On Sunday 17 February 2013 12:47:16 Thomas Berg wrote: > > Some suggestions: > > > > * GO TO's from in the middle of one SECTION into the middle of > another. > > And then GO TO back again depending on a "switch"... * Programs with > > nested PERFORMS (*only* PERFORMS!) in maybe 7 levels ending in a CALL > > of another module. * Field name (variable) in (e g) MOVE statement > > qualified resulting in more than 100 characters, then add the > matching > > length for the corresponding field. (Take this times 1000 fields...) > > * Processing the same data sometimes in a character defined field, > > sometimes in numeric defined fields (several different numeric > formats > > for the same data) without any reasonable explanation. * Need to > check > > four or five different result fields (depending on the situation > etc.) > > for eventual error from the CALL of another module. > > > > And other I have forgotten... > > > : > PARAGRAPH-1. > GO TO PARAGRAPH-3. > > PARAGRAPH-2. > ALTER PARAGRAPH-1 TO PROCEED TO PARAGRAPH-4. > > PARAGRAPH-3. > ALTER PARAGRAPH-1 TO PROCEED TO PARAGRAPH-2. > > PARAGRAPH-4. > : > > (I really hate the ALTER command.)
Fortunately I haven't seen this the last +20 years or so. Anf if I had I would have strangled the programmer... :) Regards Thomas Berg ________________________________________________________________ Thomas Berg Specialist z/OS/IT Delivery SWEDBANK AB (Publ) ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
