File tree Expand file tree Collapse file tree
test/ut3_user/expectations Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -2788,6 +2788,45 @@ Check the query and data for errors.';
27882788 ut3.ut.expect(l_actual).to_equal(l_expected);
27892789 ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_equal(0);
27902790 end;
2791-
2791+
2792+ procedure compare_number_pckg_type
2793+ as
2794+ l_expected sys_refcursor;
2795+ l_actual sys_refcursor;
2796+ l_expected_data t_num_tab;
2797+ l_actual_message varchar2(32767);
2798+ l_expected_message varchar2(32767);
2799+ begin
2800+
2801+ l_expected_data(1).col1 := 2135;
2802+ l_expected_data(1).col4 := 2016;
2803+ l_expected_data(1).col5 := -1;
2804+
2805+ open l_expected for
2806+ select *
2807+ from table (l_expected_data);
2808+
2809+ open l_actual for
2810+ select
2811+ 1 as col1
2812+ ,2 as col2
2813+ ,3 as col3
2814+ ,2016 as col4
2815+ ,-1 as col5
2816+ from dual;
2817+
2818+ ut3.ut.expect(l_actual).to_equal(a_expected => l_expected);
2819+
2820+ l_expected_message := q'[%Actual: refcursor [ count = 1 ] was expected to equal: refcursor [ count = 1 ]
2821+ %Diff:
2822+ %Rows: [ 1 differences ]
2823+ %Row No. 1 - Actual: <COL1>1</COL1><COL2>2</COL2><COL3>3</COL3>
2824+ %Row No. 1 - Expected: <COL1>2135</COL1><COL2/><COL3/>%]';
2825+
2826+ l_actual_message := ut3_tester_helper.main_helper.get_failed_expectations(1);
2827+
2828+ ut.expect(l_actual_message).to_be_like(l_expected_message);
2829+ end;
2830+
27922831end;
27932832/
Original file line number Diff line number Diff line change @@ -445,6 +445,19 @@ create or replace package test_expectations_cursor is
445445
446446 --%test(Check precision of number from dual #907)
447447 procedure number_from_dual;
448-
448+
449+ --%test( Comparing number types with different precisions works with package-type nested tables )
450+ procedure compare_number_pckg_type;
451+
452+ type t_num_rec is record (
453+ col1 number(15,0),
454+ col2 number(1,0),
455+ col3 number(4,0),
456+ col4 number(4,0),
457+ col5 number(38,0));
458+
459+
460+ type t_num_tab is table of t_num_rec index by binary_integer;
461+
449462end;
450463/
You can’t perform that action at this time.
0 commit comments