PACKAGE: APPS.ERROR_STACK

Source

1 PACKAGE  ERROR_STACK AS
2 /* $Header: PORERSTS.pls 120.1 2005/06/30 04:40:06 srmani noship $*/
3 
4 
5 
6 -- Record to hold the error stack entries
7 TYPE ErrorStackEltType IS RECORD (
8   message_name     VARCHAR2(2000),
9   appl_code        VARCHAR2(10),
10   number_of_tokens NUMBER,
11   token1           VARCHAR2(30),
12   value1           VARCHAR2(300),
13   token2           VARCHAR2(30),
14   value2           VARCHAR2(300),
15   token3           VARCHAR2(30),
16   value3           VARCHAR2(300),
17   token4           VARCHAR2(30),
18   value4           VARCHAR2(300),
19   token5           VARCHAR2(30),
20   value5           VARCHAR2(300)
21 );
22 
23 -- Table of ErrorStackEltType records
24 TYPE ErrorStackType IS TABLE OF ErrorStackEltType INDEX BY BINARY_INTEGER;
25 
26 E_SUCCESS                      CONSTANT NUMBER := 0;
27 E_EMPTY_ERROR_STACK            CONSTANT NUMBER := 1.18;
28 
29 PROCEDURE PushMessage(p_message_name IN     VARCHAR2,
30 		      p_appl_code    IN     VARCHAR2,
31                       p_token1       IN     VARCHAR2 DEFAULT NULL,
32                       p_value1       IN     VARCHAR2 DEFAULT NULL,
33                       p_token2       IN     VARCHAR2 DEFAULT NULL,
34                       p_value2       IN     VARCHAR2 DEFAULT NULL,
35                       p_token3       IN     VARCHAR2 DEFAULT NULL,
36                       p_value3       IN     VARCHAR2 DEFAULT NULL,
37                       p_token4       IN     VARCHAR2 DEFAULT NULL,
38                       p_value4       IN     VARCHAR2 DEFAULT NULL,
39                       p_token5       IN     VARCHAR2 DEFAULT NULL,
40                       p_value5       IN     VARCHAR2 DEFAULT NULL);
41 
42 PROCEDURE PopMessage(
43 		      p_message_name OUT NOCOPY /* file.sql.39 change */     VARCHAR2,
44 		      p_appl_code    OUT NOCOPY /* file.sql.39 change */     VARCHAR2,
45                       p_token1       OUT NOCOPY /* file.sql.39 change */     VARCHAR2,
46                       p_value1       OUT NOCOPY /* file.sql.39 change */     VARCHAR2,
47                       p_token2       OUT NOCOPY /* file.sql.39 change */     VARCHAR2,
48                       p_value2       OUT NOCOPY /* file.sql.39 change */     VARCHAR2,
49                       p_token3       OUT NOCOPY /* file.sql.39 change */     VARCHAR2,
50                       p_value3       OUT NOCOPY /* file.sql.39 change */     VARCHAR2,
51                       p_token4       OUT NOCOPY /* file.sql.39 change */     VARCHAR2,
52                       p_value4       OUT NOCOPY /* file.sql.39 change */     VARCHAR2,
53                       p_token5       OUT NOCOPY /* file.sql.39 change */     VARCHAR2,
54                       p_value5       OUT NOCOPY /* file.sql.39 change */     VARCHAR2);
55 
56 PROCEDURE SQL_ERROR (
57 			routine IN VARCHAR2,
58 			location IN VARCHAR2,
59 			error_code IN VARCHAR2);
60 
61 PROCEDURE dummy_test;
62 
63 FUNCTION GETMSGCOUNT  return number;
64 
65 END ERROR_STACK;