السلام عليكم

عندى مشكلة كيف يمكن الطباعة من جدول تابيولر tabulare البيانات فيه لنفس (الموظف) .

علما اني استخدمت الكود التالي في الطباعة الطريقة موجودة في المنتدى سابقا لكنها تقوم بجلب البيانات نفس الموظف المكرر حتى لو اخترت check box واحدة وكما مبين ادناه

 

ما هو الحل؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

 

كود الطباعة

IF     :IS_SELECT = 1 THEN

WEB.SHOW_DOCUMENT('http://server:8888/reports/rwservlet?userid=user/pass@orcl&report=D:\reports\REP11.rdf&destype=cache&desformat=htmlcss&p1=||get_cond1,_blank') ;

 

ELSE

WEB.SHOW_DOCUMENT('http://server:8888/reports/rwservlet?userid=user/pass@orcl&report=D:\reports\REP11.rdf&destype=cache&desformat=htmlcss&p1=||get_cond2,_blank') ;

 

END IF ;

 

CLEAR_FORM;

EXECUTE_QUERY;

 ----------------------------

اما الفكشن Get_Cond1

 

 

FUNCTION Get_Cond1 RETURN VARCHAR2

IS

Cond1 varchar2(2000) := '(1=2)';

BEGIN

:global.found := 'N';

go_block('thank');

first_record;

Loop

If   :is_select= 1     Then        :global.found := 'Y';

Cond1:=Cond1 || ' OR thank.emp_no=' || :thank.emp_no;

End if;

Exit when :system.last_record = 'TRUE';

next_record;

End loop;

Return ('Where ' || Cond1) ;

END;

 

----------------------------------------

اما الفكشن الثاني[ Get_Cond2

 

FUNCTION Get_Cond2 RETURN VARCHAR2

IS

Cond2 varchar2(2000) := '(1=2)';

BEGIN

:global.found := 'N';

go_block('emp');

first_record;

Loop

If   :thank.emp_no >= 1     Then     :global.found := 'Y';

Cond2:=Cond2 || ' OR thank.emp_no=' || :thank.emp_no;

End if;

Exit when :system.last_record = 'TRUE';

next_record;

End loop;

Return ('Where ' || Cond2) ;

END;

 

ما في حل ؟؟؟؟؟؟؟؟؟