[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;