DBA Data[Home] [Help]

TYPE BODY: APPS.PO_API_ERRORS_REC_TYPE

Source


1 TYPE BODY po_api_errors_rec_type AS
2 
3   STATIC FUNCTION create_object RETURN po_api_errors_rec_type IS
4   BEGIN
5     RETURN po_api_errors_rec_type (
6       message_name    => po_tbl_varchar30(),
7       message_text    => po_tbl_varchar2000(),
8       table_name      => po_tbl_varchar30(),
9       column_name     => po_tbl_varchar30(),
10       entity_type     => po_tbl_varchar30(),
11       entity_id       => po_tbl_number(),
12       processing_date => po_tbl_date(),
13       message_type    => po_tbl_varchar1()
14     );
15   END;
16 
17   MEMBER PROCEDURE add_error (
18     p_message_name        IN VARCHAR2,
19     p_message_text        IN VARCHAR2,
20     p_table_name          IN VARCHAR2,
21     p_column_name         IN VARCHAR2,
22     p_entity_type         IN VARCHAR2,
23     p_entity_id           IN NUMBER,
24     p_message_type        IN VARCHAR2
25   ) IS
26     c NUMBER;
27   BEGIN
28     SELF.message_name.extend;
29     c := SELF.message_name.COUNT;
30     SELF.message_name(c) := p_message_name;
31 
32     SELF.message_text.extend;
33     SELF.message_text(c) := p_message_text;
34     SELF.table_name.extend;
35     SELF.table_name(c) := p_table_name;
36     SELF.column_name.extend;
37     SELF.column_name(c) := p_column_name;
38     SELF.entity_type.extend;
39     SELF.entity_type(c) := p_entity_type;
40     SELF.entity_id.extend;
41     SELF.entity_id(c) := p_entity_id;
42     SELF.processing_date.extend;
43     SELF.processing_date(c) := sysdate;
44     SELF.message_type.extend;
45     SELF.message_type(c) := p_message_type;
46   END add_error;
47 
48 END;