SQLODRDATE 타입을 알수 없다고 나오는데 도무지 모르겠습니다.
(에러 메세지는 Q_:Field 'SQLODRDATE' is of an unknown type'.)하지만
그상태에서 다시 F9 누르면 데이타는 올라 옵니다
위대하신 고수님들 부디 ........
procedure TfrmESCUIN01.Q_Open;
var
i : integer;
a : string;
begin
Q_.close;
Q_.SQL.clear;
Q_.SQL.ADD('SELECT COUNT(O.OID) CNT, ');
Q_.SQL.ADD(' SUM(I.ADJUSTPRICE) TOT ');
Q_.SQL.Add(' CONVERT(datetime, SUBSTRING(O.ORDERDATE,1,10),102) RDATE ');
Q_.SQL.ADD(' FROM DS_ORDER O, ');
Q_.SQL.ADD(' DS_ORDERITEM I ');
Q_.SQL.ADD(' WHERE O.OID = I.OID ');
Q_.SQL.ADD(' AND O.USERID = :SQLUSERID ');
Q_.ParamByName('SQLUSERID').AsString := USERID.Text ;
i := 0;
if Length(FDATE.text) > 0 then begin
Q_.SQL.Add('AND substring(datetostr(O.ORDERDATE),1,10) >= :SQLODRDATE ');
Q_.Params[i].AsString := Copy(FDATE.text,1,4) + '.' +
Copy(FDATE.text,5,2) + '.' +
Copy(FDATE.text,7,2);
end;
Q_.Open;