Lihat perubahan di bawah ini, panggilan ke title_crud
tidak memiliki variabel untuk menampung apa yang dikembalikan olehnya (p_err)
PROCEDURE create_title(
P_TITLE varchar2,
P_USER varchar2,
P_ERR OUT VARCHAR2
)
IS
BEGIN
IF P_TITLE IS NULL THEN
P_ERR := 'Null value';
ELSE
title_crud('I',NULL,P_TITLE,P_USER,P_ERR); -- Extra Parameter
END IF;
END;
PROCEDURE title_crud(
P_OP_TYPE VARCHAR2,
P_ID number,
P_TITLE varchar2,
P_USER varchar2,
P_ERR OUT VARCHAR2
)...
Kesalahan mudah dibuat tetapi saya merasa lebih mudah untuk dihindari ketika memanggil prosedur yang Anda lewati parameter dengan notasi bernama. Panggilan Anda ke title_crud menjadi
...
title_crud(P_OP_TYPE => 'I',
P_ID => NULL,
P_TITLE => P_TITLE,
P_USER => P_USER,
P_ERR => P_ERR);
...