|
Jon.Paris@halinfo.it wrote: > Weird - me! Now who would think that of me .......... (Bruce, Don - you > can take that grin off your faces!!) > What?! Me?! Grin!? > What I meant was that I don't see that something like the following is any > more long-winded in COBOL than in RPG. > > Here's the RPG IV: > > D MyData DS > D FirstField 10A > D SecondField 9S 2 > D AnArray 10A Dim(20) > D LastField Like(SecondField) > Except when the field means something... D QualifiedUserSpaceName... D 20A Then it requires a whole other line. But COBOL... 77 QualifiedUserSpaceName pic x(20). Grin. -- =========================================================== R. Bruce Hoffman, Jr. -- IBM Certified AS/400 Administrator -- The sum of all human knowledge is a fixed constant. It's the population that keeps growing! +--- | This is the Midrange System Mailing List! | To submit a new message, send your mail to MIDRANGE-L@midrange.com. | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.