1 PACKAGE QP_BULK_MSG AS
2 /* $Header: QPXBMSGS.pls 120.0 2005/06/02 01:16:22 appldev noship $ */
3
4 TYPE num_type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
5 TYPE char30_type IS TABLE OF Varchar2(30) INDEX BY BINARY_INTEGER;
6 TYPE char50_type IS TABLE OF Varchar2(50) INDEX BY BINARY_INTEGER;
7 TYPE char240_type IS TABLE OF Varchar2(240) INDEX BY BINARY_INTEGER;
8
9 TYPE Msg_Rec_Type IS RECORD
10 ( Request_id NUMBER,
11 entity_type VARCHAR2(30),
12 table_name VARCHAR2(30),
13 orig_sys_header_ref VARCHAR2(50),
14 list_header_id NUMBER,
15 orig_sys_line_ref VARCHAR2(50),
16 orig_sys_qualifier_ref VARCHAR2(50),
17 orig_sys_pricing_attr_ref VARCHAR2(50),
18 error_message VARCHAR2(240));
19
20 TYPE Msg_Rec_Type1 IS RECORD
21 ( Request_id num_type,
22 entity_type char30_type,
23 table_name char30_type,
24 orig_sys_header_ref char50_type,
25 list_header_id num_type,
26 orig_sys_line_ref char50_type,
27 orig_sys_qualifier_ref char50_type,
28 orig_sys_pricing_attr_ref char50_type,
29 error_message char240_type);
30
31 G_Msg_Rec Msg_Rec_Type1;
32
33 PROCEDURE ADD(p_msg_rec QP_BULK_MSG.MSG_REC_TYPE);
34
35 PROCEDURE SAVE_MESSAGE(p_request_id NUMBER);
36
37 END QP_BULK_MSG;