كيفية عمل tree

عزيزي المبارك السلام عليكم ورحمه الله

الحقيقة انا مشترك جديد واود ان اساعد الجميع اسال الله التوفيق

وهذه الطريقة

1- في ال Form Builder انشىء Record Groupe ثم ضع الاستعلام بالشكل التالي

SELECT 1,Level, ename, '', TO_CHAR(empno)

FROM emp

CONNECT BY PRIOR empno = mgr

START WITH job = 'PRESIDENT'

2- قم بانشاء Tree Item في Control Block واحرص بان لا يكون هناك اي Items اخرى في

ال Block اي ان يكون الTree item بمفرده

3- اذهب الى الForm node ثم قم بكتابه الشفره التاليه في اTrigger

when-new form-instance

DECLARE

my_tree ITEM;

my_num NUMBER;

BEGIN

my_tree := Find_Item('ctl.tree_item');

my_num := POPULATE_GROUP('RGRP');

FTREE.SET_TREE_PROPERTY(my_tree, FTREE.RECORD_GROUP, 'rgrp');

END;

نفذ الform ثم اشاهد النتيجه

ملاحظه هذا المثال يعمل على الجدول الافتراضي Emp والذي غالباً ما يكون مع المستخدم

Scott/tiger

وشكراً

خالد مبارك العوبثاني (مبرمج ومدرس اوراكل ) حاصل على OCP

هل من الممكن ان تعطينا كيفية التعامل مع هذه التريي كا الاضافة او الحذف من التريي