[Home] [Help]
PACKAGE: APPS.OKL_PTL_PVT
Source
1 Package OKL_PTL_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLSPTLS.pls 115.5 2002/02/05 12:19:03 pkm ship $ */
3 ---------------------------------------------------------------------------
4 -- GLOBAL DATASTRUCTURES
5 ---------------------------------------------------------------------------
6 TYPE ptl_rec_type IS RECORD (
7 id NUMBER := OKC_API.G_MISS_NUM,
8 name OKL_PDT_TEMPLATES.NAME%TYPE := OKC_API.G_MISS_CHAR,
9 version OKL_PDT_TEMPLATES.VERSION%TYPE := OKC_API.G_MISS_CHAR,
10 object_version_number NUMBER := OKC_API.G_MISS_NUM,
11 description OKL_PDT_TEMPLATES.DESCRIPTION%TYPE := OKC_API.G_MISS_CHAR,
12 from_date OKL_PDT_TEMPLATES.FROM_DATE%TYPE := OKC_API.G_MISS_DATE,
13 to_date OKL_PDT_TEMPLATES.TO_DATE%TYPE := OKC_API.G_MISS_DATE,
14 created_by NUMBER := OKC_API.G_MISS_NUM,
15 creation_date OKL_PDT_TEMPLATES.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE,
16 last_updated_by NUMBER := OKC_API.G_MISS_NUM,
17 last_update_date OKL_PDT_TEMPLATES.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
18 last_update_login NUMBER := OKC_API.G_MISS_NUM);
19 g_miss_ptl_rec ptl_rec_type;
20 TYPE ptl_tbl_type IS TABLE OF ptl_rec_type
21 INDEX BY BINARY_INTEGER;
22 TYPE ptlv_rec_type IS RECORD (
23 id NUMBER := OKC_API.G_MISS_NUM,
24 object_version_number NUMBER := OKC_API.G_MISS_NUM,
25 name OKL_PDT_TEMPLATES_V.NAME%TYPE := OKC_API.G_MISS_CHAR,
26 version OKL_PDT_TEMPLATES_V.VERSION%TYPE := OKC_API.G_MISS_CHAR,
27 description OKL_PDT_TEMPLATES_V.DESCRIPTION%TYPE := OKC_API.G_MISS_CHAR,
28 from_date OKL_PDT_TEMPLATES_V.FROM_DATE%TYPE := OKC_API.G_MISS_DATE,
29 to_date OKL_PDT_TEMPLATES_V.TO_DATE%TYPE := OKC_API.G_MISS_DATE,
30 created_by NUMBER := OKC_API.G_MISS_NUM,
31 creation_date OKL_PDT_TEMPLATES_V.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE,
32 last_updated_by NUMBER := OKC_API.G_MISS_NUM,
33 last_update_date OKL_PDT_TEMPLATES_V.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
34 last_update_login NUMBER := OKC_API.G_MISS_NUM);
35 g_miss_ptlv_rec ptlv_rec_type;
36 TYPE ptlv_tbl_type IS TABLE OF ptlv_rec_type
37 INDEX BY BINARY_INTEGER;
38 ---------------------------------------------------------------------------
39 -- GLOBAL MESSAGE CONSTANTS
40 ---------------------------------------------------------------------------
41 G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
42 G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_FORM_UNABLE_TO_RESERVE_REC;
43 G_FORM_RECORD_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_FORM_RECORD_DELETED;
44 G_FORM_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKC_API.G_FORM_RECORD_CHANGED;
45 G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
46 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
47 G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
48 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
49 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_PARENT_TABLE_TOKEN;
50 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_CHILD_TABLE_TOKEN;
51
52 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_CONTRACTS_UNEXPECTED_ERROR';
53 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'OKL_SQLERRM';
54 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'OKL_SQLCODE';
55 G_TO_DATE_ERROR CONSTANT VARCHAR2(200) := 'OKL_TO_DATE_ERROR';
56
57 G_TABLE_TOKEN CONSTANT VARCHAR2(200) := 'OKL_TABLE_NAME'; --- CHG001
58 G_UNQS CONSTANT VARCHAR2(200) := 'OKL_NOT_UNIQUE'; --- CHG001
59
60 ---------------------------------------------------------------------------
61 -- GLOBAL EXCEPTION
62 ---------------------------------------------------------------------------
63 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
64 ---------------------------------------------------------------------------
65 -- GLOBAL VARIABLES
66 ---------------------------------------------------------------------------
67 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_PTL_PVT';
68 G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
69 ---------------------------------------------------------------------------
70 -- Procedures and Functions
71 ---------------------------------------------------------------------------
72
73 PROCEDURE qc;
74 PROCEDURE change_version;
75 PROCEDURE api_copy;
76 PROCEDURE insert_row(
77 p_api_version IN NUMBER,
78 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
79 x_return_status OUT NOCOPY VARCHAR2,
80 x_msg_count OUT NOCOPY NUMBER,
81 x_msg_data OUT NOCOPY VARCHAR2,
82 p_ptlv_rec IN ptlv_rec_type,
83 x_ptlv_rec OUT NOCOPY ptlv_rec_type);
84
85 PROCEDURE insert_row(
86 p_api_version IN NUMBER,
87 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
88 x_return_status OUT NOCOPY VARCHAR2,
89 x_msg_count OUT NOCOPY NUMBER,
90 x_msg_data OUT NOCOPY VARCHAR2,
91 p_ptlv_tbl IN ptlv_tbl_type,
92 x_ptlv_tbl OUT NOCOPY ptlv_tbl_type);
93
94 PROCEDURE lock_row(
95 p_api_version IN NUMBER,
96 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
97 x_return_status OUT NOCOPY VARCHAR2,
98 x_msg_count OUT NOCOPY NUMBER,
99 x_msg_data OUT NOCOPY VARCHAR2,
100 p_ptlv_rec IN ptlv_rec_type);
101
102 PROCEDURE lock_row(
103 p_api_version IN NUMBER,
104 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
105 x_return_status OUT NOCOPY VARCHAR2,
106 x_msg_count OUT NOCOPY NUMBER,
107 x_msg_data OUT NOCOPY VARCHAR2,
108 p_ptlv_tbl IN ptlv_tbl_type);
109
110 PROCEDURE update_row(
111 p_api_version IN NUMBER,
112 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
113 x_return_status OUT NOCOPY VARCHAR2,
114 x_msg_count OUT NOCOPY NUMBER,
115 x_msg_data OUT NOCOPY VARCHAR2,
116 p_ptlv_rec IN ptlv_rec_type,
117 x_ptlv_rec OUT NOCOPY ptlv_rec_type);
118
119 PROCEDURE update_row(
120 p_api_version IN NUMBER,
121 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
122 x_return_status OUT NOCOPY VARCHAR2,
123 x_msg_count OUT NOCOPY NUMBER,
124 x_msg_data OUT NOCOPY VARCHAR2,
125 p_ptlv_tbl IN ptlv_tbl_type,
126 x_ptlv_tbl OUT NOCOPY ptlv_tbl_type);
127
128 PROCEDURE delete_row(
129 p_api_version IN NUMBER,
130 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
131 x_return_status OUT NOCOPY VARCHAR2,
132 x_msg_count OUT NOCOPY NUMBER,
133 x_msg_data OUT NOCOPY VARCHAR2,
134 p_ptlv_rec IN ptlv_rec_type);
135
136 PROCEDURE delete_row(
137 p_api_version IN NUMBER,
138 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
139 x_return_status OUT NOCOPY VARCHAR2,
140 x_msg_count OUT NOCOPY NUMBER,
141 x_msg_data OUT NOCOPY VARCHAR2,
142 p_ptlv_tbl IN ptlv_tbl_type);
143
144 PROCEDURE validate_row(
145 p_api_version IN NUMBER,
146 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
147 x_return_status OUT NOCOPY VARCHAR2,
148 x_msg_count OUT NOCOPY NUMBER,
149 x_msg_data OUT NOCOPY VARCHAR2,
150 p_ptlv_rec IN ptlv_rec_type);
151
152 PROCEDURE validate_row(
153 p_api_version IN NUMBER,
154 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
155 x_return_status OUT NOCOPY VARCHAR2,
156 x_msg_count OUT NOCOPY NUMBER,
157 x_msg_data OUT NOCOPY VARCHAR2,
158 p_ptlv_tbl IN ptlv_tbl_type);
159
160 END OKL_PTL_PVT;