EBS_FORM_开发:实现form record ctrl+F6复制

1.先写

  /*=====================================
  ** PROCEDURE:   DEFAULT_ROW()
  **=====================================*/
  PROCEDURE DEFAULT_ROW IS
  BEGIN
    :LINES.HEADER_ID := :HEADERS.HEADER_ID;
  IF :LINES.LINE_ID IS NULL THEN
      SELECT CUX_HRSC_LINES_S.NEXTVAL INTO :LINES.LINE_ID FROM SYS.DUAL;
    END IF;
  END DEFAULT_ROW;
END LINES_DATA;

2.在block的WHEN-CREATE-RECORD中

MEND_DATA.default_row;

3.blcok创建触发器KEY-DUPREC

begin
 duplicate_record;
end;