The manual (<
http://publib.boulder.ibm.com/infocenter/iseries/v6r1m0/index.jsp?topic=/rzakb/rzakbmstpdft.htm
) clearly specifies that the value is assigned to the field when you
write to a logical file, based on this physical, that does not contain the
field.

If you want to use the default value in RPG you have to use an externally
described data structure with INZ(*EXTDFT) (<
http://publib.boulder.ibm.com/infocenter/iseries/v6r1m0/index.jsp?topic=/rzasd/sc092508548.htm
).

Finally: Don't use CLEAR on your data structure, because, obviously, it
clears your data structure, wiping out all your default values. Use RESET
instead.

Joep Beckeringh


rpg400-l-bounces@xxxxxxxxxxxx wrote on 11-05-2009 09:37:14:

PEPITOVADECURT

Hi, I use the PF files to create a database.
I need to get a default value; I've tried this:
PF code:
A O6TX01 25A DFT('Default text')

But when I write a register (using a RPG program) nothin appears in
those registers.
I clear and write the registers using a RPG program like this
(fragment):
C CLEARO6REGTMP
C WRITEO6REGTMP

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].