CREATE PROCEDURE ProcGet_ENO
@tempENO varchar(8) output 
 AS
declare @headstr varchar,@endint int,@ENO varchar
set @headstr='ENO'
select @ENO=max(ENO) from ENOtable where (ENO between @headstr+'10001' and @headstr+'99999')
if @ENO is null  set @ENO=@headstr+'100001'
else
set @endint=cast(substring(@ENO,4,5) as int)+1
set @tempENO=@headstr+str(@endint,5,0)
update ENOtable set ENO=@tempENO
GO//调用
  ADODataModule.ADOSPC1_Human.Close;
  ADODataModule.ADOSPC1_Human.ProcedureName:='ProcGet_ENO';
  ADODataModule.ADOSPC1_Human.Parameters.Refresh;
  ADODataModule.ADOSPC1_Human.ExecProc;
  FlatEdit1.Text:=ADODataModule.ADOSPC1_Human.FieldValues['@tempENO'];
错误提示:
  过程ProcGet_ENO需要参数,@tempENO,但为提示参数