PACKAGE: APPS.QLTTRAWB

Source

1 PACKAGE QLTTRAWB AUTHID CURRENT_USER as
2 /* $Header: qlttrawb.pls 120.1.12020000.1 2012/06/27 08:49:46 appldev ship $ */
3 
4 -- 1/23/96 - CREATED
5 -- Paul Mishkin
6 
7   -- Gapless Sequence Proj Start. rponnusa Thu Jul  3 04:27:55 PDT 2003
8   TYPE NUM_TABLE IS TABLE OF NUMBER;
9 
10   G_PLAN_ID_TAB           NUM_TABLE;
11   G_COLLECTION_ID_TAB     NUM_TABLE;
12   G_OCCURRENCE_TAB        NUM_TABLE;
13   G_TXN_HEADER_ID_TAB     NUM_TABLE;
14 
15   -- Gapless Sequence Proj End
16 
17   -- Bug 2548710. rponnusa Mon Nov 18 03:49:15 PST 2002
18   TYPE CHAR50_TABLE IS TABLE OF VARCHAR2(50);
19 
20   G_SEQ_TAB1     CHAR50_TABLE;
21   G_SEQ_TAB2     CHAR50_TABLE;
22   G_SEQ_TAB3     CHAR50_TABLE;
23   G_SEQ_TAB4     CHAR50_TABLE;
24   G_SEQ_TAB5     CHAR50_TABLE;
25   G_SEQ_TAB6     CHAR50_TABLE;
26   G_SEQ_TAB7     CHAR50_TABLE;
27   G_SEQ_TAB8     CHAR50_TABLE;
28   G_SEQ_TAB9     CHAR50_TABLE;
29   G_SEQ_TAB10    CHAR50_TABLE;
30   G_SEQ_TAB11    CHAR50_TABLE;
31   G_SEQ_TAB12    CHAR50_TABLE;
32   G_SEQ_TAB13    CHAR50_TABLE;
33   G_SEQ_TAB14    CHAR50_TABLE;
34   G_SEQ_TAB15    CHAR50_TABLE;
35 
36   G_INIT_SEQ_TAB NUMBER := 1;
37   G_ROW_COUNT    NUMBER := 0;
38 
39   -- Bug 3765678. Component Item is not getiing validated if
40   -- dependent on item. Introducing a new global variable
41   -- to store ITEM_ID so COMP_ITEM can be verified against it.
42   -- saugupta Thu, 15 Jul 2004 23:46:39 -0700 PDT
43 
44   -- Bug 3807782. Component Item validation is failing for bulk
45   -- insert. G_ITEM_ID is no more used in the new logic.
46   -- Hence commenting it out.
47   -- srhariha. Wed Aug  4 23:33:07 PDT 2004.
48   -- G_ITEM_ID NUMBER := NULL;
49 
50   PROCEDURE INIT_SEQ_TABLE(p_count IN NUMBER);
51 
52 /*
53   --
54   -- should be private
55   --
56   FUNCTION TRANSACTION_WORKER(X_GROUP_ID NUMBER,
57                               X_VAL_FLAG NUMBER,
58                               X_DEBUG VARCHAR2,
59                               TYPE_OF_TXN NUMBER) RETURN BOOLEAN;
60 */
61 
62   PROCEDURE WRAPPER (ERRBUF OUT NOCOPY VARCHAR2,
63                      RETCODE OUT NOCOPY VARCHAR2,
64                      ARGUMENT1 IN VARCHAR2,
65                      ARGUMENT2 IN VARCHAR2,
66                      ARGUMENT3 IN VARCHAR2,
67                      ARGUMENT4 IN VARCHAR2,
68                      ARGUMENT5 IN VARCHAR2,
69                      ARGUMENT6 IN VARCHAR2,
70                      ARGUMENT7 IN VARCHAR2,
71                      ARGUMENT8 IN VARCHAR2
72                      );
73 
74 -- Bug 8586750.Fp for 8321226.Added these three procedures for code reusability.
75 -- pdube Mon Jun 15 23:07:13 PDT 2009
76 PROCEDURE CHILD_CONC_REQ_CALL(P_TXN_HEADER_ID NUMBER);
77 PROCEDURE INSERT_AUTO_HIST_CHILD (P_TYPE_OF_TXN IN NUMBER,
78                                   P_PLAN_ID IN NUMBER,
79                                   P_TXN_HEADER_ID IN NUMBER);
80 PROCEDURE UPDATE_DELETE_QRI(P_REQUEST_ID IN NUMBER,
81                             P_USER_ID IN NUMBER,
82                             P_LAST_UPDATE_LOGIN IN NUMBER,
83                             P_PROGRAM_APPLICATION_ID IN NUMBER,
84                             P_PROGRAM_ID IN NUMBER,
85                             P_GROUP_ID IN NUMBER,
86 			    P_DEBUG IN VARCHAR2);
87 
88 END QLTTRAWB;
89