이승근 님이 쓰신 글 :
: 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;
델마당에도 있던데... 해결은 하셨나요?
SQL.Add(' and c.madate >= '''+copy(DateToStr(DateTimePicker1.Date),1,8)+'''||''01''');
여기가 문제인듯 싶네요...
|