질문이 이게 맞는지 모르겠네요..


        With Query1 Do Begin
             Close;
             Sql.Add('SELECT   SUM(DECODE(입금월,'01',합계금액,0))  "01월금액" ');
             Sql.Add('        ,SUM(DECODE(입금월,'02',합계금액,0))  "02월금액" ');
             Sql.Add('        ,SUM(DECODE(입금월,'03',합계금액,0))  "03월금액" ');
             Sql.Add('        ,SUM(DECODE(입금월,'04',합계금액,0))  "04월금액" ');
             Sql.Add('        ,SUM(DECODE(입금월,'05',합계금액,0))  "05월금액" ');
             Sql.Add('        ,SUM(DECODE(입금월,'06',합계금액,0))  "06월금액" ');
             Sql.Add('        ,SUM(DECODE(입금월,'07',합계금액,0))  "07월금액" ');
             Sql.Add('        ,SUM(DECODE(입금월,'08',합계금액,0))  "08월금액" ');
             Sql.Add('        ,SUM(DECODE(입금월,'09',합계금액,0))  "09월금액" ');
             Sql.Add('        ,SUM(DECODE(입금월,'10',합계금액,0))  "10월금액" ');
             Sql.Add('        ,SUM(DECODE(입금월,'11',합계금액,0))  "11월금액" ');
             Sql.Add('        ,SUM(DECODE(입금월,'12',합계금액,0))  "12월금액" ');
             Sql.Add('         from  Table_name                                ');
             Sql.Add('         Where 합계금액 > :date1 and 입금년도 = date2 ');
             Open;
             ParamByName('Date1').asFloat   :=  100;
             ParamByName('Date2').AsString  := '2004';
             HAP[01]                        :=  FieldByName('01월금액').AsFloat;
             HAP[02]                        :=  FieldByName('02월금액').AsFloat;
             HAP[03]                        :=  FieldByName('03월금액').AsFloat;
             HAP[04]                        :=  FieldByName('04월금액').AsFloat;
             HAP[05]                        :=  FieldByName('05월금액').AsFloat;
             HAP[06]                        :=  FieldByName('06월금액').AsFloat;
             HAP[07]                        :=  FieldByName('07월금액').AsFloat;
             HAP[08]                        :=  FieldByName('08월금액').AsFloat;
             HAP[09]                        :=  FieldByName('09월금액').AsFloat;
             HAP[10]                        :=  FieldByName('10월금액').AsFloat;
             HAP[11]                        :=  FieldByName('11월금액').AsFloat;
             HAP[12]                        :=  FieldByName('12월금액').AsFloat;
        End;  

김진용님 정말 감사합니다.(냉무)

많은 도움 부탁드림니다

다른것들은 나름대로 다 방식이 다틀립니다.
그래도 공용으로 쓸 수 있는것은

select   입금년도, 입금월, SUM(합계금액) AS 합계금액SUM
from   Table_name
where   합계금액 > 100   and   입금년도 = '2004'
group by  입금년도, 입금월

이정도는 대부분의 DB는 먹히니 이 방법도 괜찮음

먼저 답변 감사드립니다..

월별 합계금액SUM 을 전역변수값으로 가져가야 되거든요..
그래서 그 값을 배열에 넣는 방법을 부탁 드린 것입니다.
(참고로 오라클을 사용합니다.)

좋은 답변 꼭 기다리겠습니다..
다시 한번 감사 드림니다...