DBA Data[Home] [Help]

PACKAGE: APPS.HR_QUEST_PERFORM_WEB

Source


1 PACKAGE HR_QUEST_PERFORM_WEB AUTHID CURRENT_USER AS
2 /* $Header: hrqtpp1w.pkh 120.3 2005/12/13 13:52:41 svittal noship $ */
3 --
4 -- |--------------------------------------------------------------------------|
5 -- |--< Global Variable Declarations >----------------------------------------|
6 -- |--------------------------------------------------------------------------|
7 --
8 g_tag_not_found_exception EXCEPTION;
9 g_invalid_tag_exception   EXCEPTION;
10 g_handled_exception       EXCEPTION;
11 PRAGMA EXCEPTION_INIT(g_tag_not_found_exception, -20001);
12 PRAGMA EXCEPTION_INIT(g_invalid_tag_exception, -20002);
13 --
14 c_max_size  CONSTANT NUMBER  := 27648;
15 c_debug     CONSTANT BOOLEAN := FALSE;
16 --
17 -- |--------------------------------------------------------------------------|
18 -- |--< Type Declarations >---------------------------------------------------|
19 -- |--------------------------------------------------------------------------|
20 --
21 TYPE r_field_structure IS RECORD
22    (a_tag                  VARCHAR2 (30)  DEFAULT NULL
23    ,a_name                 VARCHAR2 (30)  DEFAULT NULL
24    ,a_type                 VARCHAR2 (30)  DEFAULT NULL
25    ,a_value                LONG           DEFAULT NULL
26    ,a_text                 LONG           DEFAULT NULL
27    ,a_checked              VARCHAR2 (1)   DEFAULT 'N'
28    ,a_size                 NUMBER         DEFAULT 0
29    ,a_cols                 NUMBER         DEFAULT 0
30    ,a_rows                 NUMBER         DEFAULT 0
31    ,a_token                VARCHAR2 (30)  DEFAULT NULL
32    ,field_id               NUMBER         DEFAULT NULL
33    ,object_version_number  NUMBER         DEFAULT 0
34    );
35 --
36 TYPE t_field_structure IS TABLE OF r_field_structure INDEX BY BINARY_INTEGER;
37 
38 PROCEDURE Delete_Quest_Answer
39    (p_questionnaire_answer_id    IN NUMBER
40    );
41 --
42 -- |--------------------------------------------------------------------------|
43 -- |--< Delete_Quest_Answer_Values >------------------------------------------|
44 -- |--------------------------------------------------------------------------|
45 --
46 -- Description:
47 --    This procedure is a wrapper around hr_qsv_del.del procedure , and it
48 --    allows to delete the question answer values from hr_quest_answer_values
49 --    tables if the entries of "VALUE" column are null.
50 --
51 PROCEDURE Delete_Quest_Answer_Values
52    (p_quest_answer_val_id         IN NUMBER
53    ,p_object_version_number       IN NUMBER
54    );
55 --
56 --
57 -- |--------------------------------------------------------------------------|
58 -- |--< Debug >---------------------------------------------------------------|
59 -- |--------------------------------------------------------------------------|
60 END HR_QUEST_PERFORM_WEB;