Oracle用存储过程产生以3030 0921开头的随机卡号

以下是一个简单的Oracle存储过程，它可以生成以3030 0921开头的随机卡号：

CREATE OR REPLACE PROCEDURE generate_card_number IS
  v_card_number VARCHAR2(20);
BEGIN
  SELECT '3030 0921' || LPAD(TRUNC(DBMS_RANDOM.VALUE(100000000, 999999999)), 9, '0')
  INTO v_card_number
  FROM dual;
  
  dbms_output.put_line(v_card_number);
END;

该存储过程使用DBMS_RANDOM.VALUE函数生成一个9位的随机数，并使用LPAD函数将其填充为9位，然后将其连接到3030 0921的前面，生成一个20位的随机卡号。使用DBMS_OUTPUT.PUT_LINE函数输出生成的卡号。