SELECT DISTINCT O2.ID
FROM ORDITEMSTATE O1,
 FULFILDOC F, ORD O2
WHERE
 (F.NUM = O1.FFDOCNUM)
 AND (F.INPDATE >= :D1)
 AND (F.INPDATE <= :D2)
 AND (O2.NUM = O1.ORDNUM)

PLAN SORT (JOIN (O2 NATURAL,O1 INDEX (XPKORDITEMSTATE),F INDEX (RDB$PRIMARY46)))

Create index id_ind on ORD(ID)

 AND (O2.NUM = O1.ORDNUM)
PLAN SORT (JOIN (O2 INDEX(id_ind),O1 INDEX (XPKORDITEMSTATE),F INDEX (RDB$PRIMARY46)))

Create index id_ind on ORD(num)

SELECT DISTINCT O2.ID, SUM(O.TOTAL),
 COUNT(DISTINCT O2.CLNUM)
FROM ORDITEM O, ORDITEMSTATE O1,
 FULFILDOC F, ORD O2
WHERE
(O1.ORDNUM = O.ORDNUM)
 AND (O1.ITEMNUM = O.ITEMNUM)
 AND (O1.FFDOCTYPE = 'A')
 AND (O1.STATECODE IN ('0','1'))
 AND (F.NUM = O1.FFDOCNUM)
 AND (F.INPDATE >= '10.10.2003')
 AND (F.INPDATE <= '15.10.2003')
 AND (O2.NUM = O.ORDNUM)
GROUP BY O2.ID
ORDER BY O2.ID,  2 ,  3 

SELECT DISTINCT O2.ID
FROM ORDITEMSTATE O1,
 FULFILDOC F, ORD O2
WHERE
 (F.NUM = O1.FFDOCNUM)
 AND (F.INPDATE >= '10.10.2003')
 AND (F.INPDATE <= '15.10.2003')
 AND (O2.NUM = O1.ORDNUM)

SELECT
  DISTINCT O2.ID
FROM
  FULFILDOC F
    LEFT JOIN ORDITEMSTATE O1 ON (F.NUM = O1.FFDOCNUM)
    LEFT JOIN ORD O2 ON (O1.ORDNUM = O2.NUM)
WHERE
  (F.INPDATE >= :D1) AND (F.INPDATE <= :D2)

PLAN SORT (JOIN (JOIN (F NATURAL,O1 INDEX (XIF150ORDITEMSTATE)),O2 INDEX (RDB$PRIMARY56)))

SELECT DISTINCT O2.ID
FROM ORDITEMSTATE O1,
 FULFILDOC F, ORD O2
WHERE
 (F.NUM = O1.FFDOCNUM)
 AND (F.INPDATE >= :D1)
 AND (F.INPDATE <= :D2)
 AND (O2.NUM = O1.ORDNUM)
into :IDD
do begin
 ID=NULL;
 SELECT O2.ID
 FROM ORDITEMSTATE O1, ORD O2
 WHERE
 (((O1.FFDOCTYPE = 'A') AND (O1.STATECODE IN ('0','1')))
 OR
 (O1.FFDOCTYPE IN ('L','R')) )
 AND (O2.NUM = O1.ORDNUM) AND (O2.ID = :IDD)
 into :ID;

 IF (ID IS NOT NULL) THEN BEGIN