DBA Data[Home] [Help]

PACKAGE: APPS.AMS_CLAIM_GRP

Source


1 PACKAGE AMS_claim_GRP AUTHID CURRENT_USER as
2 /* $Header: amsgclas.pls 115.13 2004/04/06 19:33:41 julou ship $ */
3 -- Start of Comments
4 -- Package name     : AMS_claim_GRP
5 -- Purpose          :
6 -- History          :
7 -- NOTE             :
8 -- End of Comments
9 
10 -- Default number of records fetch per call
11 G_DEFAULT_NUM_REC_FETCH  NUMBER := 30;
12 --   *******************************************************
13 --    Start of Comments
14 --   -------------------------------------------------------
15 --    Record name:DEDUCTION_REC_TYPE
16 --   -------------------------------------------------------
17 --       CLAIM_ID
18 --       CLAIM_NUMBER
19 --       CLAIM_TYPE_ID
20 --       CLAIM_DATE
21 --       DUE_DATE
22 --       OWNER_ID
23 --       AMOUNT
24 --       CURRENCY_CODE
25 --       EXCHANGE_RATE_TYPE
26 --       EXCHANGE_RATE_DATE
27 --       EXCHANGE_RATE
28 --       SET_OF_BOOKS_ID
29 --       SOURCE_OBJECT_ID
30 --       SOURCE_OBJECT_CLASS
31 --       SOURCE_OBJECT_TYPE_ID
32 --       SOURCE_OBJECT_NUMBER
33 --       CUST_ACCOUNT_ID
34 --       CUST_BILLTO_ACCT_SITE_ID
35 --       CUST_SHIPTO_ACCT_SITE_ID
36 --       LOCATION_ID
37 --       REASON_CODE_ID
38 --       STATUS_CODE
39 --       SALES_REP_ID
40 --       COLLECTOR_ID
41 --       CONTACT_ID
42 --       BROKER_ID
43 --       CUSTOMER_REF_DATE
44 --       CUSTOMER_REF_NUMBER
45 --       RECEIPT_ID
46 --       RECEIPT_NUMBER
47 --       GL_DATE
48 --       COMMENTS
49 --       DEDUCTION_ATTRIBUTE_CATEGORY
50 --       DEDUCTION_ATTRIBUTE1
51 --       DEDUCTION_ATTRIBUTE2
52 --       DEDUCTION_ATTRIBUTE3
53 --       DEDUCTION_ATTRIBUTE4
54 --       DEDUCTION_ATTRIBUTE5
55 --       DEDUCTION_ATTRIBUTE6
56 --       DEDUCTION_ATTRIBUTE7
57 --       DEDUCTION_ATTRIBUTE8
58 --       DEDUCTION_ATTRIBUTE9
59 --       DEDUCTION_ATTRIBUTE10
60 --       DEDUCTION_ATTRIBUTE11
61 --       DEDUCTION_ATTRIBUTE12
62 --       DEDUCTION_ATTRIBUTE13
63 --       DEDUCTION_ATTRIBUTE14
64 --       DEDUCTION_ATTRIBUTE15
65 --       ORG_ID
66 --
67 --    Required:
68 --    Defaults:
69 --    Note: This is automatic generated record definition, it includes all columns
70 --          defined in the table, developer must manually add or delete some of the attributes.
71 --
72 --   End of Comments
73 
74 
75 TYPE DEDUCTION_REC_TYPE IS RECORD
76 (
77        CLAIM_ID                        NUMBER := FND_API.G_MISS_NUM,
78        CLAIM_NUMBER                    VARCHAR2(30) := FND_API.G_MISS_CHAR,
79        CLAIM_TYPE_ID                   NUMBER := FND_API.G_MISS_NUM,
80        CLAIM_DATE                      DATE := FND_API.G_MISS_DATE,
81        DUE_DATE                        DATE := FND_API.G_MISS_DATE,
82        OWNER_ID                        NUMBER := FND_API.G_MISS_NUM,
83        AMOUNT                          NUMBER := FND_API.G_MISS_NUM,
84        CURRENCY_CODE                   VARCHAR2(15) := FND_API.G_MISS_CHAR,
85        EXCHANGE_RATE_TYPE              VARCHAR2(30) := FND_API.G_MISS_CHAR,
86        EXCHANGE_RATE_DATE              DATE := FND_API.G_MISS_DATE,
87        EXCHANGE_RATE                   NUMBER := FND_API.G_MISS_NUM,
88        SET_OF_BOOKS_ID                 NUMBER := FND_API.G_MISS_NUM,
89        SOURCE_OBJECT_ID                NUMBER := FND_API.G_MISS_NUM,
90        SOURCE_OBJECT_CLASS             VARCHAR2(15) := FND_API.G_MISS_CHAR,
91        SOURCE_OBJECT_TYPE_ID           NUMBER := FND_API.G_MISS_NUM,
92        SOURCE_OBJECT_NUMBER            VARCHAR2(30) := FND_API.G_MISS_CHAR,
93        CUST_ACCOUNT_ID                 NUMBER := FND_API.G_MISS_NUM,
94        CUST_BILLTO_ACCT_SITE_ID        NUMBER := FND_API.G_MISS_NUM,
95        CUST_SHIPTO_ACCT_SITE_ID        NUMBER := FND_API.G_MISS_NUM,
96        LOCATION_ID                     NUMBER := FND_API.G_MISS_NUM,
97        REASON_CODE_ID                  NUMBER := FND_API.G_MISS_NUM,
98        STATUS_CODE                     VARCHAR2(30) := FND_API.G_MISS_CHAR,
99        USER_STATUS_ID                  NUMBER := FND_API.G_MISS_NUM,
100        SALES_REP_ID                    NUMBER := FND_API.G_MISS_NUM,
101        COLLECTOR_ID                    NUMBER := FND_API.G_MISS_NUM,
102        CONTACT_ID                      NUMBER := FND_API.G_MISS_NUM,
103        BROKER_ID                       NUMBER := FND_API.G_MISS_NUM,
104        CUSTOMER_REF_DATE               DATE := FND_API.G_MISS_DATE,
105        CUSTOMER_REF_NUMBER             VARCHAR2(30) := FND_API.G_MISS_CHAR,
106        RECEIPT_ID                      NUMBER := FND_API.G_MISS_NUM,
107        RECEIPT_NUMBER                  VARCHAR2(30) := FND_API.G_MISS_CHAR,
108        GL_DATE                         DATE := FND_API.G_MISS_DATE,
109        COMMENTS                        VARCHAR2(2000) := FND_API.G_MISS_CHAR,
110        DEDUCTION_ATTRIBUTE_CATEGORY    VARCHAR2(30) := FND_API.G_MISS_CHAR,
111        DEDUCTION_ATTRIBUTE1            VARCHAR2(150) := FND_API.G_MISS_CHAR,
112        DEDUCTION_ATTRIBUTE2            VARCHAR2(150) := FND_API.G_MISS_CHAR,
113        DEDUCTION_ATTRIBUTE3            VARCHAR2(150) := FND_API.G_MISS_CHAR,
114        DEDUCTION_ATTRIBUTE4            VARCHAR2(150) := FND_API.G_MISS_CHAR,
115        DEDUCTION_ATTRIBUTE5            VARCHAR2(150) := FND_API.G_MISS_CHAR,
116        DEDUCTION_ATTRIBUTE6            VARCHAR2(150) := FND_API.G_MISS_CHAR,
117        DEDUCTION_ATTRIBUTE7            VARCHAR2(150) := FND_API.G_MISS_CHAR,
118        DEDUCTION_ATTRIBUTE8            VARCHAR2(150) := FND_API.G_MISS_CHAR,
119        DEDUCTION_ATTRIBUTE9            VARCHAR2(150) := FND_API.G_MISS_CHAR,
120        DEDUCTION_ATTRIBUTE10           VARCHAR2(150) := FND_API.G_MISS_CHAR,
121        DEDUCTION_ATTRIBUTE11           VARCHAR2(150) := FND_API.G_MISS_CHAR,
122        DEDUCTION_ATTRIBUTE12           VARCHAR2(150) := FND_API.G_MISS_CHAR,
123        DEDUCTION_ATTRIBUTE13           VARCHAR2(150) := FND_API.G_MISS_CHAR,
124        DEDUCTION_ATTRIBUTE14           VARCHAR2(150) := FND_API.G_MISS_CHAR,
125        DEDUCTION_ATTRIBUTE15           VARCHAR2(150) := FND_API.G_MISS_CHAR,
126        ORG_ID                          NUMBER := FND_API.G_MISS_NUM
127 );
128 
129 
130 G_MISS_DEDUCTION_REC          DEDUCTION_REC_TYPE;
131 TYPE  DEDUCTION_TBL_TYPE      IS TABLE OF DEDUCTION_REC_TYPE INDEX BY BINARY_INTEGER;
132 G_MISS_DEDUCTION_TBL          DEDUCTION_TBL_TYPE;
133 
134 
135 TYPE DEDUCTION_SORT_REC_TYPE IS RECORD
136 (
137       -- PLEASE DEFINE YOUR OWN SORT BY RECORD HERE.
138       OBJECT_VERSION_NUMBER   NUMBER := NULL
139 );
140 
141 
142 
143 
144 
145 --   *******************************************************
146 --    Start of Comments
147 --   *******************************************************
148 --   API Name:  Create_Deduction
149 --   Type    :  Public
150 --   Pre-Req :
151 --   Parameters:
152 --   IN
153 --       p_api_version_number      IN   NUMBER     Required
154 --       p_init_msg_list           IN   VARCHAR2   Optional  Default = FND_API_G_FALSE
155 --       p_commit                  IN   VARCHAR2   Optional  Default = FND_API.G_FALSE
156 --       p_validation_level        IN   NUMBER     Optional  Default = FND_API.G_VALID_LEVEL_FULL
157 --       P_Deduction               IN Deduction_Rec_Type  Required
158 --
159 --   OUT:
160 --       x_return_status           OUT  VARCHAR2
161 --       x_msg_count               OUT  NUMBER
162 --       x_msg_data                OUT  VARCHAR2
163 --       x_claim_id                OUT  NUMBER,
164 --       x_claim_number            OUT  VARCHAR2
165 --   Version : Current version 1.0
166 --
167 --   Note: This procedure checks information passed from AR to Claim module and then
168 --   calls Creat_claim function in the private package to create a claim record.
169 --   It returns a claim_id and cliam_number as the result.
170 --
171 --   End of Comments
172 --
173 PROCEDURE Create_Deduction(
174     P_Api_Version_Number         IN   NUMBER,
175     P_Init_Msg_List              IN   VARCHAR2     := FND_API.G_FALSE,
176     p_validation_level           IN   NUMBER       := FND_API.G_VALID_LEVEL_FULL,
177     P_Commit                     IN   VARCHAR2     := FND_API.G_FALSE,
178 
179     X_Return_Status              OUT NOCOPY  VARCHAR2,
180     X_Msg_Count                  OUT NOCOPY  NUMBER,
181     X_Msg_Data                   OUT NOCOPY  VARCHAR2,
182 
183     P_Deduction                  IN   Deduction_Rec_Type  := G_MISS_deduction_REC,
184     X_CLAIM_ID                   OUT NOCOPY  NUMBER,
185     X_CLAIM_NUMBER               OUT NOCOPY  VARCHAR2
186     );
187 
188 
189 
190 --   *******************************************************
191 --    Start of Comments
192 --   *******************************************************
193 --   API Name:  Update_Deduction
194 --   Type    :  Public
195 --   Pre-Req :
196 --   Parameters:
197 --   IN
198 --       p_api_version_number      IN   NUMBER     Required
199 --       p_init_msg_list           IN   VARCHAR2   Optional  Default = FND_API_G_FALSE
200 --       p_commit                  IN   VARCHAR2   Optional  Default = FND_API.G_FALSE
201 --       p_validation_level        IN   NUMBER     Optional  Default = FND_API.G_VALID_LEVEL_FULL
202 --       P_Deduction              IN Deduction_Rec_Type  Required
203 --
204 --   OUT:
205 --       x_return_status           OUT  VARCHAR2
206 --       x_msg_count               OUT  NUMBER
207 --       x_msg_data                OUT  VARCHAR2
208 --       x_object_version_number   OUT  NUMBER
209 --   Version : Current version 1.0
210 --
211 --   Note: This procedure update a deduction. It calls the Update_Deduction function in the private
212 --   package.
213 --
214 --   End of Comments
215 --
216 PROCEDURE Update_Deduction(
217     P_Api_Version_Number         IN   NUMBER,
218     P_Init_Msg_List              IN   VARCHAR2     := FND_API.G_FALSE,
219     p_validation_level           IN   NUMBER       := FND_API.G_VALID_LEVEL_FULL,
220     P_Commit                     IN   VARCHAR2     := FND_API.G_FALSE,
221 
222     X_Return_Status              OUT NOCOPY  VARCHAR2,
223     X_Msg_Count                  OUT NOCOPY  NUMBER,
224     X_Msg_Data                   OUT NOCOPY  VARCHAR2,
225 
226     P_Deduction                  IN    Deduction_Rec_Type,
227     X_Object_Version_Number      OUT NOCOPY  NUMBER
228     );
229 
230 --   *******************************************************
231 --    Start of Comments
232 --   *******************************************************
233 --   API Name:  Check_Cancell_Deduction
234 --   Type    :  Public
235 --   Pre-Req :
236 --   Parameters:
237 --   IN
238 --       P_Claim_Id  NUMBER     Required
239 --
240 --   OUT:
241 --       x_status                OUT  BOOLEAN
242 --   Version : Current version 1.0
243 --
244 --   Note: This function checks whether a claims can be cancelled or not.
245 --
246 --   End of Comments
247 --
248 FUNCTION Check_Cancell_Deduction(
249     P_Claim_Id   NUMBER
250 ) return boolean;
251 
252 End AMS_claim_GRP;