제덕모 wrote:
> 이강석 wrote:
> >
> > 아래는 소스코드입니다...
> >
> > 해당 strList에 한글이 한자라도 들어가면 에러가 납니다.
> >
> > 에러값은 ora-21560 argument 2 is null, invalid or out of range
> >
> > 영문자만 들어간 자료는 이상없이 들어간답니다..
> >
> > 이틀동안 아무리 찾아도 그런 내용의 글은 없더군요...
> >
> > 고수님들의 고견을 부탁드립니다...^^
> >
> > 그럼 즐프하세요^^
> >
> > With SQLQuery1 Do
> >     Begin
> >         Close;
> >         Sql.Clear;
> >         SQL.BeginUpdate;
> >         Sql.Add(' INSERT INTO SMART.TB_PBL_SOURCE2 ');
> >         Sql.Add('   (GUBN, WORK_ID, REQ_ID, PBL_ID, PBL_NAME, PBL_MEMBER,  SRC_TEXT)     ');
> >         Sql.Add(' VALUES (:GUBN, :WORK_ID, :REQ_ID, :PBL_ID, :PBL_NAME, :PBL_MEMBER, EMPTY_CLOB()) ');
> >         Sql.Add(' RETURNING SRC_TEXT INTO :SRC_TEXT ');
> >         Sql.EndUpdate;
> >
> >         ParamByName('GUBN').Value     := '6';    //Key
> >         ParamByName('WORK_ID').Value  := '9999';   //Key
> >         ParamByName('REQ_ID').Value   := 'CC';
> >         ParamByName('PBL_ID').Value   := '5555'; //Key
> >         ParamByName('PBL_NAME').Value := 'A';
> >         ParamByName('PBL_MEMBER').Value := '3333'; //Key
> >         ParamByName('SRC_TEXT').DataType := ftOraClob;
> >         ParamByName('SRC_TEXT').Value := StrList.Text;  --------->
> >         ExecSQL;
> >     End;
>
> 아래처럼 바꿔보세요.
>
> (ParamByName('SRC_TEXT') as TMemoField).Assign(StrList.Lines);


답변은 정말 감사합니다..

그런데.....쌩뚱맞게 메모필드로 변환을 하면 아무런 값도 들어가지 않네요....

TMemoField(ParamByName('SRC_TEXT')).Assign(StrList);

위에 소스코드는 에러가 나서 요렇게 바꾸었는데....^^;;

음....이상하네요?