1 PACKAGE FA_LEASE_PUB AS
2 /* $Header: FAPLEAS.pls 120.1 2005/06/29 15:16:31 bridgway noship $ */
3 --
4 -- API name: FA_LEASE_PUB
5 -- Type: Public
6 -- Pre-reqs: None.
7 -- Function/Procedure: Create Lease and Update Lease Information in FA.
8 --
9 -- Author: Rajeev Jessani
10 -- Parameters:
11 -- IN: p_api_version IN NUMBER Required
12 -- p_calling_fn IN VARCHAR2
13 -- P_TRANS_REC IN FA_API_TYPES.TRANS_REC_TYPE
14 -- -- This will be used to hold WHO information only.
15 -- PX_LEASE_DETAILS_RECIN OUTFA_API_TYPES.LEASE_DETAILS_REC_TYPE
16 -- -- This will hold Lease Details information
17 --
18 -------------------------------------------
19 -- CREATE LEASE PUBLIC API
20 -------------------------------------------
21
22 PROCEDURE CREATE_LEASE (
23 P_API_VERSION IN NUMBER,
24 P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
25 P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
26 P_VALIDATION_LEVEL IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
27 X_RETURN_STATUS OUT NOCOPY VARCHAR2,
28 X_MSG_COUNT OUT NOCOPY NUMBER,
29 X_MSG_DATA OUT NOCOPY VARCHAR2,
30 P_CALLING_FN IN VARCHAR2,
31 P_TRANS_REC IN FA_API_TYPES.TRANS_REC_TYPE,
32 PX_LEASE_DETAILS_REC IN OUT NOCOPY FA_API_TYPES.LEASE_DETAILS_REC_TYPE
33 );
34
35 -------------------------------------------
36 -- UPDATE LEASE PUBLIC API
37 -------------------------------------------
38 PROCEDURE UPDATE_LEASE (
39 P_API_VERSION IN NUMBER,
40 P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
41 P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
42 P_VALIDATION_LEVEL IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
43 X_RETURN_STATUS OUT NOCOPY VARCHAR2,
44 X_MSG_COUNT OUT NOCOPY NUMBER,
45 X_MSG_DATA OUT NOCOPY VARCHAR2,
46 P_CALLING_FN IN VARCHAR2,
47 P_TRANS_REC IN FA_API_TYPES.TRANS_REC_TYPE,
48 P_LEASE_DETAILS_REC_NEW IN FA_API_TYPES.LEASE_DETAILS_REC_TYPE
49 );
50 END FA_LEASE_PUB;