Jeff,

I use REFFLD's all the time (V5R4 latest Cume) and haven't had any problems. So a couple of silly questions (because I know you've already checked these):

1. Is ALICMREG is the library list at the time you tried to compile?
2. If so, is INVDT still defined in the file?

Jerry C. Adams
IBM System i Programmer/Analyst
B&W Wholesale
office: 615-995-7024
email: jerry@xxxxxxxxxxxxxxx

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Jeff Crosby
Sent: Monday, September 15, 2008 10:56 AM
To: Midrange Systems Technical Discussion
Subject: Date field in print file as REFFLD

All,

I opened a PMR on this.

I have a DDS defined printer file, CUSTCM, with an *ISO date field in
it, as a REFFLD. Source line looks like this (columns off, BTW):

A INVDT R 10 38REFFLD(INVDT *LIBL/ALICMREG)

This file is in production and has been for over a year. A DSPFFD of
CUSTCM show the following definition for field INVDT:

*...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8
Field Type Length Length Buffer Buffer Usage Row
Column
INVDT DATE 10 10 155 Output
10 38
Field text . . . . . . . . . . . . . . . : Invoice date
Referenced information
Referenced file . . . . . . . . . . . . : ALICMREG
Library . . . . . . . . . . . . . . . : DBMSTF
Referenced record format . . . . . . . : INVSUMRC
Referenced field . . . . . . . . . . . : INVDT
Attributes changed . . . . . . . . . . : None
Date Format . . . . . . . . . . . . . . . : *ISO


So you know it is indeed currently defined that way.

I needed to move another field in this print file to another location.
So I copied the DDS to another library, moved that other field, and
tried compiling the print file. I get the following error in the compile:

2300 A INVDT R 10 38REFFLD(INVDT *LIBL/ALICMREG)
* CPD7494-.
* CPD7616-*

The errors read:

* CPD7494 20 2 Message: Keyword value not allowed.
* CPD7616 30 2 Message: Keyword ignored because of error in list of values.

Since it is currently compiled with REFFLD, it worked at one time. Could
a subsequent PTF broken it in some way? I searched PTF cover letters and
didn't find an answer.

Thanks.


--
Jeff Crosby
UniPro Foodservice/Dilgard
260-422-7531
Opinions expressed are my own and not necessarily those of my company. Unless I say so.


--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.


This thread ...

Replies:

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

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