김동수 wrote:

> 그리고 list index out of bound(28)라는 메시지와 함께여....

> 코드에디터에서

> q_hjbs330u.sql[10] := 'AND A.SINSANGGBN=''2'' ';

> q_hjbs330u.sql[11] := 'UNION ALL ';

> q_hjbs330u.sql[12] := 'SELECT C.CDFNM || A.JUNGDAE || A.SODAE || A.BUNDAE SOSOK ';

> q_hjbs330u.sql[13] := ', A.HAKGWA, B.HAKGWAFNM, A.HAKYOUN, A.IRUM, A.JUMIN, A.GUNBUN, A.HAKSABUN ';

> q_hjbs330u.sql[14] := ', A.JUNPOSTJUSO || '' '' || A.JUNJUSO ADDR, A.JUNYUKDATE ';

> q_hjbs330u.sql[15] := ', A.TEL, A.YEUNCHA ';

> q_hjbs330u.sql[16] := 'FROM JBSYEBIM A, SGCHAKCM B, SGCCODEM C ';

> q_hjbs330u.sql[17] := 'WHERE A.JUNGBN = ''1'' ';

> q_hjbs330u.sql[28] := 'AND A.HAKGWA = B.HAKGWA (+) ';

> q_hjbs330u.sql[29] := 'AND B.HAKGWAGRP1 = C.CODE (+) ';

> q_hjbs330u.sql[20] := 'AND A.SINSANGGBN=''2'' ';

> q_hjbs330u.sql[21] := 'ORDER BY HAKGWA,HAKYOUN,HAKSABUN ';

> 이런식으로 추가해준 다음부터여....

> 지우면 없어지구여...(에러메시지가...)

> 누가 좀 도와주세여....



q_hjbs330u <-- 이것이 Query 콤포넌트 이신가요???

맞다면

q_hjbs330u.SQL.Clear;

q_hjbs330u.Sql.Add('String');

과 같이 Add 메써드를 사용해 보시지요..