PLSQL（简单）

create or replace procedure xxx is

  maxrecords constant int := 2500000;
  i int := 1;
begin
  for i in 1 .. maxrecords loop
    insert into LOYALTY_ACCOUNT
      (LOYALTY_ACCOUNT_NBR,
       ACCOUNT_OWNER,
       LOYALTY_PROGRAM_ID,
       ENTITY_ID,
       SETTLEMENT_FLAG_OUTG,
       INTERNAL_POINT,
       AFFILIATE_POINT,
       NONAFFILIATE_POINT,
       CURRENT_MONTH_INTERNAL_POINT)
    values
      (lpad('L_ACT' || i, 10, '0'),
       'CH',
       'LPID01',
       'ENT_ID' || i,
       TO_CHAR(mod(i, 10)),
       i,
       i + 1,
       i + 2,
       i + 3
     
       );
  commit;
  end loop;
  end xxx;