create or replace procedure outstoreform(out_id in varchar2,out_serial_number in varchar2,quantity in number,
out_date in date,commodity_id in varchar2,admin_id in varchar2,var_results out varchar2) as
results number;
procedure updatestock(c_id in varchar2,amount in number) is
begin
update c_stock
set nowstock=nowstock-amount
where id=c_id;
/*判斷是否有影響的行*/
if sql%notfound then
dbms_output.put_line('庫存更新失敗');/*該語句是為了測試用*/
else
dbms_output.put_line('庫存更新成功');/*該語句是為了測試用*/
end if;
end updatestock;
begin
/*根據填寫入庫單中的商品編號查詢庫存中是否有該商品*/
results:=selectstock(commodity_id);
/*根據results的值判斷庫存中是否存在要出庫的商品,若results的值不為零則庫存中有該類商品,可以出庫,否則不能出庫,該入庫單不能新增*/
if results<>0 then
insert into outstockform(f_id,serial_number,quantity,outdate,id,a_id)
values(out_id,out_serial_number,quantity,out_date,commodity_id,admin_id);
/*呼叫子過程*/
updatestock(commodity_id,quantity);
var_results:='yes';
else
var_results:='no';
/*該語句是為了測試用*/
dbms_output.put_line('出庫的商品不存在,不能新增該入庫單記錄');
end if;
end outstoreform;
//庫存查詢
create or replace function selectstock(outid in varchar2) return number
asreturn_result number;
begin
select count(*) into return_result
from c_stock
where id=outid;
return (return_result);
end selectstock;
批量新增以及批量修改更新操作
批量新增,批量更新原理類似於批量刪除,批量新增可以用在excel檔案匯入時過濾出匯入成功的資料進行批量新增到資料庫,只對資料庫進行一次訪問。insert into roster customer id,job number,full name,mobile,id type,id card,bank ...
金蝶K3 如何新增其它出庫單出庫型別
分享一下我老師大神的人工智慧教程!零基礎,通俗易懂!金蝶k3,如何新增其它出庫單出庫型別 問題性質 產品應用 問題表現 金蝶k3,如何新增其它出庫單出庫型別 解決方法 1 登入金蝶k 3系統,開啟 k 3主介面 2 單擊 系統設定 系統設定 採購管理 雙擊 明細功能 的 單據設定 開啟 系統引數維護...
mysql5 6賬戶新增以及許可權
新增賬戶 create user username host identified by password username就是新增的賬戶名,host就是user表中的host,password為密碼。新增許可權 grant privilege1,privilege2,on databasename...