-- <ScriptOptions statementTerminator="@" />
--/*========================================================
--名稱:ALAN_CHAN.F_BACKEND_CheckBOM
--描述:檢查指定的Itemno是否開BOM,成功返回Y,否則返回N
--參數:
-- p_id --- 配件ID
-- p_itemno --- 配件編號
--Version:1.00
--Date Name Description
---------------------- ----------- -----------------------
--2007/03/09 ekin initial creation
--=========================================================*/
CREATE FUNCTION ALAN_CHAN.F_BACKEND_CheckBOM( p_id INTEGER,p_itemno VARCHAR(30))
RETURNS VARCHAR(5)
LANGUAGE SQL
NO EXTERNAL ACTION
F1: BEGIN ATOMIC
DECLARE v_sql VARCHAR(5) DEFAULT 'N';
SELECT CASE WHEN (IXKITL IS NOT NULL AND IXKITL <> '') THEN 'Y' END AS BOM INTO v_sql
FROM PRODDTA.F3002
WHERE IXKIT = p_id
AND IXKITL = p_itemno
FETCH FIRST 1 ROWS ONLY;
RETURN v_sql;
END @