× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Yes, in RPGIII you avoid using the data-type on the Data Structure subfield
specifications, but you included a decimal size.
IMYDS       DS
I                                 1    3P0MYPKD
I                                 4    8 0MYZOND

The first subfield is packed, the second subfield is Zoned.
(My subtle point is, don't use "ad hoc" field definitions.)
-Bob


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Venkateshwar V
Sent: Wednesday, May 26, 2004 7:57 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: Numeric Fields.


But is there a way I can define a variable as zoned ? Because if I am
defining it using Z-Add *Zeros 4,0 it takes it as packed by default.
Why so ?

Regards,
Venky.
----- Original Message -----
From: "Bob Cozzi" <cozzi@xxxxxxxxx>
To: "'RPG programming on the AS400 / iSeries'" <rpg400-l@xxxxxxxxxxxx>
Sent: Wednesday, May 26, 2004 6:08 PM
Subject: RE: Numeric Fields.


> Because you (most likely) didn't include the "P" data type in the
Data
> Structure subfield definition.
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]
> On Behalf Of Venkateshwar V
> Sent: Wednesday, May 26, 2004 7:11 AM
> To: rpg400-l@xxxxxxxxxxxx
> Subject: Numeric Fields.
>
> Hi,
>
> It is just out of curiosity that I am asking this question. If I
define a
> numeric variable in RPG400 using *LIKE DEFINE (the source field is
zones) or
> Z-ADD *Zeros #X with attributes 4,0 it gets defined as packed. But
If I were
> to define a field as datastructure subfield with same attributes
using a
> datastructure it gets defined as zoned.
>
> Can anyone please explain how and why this happens ?
>
> Reagrds,
> Venky
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L)
mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L)
mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>


Confidentiality Notice 

The information contained in this electronic message and any attachments to
this message are intended
for the exclusive use of the addressee(s) and may contain confidential or
privileged information. If
you are not the intended recipient, please notify the sender at Wipro or
Mailadmin@xxxxxxxxx immediately
and destroy all copies of this message and any attachments.
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.




As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 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.