Select many rows separately in oracle form tabular forms save -- save btn when-button-pressed trigger
if :BILL.code is not null then
begin
IF :SYSTEM.cursor_block <> 'BILL' THEN
GO_BLOCK('BILL');
END IF;
FIRST_record;
loop
IF :BILL.st in ('1','2','3') THEN
-- loop
insert into BILL_INFO(DATE,TRCOD,:ST)
values(:BILL.DATE,:BILL.TRCOD,:BILL.ST);
-- end loop;
END IF;
if :System.Last_Record = 'TRUE' THEN
exit;
end if;
NEXT_RECORD;
SYNCHRONIZE;
end loop;
COMMIT;
end;
end if;
FIRST_RECORD;
commit_form;
clear_form;
No comments:
Post a Comment