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
[12192] [질문] TUpdateSQL 사용 소스 좀 봐주세요..매우 급함..
몰라요 [] 793 읽음    2001-10-30 18:54
아무 에러 박스도 없이 Exception이 일어나 그냥 그 함수가 끝납니다.
exception을 잡으려 " upsqlSEND->ModifySQL->Clear(); "문에
try..catch도 해보았지만 어떤 exception class인지 몰라서 힘듭니다.
모든 exception class를 포함하는 class는 없나요??
TQuery, TUpdateSQL을 동적생성했으며 쿼리의 OnUpdateRecord 이벤트에

qrySEND->OnUpdateRecord = UpdateSEND;   하였습니다. (그냥 이렇게만 해도 되는지..)

호출 :
         UpdateSEND(qrySEND, ukModify, uaFail);    (직접 부르지 말고 update 쿼리를 해야하나..
                                                  (근데 에러가 나서...edit 할 수 없다고..)

void __fastcall TProcess::UpdateSEND(TDataSet* DataSet, TUpdateKind UpdateKind, TUpdateAction &UpdateAction)
{
   TUpdateSQL *upsqlSEND = (TUpdateSQL *)((TBDEDataSet *)DataSet)->UpdateObject;


  switch (UpdateKind)
  {
    case ukModify:

//////////////////////// 여기서부터 그냥 끝남
      upsqlSEND->ModifySQL->Clear();
      upsqlSEND->ModifySQL->Add("update SEND set SND_FLAG = :DELETED, SND_SENDDATETIME = :QSENDDATETIME,");

      upsqlSEND->ModifySQL->Add("SND_NEXTDATETIME = :QNEXTDATETIME, SND_CALLCOUNT = :QCALLCOUNT");
      upsqlSEND->ModifySQL->Add("where SND_NUM = :QRECNUM");

      upsqlSEND->SetParams(UpdateKind);
      upsqlSEND->Query[UpdateKind]->ParamByName("DELETED")->Value = FLAG_DELETED;
      upsqlSEND->Query[UpdateKind]->ParamByName("QSENDDATETIME")->Value = dtdSendQ.senddate;
      upsqlSEND->Query[UpdateKind]->ParamByName("QNEXTDATETIME")->Value = dtdSendQ.senddate + g_cfgData.intertime;
      upsqlSEND->Query[UpdateKind]->ParamByName("QCALLCOUNT")->Value = dtdSendQ.callcount;
      upsqlSEND->Query[UpdateKind]->ParamByName("QRECNUM")->Value = dtdSendQ.q_keynum;
      break;
    case ukInsert:
      dlgLog ("insert");
      break;
    case ukDelete:
      dlgLog ("delete");
  }

  upsqlSEND->ExecSQL(UpdateKind);
  UpdateAction = uaFail;

  delete upsqlSEND;
}

+ -

관련 글 리스트
12192 [질문] TUpdateSQL 사용 소스 좀 봐주세요..매우 급함.. 몰라요 793 2001/10/30
12205     Re:[질문] TUpdateSQL 사용 소스 좀 봐주세요..매우 급함.. 허접 인디오 933 2001/10/31
12203     Re:[질문] TUpdateSQL 사용 소스 좀 봐주세요..매우 급함.. 남병철.레조 838 2001/10/31
12204         Re:Re:[재질문] exception message가 나타나지 않아요!!! 몰라요 953 2001/10/31
12207             Re:Re:Re:[재질문] exception message가 나타나지 않아요!!! 남병철.레조 825 2001/10/31
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.