Hi all of you
I want to be able to retreive a files property 'Keys must be unique: N=No, Y=Yes'.
It is possible to find that out using Output file for DSPFD TYPE(*ACCPTH), then field APUNIQ shows just that.
But I suspect there must be a file in QSYS containing that field too.
Can somebody point me to that file/field?
Info about the key fields of my item master file can be retreived like this:
select dbkfld dbkfld /* Field */
, dbkord dbkord /* Order */
, cast( dbifln as dec(7, 0)) dbifln /* Length */
, dbiitp dbiitp /* Type */
, cast(coalesce(dbinsc, 99) as dec(2, 0)) dbinsc /* Decimals */
, coalesce(trim(dbitxt), trim(dbihdg)) dbitxt /* Text */
join qsys/qadbifld on dbilib = dbklib
and dbifil = dbkfil
and dbifmt = dbkfmt
and dbifld = dbkfld
where dbklib = 'MYDTALIB'
and dbkfil = 'ITEMMASTER'
DBKFLD DBKORD DBIFLN DBIITP DBINSC DBITXT
COMPIM A 2 A 99 Company code
ITEMIM A 20 A 99 Item code