Logical Over Flat S/36E File

Q: How do you create a native AS/400 logical file (with noncontiguous keys) over a S/36 Environment file?

A: The code in 8 creates a native logical file with noncontiguous keys over a S/36 Environment file.

A: The code in Figure 8 creates a native logical file with noncontiguous keys over a S/36 Environment file.

TechTalk: Logical Over Flat S/36E File

Figure 8 Instructions for a Logical File with Noncontiguous

 BLDFILE TESTPHY,I,RECORDS,1,80,,T,1,5,DFILE,NODUPKEY ... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 A R TESTLOGR PFILE(TESTPHY) A K00001 A F00001 A VNDR I SST(F00001 40 3) A SEQN I SST(F00001 20 4) A K VNDR A K SEQN ... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7