-- 出å“è€…æƒ…å ±ã€å‡ºå“者用ページ CREATE OR REPLACE FUNCTION f_seller_infomation_update( IN integer, IN integer, IN character varying, IN character varying, IN character varying, IN integer, OUT errcd integer, OUT errmsg character varying, OUT code integer) AS $$ DECLARE kubun ALIAS FOR $1; -- 区分 i_membercd ALIAS FOR $2; -- 会員コード i_infomation ALIAS FOR $3; -- 出å“者用ページHTML i_updusrnm ALIAS FOR $4; -- 更新ユーザーå i_updpcnm ALIAS FOR $5; -- 更新マシンå i_updcnt ALIAS FOR $6; -- UpdCnt cntcheck integer; nowdate timestamp; newupdcnt integer; BEGIN -- å¿…é ˆãƒã‚§ãƒƒã‚¯ -- IF kubun IS NULL OR kubun NOT IN (2) THEN RAISE EXCEPTION '処ç†åŒºåˆ†ãŒä¸æ£ã§ã™'; END IF; IF i_updusrnm IS NULL THEN RAISE EXCEPTION '更新ユーザーåã¯å¿…é ˆã§ã™'; END IF; IF i_updpcnm IS NULL THEN RAISE EXCEPTION 'æ›´æ–°PCåã¯å¿…é ˆã§ã™'; END IF; IF i_updcnt IS NULL THEN RAISE EXCEPTION 'UpdCntã¯å¿…é ˆã§ã™'; END IF; -- 更新カウンタãƒã‚§ãƒƒã‚¯ IF kubun IN (2) THEN SELECT updcnt INTO cntcheck FROM t_seller_attr WHERE membercd=i_membercd; IF NOT FOUND OR cntcheck <> i_updcnt THEN RAISE EXCEPTION '更新カウンタãŒä¸æ£ã§ã™'; END IF; END IF; --- æ›´æ–°å‡¦ç† --- IF kubun = 2 THEN UPDATE t_seller_attr SET infomation = i_infomation, upddate = nowdate, updusrnm = i_updusrnm, updpcnm = i_updpcnm WHERE membercd=i_membercd; END IF; code := 1; END; $$ LANGUAGE 'plpgsql' VOLATILE;