DBA Data[Home] [Help]

PACKAGE: APPS.GL_INTERCOMPANY_ACCTS_PKG

Source


1 PACKAGE GL_INTERCOMPANY_ACCTS_PKG AS
2 /* $Header: gliacics.pls 120.5 2005/05/05 00:58:34 kvora ship $ */
3 --
4 -- Package
5 --   GL_INTERCOMPANY_ACCTS_PKG
6 -- Purpose
7 --   To group all the procedures/functions for gl_intercompany_acc_sets.
8 -- History
9 --   19-Oct-98		S. Kung		Created
10 --
11 
12 
13   --
14   -- Procedure
15   --   check_acc_set_unique
16   -- Purpose
17   --   Checks the uniqueness of the combination from the source name
18   --   and category name.
19   -- History
20   --   19-Oct-98	S. Kung		Created
21   -- Arguments
22   --   x_rowid    		The ID of the row to be checked
23   --   x_ledger_id       	The ledger to be checked
24   --   x_je_source_name     	The source name to be checked
25   --   x_je_category_name     	The category name to be checked
26   -- Example
27   --   GL_INTERCOMPANY_ACCTS_PKG.check_acc_set_unique(
28   --     :block.rowid,
29   --     123,
30   --     'Manual',
31   --     'Adjustment');
32   -- Notes
33   --
34   PROCEDURE check_acc_set_unique( x_rowid  		VARCHAR2,
35                           	  x_ledger_id	        NUMBER,
36                           	  x_je_source_name	VARCHAR2,
37                           	  x_je_category_name	VARCHAR2);
38 
39 
40 -- *********************************************************************
41 
42   --
43   -- Procedure
44   --   check_acct_unique
45   -- Purpose
46   --   Checks the uniqueness of the combination from the source name
47   --   and category name and balancing segment value.
48   -- History
49   --   19-Oct-98	S. Kung		Created
50   -- Arguments
51   --   x_ledger_id             The ledger to be checked
52   --   x_je_source_name        The source name to be checked
53   --   x_je_category_name      The category name to be checked
54   --   x_bal_seg_value         The balancing segment value to be checked
55   -- Example
56   --   GL_INTERCOMPANY_ACCTS_PKG.check_acct_unique(
57   --     123,
58   --     'Manual',
59   --     'Adjustment',
60   --	 '01');
61   -- Notes
62   --
63   PROCEDURE check_acct_unique( x_rowid			VARCHAR2,
64 		  	       x_ledger_id	        NUMBER,
65                                x_je_source_name		VARCHAR2,
66                                x_je_category_name	VARCHAR2,
67 			       x_bal_seg_value		VARCHAR2 );
68 
69 -- *********************************************************************
70   --
71   -- Procedure
72   --   is_other_exist
73   -- Purpose
74   --   Check if intercompany with source and category "Other"
75   --   exists.  If it exists, return TRUE, else return FALSE.
76   -- History
77   --   19-Oct-98	S. Kung		Created
78   -- Arguments
79   --   x_ledger_id             The ledger to be checked
80   -- Example
81   --   GL_INTERCOMPANY_ACCTS_PKG.is_other_exist( 123 );
82   -- Notes
83   --
84   FUNCTION is_other_exist( x_ledger_id NUMBER ) RETURN BOOLEAN;
85 
86 -- *********************************************************************
87 
88 -- The following procedures are necessary to handle the base table since
89 -- the forms is based on the view.
90 
91 
92 PROCEDURE Insert_Row(X_Rowid                         IN OUT NOCOPY VARCHAR2,
93                      X_Je_Source_Name                       VARCHAR2,
94                      X_Je_Category_Name                     VARCHAR2,
95                      X_Ledger_Id                            NUMBER,
96 		     X_Balance_By_Code			    VARCHAR2,
97 		     X_Bal_Seg_Rule_Code		    VARCHAR2,
98 		     X_Always_Balance_Flag		    VARCHAR2,
99                      X_Last_Update_Date                     DATE,
100                      X_Last_Updated_By                      NUMBER,
101                      X_Creation_Date                        DATE,
102                      X_Created_By                           NUMBER,
103                      X_Last_Update_Login                    NUMBER,
104 		     X_Default_Bal_Seg_Value		    VARCHAR2,
105                      X_Attribute1                           VARCHAR2,
106                      X_Attribute2                           VARCHAR2,
107                      X_Attribute3                           VARCHAR2,
108                      X_Attribute4                           VARCHAR2,
109                      X_Attribute5                           VARCHAR2,
110                      X_Attribute6                           VARCHAR2,
111                      X_Attribute7                           VARCHAR2,
112                      X_Attribute8                           VARCHAR2,
113                      X_Attribute9                           VARCHAR2,
114                      X_Attribute10                          VARCHAR2,
115                      X_Attribute11                          VARCHAR2,
116                      X_Attribute12                          VARCHAR2,
117                      X_Attribute13                          VARCHAR2,
118                      X_Attribute14                          VARCHAR2,
119                      X_Attribute15                          VARCHAR2,
120                      X_Context                              VARCHAR2);
121 
122 PROCEDURE Lock_Row(X_Rowid                                  VARCHAR2,
123                    X_Je_Source_Name                         VARCHAR2,
124                    X_Je_Category_Name                       VARCHAR2,
125                    X_Ledger_Id                              NUMBER,
126 		   X_Balance_By_Code			    VARCHAR2,
127 		   X_Bal_Seg_Rule_Code			    VARCHAR2,
128 		   X_Always_Balance_Flag		    VARCHAR2,
129 		   X_Default_Bal_Seg_Value		    VARCHAR2,
130                    X_Attribute1	                            VARCHAR2,
131                    X_Attribute2	                            VARCHAR2,
132                    X_Attribute3                             VARCHAR2,
133                    X_Attribute4                             VARCHAR2,
134                    X_Attribute5                             VARCHAR2,
135                    X_Attribute6                             VARCHAR2,
136                    X_Attribute7                             VARCHAR2,
137                    X_Attribute8                             VARCHAR2,
138                    X_Attribute9                             VARCHAR2,
139                    X_Attribute10                            VARCHAR2,
140                    X_Attribute11                            VARCHAR2,
141                    X_Attribute12                            VARCHAR2,
142                    X_Attribute13                            VARCHAR2,
143                    X_Attribute14                            VARCHAR2,
144                    X_Attribute15                            VARCHAR2,
145                    X_Context                                VARCHAR2);
146 
147 PROCEDURE Update_Row(X_Rowid                               VARCHAR2,
148                      X_Je_Source_Name                      VARCHAR2,
149                      X_Je_Category_Name                    VARCHAR2,
150                      X_Ledger_Id                     NUMBER,
151 		     X_Balance_By_Code			   VARCHAR2,
152 		     X_Bal_Seg_Rule_Code		   VARCHAR2,
153 		     X_Always_Balance_Flag		   VARCHAR2,
154                      X_Last_Update_Date                    DATE,
155                      X_Last_Updated_By                     NUMBER,
156                      X_Last_Update_Login                   NUMBER,
157 		     X_Default_Bal_Seg_Value		   VARCHAR2,
158                      X_Attribute1	                   VARCHAR2,
159                      X_Attribute2	                   VARCHAR2,
160                      X_Attribute3                          VARCHAR2,
161                      X_Attribute4                          VARCHAR2,
162                      X_Attribute5                          VARCHAR2,
163                      X_Attribute6                          VARCHAR2,
164                      X_Attribute7                          VARCHAR2,
165                      X_Attribute8                          VARCHAR2,
166                      X_Attribute9                          VARCHAR2,
167                      X_Attribute10                         VARCHAR2,
168                      X_Attribute11                         VARCHAR2,
169                      X_Attribute12                         VARCHAR2,
170                      X_Attribute13                         VARCHAR2,
171                      X_Attribute14                         VARCHAR2,
172                      X_Attribute15                         VARCHAR2,
173                      X_Context                             VARCHAR2);
174 
175 PROCEDURE Delete_Row(X_Rowid VARCHAR2);
176 
177 END GL_INTERCOMPANY_ACCTS_PKG;