Deleting all the user jobs

SET SERVEROUTPUT ON
declare
  ec NUMBER;
  et VARCHAR2(200);
    v_DOID  number;       
    DIMUSER number;
       
CURSOR jobs_cursor IS
Select job from User_Jobs where log_user = 'GDLT';
v_Found BOOLEAN;       
       
begin
  
DIMUSER := 8;
 dbms_output.put_line('Starting ..');

  --------------------------------------------------
 begin  
  dbms_output.put_line('deleting Jobs...');
  FOR Jobs IN jobs_cursor LOOP
      Dbms_Job.Remove(jobs.job);
      commit;
  end loop;
 end;
 ----------------------------------------------------
end;
/
commit;