Test script to test functions in a package

[kwartz]

Any suggestions on how to write a test script to test a package. Some of the functions in the package are to_number_zero, CheckIfNumeric( STRING_IN IN VARCHAR2). I need to write some sort of test script for these functions. For example, the to_number_zero test should pass in an alphabetic string and check the result, then pass in a numeric string and check the result.

[kwartz]

I understand that, however what I want is for each test to display pass or fail. thank you

[amitpatel66]

I understand that, however what I want is for each test to display pass or fail. thank you

I would give you one example without changing your existing function code.
Check this:

 
SELECT DECODE(LENGTH(LASTNAME('BOND,JAMES')),4,'PASS','FAIL') FROM DUAL;
 
 

I would check the length of the string returned by the function LASTNAME and if it is equal to 4 ('BOND' in this case) then I say 'PASS' else "FAIL'.

[kwartz]

This what I am trying to acheive, however because I am new to pl/sql I am not getting it right. Can you help me?

Thanks

 
SET SERVEROUTPUT ON
 
DECLARE
last_name VARCHAR2(20) := NULL;
BEGIN
last_name := LASTNAME('Smith,JAMES');
last_name := LASTNAME ('Smith James');
last_name := LASTNAME ('Smith^James');
DBMS_OUTPUT.PUT_LINE(last_name);
 
IF
last_name=('Smith')
THEN
DBMS_OUTPUT.PUT_LINE('LASTNAME test passed');
ELSE
DBMS_OUTPUT.PUT_LINE('LASTNAME test failed');
 
 

[amitpatel66]

This what I am trying to acheive, however because I am new to pl/sql I am not getting it right. Can you help me?

Thanks

Code: ( oracle8 )

SET SERVEROUTPUT ON

DECLARE
last_name VARCHAR2(20) := NULL;
BEGIN
last_name := LASTNAME('Smith ,JAMES');
last_name := LASTNAME ('Smith James');
last_name := LASTNAME ('Smith^James') ;
DBMS_OUTPUT.PUT _LINE(last_name );

IF
last_name=('Smi th')
THEN
DBMS_OUTPUT.PUT _LINE('LASTNAME test passed');
ELSE
DBMS_OUTPUT.PUT _LINE("LASTNAME test failed');

What is the error it is displaying??

[amitpatel66]

Hi,

Please check how to use CODE TAGS in POSTING GUIDELINES

MODERATOR

[kwartz]

What is the error it is displaying??

Does it sound logical? is it going work?

[kwartz]

This what I am trying to acheive, however because I am new to pl/sql I am not getting it right. Can you help me?

Thanks

 
SET SERVEROUTPUT ON
 
DECLARE
last_name VARCHAR2(20) := NULL;
BEGIN
last_name := LASTNAME('Smith,JAMES');
last_name := LASTNAME ('Smith James');
last_name := LASTNAME ('Smith^James');
DBMS_OUTPUT.PUT_LINE(last_name);
 
IF
last_name=('Smith')
THEN
DBMS_OUTPUT.PUT_LINE('LASTNAME test passed');
ELSE
DBMS_OUTPUT.PUT_LINE('LASTNAME test failed');
 
 

There are 3 test that I need to run, the way it is set up now, only one, the third one will run. How do I get to go through all 3?
Thanks

[amitpatel66]

There are 3 test that I need to run, the way it is set up now, only one, the third one will run. How do I get to go through all 3?
Thanks

Try this:

 
DECLARE
TYPE nmes IS VARRAY(50) OF VARCHAR2(100);
nam names:= names('Smith,JAMES','Smith James','Smith^James');
last_name VARCHAR2(20) := NULL;
cnt NUMBER:= 0;
BEGIN
FOR I IN nam.FIRST..nam.COUNT LOOP
last_name := LASTNAME(nam(i));
IF
(last_name='Smith')
THEN
cnt:=cnt + 1;
END IF;
END LOOP;
IF(cnt = 3) THEN
DBMS_OUTPUT.PUT_LINE('LASTNAME test passed');
ELSE
DBMS_OUTPUT.PUT_LINE('LASTNAME test failed');
END IF;
END;
 
 

[kwartz]

Try this:

 
DECLARE
TYPE nmes IS VARRAY(50) OF VARCHAR2(100);
nam names:= names('Smith,JAMES','Smith James','Smith^James');
last_name VARCHAR2(20) := NULL;
cnt NUMBER:= 0;
BEGIN
FOR I IN nam.FIRST..nam.COUNT LOOP
last_name := LASTNAME(nam(i));
IF
(last_name='Smith')
THEN
cnt:=cnt + 1;
END IF;
END LOOP;
IF(cnt = 3) THEN
DBMS_OUTPUT.PUT_LINE('LASTNAME test passed');
ELSE
DBMS_OUTPUT.PUT_LINE('LASTNAME test failed');
END IF;
END;
 
 

This works fine, however, all three test are run. What I will prefer is depending on the input, lets say we want to test for 'Smith^James' this time it works and another time we can test for 'Smith,James' . In this current state all three criteria should be present for the test to pass, taking away one fails the test. This shouldn't be so.
Thanks

[kwartz]

This works fine, however, all three test are run. What I will prefer is depending on the input, lets say we want to test for 'Smith^James' this time it works and another time we can test for 'Smith,James' . In this current state all three criteria should be present for the test to pass, taking away one fails the test. This shouldn't be so.
Thanks

Is there anyway, I can use CASE ?