DBA Data[Home] [Help]

PACKAGE: APPS.OKL_IRH_PVT

Source


1 PACKAGE OKL_IRH_PVT AUTHID CURRENT_USER AS
2   /* $Header: OKLSIRHS.pls 120.1 2006/08/09 14:18:54 pagarg noship $ */
3 --------------------------------------------------------------------------------
4 --GLOBAL DATASTRUCTURES
5 --------------------------------------------------------------------------------
6 TYPE okl_irhv_rec IS RECORD (
7 	ITEM_RESIDUAL_ID		NUMBER ,
8     ORIG_ITEM_RESIDUAL_ID 	NUMBER,
9 	OBJECT_VERSION_NUMBER	NUMBER ,
10 	INVENTORY_ITEM_ID		NUMBER ,
11 	ORGANIZATION_ID			NUMBER ,
12 	CATEGORY_ID				NUMBER ,
13 	CATEGORY_SET_ID			NUMBER ,
14 	RESI_CATEGORY_SET_ID	NUMBER ,
15 	CATEGORY_TYPE_CODE		OKL_FE_ITEM_RESIDUAL_ALL.CATEGORY_TYPE_CODE%TYPE,
16 	RESIDUAL_TYPE_CODE		OKL_FE_ITEM_RESIDUAL_ALL.RESIDUAL_TYPE_CODE%TYPE,
17 	CURRENCY_CODE		    OKL_FE_ITEM_RESIDUAL_ALL.CURRENCY_CODE%TYPE ,
18 	STS_CODE			 	OKL_FE_ITEM_RESIDUAL_ALL.STS_CODE%TYPE,
19 	EFFECTIVE_FROM_DATE		OKL_FE_ITEM_RESIDUAL_ALL.EFFECTIVE_FROM_DATE%TYPE,
20 	EFFECTIVE_TO_DATE		OKL_FE_ITEM_RESIDUAL_ALL.EFFECTIVE_TO_DATE%TYPE ,
21 	ORG_ID					NUMBER ,
22 	CREATED_BY				NUMBER ,
23 	CREATION_DATE			OKL_FE_ITEM_RESIDUAL_ALL.CREATION_DATE%TYPE ,
24 	LAST_UPDATED_BY			NUMBER ,
25 	LAST_UPDATE_DATE		OKL_FE_ITEM_RESIDUAL_ALL.LAST_UPDATE_DATE%TYPE ,
26 	LAST_UPDATE_LOGIN		NUMBER );
27 TYPE okl_irhv_tbl IS TABLE OF okl_irhv_rec
28 INDEX BY BINARY_INTEGER;
29 TYPE okl_irh_rec IS RECORD (
30 	ITEM_RESIDUAL_ID		NUMBER ,
31     ORIG_ITEM_RESIDUAL_ID 	NUMBER ,
32 	OBJECT_VERSION_NUMBER	NUMBER ,
33 	INVENTORY_ITEM_ID		NUMBER ,
34 	ORGANIZATION_ID			NUMBER ,
35 	CATEGORY_ID				NUMBER ,
36 	CATEGORY_SET_ID			NUMBER ,
37 	RESI_CATEGORY_SET_ID	NUMBER ,
38 	CATEGORY_TYPE_CODE		OKL_FE_ITEM_RESIDUAL_ALL.CATEGORY_TYPE_CODE%TYPE ,
39 	RESIDUAL_TYPE_CODE		OKL_FE_ITEM_RESIDUAL_ALL.RESIDUAL_TYPE_CODE%TYPE ,
40 	CURRENCY_CODE			OKL_FE_ITEM_RESIDUAL_ALL.CURRENCY_CODE%TYPE,
41 	STS_CODE				OKL_FE_ITEM_RESIDUAL_ALL.STS_CODE%TYPE ,
42 	EFFECTIVE_FROM_DATE		OKL_FE_ITEM_RESIDUAL_ALL.EFFECTIVE_FROM_DATE%TYPE,
43 	EFFECTIVE_TO_DATE		OKL_FE_ITEM_RESIDUAL_ALL.EFFECTIVE_TO_DATE%TYPE ,
44 	ORG_ID					NUMBER ,
45 	CREATED_BY				NUMBER ,
46 	CREATION_DATE			OKL_FE_ITEM_RESIDUAL_ALL.CREATION_DATE%TYPE ,
47 	LAST_UPDATED_BY			NUMBER ,
48 	LAST_UPDATE_DATE		OKL_FE_ITEM_RESIDUAL_ALL.LAST_UPDATE_DATE%TYPE ,
49 	LAST_UPDATE_LOGIN		NUMBER );
50 
51 TYPE okl_irh_tbl IS TABLE OF okl_irh_rec
52 INDEX BY BINARY_INTEGER;
53 
54 --------------------------------------------------------------------------------
55 -- GLOBAL MESSAGE CONSTANTS
56 --------------------------------------------------------------------------------
57 G_FND_APP			CONSTANT VARCHAR2(200) := OKL_API.G_FND_APP;
58 G_FORM_UNABLE_TO_RESERVE_REC	CONSTANT VARCHAR2(200) := OKL_API.G_FORM_UNABLE_TO_RESERVE_REC;
59 G_FORM_RECORD_DELETED		CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_DELETED;
60 G_FORM_RECORD_CHANGED		CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_CHANGED;
61 G_RECORD_LOGICALLY_DELETED	CONSTANT VARCHAR2(200) := OKL_API.G_RECORD_LOGICALLY_DELETED;
62 G_REQUIRED_VALUE		CONSTANT VARCHAR2(200) := OKL_API.G_REQUIRED_VALUE;
63 G_INVALID_VALUE	 		CONSTANT VARCHAR2(200) := OKL_API.G_INVALID_VALUE;
64 G_COL_NAME_TOKEN		CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
65 G_PARENT_TABLE_TOKEN		CONSTANT VARCHAR2(200) := OKL_API.G_PARENT_TABLE_TOKEN;
66 G_CHILD_TABLE_TOKEN		CONSTANT VARCHAR2(200) := OKL_API.G_CHILD_TABLE_TOKEN;
67 G_RET_STS_SUCCESS      CONSTANT VARCHAR2(1)   := FND_API.G_RET_STS_SUCCESS;
68 G_RET_STS_UNEXP_ERROR  CONSTANT VARCHAR2(1)   := FND_API.G_RET_STS_UNEXP_ERROR;
69 G_RET_STS_ERROR        CONSTANT VARCHAR2(1)   := FND_API.G_RET_STS_ERROR;
70 G_DB_ERROR             CONSTANT VARCHAR2(12)  := 'OKL_DB_ERROR';
71 G_PROG_NAME_TOKEN      CONSTANT VARCHAR2(9)   := 'PROG_NAME';
72 G_API_VERSION          CONSTANT NUMBER        := 1;
73 G_FALSE                CONSTANT VARCHAR2(1)   := FND_API.G_FALSE;
74 G_TRUE                 CONSTANT VARCHAR2(1)   := FND_API.G_TRUE;
75 
76 --------------------------------------------------------------------------------
77 -- GLOBAL VARIABLES
78 --------------------------------------------------------------------------------
79 G_PKG_NAME			CONSTANT VARCHAR2(200) := 'OKL_IRH_PVT';
80 G_APP_NAME			CONSTANT VARCHAR2(3)   :=  OKL_API.G_APP_NAME;
81 G_RESD_AMOUNT       CONSTANT VARCHAR2(30)      :=  'AMOUNT';
82 G_RESD_PERCENTAGE       CONSTANT VARCHAR2(30)  :=  'PERCENT';
83 G_CAT_ITEM          CONSTANT VARCHAR2(30)      :=  'ITEM';
84 G_CAT_ITEM_CAT      CONSTANT VARCHAR2(30)      :=  'ITEMCAT';
85 G_CAT_RES_CAT       CONSTANT VARCHAR2(30)      :=  'RESCAT';
86 
87 --------------------------------------------------------------------------------
88 -- Procedures and Functions
89 --------------------------------------------------------------------------------
90 PROCEDURE change_version;
91 PROCEDURE api_copy;
92 
93 PROCEDURE insert_row(
94 	 p_api_version			 IN NUMBER ,
95 	 p_init_msg_list		 IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
96 	 x_return_status		 OUT NOCOPY VARCHAR2,
97 	 x_msg_count			 OUT NOCOPY NUMBER,
98 	 x_msg_data			 OUT NOCOPY VARCHAR2,
99 	 p_irhv_rec			 IN okl_irhv_rec,
100 	 x_irhv_rec			 OUT NOCOPY okl_irhv_rec);
101 PROCEDURE insert_row(
102 	 p_api_version			 IN NUMBER ,
103 	 p_init_msg_list		 IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
104 	 x_return_status		 OUT NOCOPY VARCHAR2,
105 	 x_msg_count			 OUT NOCOPY NUMBER,
106 	 x_msg_data			 OUT NOCOPY VARCHAR2,
107 	 p_irhv_tbl			 IN okl_irhv_tbl,
108 	 x_irhv_tbl			 OUT NOCOPY okl_irhv_tbl);
109 PROCEDURE update_row(
110 	 p_api_version			 IN NUMBER ,
111 	 p_init_msg_list		 IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
112 	 x_return_status		 OUT NOCOPY VARCHAR2,
113 	 x_msg_count			 OUT NOCOPY NUMBER,
114 	 x_msg_data			 OUT NOCOPY VARCHAR2,
115 	 p_irhv_rec			 IN okl_irhv_rec,
116 	 x_irhv_rec			 OUT NOCOPY okl_irhv_rec);
117 PROCEDURE update_row(
118 	 p_api_version			 IN NUMBER ,
119 	 p_init_msg_list		 IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
120 	 x_return_status		 OUT NOCOPY VARCHAR2,
121 	 x_msg_count			 OUT NOCOPY NUMBER,
122 	 x_msg_data			 OUT NOCOPY VARCHAR2,
123 	 p_irhv_tbl			 IN okl_irhv_tbl,
124 	 x_irhv_tbl			 OUT NOCOPY okl_irhv_tbl);
125 PROCEDURE delete_row(
126 	 p_api_version			 IN NUMBER ,
127 	 p_init_msg_list		 IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
128 	 x_return_status		 OUT NOCOPY VARCHAR2,
129 	 x_msg_count			 OUT NOCOPY NUMBER,
130 	 x_msg_data			 OUT NOCOPY VARCHAR2,
131 	 p_irhv_rec			 IN okl_irhv_rec);
132 PROCEDURE delete_row(
133 	 p_api_version			 IN NUMBER ,
134 	 p_init_msg_list		 IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
135 	 x_return_status		 OUT NOCOPY VARCHAR2,
136 	 x_msg_count			 OUT NOCOPY NUMBER,
137 	 x_msg_data			 OUT NOCOPY VARCHAR2,
138 	 p_irhv_tbl			 IN okl_irhv_tbl);
139 END OKL_IRH_PVT;