SELECT r.id,r.cnt,sum(IIF(e.log= 0 ,e.cnt, 0 )) as e_cnt,sum(IIF(e.log= 1 ,e.cnt, 0 )) as e_cnt_p,;
			MAX(ALLTRIM(m.name)+IIF(ISNULL(p.name),'',' '+ALLTRIM(p.name))) as medname,;
			MAX(r.retailprice) as retailprice,;
			 000000000000 +MAX(IIF(n.countinpack= 0 , 1 ,n.countinpack)) as cntinpack, r.barcode as barcode,MAX(r.apptyme) as app_tyme ,;
			max(TTOD(d.date)) as date,'' as inv_no;
			FROM receipts r,expenses e,documents d,medications m,nomenclatures n LEFT OUTER JOIN produsers p ON n.prod_id=p.id;
			WHERE r.id=e.rcpt_id AND n.id=r.nom_id AND n.med_id=m.id AND d.id=r.doc_id AND d.closed AND d.store_id=goApp.nStoreHouse_ID AND d.closed;
			GROUP BY r.id,r.cnt, r.barcode	;
		 UNION all;
		 select r.id,r.cnt, 0  as e_cnt, 0  as e_cnt_p,;
			ALLTRIM(m.name)+IIF(ISNULL(p.name),'',' '+ALLTRIM(p.name)) as medname,r.retailprice,;
			 000000000000 +IIF(n.countinpack= 0 , 1 ,n.countinpack) as cntinpack, r.barcode as barcode,r.apptyme as app_tyme,;
			TTOD(d.date) as date,'' as inv_no;
			FROM receipts r,documents d,medications m,nomenclatures n LEFT OUTER JOIN produsers p ON n.prod_id=p.id  ;
			WHERE n.id=r.nom_id AND n.med_id=m.id AND d.id=r.doc_id AND d.closed AND d.store_id=goApp.nStoreHouse_ID AND d.closed;
			AND NOT r.id in (select DISTINCT e.rcpt_id as id FROM expenses e );
			INTO CURSOR _rest READWRITE