DBA Data[Home] [Help]

PACKAGE: APPS.CS_EST_APPLY_CONTRACT_PKG

Source


1 package CS_Est_Apply_Contract_PKG AUTHID CURRENT_USER as
2 /* $Header: csxchcos.pls 120.2.12020000.2 2012/07/05 05:42:54 gasankar ship $ */
3 
4 
5 -- PROCEDURE to process all the interface records :
6 SUBTYPE ENT_CONTRACT_TAB IS OKS_ENTITLEMENTS_PUB.GET_CONTOP_TBL;
7 
8 PROCEDURE Apply_Contract (
9    p_coverage_id	   IN  NUMBER,
10    p_coverage_txn_group_id IN  NUMBER,
11    p_txn_billing_type_id   IN NUMBER,
12    p_business_process_id   IN NUMBER,
13    p_request_date          IN DATE,
14    p_amount                IN NUMBER,
15    p_discount_amount       OUT NOCOPY     NUMBER,
16    X_RETURN_STATUS         OUT NOCOPY     VARCHAR2,
17    X_MSG_COUNT             OUT NOCOPY     NUMBER,
18    X_MSG_DATA              OUT NOCOPY     VARCHAR2);
19 
20 --
21 --
22 PROCEDURE Update_Estimate_Details (
23    p_Estimate_Detail_Id  IN  NUMBER,
24    p_discount_price      IN  NUMBER);
25 
26 TYPE cont_rec_type IS RECORD
27    (COVERAGE_ID   	OKS_ENT_COVERAGES_V.ACTUAL_COVERAGE_ID%type,
28     COVERAGE_NAME 	OKS_ENT_COVERAGES_V.COVERAGE_NAME%type,
29     COV_TXN_GROUP_ID  OKS_ENT_TXN_GROUPS_V.TXN_GROUP_ID%type);
30 
31 TYPE CONTTAB IS TABLE OF cont_rec_type INDEX BY BINARY_INTEGER;
32 
33 PROCEDURE GET_CONTRACT_LINES(
34    P_API_VERSION		IN NUMBER ,
35    P_INIT_MSG_LIST		IN VARCHAR2,
36    P_CUSTOMER_ID		IN NUMBER,
37    P_CUSTOMER_ACCOUNT_ID	IN NUMBER,
38    P_SERVICE_LINE_ID		IN NUMBER DEFAULT NULL,
39    P_CUSTOMER_PRODUCT_ID	IN NUMBER DEFAULT NULL,
40    p_system_id			IN number default null, -- Fix bug 3040124
41    p_inventory_item_id		IN number default null, -- Fix bug 3040124
42    p_site_id		        IN number default null, -- Fix bug 11877944
43    P_REQUEST_DATE		IN DATE,
44    P_BUSINESS_PROCESS_ID	IN NUMBER DEFAULT NULL,
45    P_CALC_RESPTIME_FLAG		IN VARCHAR2 DEFAULT NULL,
46    P_VALIDATE_FLAG		IN VARCHAR2,
47    X_ENT_CONTRACTS		OUT NOCOPY ENT_CONTRACT_TAB,
48    X_RETURN_STATUS		OUT NOCOPY VARCHAR2,
49    X_MSG_COUNT			OUT NOCOPY NUMBER,
50    X_MSG_DATA			OUT NOCOPY VARCHAR2);
51 
52 end CS_Est_Apply_Contract_PKG;