|
> How can I get away from using DFU > as a data input mechanism for queries? Well, you can use Query Management Query. There is an answer in the FAQ about that. http://faq.midrange.com I'd bet the archives have more as well. Look for QMQRY. ReXX can do SQL directly, so SAY and PARSE PULL can be used to feed SQL directly. address EXECSQL EXECSQL 'set OPTION COMMIT = *NONE' select = 'select sys_cname,sys_dname,sys_tname,coltype,', 'length,coalesce(scale,0),label', 'from syscolumns where sys_cname like ?' EXECSQL 'prepare STMTCOL from :select' EXECSQL 'declare CRSRCOL cursor for STMTCOL' EXECSQL 'open CRSRCOL using :columname' say 'Column name' columname 'found in these tables:' do forever EXECSQL 'fetch CRSRCOL into :column,:library,:table,:type,:length,', ':scale,:label' if sqlcode <> 0 then leave say library '/' table '-' column type length scale label end > I'd prefer to use formatted screens/menus and REXX or CL. You can certainly use display files in CL. Look up SNDRCVF. > I can do what I ask on other IBM platforms > using REXX and screens built with XEDIT > or the like, but can't seem to find the > same facility on the iSeries. Can you post some ReXX code that does what you're after? There are a few ReXX'ers on the list, and you might wake up some good discussion... --buck
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 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.