제가 Delphi6/SQL Server 2000 환경에서
Stored Procedure를 테스트 하고 있는데요...
아무리 해도 리턴값이 없네요...
고수님들 꼭 좀 도와주세요...
실질적으로 실행되는 예제가 있으면 더 좋구요.. ^^
이러케 해봐라 하는 식의 답변은 많이 봐왔는데...
해봤더니 리턴값이 없더라구요..ㅜㅜ
SQL 서버에서 실행시
--리턴받을 변수 선언
declare @abc integer
--프로시져 실행
exec st_procedure 파라미터1,@abc output
--리턴값 표시
select @abc
델파이의 StoredProcedure 컴포넌트 사용시
1)실행시간 지정
with dm.StoredProc1 do begin
StoredProcName:=프로시져이름;
if ParamCount<2 then begin
Params.CreateParam(ftString,'id',ptInput);
Params.CreateParam(ftInteger,'cnt',ptOutput);
end;
Params[0].AsString:=CurrencyEdit1.Text;
ExecProc;
if Params[1].Asinteger>=1 then begin
messageDlg('보조원번호가 중복되었습니다.',mtInformation,[mbOK],0);
CurrencyEdit1.SetFocus;
result:=false;
end;
end;
2) 디자인시지정
DataBasename,StoredProcedureName,params 를 위의 내용처럼 기입
제가 Delphi6/SQL Server 2000 환경에서 Stored Procedure를 테스트 하고 있는데요... 아무리 해도 리턴값이 없네요... 고수님들 꼭 좀 도와주세요... 실질적으로 실행되는 예제가 있으면 더 좋구요.. ^^ 이러케 해봐라 하는 식의 답변은 ...
깨구락지
•
2002.07.08 17:17
SQL 서버에서 실행시
--리턴받을 변수 선언
declare @abc integer
--프로시져 실행
exec st_procedure ...
--리턴받을 변수 선언
declare @abc integer
--프로시져 실행
exec st_procedure 파라미터1,@abc output
--리턴값 표시
select @abc
델파이의 StoredProcedure 컴포넌트 사용시
1)실행시간 지정
with dm.StoredProc1 do begin
StoredProcName:=프로시져이름;
if ParamCount<2 then begin
Params.CreateParam(ftString,'id',ptInput);
Params.CreateParam(ftInteger,'cnt',ptOutput);
end;
Params[0].AsString:=CurrencyEdit1.Text;
ExecProc;
if Params[1].Asinteger>=1 then begin
messageDlg('보조원번호가 중복되었습니다.',mtInformation,[mbOK],0);
CurrencyEdit1.SetFocus;
result:=false;
end;
end;
2) 디자인시지정
DataBasename,StoredProcedureName,params 를 위의 내용처럼 기입