CREATE OR REPLACE
PROCEDURE COPIA_PROSP_CLIE_NO_BOOLEAN
  (P_CDPROSPECT      IN PROSPECT.CDPROSPECT%TYPE,
   P_NRINSJURPROS    IN PROSPECT.NRINSJURPROS%TYPE,
   P_NMRAZSOCPROS    IN PROSPECT.NMRAZSOCPROS%TYPE,
   P_NMCOMPRZSCLI    IN CLIENTE.NMCOMPRZSCLI%TYPE,
   P_NMFANTPROS      IN PROSPECT.NMFANTPROS%TYPE,
   P_IDTPIJURPROS    IN PROSPECT.IDTPIJURPROS%TYPE,
   P_CDCLIENTE       IN CLIENTE.CDCLIENTE%TYPE,
   P_CDOPERADOR      IN VARCHAR2,
   P_MESREAJUSTE     IN CLIENTE.NRMESREAJCLIE%TYPE,
   P_BOCOMMITCHANGES IN VARCHAR2)
AS
	V_BOCOMMITCHANGES BOOLEAN;
BEGIN
	IF P_BOCOMMITCHANGES <> '0' THEN
		V_BOCOMMITCHANGES := TRUE;
	ELSE
		V_BOCOMMITCHANGES := FALSE;
	END IF;

	COPIA_PROSPECT_CLIENTE(P_CDPROSPECT, P_NRINSJURPROS, P_NMRAZSOCPROS, P_NMCOMPRZSCLI, P_NMFANTPROS, 
	                       P_IDTPIJURPROS, P_CDCLIENTE, P_CDOPERADOR, P_MESREAJUSTE, V_BOCOMMITCHANGES);
END;
/								