델파이 4, 윈 98, DBF 사용
- sFileName,sDW_File0_1 실행시 알수있는 화일임.
With Query1 do begin
Close;
SQL.Clear;
SQL.Add('UPDATE '''+sFileName+''' SET fDH.SHEET_OK = ''V''');
SQL.Add('FROM '''+sFileName+''' AS a, '''+sDW_File0_1+''' AS b');
SQL.Add('where a.NO_OT = b.STOCK_SHOP+b.SHET_NO and a.PRCE = b.PRCE and a.EA_GOOD = (SELECT SUM(c.T_RCPT_QTY) FROM '''+sDW_File0_1+''' c WHERE c.STOCK_SHOP+c.SHET_NO = a.NO_OT GROUP BY c.STOCK_SHOP, c.SHET_NO)');
ExecSQL;
end;