On 2019-02-06 6:12 PM, Brian Parkins wrote:
PSDS should be OK - Program Status Data Structure. The layout for it is defined externally by the SYSAPGPF file.
However, the EXTNAME is not correct and the keyword should be coded before PSDS -or- EXT coded as the first keyword. (Barbara detailed this in an earlier discussion.)
Brian, I think that what you wrote implies that EXTNAME could be coded before EXT. But actually, if EXT is coded, it must be first.
The rule is that if it's externally-described, either EXT or EXTNAME must be coded first. Usually, if you're going to code EXTNAME, you might as well just code EXTNAME first and not bother with EXT.
But if you don't need to code EXTNAME because the file name is the same as the data structure name, then you can just code EXT first. That saves you having to code the external name twice, once for the DS name and once for the EXTNAME keyword.
dcl-ds file1 ext extname('FILE1');
dcl-ds file1 ext; // Me, I think this is better ...
Also, if you have some reason for wanting to code the EXTNAME keyword later in the keywords, then you have to also code EXT first.
So here are the three possible ways to use the EXT and/or EXTNAME keywords to define an externally-described data structure to use *LIBL/FILE1 as the external file. (In the third case, presumably there would be more keywords between EXT and EXTNAME.)
dcl-ds file1 ext;
dcl-ds anyname extname('FILE1');
dcl-ds anyname ext extname('FILE1');
As an Amazon Associate we earn from qualifying purchases.
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.