Si no necesita los argumentos segundo y tercero, puede declararlos como variables en el procedimiento en lugar de argumentos, de la siguiente manera:
CREATE OR REPLACE PROCEDURE DDPAY_SP(DONOR_ID IN DD_DONOR.IDDONOR%TYPE,
RET OUT BOOLEAN)
IS
nPayment_count NUMBER;
BEGIN
SELECT COUNT(*)
INTO nPayment_count
FROM DD_PLEDGE p
WHERE p.IDDONOR = DONOR_ID AND
p.IDSTATUS = 10 AND
p.PAYMONTHS > 0;
IF nPayment_count > 0 THEN
RET := TRUE;
END IF;
EXCEPTION
WHEN OTHERS THEN
DBMS_OUTPUT.PUT_LINE('DD_PAY - exception: ' || SQLCODE || ' : ' || SQLERRM);
RAISE;
END DDPAY_SP;
Incluí un ejemplo de un controlador EXCEPTION al final de DD_PAY. Siempre es una buena idea incluir al menos este controlador mínimo para que, en caso de que ocurra una excepción, obtenga alguna indicación de dónde radica el problema.
Debido a que este procedimiento devuelve un valor BOOLEAN, y los BOOLEAN no pueden (según mi leal saber y entender) usarse desde SQL*Plus, tendrá que invocarlo desde un bloque PL/SQL, de la siguiente manera:
DECLARE
bRetval BOOLEAN;
BEGIN
DD_PAY(308, bRetval);
DBMS_OUTPUT.PUT_LINE('Returned value is ' ||
CASE bRetval
WHEN TRUE THEN 'TRUE'
ELSE 'FALSE'
END);
END;
Pruébalo.
EDITAR:procedimiento reescrito basado en información adicional de comentarios posteriores.
Comparte y disfruta.