DBA Data[Home] [Help]

PACKAGE: APPS.QP_BULK_MSG

Source


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;