C++Builder Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
C++빌더 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
메신저 프로젝트
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
볼랜드포럼 광고 모집

C++빌더 Q&A
C++Builder Programming Q&A
[48468] [질문]스토어드 프로시저 실행하기
김은하 [yosu] 1164 읽음    2007-03-20 13:58
델파이 책을 참고해서 C++빌더를 사용하고있는데요...

TSQLDataSet에서 스토어드 프로시저 실행하기를 한번 해 볼려고  interbase에서 스토어드 프로시저를 만들려고 했는데 잘 안만들어 지네요..^^;

어디가 잘못 됐는지 알려 주세요..^^

우선 스토어드 프로시저.....테이블에 가서 sql 문을 실행 시켜 줬더니 에러가 뜨네요...^^:;
create procedure add_CLASSIFY returns(
  ICLSKIND    char(10),
  ICLSPRICE    int,
  ICLSDAY                    int,
  ICLSARREARS    int
)as
begin
  insert into CLASSIFY(CLSKIND, CLSPRICE, CLSDAY, CLSARREARS)
     values(:ICLSKIND, :ICLSPRICE, :ICLSDAY, :ICLSARREARS);
     suspend;
end

이건 아직 실행을 못해봤는데요...(스토어드 프로시저가 없어서...^^:)
잘못된 부분이 있으면 알려주세요....
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    TSQLDataSet->ParamByName("ICLSKIND")->AsString = Edit1->text;
    TSQLDataSet->ParamByName("ICLSPRICE")->AsInteger =StrToInt(Edit2->Text);
    TSQLDataSet->ParamByName("ICLSDAY")->AsInteger =StrToInt(Edit3->Text);
    TSQLDataSet->ParamByName("ICLSARREARS")->AsInteger =StrToInt(Edit4->Text);

    TSQLDataSet->ExecSQL(false);

    Edit1->text="";
    Edit2->text="";
    Edit3->text="";
    Edit4->text="";
}

+ -

관련 글 리스트
48468 [질문]스토어드 프로시저 실행하기 김은하 1164 2007/03/20
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.