Re: Question on Cobol (Unix) file layouts...

["R. Bruce Hoffman, Jr." <rbruceh@xxxxxxx>]

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
+---