EBS之实现表单保存和删除

准备工作：

首先下载完所有的fmb文件和pll文件，这里不提供下载，打开注册表，修改forms_path(搜索找到)，在前面加入你的下载完后的两个路径，ok做完这些就可以使用forms builder了

打开TEMPLATE.fmb，然后另存为XXPOM100N.FMB，删除这几个文件，图1-1

                                                1-1

1 新建一个窗口，修改名称（随便，我的是winform），子类选WINDOW，画布暂时留空，因为我们目前没建画布，如图1-2

                                1-2

 2新建画布，修改 名称（随便），画布类型->内容，子类->CANVAS,窗口->你刚刚建的window，建了画布，不要忘了刚刚的窗口还没设主要画布哦，图1-3

                              1-3

 3新建数据块，模块向导->下一步->表或者视图->输入表名,导入数据->下一步->下一步->仅创建模板

 

 

 4在程序单元新建一个规格一个主体

规格代码如下：

PACKAGE pkg_formTest IS
  procedure delete_row;
  procedure insert_row;
END;

主体代码如下

PACKAGE BODY pkg_formTest IS
  procedure delete_row is
  begin
  	delete from formTest where id=:FORMTEST.ID;
  end delete_row;
  
   procedure insert_row is
   begin
   insert into formTest(id,pname,tel,address,birthday,sex)
   values(:FORMTEST.id,:FORMTEST.pname,:FORMTEST.tel,:FORMTEST.address,:FORMTEST.birthday,:FORMTEST.sex);
   end insert_row;
   
END;

 formTest是数据库对应的表名

：数据块.项名对应表单的输入框，例如我的数据块叫做FORMTEST，里面有个ID项，所以应该写:FORMTEST.ID，注意 FORMTEST前面的分号不可以少，如图

5 在数据块->触发器下新建两个触发器on-delete和on-insert，代码如下

on-delete

pkg_formTest.delete_row;

on-insert

pkg_formTest.insert_row;

 pkg_formTest是包名，insert_row是过程名，就是调用步骤4的程序单元

6数据块的项下新建两个项，取名为submit,canner，名字随意，子类选按钮 

7 在刚刚的按钮下新建两个触发器when-button-pressed，对应删除和保存按钮，他们的代码如下

 canner下的触发器：

Delete_Record;

 submit下的触发器

Commit_Form; 

8挂载