Deleteing Rows in a block

Question

I am using Forms 6i.
I have a data block that automatically generates values for certain items. It will create insert the items into the rows of the canvas. The user can then enter the date in any number of the existing colums.
This is my pl/sql for the deleting
declare
     num number(4);
     counter number;
begin
if :system.cursor_value is null then
     last_record;
     num := get_block_property('MA31_HEM', current_record);
     first_record;
     go_item('ma31_hem.hem_dt');
     for counter in 1..num loop
          if :system.cursor_value is null then
                    delete_record;
          end if;
          next_record;
          go_item('ma31_hem.hem_dt');
     end loop;
          go_item('ma31_bio.inv');
     else
          next_item;
     end if;
end;
What i want it to do, is go through every record in the block after they leave it, and delete the records that don't have a date entered. However it is not doing anything right now

Answer 1

Hello Tugnutt7
11>if :system.cursor_value is null then
12>delete_record;
13>end if;
delete the records that don't have a date Try..
if ma31_hem.hem_dt is null then -- if ur date is null
delete_record;
end if;
Try to trace ur code with messages or using the debug..
Regards,
Abdetu..