时常为加多少单引号搞得头晕,今天就加上一个注释。
DECLARE
WHERE_CLASE VARCHAR2(2000);
BEGIN
WHERE_CLASE := 'WHERE 1 = 1 ';
IF :CUX_WIP_EXCEPTION_INFO.STATUS IS NOT NULL THEN
WHERE_CLASE := WHERE_CLASE ||
' AND WIP_ENTITY_ID IN (SELECT CUX.WIP_ENTITY_ID
FROM WIP_DISCRETE_JOBS WDJ,
CUX_WIP_EXCEPTION_INFO CUX,
MFG_LOOKUPS ML
WHERE CUX.ORGANIZATION_ID = WDJ.ORGANIZATION_ID
AND CUX.WIP_ENTITY_ID = WDJ.WIP_ENTITY_ID
AND ML.LOOKUP_TYPE ='||'''WIP_JOB_STATUS'''||'
AND ML.LOOKUP_CODE = WDJ.STATUS_TYPE
AND WDJ.ORGANIZATION_ID = 104
AND ML.MEANING=:CUX_WIP_EXCEPTION_INFO.STATUS)';
END IF;
GO_BLOCK('CUX_WIP_EXCEPTION_INFO');
SET_BLOCK_PROPERTY('CUX_WIP_EXCEPTION_INFO', DEFAULT_WHERE, WHERE_CLASE);
END;
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/41594/viewspace-50553/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/41594/viewspace-50553/