Details
-
Task
-
Status: Open (View Workflow)
-
Major
-
Resolution: Unresolved
-
None
-
None
Description
EXECUTE IMMEDATE ... USING IN var1, var2, var3; is not supported
CREATE OR REPLACE PROCEDURE SP_UPDRSPRESULT( |
I_RSP_NO VARCHAR2,
|
I_RESULT VARCHAR2,
|
I_POINT VARCHAR2,
|
I_LEVEL VARCHAR2
|
)
|
IS
|
VSQL VARCHAR2(1000);
|
BEGIN
|
VSQL := ''; |
VSQL := VSQL || 'UPDATE /* APL-020000140 */ HAPPY_ASSIGN_CLNT A '; |
VSQL := VSQL || 'SET A.ASSIGN_POINT = :1 '; |
VSQL := VSQL || ', A.ASSIGN_LEVEL = :2 '; |
VSQL := VSQL || ', A.RESULT_CD = :3 '; |
VSQL := VSQL || ', A.RECEIVE_DT = SYSDATE '; |
VSQL := VSQL || ', A.UPDATE_DT = SYSDATE '; |
VSQL := VSQL || ', A.UPDATE_PRG_ID = ''RB_RSPRESULT'' '; |
VSQL := VSQL || 'WHERE A.RSP_ASSIGN_NO = :4 '; |
VSQL := VSQL || ''; |
|
EXECUTE IMMEDIATE VSQL USING IN I_POINT, I_LEVEL, I_RESULT, I_RSP_NO ; |
|
IF SQL%ROWCOUNT <> 1 THEN |
DBMS_OUTPUT.PUT_LINE('WARN:·ë²Ì¹¹¿·ÂоÝ̵¤· RSP_NO=' || I_RSP_NO ||' ·ë²ÌCD=' || I_RESULT); |
END IF; |
|
EXCEPTION
|
WHEN OTHERS THEN |
DBMS_OUTPUT.PUT_LINE('WARN:ORACLE_ERROR RSP_NO=' || I_RSP_NO ||' ·ë²ÌCD=' || I_RESULT); |
RAISE;
|
END; |