PACKAGE BODY: APPS.OTA_UTQ_UTIL

Source

1 Package Body ota_utq_util as
2 /* $Header: otautqut.pkb 115.0 2004/03/31 17:52:55 ppanjrat noship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- |                     Private Global Definitions                           |
6 -- ----------------------------------------------------------------------------
7 --
8 function  create_existing_test(p_test_id  ota_tests.test_id%type, p_new_attempt_id ota_attempts.attempt_id%type,
9      p_last_attempt_id ota_attempts.attempt_id%type) return number is
10   p_update_count  Number :=0;
11  begin
12    update ota_utest_questions
13    set attempt_id =  p_new_attempt_id
14    where
15    attempt_id = p_last_attempt_id;
16    p_update_count := SQL%ROWCOUNT;
17    return p_update_count;
18   exception
19    when OTHERS then
20    return -1;
21 end create_existing_test;
22 
23 end ota_utq_util;