用ORACLEForms和ORACLEGraphics实现数据与图形动态显示.docVIP

用ORACLE*Forms 和ORACLE*Graphics实现数据与图形动态显示北京科技大学管理学院 莫艳萍 ---- 1 . 引 言 ---- ORACLE 关 系 数 据 库 管 理 系 统 是 目 前 世 界 上 最 流 行 的 高 性 能 数 据 库 管 理 系 统 之 一，Developer/2000 是ORACLE 公 司 推 出 的 集 成 化 软 件 开 发 和 运 行 环 境。 ORACLE *Forms 是Developer/2000 的 一 部 分， 它 是 一 种 功 能 丰 富， 用 于 构 建 应 用 的 工 具 产 品， 产 品 化 屏 幕 处 理 存 储 在 数 据 库 中 的 数 据。 在 许 多 实 际 应 用 中， 往 往 需 要 将 数 据 用 很 直 观 的 图 形 表 示 出 来。 例 如： 饼 图， 折 线 图， 直 方 图 等， 从 而 使 数 据 及 其 比 例 关 系 一 目 了 然。Developer/2000 的 另 一 工 具ORACLE *Graphics 提 供 了 丰 富 的 图 形 化 表 示 数 据 的 方 法， 它 可 以 从 各 种 数 据 源 获 得 数 据， 并 可 以 与Forms 模 块 结 合 起 来， 更 有 效 地 表 示 数 据。 ---- 笔 者 曾 参 加 某 企 业 决 策 支 持 系 统 的 开 发 工 作， 通 过 在Forms 中 调 用Graphics 中 的 图 形 功 能， 使 数 据 表 示 更 为 直 观， 并 可 根 据Forms 中 数 据 的 变 化 来 动 态 地 显 示 图 形， 从 而 帮 助 决 策 人 员 进 行 数 据 分 析， 达 到 支 持 决 策 的 目 的。 下 文 是 笔 者 在 实 际 开 发 中， 完 成 动 态 显 示 图 形 功 能 制 作 过 程 中 的 一 点 体 会。 2. 动 态 图 形 显 示 的 实 现 ---- 本 例 假 设 有 一 个 产 品 销 售 数 据 表SALES， 并 含 有 销 售 时 间， 产 品 名 称， 销 售 量 三 个 字 段( 销 售 时 间 以 年 为 单 位)， 其 数 据 字 典 为 字 段 名字 段 长 度字 段 含 义TIMEnumber(4)销 售 时 间NAMEchar(10)产 品 名 称AMOUNTnumber(10,2)销 售 量---- 启 动Graphics， 建 立 一 个 新 的 图 形 文 件， 并 命 名 为chart.ogd。 在Queries 中 定 义SQL 查 询 语 句 以 显 示 图 形， 并 在 图 形 的 属 性 栏 中 定 义x 轴 和y 轴 所 需 显 示 的 数 据。 本 例 将 在x 轴 显 示 产 品 名 称，y 轴 显 示 各 种 产 品 的 销 售 量。 ---- 启 动Forms， 建 立 一 个 新 的 Forms 应 用 文 件sale.fmb。 在 画 布CANVAS1 中 填 加 一 个List Item 控 件LIST1 ， 并 在LIST1 的 属 性 中 填 充 所 要 显 示 的 时 间 值。 然 后 填 加 一 个Chart Item 控 件chart_area1， 并 调 节 好chart_area1 的 边 界 和 大 小， 以 显 示 图 形chart.ogd。 ---- 在Forms 中 调 用 图 形， 必 须 与Graphics 进 行 参 数 值 的 传 递。 首 先 回 到Graphics 中， 在chart.ogd 中 设 置 如 下 结 构： ---- （1） 在 参 数 表Parameters 中 定 义 参 数。 本 例 需 传 递 时 间 参 数， 并 设 其 为 m1， 在 参 数 表 中 设 置 其 属 性 parameter m1name m1type numberinitial value 1998 ---- （2） 定 义 图 形 的 查 询 语 句。 在Queries 中 定 义query0 查 询， 如 下 所 示： select product,amountfrom saleswhere time=:m1---- （3） 定 义 过 程。 在 Program Unit 中 编 写 update_chart 过 程， 完 成 图 形 随 参 数 变 化 显 示 的 功 能。 PROCEDURE update_chart ISBEGINog_execute_query(og_get_query(query0));END;---- 完 成 以 上