RE: packed field

In the SDA test it looks like:


 PFCUEA        666666:

> It's packed in the PF. In the DDS, I use the REF for define.
> Am I suppposed to unpack it in the program?
>
> I am doing nothing to it in the RPG ILE program, it is just supposed to be
> displayed after the user selected the record on the main
> subfile listing.
>
>> I am not sure, how would this be happening?
>>> Are you sure you're not writing a field in the attribute byte of the
>>> packed field in the DDS?
>>>
>>>
>>> Mark Walter
>>> Senior Programmer/Analyst
>>> IBM Certified RPG Developer
>>> Hainey Business Systems
>>> (717) 771-2362
>>> mwalter@xxxxxxxxxxx
>>> http://www.hbs-inc.com
>>>
>>>
>>> -----Original Message-----
>>> From: rpg400-l-bounces@xxxxxxxxxxxx
>>> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of
>>> steema@xxxxxxxxxxxxx
>>> Sent: Wednesday, January 18, 2006 3:03 PM
>>> To: RPG programming on the AS400 / iSeries
>>> Subject: packed field
>>>
>>> HI I have a packed field, defined as 6 3.
>>> I mimic this description in the DDS ( it is to be displayed when the
>>> user selected the record from the Subfile listing),
>>>
>>> There is data there but it is not displaying on the screen. For
>>> debugging I put in a loop if the file has this field at 0, keep reading
>>> the next record. This renders the subfile empty.
>>>
>>> I seem to be missing somthing.
>>> --
>>> 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.
>>>
>>>
>>
>> --
>> 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.
>
>