PROCEDURE OGTRIGGERPROC0 IS
  the_win OG_WINDOW;
  win_pos OG_POINT;
  win_wid NUMBER;
  win_ht  NUMBER;
BEGIN
  the_win := OG_GET_WINDOW('Main Layout');
  win_pos.x := 0;
  win_pos.y := 0;
  OG_SET_POSITION(the_win, win_pos);
  win_wid := 6.5*OG_APP.HSCREEN_RES;
  win_ht := 3*OG_APP.VSCREEN_RES;
  OG_SET_WINDOW_SIZE(the_win, win_wid, win_ht);
  OG_SET_NAME(the_win, 'Employees by Department');
END;

Select d.dname Department, e.ename Employee
from dept d, emp e
where d.deptno = :deptno
and d.deptno = e.deptno