求算法
C_SQL_MAIN1 : AnsiString = 'SELECT LO7017DB1.kubun LSTKUBUN, ' +
' LO7017DB1.setldate LSTSETLDATE, ' +
' LO7017DB1.setlsect LSTSETLSECT, ' +
' LO7017DB2.itemgrpnam LSTITEMGRPNAM ,' +
' LO7017DB1.itemnam LSTITEMNAM ,' +
' LO7017DB1.cptyacntnam LSTCPTYACNTNAM, ' +
' LO7017DB1.cptyacnt LSTCPTYACNT ,' +
' LO7017DB1.netno LSTNETNO ,' +
' LO7017DB1.afttrnno LSTAFTTRNNO, ' +
' LO7017DB1.aftrcv LSTAFTRCV ,' +
' LO7017DB1.aftpay LSTAFTPAY ,' +
' LO7017DB1.beftrnno LSTBEFTRNNO,' +
' LO7017DB1.befrcv LSTBEFRCV ,' +
' LO7017DB1.befpay LSTBEFPAY ,' +
' LO7017DB1.netfrmtotyp LSTNETFRMTOTYP ,' +
' LO7017DB2.itemgrpcd LSTITEMGRPCD ,' +
' LO7017DB1.sectseq LSTSECTSEQ ,' +
' LO7017DB1.sysid LSTSYSID,' +
' LO7017DB1.tranno LSTTRANNO,' +
' LO7017DB1.trannobr LSTTRANNOBR,' +
' LO7017DB1.apptoday LSTAPPTODAY ,' +
' LO7017DB1.svrdate LSTSVRDATE ,' +
//add by chaolj for co653 in 00/01/31
' LO7017DB1.stlsts LSTLSTS ' +
//end of add
'FROM LO7017.DB LO7017DB1,LO7017.DB LO7017DB2 ' +
'WHERE LO7017DB1.netno = LO7017DB2.netno
数据是放在一个list里的,有什么办法可以不用2阶for循环取出对应的值?请高手指点!最好是一阶for循环。