create or replace procedure Pro_LabSelect(p_stno_in varchar2,p_labplanid_in integer,p_itemno_in varchar2,p_batchno_in varchar2,p_result_out out integer)
is
-- v_nowtime varchar2(20); --时间
v_term varchar2(10);
v_courseid varchar2(20);
begin
--select to_char(sysdate, 'yyyy-mm-dd hh24:mm:ss') into v_nowtime from dual;--取时间
select term,courseid into v_term,v_courseid from labplan where id=p_labplanid_in; --取term,courseid
insert into labselect(stno,term,itemno,batchno,day,courseid,planid) values(p_stno_in,v_term,p_itemno_in,p_batchno_in,sysdate,v_courseid,p_labplanid_in);
update labbatch set stucount=stucount+1 where batchno=p_batchno_in and labplanid=p_labplanid_in;--修改批次选课人数
commit;
p_result_out:=1; --操作成功
Exception
when others then
rollback;
p_result_out:=0;--操作失败
end Pro_LabSelect;