~SqlSetQuery(Q1,SELECT bs.CHSDATE,bs.RETDATE,d.DOC_ID,bp.SHORTNAME, i.T090f FROM BOOKSTATES bs,DOC d,INV i, BOOKPOINTS bp \ WHERE RDR_ID=~SQLT(~GetParam($RdrId)) AND bs.STATE =~GetParam($HandId) AND i.DOC_ID=d.DOC_ID AND \ bs.INV_ID=i.INV_ID AND bs.IDP=bp.IDP) ~SetParam(Counter, 0) ~SqlForEveryRow(Q1, )

	Íîìåð	Á³áë³îãðàô³ÿ	Ïóíêò êíèãîâèäà÷³(Ñèãëà)	Äàòà âèäà÷³	Äàòà ïîâåðíåííÿ
~SetParam(ChsDate, ~SqlGetColumn(Q1, 1)) ~SetParam(RetDate, ~SqlGetColumn(Q1, 2)) ~IntIf(~Today(),>,~GetParam(RetDate), !) ~IntIf(~Today(),<=,~GetParam(RetDate), )	~AddParam(Counter, 1) ~GetParam(Counter)	~LoadDocById(~SqlGetColumn(Q1, 3)) ~GetTitle()	~SqlGetColumn(Q1, 4)(~SqlGetColumn(Q1, 5))	~GetDate(~GetParam(ChsDate))	~GetDate(~GetParam(RetDate))