|
midrange.com
Here is example of creating a table using my Make tool Compile with the
added feature of doing a GRTOBJAUT.
1. Delete the existing file.
2. Runs this script to create the index
3. Moves from default library.
4. Grant the authority.
Further examples are in the Readme at www.think400.dk/downloads.htm
/* *_> CNLLSTSPLF SRCFILE(@2/@1) SRCMBR(@3)
*/
/* *_> DLTF FILE(@5/@4)
*/
/* *_> RUNSQLSTM SRCFILE(@2/@1) SRCMBR(@3) +
*/
/* *_> DFTRDBCOL(*NONE) CLOSQLCSR(*ENDMOD) ERRLVL(20)
*/
/* *_> MOVOBJ OBJ(*LIBL/@4) OBJTYPE(*FILE) TOLIB(@5)
*/
/* *_> GRTOBJAUT OBJ(@5/@4) OBJTYPE(*FILE) USER(*PUBLIC) AUT(*USE)
*/
Create Index myindex
On PWSNR (EDIPO ASC)
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 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].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
