아래 소스로 데이타를 수정하는데 수정이 되지 않습니다.

오류 메세지는 뜨지 않고요...

어떤 잘못을 범한것인지 고수님들의 답변 부탁드립니다.



Sql.Add('UPDATE');

Sql.Add('MST_CHANNEL');

Sql.add('SET CCHNAME = :CCHNAME, CCHTYPE = :CCHTYPE,CTAG = :CTAG,');

Sql.add(' CSCRAMBLEST = :CSCRAMBLEST, CUSECHK = :CUSECHK, CSAVEDA = :CSAVEDA');

Sql.Add('WHERE CCOMPCD = :CCOMPCD');

Sql.Add('AND CCHNO = :CCHNO');



ParamByName('CCOMPCD').AsString := g_CompCd; //방송국소속코드

ParamByName('CCHNO').AsString := CCHNO; //통장관리번호



ParamByName('CCHNAME').AsString := Trim(EdtCCName.Text); //채널명



ParamByName('CCHTYPE').AsString := copy(CbCChType.text,1,1);//채널종류



ParamByName('CTAG').AsString := copy(CboxCTag.text,1,2); //태그



ParamByName('CSCRAMBLEST').AsString := copy(CbCsrambleSet.Text,1,1);//스크램블상태



ParamByName('CUSECHK').AsString := copy(CbCUSEDYN.Text,1,1); //사용여부



ParamByName('CSAVEDA').AsString := Trim(EdtCSaveDay.Text); //사용여부



try

ExecSql;

except

on E:EDataBaseError do

begin

DM.QChannel.Close;

Screen.Cursor := crDefault;

ShowMessage('오류가 발생하였습니다.다시 접속해 주세요');

Exit;

end;

end;