Q&A
- 임시테이블 생성과 쿼리....
안녕하세요! 포근한 날씨임다...
버튼을 누르면 임시테이블을 생성하고 서버로부터 'BMT750'라는 테이블에서 필요한 부문만 임시테이블로 INSERT하고 여기에사 몇가지 더 조합을 시키고 다시 생성된 임시테이블로부터 쿼리를 이용한 조회프로그램을 짜려고 하는데....임시테이블로 부터 SELECT할때 ERROR가 발생하는 것 같아요...
임시테이블을 BMT750#로 설정했는데 컴파일하고 프로그램을 조회하는데 'INVALID OBJECT BMT750T'라는 메시지가 나옵니다...뭐가 잘못된 것일까요...여러고수님들의 고견을 기다립니다...그럼 좋은 하루되세요...아래에 제가 작성한 소스를 올립니다..
procedure TForm1.querybitbtn1Click(Sender: TObject);
var
i:integer;
begin
with query1 do
begin
close;
sql.clear;
sql.add('create table bmt750#(');
sql.add('prdcod char(13),');
sql.add('stkid char(2),');
sql.add('subid char(1),');
sql.add('trans char(7),');
sql.add('netinp char(9),');
sql.add('bkrinp char(7),');
sql.add('netoup char(9))');
close;
sql.clear;
sql.add('insert into bmt750#(prdcod,stkid,subid,trans,netinp,brkinp,netoup');
sql.add('select prdcod,stkid,subid,trans,netinp,brkinp,netoup');
sql.add('from bmt750');
sql.add('where stkyr+stkmm+stkdd>=20001129');
close;
sql.clear;
sql.add('select prdcod,stkid,subid,trans,netinp,brkinp,netoup');
sql.add('from bmt750#');
open;
first;
i:=1;
stringgrid1.rowcount:=recordcount+1;
while not eof do
begin
stringgrid1.cells[0,i]:=fieldbyname('prdcod').asstring;
stringgrid1.cells[1,i]:=fieldbyname('stkid').asstring;
stringgrid1.cells[2,i]:=fieldbyname('subid').asstring;
stringgrid1.cells[3,i]:=fieldbyname('trans').asstring;
stringgrid1.cells[4,i]:=fieldbyname('netinp').asstring;
stringgrid1.cells[5,i]:=fieldbyname('brkinp').asstring;
stringgrid1.cells[6,i]:=fieldbyname('netoup').asstring;
next;
inc(i);
end;
close;
end;
end;
버튼을 누르면 임시테이블을 생성하고 서버로부터 'BMT750'라는 테이블에서 필요한 부문만 임시테이블로 INSERT하고 여기에사 몇가지 더 조합을 시키고 다시 생성된 임시테이블로부터 쿼리를 이용한 조회프로그램을 짜려고 하는데....임시테이블로 부터 SELECT할때 ERROR가 발생하는 것 같아요...
임시테이블을 BMT750#로 설정했는데 컴파일하고 프로그램을 조회하는데 'INVALID OBJECT BMT750T'라는 메시지가 나옵니다...뭐가 잘못된 것일까요...여러고수님들의 고견을 기다립니다...그럼 좋은 하루되세요...아래에 제가 작성한 소스를 올립니다..
procedure TForm1.querybitbtn1Click(Sender: TObject);
var
i:integer;
begin
with query1 do
begin
close;
sql.clear;
sql.add('create table bmt750#(');
sql.add('prdcod char(13),');
sql.add('stkid char(2),');
sql.add('subid char(1),');
sql.add('trans char(7),');
sql.add('netinp char(9),');
sql.add('bkrinp char(7),');
sql.add('netoup char(9))');
close;
sql.clear;
sql.add('insert into bmt750#(prdcod,stkid,subid,trans,netinp,brkinp,netoup');
sql.add('select prdcod,stkid,subid,trans,netinp,brkinp,netoup');
sql.add('from bmt750');
sql.add('where stkyr+stkmm+stkdd>=20001129');
close;
sql.clear;
sql.add('select prdcod,stkid,subid,trans,netinp,brkinp,netoup');
sql.add('from bmt750#');
open;
first;
i:=1;
stringgrid1.rowcount:=recordcount+1;
while not eof do
begin
stringgrid1.cells[0,i]:=fieldbyname('prdcod').asstring;
stringgrid1.cells[1,i]:=fieldbyname('stkid').asstring;
stringgrid1.cells[2,i]:=fieldbyname('subid').asstring;
stringgrid1.cells[3,i]:=fieldbyname('trans').asstring;
stringgrid1.cells[4,i]:=fieldbyname('netinp').asstring;
stringgrid1.cells[5,i]:=fieldbyname('brkinp').asstring;
stringgrid1.cells[6,i]:=fieldbyname('netoup').asstring;
next;
inc(i);
end;
close;
end;
end;
2
COMMENTS
-
-
김종언 wrote:
> 당연한 에러입니다.
>
> 왜냐??
>
> SQL은... ADD 시켜준다음에... 반드시... ExecSQL이라는 명령을 내려줘야 합니다.
>
> 이 명령이 없이 다시 clear를 시켰으니 결국 임시 테이블 생성을 하지 않은것과
> 같습니다.
>
> 만들지 않은 테이블에다 자료를 삽입하려하니깐 문제가 생기는 겁니다.
>
> 그리고 참고로 테이블 이름에 특수문자.. 과연 이게 괜찮은지.. 장담하지 못합니다.
>
> 특수문자는 _ 이거 하나로만 하는게 좋지 않을런지요,.....
>
>
> 델이랑파이랑 wrote:
> > 안녕하세요! 포근한 날씨임다...
> > 버튼을 누르면 임시테이블을 생성하고 서버로부터 'BMT750'라는 테이블에서 필요한 부문만 임시테이블로 INSERT하고 여기에사 몇가지 더 조합을 시키고 다시 생성된 임시테이블로부터 쿼리를 이용한 조회프로그램을 짜려고 하는데....임시테이블로 부터 SELECT할때 ERROR가 발생하는 것 같아요...
> > 임시테이블을 BMT750#로 설정했는데 컴파일하고 프로그램을 조회하는데 'INVALID OBJECT BMT750T'라는 메시지가 나옵니다...뭐가 잘못된 것일까요...여러고수님들의 고견을 기다립니다...그럼 좋은 하루되세요...아래에 제가 작성한 소스를 올립니다..
> >
> > procedure TForm1.querybitbtn1Click(Sender: TObject);
> > var
> > i:integer;
> > begin
> > with query1 do
> > begin
> > close;
> > sql.clear;
> > sql.add('create table bmt750#(');
> > sql.add('prdcod char(13),');
> > sql.add('stkid char(2),');
> > sql.add('subid char(1),');
> > sql.add('trans char(7),');
> > sql.add('netinp char(9),');
> > sql.add('bkrinp char(7),');
> > sql.add('netoup char(9))');
> > close;
> >
> > sql.clear;
> > sql.add('insert into bmt750#(prdcod,stkid,subid,trans,netinp,brkinp,netoup');
> > sql.add('select prdcod,stkid,subid,trans,netinp,brkinp,netoup');
> > sql.add('from bmt750');
> > sql.add('where stkyr+stkmm+stkdd>=20001129');
> > close;
> >
> > sql.clear;
> > sql.add('select prdcod,stkid,subid,trans,netinp,brkinp,netoup');
> > sql.add('from bmt750#');
> > open;
> > first;
> > i:=1;
> > stringgrid1.rowcount:=recordcount+1;
> > while not eof do
> > begin
> > stringgrid1.cells[0,i]:=fieldbyname('prdcod').asstring;
> > stringgrid1.cells[1,i]:=fieldbyname('stkid').asstring;
> > stringgrid1.cells[2,i]:=fieldbyname('subid').asstring;
> > stringgrid1.cells[3,i]:=fieldbyname('trans').asstring;
> > stringgrid1.cells[4,i]:=fieldbyname('netinp').asstring;
> > stringgrid1.cells[5,i]:=fieldbyname('brkinp').asstring;
> > stringgrid1.cells[6,i]:=fieldbyname('netoup').asstring;
> > next;
> > inc(i);
> > end;
> > close;
> > end;
> > end;
> >
김종언 님 감사드립니다..
알고보니 간단한 문제였네요..
좋은 하루되세요!!
(NOTICE) You must be logged in to comment on this post.
-
- 넘몰라
- 2000.12.01 23:41
- 0 COMMENTS
- /
- 0 LIKES
-
- perceptio
- •
- 2000.12.02 00:35
- 1 COMMENTS
- /
- 0 LIKES
-
김범석•2000.12.02 00:36extractfilepath()는 화일명만 알고 있을때 경로를 자동으로 알려주는 함수가 아닙니다 경로와 화일명을...
-
- 멀러요
- 2000.12.01 23:28
- 0 COMMENTS
- /
- 0 LIKES
-
- 델이랑파이랑
- •
- 2000.12.01 22:13
- 2 COMMENTS
- /
- 0 LIKES
안녕하세요! 포근한 날씨임다... 버튼을 누르면 임시테이블을 생성하고 서버로부터 'BMT750'라는 테이블에서 필요한 부문만 임시테이블로 INSERT하고 여기에사 몇가지 더 조합을 시키고 다시 생성된 임시테이블로부터 쿼리를 이용한 조회...-
김종언•2000.12.01 22:23당연한 에러입니다. 왜냐?? SQL은... ADD 시켜준다음에... 반드시... ExecSQL이라는 명령을 내려줘야...
-
델이랑파이랑•2000.12.01 23:08김종언 wrote: > 당연한 에러입니다. > > 왜냐?? > > SQL은... ADD 시켜준다음에... 반드시... Exec...
-
- 남주희
- •
- 2000.12.01 20:57
- 2 COMMENTS
- /
- 0 LIKES
-
김종언•2000.12.01 22:18설마 로컬 DB는 아니겠죠? 그럼 과거 제가했던 것의 SQL문장입니다. 참고하세요... select aa.item_co...
-
좋은날•2000.12.01 21:28남주희 wrote: > 아무리 해도 답이 안나와서 질문 합니다. > > 내용은 장비 이력관리 입니다. > > ...
-
- 곽난희
- •
- 2000.12.01 22:49
- 1 COMMENTS
- /
- 0 LIKES
-
김범석•2000.12.02 00:45c_part와 c_dept의 query component 와 dataSource component 를 각각 미리 정의 해 놓고 라디오 ...
-
- 정준승
- •
- 2000.12.01 20:23
- 1 COMMENTS
- /
- 0 LIKES
-
김종언•2000.12.01 20:30만들때.. 옵션으로 지정됩니다. Include file version number 와 => ocx에 버젼정보 ...
-
- 견습델피언
- 2000.12.01 20:22
- 0 COMMENTS
- /
- 0 LIKES
-
- pallas
- •
- 2000.12.01 20:21
- 2 COMMENTS
- /
- 0 LIKES
-
김범석•2000.12.02 00:50Table component에 filter 라는 속성이 있습니다 그곳에 where 조건을 쓰면 됩니다 작성시 Filtered 속...
-
김종언•2000.12.01 20:24테이블에서의 조건검색은 filter를 사용합니다. 해보세요. pallas wrote: > 테이블 컴포넌트에서요 ...
-
- menstar
- •
- 2000.12.01 20:17
- 1 COMMENTS
- /
- 0 LIKES
-
김종언•2000.12.01 20:23C:Program FilesBorlandDelphi5DemosFastNet 폴더를 열어보세요... 예제 있습니다. 예제는 항상 델파이와...
-
- menstar
- 2000.12.01 20:15
- 0 COMMENTS
- /
- 0 LIKES
-
- 초보 찬
- •
- 2000.12.01 19:45
- 2 COMMENTS
- /
- 0 LIKES
-
yosul•2000.12.01 20:03> tmpdir := 'copy *.* c:backup'+formatdateTime('yyyymmdd',date); > WinExec('COMMAND.COM /C '+ tmp...
-
yosul•2000.12.01 23:00> tmpdir := 'copy *.* c:backup'+formatdateTime('yyyymmdd',date); > WinExec('COMMAND.COM /C '+ t...
-
- 어린왕자
- 2000.12.01 19:43
- 0 COMMENTS
- /
- 0 LIKES
-
-
방경주•2000.12.01 22:14Select * from workitem a where a.Lastupdate = (Select Max(Lastupdate) ...
-
사발우성•2000.12.01 23:47어떻게 해야하는지 아시는 고수님들은 답글좀 달아 주시와여 ㅠㅠ 겨우 수정했는디.... 이상한 것땜시 환...
-
데빠이•2000.12.01 19:32사발우성 wrote: > > 하여 고수님들 안뇽 하신가여 쿼리 질문좀 할라구 함당..^^ > > ...
-
사발우성•2000.12.01 20:02> > Partno Revno Lastupdate uom Descript 123456 1.1 00...
-
mafioso•2000.12.02 03:26다른 조건이 없다면 1. 조인을 이용 select partno, revno, lastupdate, uom, descript from workitem...
-
사발우성•2000.12.02 04:22답변 감솨여 ^^
-
데빠이•2000.12.01 19:32사발우성 wrote: > > 하여 고수님들 안뇽 하신가여 쿼리 질문좀 할라구 함당..^^ > > ...
-
-
- 김진선
- •
- 2000.12.01 19:08
- 1 COMMENTS
- /
- 0 LIKES
-
엑소•2000.12.02 02:45김진선 wrote: > 인터베이스에서 String 으로 선언된 필드에 default로 공백을 줄려고 하는데 어케하는건...
-
- 양용민
- •
- 2000.12.01 18:49
- 1 COMMENTS
- /
- 0 LIKES
-
김종언•2000.12.01 20:20가능하지만 필드명은 가급적 영문을 사용하는게 좋습니다. 양용민 wrote: > 프로그램 DB를 DBASE만 사...
-
- 정일준
- •
- 2000.12.01 18:49
- 1 COMMENTS
- /
- 0 LIKES
-
김종언•2000.12.01 20:38delphi 5 contact 라는 책에보면.. delphi와 asp라는 부분이 있습니다. 거기 보시면.. 될거 같네요... ...
-
- 이유리
- •
- 2000.12.01 18:26
- 1 COMMENTS
- /
- 0 LIKES
-
김종언•2000.12.01 18:34환경을 똑같이 해줘야 합니다.. BDE를 사용했다면.. BDE 깔고 알리아스 잡아주세요 그거 귀찮으니깐요.. ...
-
- 최명관
- 2000.12.01 08:07
- 0 COMMENTS
- /
- 0 LIKES
-
- mallove
- 2000.12.01 07:18
- 0 COMMENTS
- /
- 0 LIKES
왜냐??
SQL은... ADD 시켜준다음에... 반드시... ExecSQL이라는 명령을 내려줘야 합니다.
이 명령이 없이 다시 clear를 시켰으니 결국 임시 테이블 생성을 하지 않은것과
같습니다.
만들지 않은 테이블에다 자료를 삽입하려하니깐 문제가 생기는 겁니다.
그리고 참고로 테이블 이름에 특수문자.. 과연 이게 괜찮은지.. 장담하지 못합니다.
특수문자는 _ 이거 하나로만 하는게 좋지 않을런지요,.....
델이랑파이랑 wrote:
> 안녕하세요! 포근한 날씨임다...
> 버튼을 누르면 임시테이블을 생성하고 서버로부터 'BMT750'라는 테이블에서 필요한 부문만 임시테이블로 INSERT하고 여기에사 몇가지 더 조합을 시키고 다시 생성된 임시테이블로부터 쿼리를 이용한 조회프로그램을 짜려고 하는데....임시테이블로 부터 SELECT할때 ERROR가 발생하는 것 같아요...
> 임시테이블을 BMT750#로 설정했는데 컴파일하고 프로그램을 조회하는데 'INVALID OBJECT BMT750T'라는 메시지가 나옵니다...뭐가 잘못된 것일까요...여러고수님들의 고견을 기다립니다...그럼 좋은 하루되세요...아래에 제가 작성한 소스를 올립니다..
>
> procedure TForm1.querybitbtn1Click(Sender: TObject);
> var
> i:integer;
> begin
> with query1 do
> begin
> close;
> sql.clear;
> sql.add('create table bmt750#(');
> sql.add('prdcod char(13),');
> sql.add('stkid char(2),');
> sql.add('subid char(1),');
> sql.add('trans char(7),');
> sql.add('netinp char(9),');
> sql.add('bkrinp char(7),');
> sql.add('netoup char(9))');
> close;
>
> sql.clear;
> sql.add('insert into bmt750#(prdcod,stkid,subid,trans,netinp,brkinp,netoup');
> sql.add('select prdcod,stkid,subid,trans,netinp,brkinp,netoup');
> sql.add('from bmt750');
> sql.add('where stkyr+stkmm+stkdd>=20001129');
> close;
>
> sql.clear;
> sql.add('select prdcod,stkid,subid,trans,netinp,brkinp,netoup');
> sql.add('from bmt750#');
> open;
> first;
> i:=1;
> stringgrid1.rowcount:=recordcount+1;
> while not eof do
> begin
> stringgrid1.cells[0,i]:=fieldbyname('prdcod').asstring;
> stringgrid1.cells[1,i]:=fieldbyname('stkid').asstring;
> stringgrid1.cells[2,i]:=fieldbyname('subid').asstring;
> stringgrid1.cells[3,i]:=fieldbyname('trans').asstring;
> stringgrid1.cells[4,i]:=fieldbyname('netinp').asstring;
> stringgrid1.cells[5,i]:=fieldbyname('brkinp').asstring;
> stringgrid1.cells[6,i]:=fieldbyname('netoup').asstring;
> next;
> inc(i);
> end;
> close;
> end;
> end;
>