私は utplsql を使用するのが初めてなので、理解していない可能性があることをお詫びします。私の問題は、テストスイートを作成したところです...
CREATE OR REPLACE PACKAGE BODY ut_test_pkg
IS
LP_business_date DATE;
PROCEDURE ut_setup
IS
BEGIN
select nvl(business_date,trunc(sysdate))
into LP_business_date
from my_ut_test_params;
END ut_setup;
PROCEDURE ut_teardown
IS
BEGIN
NULL;
END ut_teardown;
PROCEDURE ut_ttable(I_business_part_date IN DATE)
IS
L_dummy NUMBER:=0;
BEGIN
select count(*)
into L_dummy
from mytable
where business_part_date=to_date('11/05/2013','dd/mm/yyyy')
and length(trim(cust_order_no))>0;
utassert.eq (
'Successful CUST_ORDER_NO NOT EMPTY',
L_dummy,
0
);
dbms_output.put_line('L_dummy ' || L_dummy);
END ut_ttable;
END ut_mytest_pkg;
/
ここで、utplsql を使用してテストを定義します...
BEGIN
utsuite.add ('MY TEST SUITE');
-- Add two packages for testing
utpackage.add ('MY TEST SUITE', 'ut_test_pkg');
END;
/
今、私はテストスイートを実行しています...
set serveroutput on
begin
utplsql.testSuite('MY TEST SUITE',recompile_in=>false);
end;
/
UT_SUITE テーブルにクエリを実行すると、実行回数が増加し、最後のステータスが SUCCESS であることがわかりますが、失敗する条件を意図的に追加したため、テスト プロシージャ it_table を実行しているとは思いません。
また、いくつかの印刷ステートメントを入れましたが、バッファーに印刷されていません。
私が間違っているかもしれないことを誰かが知っていますか?
ああ、最後にもう 1 つ..UTR エラーは、失敗していることも教えてくれません。
ありがとう