set serveroutput on DECLARE CURSOR ids is select customer_id from customer_mst; customers ids%ROWTYPE; rnd NUMBER(2); BEGIN open corp2_ids; LOOP FETCH ids INTO customers; --50~95の整数ランダム値を返す rnd := trunc(DBMS_RANDOM.VALUE(50,95), 0); DBMS_OUTPUT.PUT_LINE(rnd); update customer_mst set score = rnd where customer_id = customers.customer_id; EXIT WHEN ids%NOTFOUND; END LOOP; commit; close ids; END; /