Re: Procedure and data area ??$*%

["Rick DuVall" <R_C_DuVall@xxxxxxxxxx>]

Hi

    Just define the structure outside of your P specs (at the top) and it
should work.

Regards
Rick
----- Original Message -----
From: "Slava Zharichenko" <Slava.Zharichenko@exel.com>
To: <RPG400-L@midrange.com>
Sent: Wednesday, May 02, 2001 10:20 AM
Subject: Procedure and data area ??$*%


>
> Here is what i got when tried to create module
> ...
>
>    110  *Local Data Area
>    111 D                UDS                  DtaAra( *LDA )
> ======>                 a                    bbbbbb
> *RNF3758 20 a      002421  Data area data structure definitions are not
> allowed in
>                            subprocedures.
> *RNF3757 20 b      002421  The keyword is not valid for definitions in
> subprocedures.
>  112 D  DateFmt                       3A
>
>
> Should i use bound call to the module to read local data area?
>
> thank you
>
>
>
> ______________________________________________________________________
> Important Email Information
>
> The information in this email is confidential and may be legally
> privileged. It is intended solely for the addressee. Access to this email
> by anyone else is unauthorized. If you are not the intended recipient, any
> disclosure, copying, distribution or any action taken or omitted to be
> taken in reliance on it, is prohibited and may be unlawful. If you are not
> the intended addressee please contact the sender and dispose of this
> e-mail.
>
> +---
> | This is the RPG/400 Mailing List!
> | To submit a new message, send your mail to RPG400-L@midrange.com.
> | To subscribe to this list send email to RPG400-L-SUB@midrange.com.
> | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator:
david@midrange.com
> +---
>

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---