--建表
create table WD_FJRQ
(
yf_dm VARCHAR2(20),
xxrq DATE
);
--插数据
DECLARE
LD_KSSJ DATE;
LD_JSSJ DATE;
BEGIN
LD_KSSJ := DATE '2020-1-1';
LD_JSSJ := DATE '2021-1-1';
WHILE LD_KSSJ <= LD_JSSJ LOOP
IF (TO_CHAR(LD_KSSJ, 'D') IN ('1', '7')) THEN
INSERT INTO WD_FJRQ
select TO_CHAR(LD_KSSJ, 'YYYYMM'), LD_KSSJ from DUAL;
COMMIT;
END IF;
LD_KSSJ := LD_KSSJ + 1;
END LOOP;
END;