form开发案例.docx
- 文档编号:4599763
- 上传时间:2022-12-07
- 格式:DOCX
- 页数:36
- 大小:1.60MB
form开发案例.docx
《form开发案例.docx》由会员分享,可在线阅读,更多相关《form开发案例.docx(36页珍藏版)》请在冰豆网上搜索。
form开发案例
西南财经大学天府学院
实验报告
四、ORACLEFORM开发流程
4.1、概述
4.1.1、总体实验目的
Ø学会在Windows平台上安装oracleDS10g
Ø学会使用SQL*Plus执行SQL语句
Ø学会使用netmanager配置网络服务器
4.1.2、总体实现内容
在现有开发平台和数据库服务器的情况下,熟练掌握FORM的开发,了解开发相关流程和技术。
4.2、Form开发工具和调试流程
4.1.1、开发平台和开发工具
PC:
普通PC
操作系统:
XP
开发工具:
OracleDevelopSuite10g
4.1.2、开发流程
1.在文件中选择新建,表格,从而新增出一个FORM。
2.建立数据块
a)在导航器中点击该FORM,选择数据块向导
b)输入表名,点刷新,显示出字段名
c)使用
,把字段全部选择到数据库项中。
d)点下一步,注意使用默认的:
“请先创建数据库,然后调用布局向导”。
3.建立布局
a)进入布局向导
b)选择默认的布局向导
c)选择显示项,把可用项全部变成显示项
d)选择框架风格为默认的表格
e)指定框架的名称及显示记录数
f)完成布局向导
4.运行FORM
a)运行FORM
b)点击查询中的执行,显示出所有数据
c)点增加,新建立一条记录,输入数据,点保存,完成一条记录的输入
d)在某条记录中,改变数据内容,点保存,完成一条记录的修改
e)点删除,则删除该记录
f)点退出,结束FORM运行
4.3、启动form流程
4.3.1、启动oc4jinstance事例。
4.4、创建数据块方法
学习目的:
1、学会使用数据块向导和布局向导建立基本表单。
2、学会基本的相关的属性设置
4.5、数据库连接配置
点击下一步,出现如下图所示的界面,因为FORM要与ORACLE进行联接才能运行
点击浏览按钮,将会出现登录数据库界面。
注意,以此之前要在Windows上配置tnsnames.ora文件,而该文件可直接在oracle上下载并复制。
tnsnames.ora文件连接代码:
#tnsnames.oraNetworkConfigurationFile:
D:
\DevSuiteHome_1\NETWORK\ADMIN\tnsnames.ora
#GeneratedbyOracleconfigurationtools.
VIS_BALANCE=
(DESCRIPTION=
(ADDRESS_LIST=
(ADDRESS=(PROTOCOL=tcp)(HOST=)(PORT=1521))
(LOAD_BALANCE=yes)
)
(CONNECT_DATA=
(SERVICE_NAME=VIS)
)
)
###############################################################
#
#ThisfileisautomaticallygeneratedbyAutoConfig.Itwillbereadand
#overwritten.Ifyouwereinstructedtoeditthisfile,orifyouarenot
#abletousethesettingscreatedbyAutoConfig,refertoMetalinkNote
#387859.1forassistance.
#
#$Header:
NetServiceHandler.java120.192008/04/2806:
40:
02schagantship$
#
###############################################################
VIS_FO=
(DESCRIPTION=
(ADDRESS_LIST=
(ADDRESS=(PROTOCOL=tcp)(HOST=)(PORT=1521))
)
(CONNECT_DATA=
(SERVICE_NAME=VIS)
(INSTANCE_NAME=VIS)
)
)
VIS_REMOTE=
(DESCRIPTION=
(ADDRESS_LIST=
(ADDRESS=(PROTOCOL=tcp)(HOST=)(PORT=1521))
)
)
VIS_LOCAL=
(DESCRIPTION=
(ADDRESS=(PROTOCOL=tcp)(HOST=)(PORT=1521))
)
IFILE=/d01/oracle/VIS/db/tech_st/11.1.0/network/admin/VIS_ebs/VIS_ebs_ifile.ora
EXTPROC_CONNECTION_DATA=
(DESCRIPTION=
(ADDRESS_LIST=
(ADDRESS=(PROTOCOL=IPC)(KEY=EXTPROCVIS))
)
(CONNECT_DATA=
(SID=PLSExtProc)
(PRESENTATION=RO)
)
)
VIS=
(DESCRIPTION=
(ADDRESS_LIST=
(ADDRESS=(PROTOCOL=TCP)(HOST=)(PORT=1521))
)
(CONNECT_DATA=
(SERVICE_NAME=VIS)
(INSTANCE_NAME=VIS)
)
)
连接上数据库后显示的数据表。
注意DEPT和EMP表,以后经常操作的基本表。
4.6、画布的设计
EMP表信息,将要显示的表项选到右边的列表框中。
注意:
此处的couments和photo列是后来加上去的,原表没有。
数据块名称:
可自定义
选择下一步,显示数据块完成信息,点击完成。
随后将自动创建画布向导。
画布向导
画布为新画布,类型要根据具体情况自定义。
默认情况下为内容。
点击默认,选择下一步。
布局画布,将前面选择的数据块(也就是EMP的列)显示在画布上。
将可用项数据拖到显示项里,点击下一步。
此处为布局的相关详细参数设置,可通过提示信息的设置改成中文(如图),还可以编辑其显示的高度和宽度。
根据情况选择布局样式
输入标题及相关信息
画布显示效果
用向导制作数据块和画布完成,此处点击运行表单就可以运行简单的FORM了。
五、FormBuilder详细开发设计
实验一、主从表单的制作
一、实验目的:
1、学会数据块和布局向导建立主细目表单
2、了解数据块和控制块的区别,学会使用数据块和控制块
3、学会主表与从表之间的数据联系。
二、实验内容:
建立主表和从表,当运行form时。
输入部门编号,单击检索,显示相关信息。
当鼠标放在部门位置处的不同编号处时,下面的表将发生联动。
三、实验步骤:
1)、创建CONTROL控制块和EMP表的数据块
2)画布设置
四、代码编写
将ITEM属性改为按钮类型并向其添加检索代码:
BEGIN
set_block_property('emp',default_where,
'deptno='||:
control.dno);
go_block('emp');
execute_query;
END;
运行效果图,当输入部门代码时,显示所属部门的雇员信息
实验二文本项功能
一、实验目的:
1、学会使用文本项
2、学会设置表单模块属性
3、学会设置窗口属性
4、学会设置块属性
二、实验内容:
文本项是formbuilder的默认项类型,此内容要求用文本项显示相关信息。
三、实验步骤:
在使用文本项之前,首先在sql*plus中执行”altertableempaddcommentsvarchar2(300)”指令。
为emp表添加名为comments的备注列。
插入相应的控件,设置相关属性,效果如下图所示。
输入雇员代码后,单击检索,显示相关信息,如果想更改,可以在更改后单击插入按钮。
更改数据,单击插入按钮后的提示信息。
四、代码编写:
1、检索按钮代码:
BEGIN
SET_BLOCK_PROPERTY('EMP',DEFAULT_WHERE,'empno='||:
control.eno);
go_block('EMP');
EXECUTE_QUERY;
END;
2、插入按钮代码:
begin
go_block('control');
clear_block;
go_block('emp');
clear_block;
create_record;
end;
实验三复选框功能
一、实验目的:
1、学会使用复选框
2、学会设置画布属性
3、学会设置相关控件属性
二、实验内容:
运行form,以条件设置方式默认性别(默认值在代码中填写)。
如果选中则设置为女。
未选中为男(也可以设置相反)。
可以以条件设置方式,默认性别,选中或未设置为女。
未选中为男显示效果如图所示。
三、实验步骤:
插入相应的控件,设置相关属性,效果如下图所示。
当查询结果出来后,单击保存或退出窗口,将会提示是否将当前设置的结果保存。
实验四单选功能
一、实验目的:
1、学会使用单选框
2、学会设置画布属性
3、学会设置相关控件属性
二、实验内容:
运行form表单,当选择一个单选选项时,显示所对应的相关信息。
此处主要是学习单选控件与触发器的使用。
三、实验步骤:
插入相应的控件,设置相关属性,效果如下图所示。
设计图
效果图
实验五列表项功能
一、实验目的:
1、学会使用列表框
2、学会设置画布属性
3、学会设置相关控件属性
二、实验内容:
用列表框显示工作岗位。
当为工作项提供数据时,不仅可以从弹出列表中选择列表数据,而且可以输入新的数据。
效果如下图所示。
三、实验步骤:
插入相应的控件,设置相关属性,效果如下图所示。
输入列表框的值
效果图
运行效果
实验六按钮功能
一、实验目的
1、学会使用按钮控件
2、学会设置画布属性
3、学会设置相关控件属性
4、学会按钮触发器的编写
二、实验内容
按钮是用于执行特定操作的界面对象。
该实验内容是:
运行FORM时,点击检索显示相关信息,点击前一个按钮、后一个按钮时,会随着数据库列表的顺序进行相应显示,点击插入时,可以将插入新的数据。
可将修改后新插入的数据进行保存。
而删除可以删除当前数据。
三、实验步骤
插入相应的控件,设置相关属性,效果如下图所示。
检索代码:
begin
GO_BLOCK('EMP');
EXECUTE_QUERY;
end;
前一个代码:
begin
go_block('emp');
previous_record;
end;
下一个代码:
begin
go_block('emp');
next_record;
end;
插入代码:
begin
go_block('emp');
create_record;
end;
保存代码:
COMMIT_FORM;
退出代码:
exit_form(no_commit);
实验七计算项功能
一、实验目的
1、学会使用按钮控件
2、学会设置画布属性
3、学会设置相关控件属性
4、学会按钮触发器的编写
二、实验内容
“检索”特定部门的雇员信息,并且将实发工资(工资和补助之和),平均工资和工资总和是汇总结果(概要项)显示出来。
三、实验步骤
插入相应的控件,设置相关属性,效果如下图所示。
设置数据块和控制块
设置emp块的预计算汇总值为:
是。
注意事项:
要求数据项放在一个数据块中,如都放在emp数据块中。
调整雇员信息框架的时候,平均工资和工资总和都会自动添加到框架中,并且会与A项有冲突,注意调整
检索代码:
begin
set_block_property('emp',default_where,'deptno='
||:
control.dno);
go_block('emp');
execute_query;
end;
实验八编辑器功能
一、实验目的
1、学会使用编辑器
2、学会设置画布属性
3、学会设置相关控件属性
4、学会按钮触发器的编写
二、实验内容
输入雇员代码,单击检索,显示雇员相关信息,指针指到comment时,会弹出编辑器,要求输入相关数据。
三、实验步骤
插入相应的控件,设置相关属性,效果如下图所示。
再次单击检索,将会弹出保存对话框,单击是会将编辑器的内容保存。
检索代码:
begin
set_block_property('emp',default_where,'empno='
||:
control.eno);
go_block('emp');
execute_query;
end;
编辑器代码:
edit_textitem;
实验九lov功能
一、实验目的
1、学会使用LOV控件
2、学会设置画布属性
3、学会设置相关控件属性
4、学会按钮触发器的编写
二、实验内容
该实验内容为,设计一个FORM表单,与EMP数据表连接,要求在单击deptno选项时,弹出部门信息对话框,而对话框中显示不同的部门组,该实验要求列表值所需的记录组要已经存在。
三、实验步骤
插入相应的控件,设置相关属性,效果如下图所示。
在部门信息对话框中选择要修改的部门编号,点击确定。
也可修改form的相关信息。
点击保存按钮。
弹出确认对话框。
检索代码:
begin
set_block_property('emp',default_where,'empno='
||:
control.eno);
go_block('emp');
execute_query;
end;
保存代码:
commit_form;
实验十菜单操作功能
一、实验目的
1、学会开发菜单功能
2、学会设置画布属性
3、学会设置相关控件属性
4、学会按钮触发器的编写
二、实验内容
个性化创建新的菜单。
要求具有数据库
三、实验步骤
此处要求在创建FORM的时候,也要求要对表单进行创建,并设置相应的属性值。
插入相应的控件,设置相关属性,效果如下图所示。
(关于表单的设置图,以后再补上)
菜单项
功能
PL/SQL代码
删除
删除当前记录
DELETE——RECORD
保存
提交表单
COMMIT_FORM
前一条
导航到前一条记录
PREVIOUS——RECORD
下一条
导航到下一条记录
NEXT——RECORD
第一条
导航到第一条记录
FIRST——RECORD
最后一条
导航到最后一条记录
LAST——RECORD
退出
关闭表单
EXIT_FORM
实验十一标签功能
一、实验目的
1、学会使用标签功能
2、学会设置画布属性
3、学会设置相关控件属性
4、学会按钮触发器的编写
二、实验内容
在FORM上设计三个标签,分别显示雇员的基本信息,雇员的照片和雇员的备注信息。
三、实验步骤
插入相应的控件,设置相关属性,效果如下图所示。
实验十二警告功能
一、实验目的
1、学会调用警告功能
2、学会设置画布属性
3、学会设置相关控件属性
4、学会按钮触发器的编写
二、实验内容
在开发FORMS应用程序时,有时在发生特定事件时向用户或操作人员发出通知,需要使用警告功能。
该实验为,当输入雇员信息后,单击检索按钮显示相关信息。
而单击退出时,会弹出警告功能。
三、实验步骤
布局相关控件并设置相关属性性。
四、代码输入
实验十三弹出式菜单功能
一、实验目的
1、学会开发弹出式菜单功能
2、学会设置画布属性
3、学会设置相关控件属性
4、学会按钮触发器的编写
二、实验内容
弹出式菜单是指被附到画布或项上用于执行便捷操作的菜单。
此实验要求在点击右键时,可以以独立下拉方式显示选项信息。
选择不同的选项会执行不同的操作。
三、实验步骤
布局相关控件并设置相关属性性。
四、代码输入:
实验十四提交触发器功能
一、实验目的
1、学会开发触发器功能
2、学会设置画布属性
3、学会设置相关控件属性
4、学会按钮触发器的编写
二、实验内容
要求在显示的雇员信息中,输入修改后的数据,当超过其规定的值后,触发其相应的触发器,弹出警告信息。
三、实验步骤
begin
if:
emp.salnotbetween500and5000then
message('工资必须不能超过5000,也不能低于500');
raiseform_trigger_failure;
endif;
end;
注:
虽然显示了该触发器的出错信息,但是数据仍然保存在了数据库中。
实验十五图片装载功能
一、实验目的
1、学会开发菜单功能
2、学会设置画布属性
3、学会设置相关控件属性
4、学会按钮触发器的编写
前期准备:
在emp中添加photo列
Sql语句:
AltertableempaddphotoBLOB
二、实验内容
在EMP表中,点击检索按钮显示雇员相关信息。
点击装载图片按钮时,将从本地计算机指定的位置装载相应图片到内容,点击保存时,提交此图片到EMP表中进行永久保存。
三、实验步骤
前期准备:
在emp中添加photo列
Sql语句:
AltertableempaddphotoBLOB
检索语句:
begin
set_block_property('emp',default_where,'empno='
||:
control.eno);
go_block('emp');
execute_query;
end;
装载语句:
declare
file_namevarchar2(80);
begin
set_block_property('emp',default_where,'empno='
||:
control.eno);
go_block('emp');
execute_query;
file_name:
='c:
\'||:
emp.ename||'.jpg';
read_image_file(file_name,'jpg','emp.photo');
end;
保存语句:
commit_form;
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- form 开发 案例
![提示](https://static.bdocx.com/images/bang_tan.gif)