In V5R1, you code a composite key usingKLISTandKFLD. It's just that those opcodes have to be coded in fixed-form calcs. In V5R2, there are more options available to you. First, you can code the search arguments in the compound key directly in the keyed I/O statement. For example, "chain (arg1: arg2: arg3+17) rec;". Individual search arguments may be any expression, and have to match the corresponding keys in type only. Unlike KLIST's, RPG handles length and format conversion for the list of search arguments. Second, you can define your search arguments as subfields of a data structure and code your I/O operation as "chain %kds(kds) rec;". This is nice if you define the data structure usingextname(file:rec:*key), which defines the DS as an externally described data structure with just the key fields of the record as the subfields. The%kds()more closely approximates theklist, but the list of search arguments syntax is the more flexible.

Reply With Quote