declare
  VICKH00 varchar2(220);
  VKLDH00 varchar2(20);
  VSFDM00 varchar2(20);
  VKMH000 varchar2(20);
  VYYID00 varchar2(6);
  VICKJE0 number(12,2);
  i integer;
  Vcounter number;
begin
  VKLDH00 := 'SLE4442';
  --VSFDM00 := 8000051752;
 select max(trim(VALUE0)) into VSFDM00 from xt_xtcs00 where name00='IC_SFDM';
 select YYID00 into VYYID00 from xt_yyxx00;
 if VSFDM00<>'0' and VSFDM00 is not null then
   select nvl(SFJE00,0) into VICKJE0 from BM_YYSFXM where SFXMID=VSFDM00;
 
 end if;  
 if   VICKJE0 is null then
 VICKJE0 :=0;
 end if ;
 for i in 1931701..1936700 loop    
    VKMH000 := lpad(i,10,'0');
    VICKH00 := '0'||VYYID00||lpad(i,9,'0');
   select count(1) into Vcounter from ic_yhxx00 where ickh00=VICKH00;
   if Vcounter=0 then 
     insert into ic_yhxx00(ICKH00,BRID00,KLDH00,ICKLB0,ICKSX0,ZT0000,SFDM00,ICKJE0,ICKNBH,KMH000,SFSKYJ)
       values (VICKH00,0,VKLDH00,'0','0','0',VSFDM00,VICKJE0,VICKH00,VKMH000,'0');
     Insert into  IC_YWLS00(YWID00,ICKH00,YGBH00,YWCZ00,CZRQ00,CZSJ00,FSJE00,ICKNBH) 
       values (SQ_IC_YWLS00_YWID00.nextval,VICKH00,0,'0',to_char(sysdate,'yyyymmdd'),to_char(sysdate,'hh24:mi:ss'),VICKJE0,VICKH00); 
     commit;    
   end if;   
 end loop; 
end;