CREATE OR REPLACE PROCEDURE hr.incluir_cliente (
p_id cliente.id%TYPE,
p_razao cliente.razao_social%TYPE,
p_cnpj cliente.cnpj%TYPE,
p_segmercado cliente.segmercado_id%TYPE,
p_faturamento cliente.faturamento_previsto%TYPE,
p_categoria cliente.categoria%TYPE
) AS
BEGIN
INSERT INTO cliente VALUES (
p_id,
p_razao,
p_cnpj,
p_segmercado,
sysdate,
p_faturamento,
p_categoria
);
COMMIT;
EXCEPTION
WHEN OTHERS THEN
dbms_output.put_line('Erro: '
|| sqlcode
|| ' - '
|| sqlerrm);
ROLLBACK;
END;
/
