Developer/2000是ORACLE公司推出的集成化软件开发和运行环境。目前,很多大型企业使用的是ORACLE数据库,而Developer/2000作为其前台开发工具也得到了广泛的应用。
ORACLE *Graphics是Developer/2000的一部分,它提供了丰富的图形化表示数据的方法,并可
以与Forms模块结合起来,更有效地表示数据。
在实际应用中,由于决策者的观察方式和角度不同,因而对同一数据需要不同的图形显示方式。Graphics中提供了多种图形类型,例如,柱图、饼图、线图等。在具体开发应用中可根据用户的需要来选择图形。
在Forms中,左边为三个Push Button按钮,分别命名为but1,but2和but3,右边为Chart Item控件Chart_area1,用来显示图形。我们这里以电视机每年销售量为例,并已有直方图chart1(sales.ogd)。
在图中,横轴代表时间年,纵轴代表销售除了以直方图显示之外,我们还可以用折线图来
表示以上数据。折线图能较好地用于趋势分析,并直观地看出销售量的变化趋势。
(1)在Graphics的sales.ogd中,设直方图的Templates名为column_type。创建一 个Templates,名为Line_type。双击此模板,则进入Chart Template Editor中,设置Field
(2)创建过程Column,其程序代码如下:
PROCEDURE column IS
mch og_object.
BEGIN
mch:=og_get_object(?chart1?).
og_set_template(mch,og_get_template(?column_type?)).
og_0update_chart(mch,og_all_chupda).
END.
---- (3)创建过程Line,其程序代码如下:
PROCEDURE line IS
mch og_object.
BEGIN
mch:=og_get_object(?chart1?).
og_set_template(mch,og_get_template(?pie_type?)).
og_0update_chart(mch,og_all_chupda).
END.
---- (4)创建过程Update_chart,其程序代码如下:
PROCEDURE 0update_chart IS
BEGIN
og_execute_query(og_get_query(?query0?)).
END.
---- (5)回到Forms中,
在but1中创建WHEN_BUTTON_PRESSED触发器,
并填写如下代码
og.interpret(?c:sales.ogd?,
?chart_area1?,?column.?).
---- (6)在but2中创建WHEN_BUTTON_PRESSED触发器,
并填写如下代码:
og.interpret(?c:sales.ogd?,
?chart_area1?,?line.?). |
以上几步即完成直方图到折线图切换的功能。
同理,只要添加饼图模板,编写调用饼图的过程和饼图按钮触发器的程序代码,即
可以完成直方图、折线图和圆饼图三图之间的切换功能。
图形是一种可视化的工具,它可以使数据表达得更清晰、更直观,在决策支持系统的开发中起到了很大的作用。但目前Developer/2000的参考书较少,具体实施还需要在实践中不断探索。