RE: beating the system...
Posted in 2000
For the primary key the following works. SELECT c1.colname, c2.colname, c3.colname, c4.colname, c5.colname, c6.colname, c7.colname, c8.colname, c9.colname, c10.colname, c11.colname, c12.colname, c13.colname, c14.colname, c15.colname, c16.colname FROM sysconstraints, sysindexes, systables, outer syscolumns c1, outer syscolumns c2, outer syscolumns c3, outer syscolumns c4, outer syscolumns c5, outer syscolumns c6, outer syscolumns c7, outer syscolumns c8, outer syscolumns c9, outer syscolumns c10, outer syscolumns c11, outer syscolumns c12, outer syscolumns c13, outer syscolumns c14, outer syscolumns c15, outer syscolumns c16 WHERE constrtype="P" AND systables.tabname = "customer" AND sysconstraints.idxname=sysindexes.idxname AND sysconstraints.tabid=systables.tabid AND c1.colno=sysindexes.part1 AND c1.tabid=systables.tabid AND c2.colno=sysindexes.part2 AND c2.tabid=systables.tabid AND c3.colno=sysindexes.part3 AND c3.tabid=systables.tabid AND c4.colno=sysindexes.part4 AND c4.tabid=systables.tabid AND c5.colno=sysindexes.part5 AND c5.tabid=systables.tabid AND c6.colno=sysindexes.part6 AND c6.tabid=systables.tabid AND c7.colno=sysindexes.part7 AND c7.tabid=systables.tabid AND c8.colno=sysindexes.part8 AND c8.tabid=systables.tabid AND c9.colno=sysindexes.part9 AND c9.tabid=systables.tabid AND c10.colno=sysindexes.part10 AND c10.tabid=systables.tabid AND c11.colno=sysindexes.part11 AND c11.tabid=systables.tabid AND c12.colno=sysindexes.part12 AND c12.tabid=systables.tabid AND c13.colno=sysindexes.part13 AND c13.tabid=systables.tabid AND c14.colno=sysindexes.part14 AND c14.tabid=systables.tabid AND c15.colno=sysindexes.part15 AND c15.tabid=systables.tabid AND c16.colno=sysindexes.part16 AND c16.tabid=systables.tabid; Nice and short eh? Will >===== Original Message From homeware=REMOVETHIS=@dds.nl (HomeWare) ===== >How can I, with Delphi/Pascal, in runtime, discover what the keyfields in a >table in an Informix-database are. >Or better: how can I, also in Delphi/Pascal and also in runtime, extract the >SQL-text from the database. >I'm working on a database-maintenance application. It is not necessary to >restruct the database, but I need to know what the keyfields are to change the >data in de tables. > >Greetings, > >Bert ------------------------------------------------------------ This e-mail has been sent to you courtesy of OperaMail, as a free service from Opera Software, makers of the award-winning Web Browser, Opera. Visit us at http://www.opera.com/ or our portal at: http://www.myopera.com/ Your free e-mail account is waiting at: http://www.operamail.com/ ------------------------------------------------------------