Subversion Repositories DevTools

CREATE PROCEDURE "RELEASE_MANAGER"."UPDATE_UNIT_TEST_TEST" ( nTest_id IN NUMBER,
                                                                                           nTestTypeId IN UNIT_TESTS.TEST_TYPES_FK%TYPE,        
                                                                                           nPv_id IN NUMBER,
                                                                                           nUserId IN NUMBER,
                                                   sTest_summary IN UNIT_TESTS.TEST_SUMMARY%TYPE,
                                                                                           sNumof_test IN UNIT_TESTS.NUMOF_TEST%TYPE,
                                                   sCompletion_date IN VARCHAR2,
                                                                                           sDpkg_path IN VARCHAR2,
                                                                                           enumTEST_TYPE_AUTOMATIC IN NUMBER,
                                                                                           sResults IN VARCHAR2,
                                                                                           outFileName OUT VARCHAR2
                                              ) IS
/* ---------------------------------------------------------------------------
    Version: 3.1.0
   --------------------------------------------------------------------------- */
   
        FILENAME_PREFIX CONSTANT VARCHAR2(50) := 'RM_UNIT_TEST';

    ResultsURL UNIT_TESTS.RESULTS_URL%TYPE DEFAULT NULL;
    ResultsAttachment UNIT_TESTS.RESULTS_ATTACHMENT_NAME%TYPE DEFAULT NULL;


BEGIN

       IF nTestTypeId = enumTEST_TYPE_AUTOMATIC THEN
        ResultsURL := sResults;
       ELSE
        IF (sResults <> '') OR ( NOT sResults IS NULL ) THEN
                outFileName := FILENAME_PREFIX || nTest_id ||'_'|| sResults;
                ResultsAttachment := sDpkg_path || '/' || outFileName;
           END IF;
       END IF;

       /*       IF (sResults <> '') OR ( NOT sResults IS NULL ) THEN
                outFileName := FILENAME_PREFIX || newID ||'_'|| sResults;
                sResults_url:= 'doc' || '/' || 
                        ;
        END IF;*/
        --- Update Unit Test ---
    UPDATE UNIT_TESTS SET
           TEST_SUMMARY = sTest_summary,
                   NUMOF_TEST = sNumof_test,
           COMPLETION_DATE = TO_DATE( sCompletion_date,'DD/MM/YYYY' ),
                   COMPLETED_BY = nUserId,
                   RESULTS_URL = ResultsURL,
                   RESULTS_ATTACHMENT_NAME = ResultsAttachment
     WHERE TEST_ID = nTest_id
       AND PV_ID = nPv_id;

END Update_Unit_Test_Test;
/