delphi 6, firebird1.5, zeos를 사용하고 있습니다.
거래처별 하루 거래금액총액과 결재사항 총액을 표시하고 더불어 월거래사항총액을 DBGrid에 표시하고 싶습니다.
전표화일명을 대신하는 m_filename 변수, 거래처를 데이터파일 cust, 일일마감화일 cumagam이 세가지를 아래와 같이 연결하였는데 에러가 나네요...
처음 사용해보는 방법이라 사용법을 잘 모르겠네요...
책보고 이래저래 구성했는데 에러가 난다는...ㅜㅠ
어떻게 해야하는 건지요???
with ZQuery1 do
begin
Close;
SQL.Clear;
SQL.Add('Select a.custcode, b.custname, sum(a.junamt) junamt, sum(a.jun_k_amt) jun_k_amt, sum(a.jun_k_dc) jun_k_dc, ');
SQL.Add(' (Select sum(c.ma_g_amt1+c.ma_g_amt2) from CUMAGAM c ');
SQL.Add(' Where c.custcode = a.custcode');
SQL.Add(' and c.madate >= '''+copy(DateToStr(DateTimePicker1.Date),1,8)+'''+''01''');
SQL.Add(' and c.madate <= '''+DateToStr(DateTimePicker1.Date)+''') as yeartot');
SQL.Add(' from ' + m_filename + ' a Left Outer Join cust b on b.custcode = a.custcode');
SQL.Add('Where a.jundate = '''+DateToStr(DateTimePicker1.Date)+'''');
SQL.Add(' and a.jundel = ''N''');
SQL.Add(' and a.custcode <> ''''');
SQL.Add(' and (a.jungub2 = ''매입'' or a.jungub2 = ''매출'')');
SQL.Add('Group By a.custcode, b.custname');
SQL.Add('Order By a.custcode, b.custname');
Open;
First;
end;
|