DBA Data[Home] [Help]

APPS.OKC_PRM_PVT dependencies on OKC_API

Line 10: g_return_status varchar2(1) := OKC_API.G_RET_STS_SUCCESS;

6: /*+++++++++++++Start of hand code +++++++++++++++++*/
7: G_UNEXPECTED_ERROR CONSTANT varchar2(200) := 'OKC_UNEXPECTED_ERROR';
8: G_SQLERRM_TOKEN CONSTANT varchar2(200) := 'ERROR_MESSAGE';
9: G_SQLCODE_TOKEN CONSTANT varchar2(200) := 'ERROR_CODE';
10: g_return_status varchar2(1) := OKC_API.G_RET_STS_SUCCESS;
11: /*+++++++++++++End of hand code +++++++++++++++++++*/
12:
13: ---------------------------------------------------------------------------
14: -- FUNCTION get_seq_id

Line 72: x_return_status := OKC_API.G_RET_STS_SUCCESS;

68: procedure validate_type(p_oper IN VARCHAR2,
69: x_return_status OUT NOCOPY VARCHAR2,
70: p_prmv_rec IN prmv_rec_TYPE) is
71: begin
72: x_return_status := OKC_API.G_RET_STS_SUCCESS;
73: if (p_prmv_rec.type in ('DATE','NUMBER','VARCHAR2','LOV')) then
74: x_return_status := OKC_API.G_RET_STS_SUCCESS;
75: return;
76: end if;

Line 74: x_return_status := OKC_API.G_RET_STS_SUCCESS;

70: p_prmv_rec IN prmv_rec_TYPE) is
71: begin
72: x_return_status := OKC_API.G_RET_STS_SUCCESS;
73: if (p_prmv_rec.type in ('DATE','NUMBER','VARCHAR2','LOV')) then
74: x_return_status := OKC_API.G_RET_STS_SUCCESS;
75: return;
76: end if;
77: if (p_prmv_rec.type is NULL or
78: (p_prmv_rec.type = OKC_API.G_MISS_CHAR and p_oper = 'I')) then

Line 78: (p_prmv_rec.type = OKC_API.G_MISS_CHAR and p_oper = 'I')) then

74: x_return_status := OKC_API.G_RET_STS_SUCCESS;
75: return;
76: end if;
77: if (p_prmv_rec.type is NULL or
78: (p_prmv_rec.type = OKC_API.G_MISS_CHAR and p_oper = 'I')) then
79: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'TYPE');
80: x_return_status := OKC_API.G_RET_STS_ERROR;
81: return;
82: end if;

Line 79: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'TYPE');

75: return;
76: end if;
77: if (p_prmv_rec.type is NULL or
78: (p_prmv_rec.type = OKC_API.G_MISS_CHAR and p_oper = 'I')) then
79: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'TYPE');
80: x_return_status := OKC_API.G_RET_STS_ERROR;
81: return;
82: end if;
83: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TYPE');

Line 80: x_return_status := OKC_API.G_RET_STS_ERROR;

76: end if;
77: if (p_prmv_rec.type is NULL or
78: (p_prmv_rec.type = OKC_API.G_MISS_CHAR and p_oper = 'I')) then
79: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'TYPE');
80: x_return_status := OKC_API.G_RET_STS_ERROR;
81: return;
82: end if;
83: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TYPE');
84: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 83: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TYPE');

79: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'TYPE');
80: x_return_status := OKC_API.G_RET_STS_ERROR;
81: return;
82: end if;
83: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TYPE');
84: x_return_status := OKC_API.G_RET_STS_ERROR;
85: return;
86: exception
87: when OTHERS then

Line 84: x_return_status := OKC_API.G_RET_STS_ERROR;

80: x_return_status := OKC_API.G_RET_STS_ERROR;
81: return;
82: end if;
83: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TYPE');
84: x_return_status := OKC_API.G_RET_STS_ERROR;
85: return;
86: exception
87: when OTHERS then
88: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

Line 88: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

84: x_return_status := OKC_API.G_RET_STS_ERROR;
85: return;
86: exception
87: when OTHERS then
88: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
89: p_msg_name => g_unexpected_error,
90: p_token1 => g_sqlcode_token,
91: p_token1_value => sqlcode,
92: p_token2 => g_sqlerrm_token,

Line 94: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

90: p_token1 => g_sqlcode_token,
91: p_token1_value => sqlcode,
92: p_token2 => g_sqlerrm_token,
93: p_token2_value => sqlerrm);
94: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
95: end validate_type;
96:
97: -- Start of comments
98: --

Line 109: x_return_status := OKC_API.G_RET_STS_SUCCESS;

105: procedure validate_prompt(p_oper IN VARCHAR2,
106: x_return_status OUT NOCOPY VARCHAR2,
107: p_prmv_rec IN prmv_rec_TYPE) is
108: begin
109: x_return_status := OKC_API.G_RET_STS_SUCCESS;
110: if (p_prmv_rec.prompt is NULL or
111: (p_prmv_rec.prompt = OKC_API.G_MISS_CHAR and p_oper = 'I')) then
112: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'PROMPT');
113: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 111: (p_prmv_rec.prompt = OKC_API.G_MISS_CHAR and p_oper = 'I')) then

107: p_prmv_rec IN prmv_rec_TYPE) is
108: begin
109: x_return_status := OKC_API.G_RET_STS_SUCCESS;
110: if (p_prmv_rec.prompt is NULL or
111: (p_prmv_rec.prompt = OKC_API.G_MISS_CHAR and p_oper = 'I')) then
112: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'PROMPT');
113: x_return_status := OKC_API.G_RET_STS_ERROR;
114: return;
115: end if;

Line 112: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'PROMPT');

108: begin
109: x_return_status := OKC_API.G_RET_STS_SUCCESS;
110: if (p_prmv_rec.prompt is NULL or
111: (p_prmv_rec.prompt = OKC_API.G_MISS_CHAR and p_oper = 'I')) then
112: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'PROMPT');
113: x_return_status := OKC_API.G_RET_STS_ERROR;
114: return;
115: end if;
116: return;

Line 113: x_return_status := OKC_API.G_RET_STS_ERROR;

109: x_return_status := OKC_API.G_RET_STS_SUCCESS;
110: if (p_prmv_rec.prompt is NULL or
111: (p_prmv_rec.prompt = OKC_API.G_MISS_CHAR and p_oper = 'I')) then
112: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'PROMPT');
113: x_return_status := OKC_API.G_RET_STS_ERROR;
114: return;
115: end if;
116: return;
117: exception

Line 119: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

115: end if;
116: return;
117: exception
118: when OTHERS then
119: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
120: p_msg_name => g_unexpected_error,
121: p_token1 => g_sqlcode_token,
122: p_token1_value => sqlcode,
123: p_token2 => g_sqlerrm_token,

Line 125: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

121: p_token1 => g_sqlcode_token,
122: p_token1_value => sqlcode,
123: p_token2 => g_sqlerrm_token,
124: p_token2_value => sqlerrm);
125: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
126: end validate_prompt;
127:
128: -- Start of comments
129: --

Line 140: x_return_status := OKC_API.G_RET_STS_SUCCESS;

136: procedure validate_lov_query(p_oper IN VARCHAR2,
137: x_return_status OUT NOCOPY VARCHAR2,
138: p_prmv_rec IN prmv_rec_TYPE) is
139: begin
140: x_return_status := OKC_API.G_RET_STS_SUCCESS;
141: if ((p_prmv_rec.type = 'LOV') and
142: (p_prmv_rec.lov_query is NULL or
143: (p_prmv_rec.lov_query = OKC_API.G_MISS_CHAR and p_oper = 'I')
144: )

Line 143: (p_prmv_rec.lov_query = OKC_API.G_MISS_CHAR and p_oper = 'I')

139: begin
140: x_return_status := OKC_API.G_RET_STS_SUCCESS;
141: if ((p_prmv_rec.type = 'LOV') and
142: (p_prmv_rec.lov_query is NULL or
143: (p_prmv_rec.lov_query = OKC_API.G_MISS_CHAR and p_oper = 'I')
144: )
145: ) then
146: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'LOV_QUERY');
147: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 146: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'LOV_QUERY');

142: (p_prmv_rec.lov_query is NULL or
143: (p_prmv_rec.lov_query = OKC_API.G_MISS_CHAR and p_oper = 'I')
144: )
145: ) then
146: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'LOV_QUERY');
147: x_return_status := OKC_API.G_RET_STS_ERROR;
148: return;
149: end if;
150: return;

Line 147: x_return_status := OKC_API.G_RET_STS_ERROR;

143: (p_prmv_rec.lov_query = OKC_API.G_MISS_CHAR and p_oper = 'I')
144: )
145: ) then
146: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'LOV_QUERY');
147: x_return_status := OKC_API.G_RET_STS_ERROR;
148: return;
149: end if;
150: return;
151: exception

Line 153: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

149: end if;
150: return;
151: exception
152: when OTHERS then
153: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
154: p_msg_name => g_unexpected_error,
155: p_token1 => g_sqlcode_token,
156: p_token1_value => sqlcode,
157: p_token2 => g_sqlerrm_token,

Line 159: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

155: p_token1 => g_sqlcode_token,
156: p_token1_value => sqlcode,
157: p_token2 => g_sqlerrm_token,
158: p_token2_value => sqlerrm);
159: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
160: end validate_lov_query;
161:
162: -- Start of comments
163: --

Line 174: x_return_status := OKC_API.G_RET_STS_SUCCESS;

170: procedure validate_required_yn(p_oper IN VARCHAR2,
171: x_return_status OUT NOCOPY VARCHAR2,
172: p_prmv_rec IN prmv_rec_TYPE) is
173: begin
174: x_return_status := OKC_API.G_RET_STS_SUCCESS;
175: if (p_prmv_rec.required_yn in ('Y','N')) then
176: x_return_status := OKC_API.G_RET_STS_SUCCESS;
177: return;
178: end if;

Line 176: x_return_status := OKC_API.G_RET_STS_SUCCESS;

172: p_prmv_rec IN prmv_rec_TYPE) is
173: begin
174: x_return_status := OKC_API.G_RET_STS_SUCCESS;
175: if (p_prmv_rec.required_yn in ('Y','N')) then
176: x_return_status := OKC_API.G_RET_STS_SUCCESS;
177: return;
178: end if;
179: if (p_prmv_rec.required_yn is NULL or
180: (p_prmv_rec.required_yn = OKC_API.G_MISS_CHAR and p_oper = 'I')) then

Line 180: (p_prmv_rec.required_yn = OKC_API.G_MISS_CHAR and p_oper = 'I')) then

176: x_return_status := OKC_API.G_RET_STS_SUCCESS;
177: return;
178: end if;
179: if (p_prmv_rec.required_yn is NULL or
180: (p_prmv_rec.required_yn = OKC_API.G_MISS_CHAR and p_oper = 'I')) then
181: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'REQUIRED_YN');
182: x_return_status := OKC_API.G_RET_STS_ERROR;
183: return;
184: end if;

Line 181: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'REQUIRED_YN');

177: return;
178: end if;
179: if (p_prmv_rec.required_yn is NULL or
180: (p_prmv_rec.required_yn = OKC_API.G_MISS_CHAR and p_oper = 'I')) then
181: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'REQUIRED_YN');
182: x_return_status := OKC_API.G_RET_STS_ERROR;
183: return;
184: end if;
185: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'REQUIRED_YN');

Line 182: x_return_status := OKC_API.G_RET_STS_ERROR;

178: end if;
179: if (p_prmv_rec.required_yn is NULL or
180: (p_prmv_rec.required_yn = OKC_API.G_MISS_CHAR and p_oper = 'I')) then
181: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'REQUIRED_YN');
182: x_return_status := OKC_API.G_RET_STS_ERROR;
183: return;
184: end if;
185: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'REQUIRED_YN');
186: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 185: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'REQUIRED_YN');

181: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'REQUIRED_YN');
182: x_return_status := OKC_API.G_RET_STS_ERROR;
183: return;
184: end if;
185: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'REQUIRED_YN');
186: x_return_status := OKC_API.G_RET_STS_ERROR;
187: return;
188: exception
189: when OTHERS then

Line 186: x_return_status := OKC_API.G_RET_STS_ERROR;

182: x_return_status := OKC_API.G_RET_STS_ERROR;
183: return;
184: end if;
185: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'REQUIRED_YN');
186: x_return_status := OKC_API.G_RET_STS_ERROR;
187: return;
188: exception
189: when OTHERS then
190: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

Line 190: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

186: x_return_status := OKC_API.G_RET_STS_ERROR;
187: return;
188: exception
189: when OTHERS then
190: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
191: p_msg_name => g_unexpected_error,
192: p_token1 => g_sqlcode_token,
193: p_token1_value => sqlcode,
194: p_token2 => g_sqlerrm_token,

Line 196: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

192: p_token1 => g_sqlcode_token,
193: p_token1_value => sqlcode,
194: p_token2 => g_sqlerrm_token,
195: p_token2_value => sqlerrm);
196: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
197: end validate_required_yn;
198:
199: -- Start of comments
200: --

Line 217: x_return_status := OKC_API.G_RET_STS_SUCCESS;

213: from OKC_REPORT_PRM_V
214: where sql_id = n1 and sequence_num = n2
215: and id <> n3;
216: begin
217: x_return_status := OKC_API.G_RET_STS_SUCCESS;
218: if (p_prmv_rec.SQL_ID is NULL or
219: (p_prmv_rec.SQL_ID = OKC_API.G_MISS_NUM and p_oper = 'I')) then
220: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SQL_ID');
221: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 219: (p_prmv_rec.SQL_ID = OKC_API.G_MISS_NUM and p_oper = 'I')) then

215: and id <> n3;
216: begin
217: x_return_status := OKC_API.G_RET_STS_SUCCESS;
218: if (p_prmv_rec.SQL_ID is NULL or
219: (p_prmv_rec.SQL_ID = OKC_API.G_MISS_NUM and p_oper = 'I')) then
220: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SQL_ID');
221: x_return_status := OKC_API.G_RET_STS_ERROR;
222: return;
223: end if;

Line 220: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SQL_ID');

216: begin
217: x_return_status := OKC_API.G_RET_STS_SUCCESS;
218: if (p_prmv_rec.SQL_ID is NULL or
219: (p_prmv_rec.SQL_ID = OKC_API.G_MISS_NUM and p_oper = 'I')) then
220: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SQL_ID');
221: x_return_status := OKC_API.G_RET_STS_ERROR;
222: return;
223: end if;
224: if (p_prmv_rec.sequence_num is NULL or

Line 221: x_return_status := OKC_API.G_RET_STS_ERROR;

217: x_return_status := OKC_API.G_RET_STS_SUCCESS;
218: if (p_prmv_rec.SQL_ID is NULL or
219: (p_prmv_rec.SQL_ID = OKC_API.G_MISS_NUM and p_oper = 'I')) then
220: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SQL_ID');
221: x_return_status := OKC_API.G_RET_STS_ERROR;
222: return;
223: end if;
224: if (p_prmv_rec.sequence_num is NULL or
225: (p_prmv_rec.sequence_num = OKC_API.G_MISS_NUM and p_oper = 'I')) then

Line 225: (p_prmv_rec.sequence_num = OKC_API.G_MISS_NUM and p_oper = 'I')) then

221: x_return_status := OKC_API.G_RET_STS_ERROR;
222: return;
223: end if;
224: if (p_prmv_rec.sequence_num is NULL or
225: (p_prmv_rec.sequence_num = OKC_API.G_MISS_NUM and p_oper = 'I')) then
226: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SEQUENCE_NUM');
227: x_return_status := OKC_API.G_RET_STS_ERROR;
228: return;
229: end if;

Line 226: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SEQUENCE_NUM');

222: return;
223: end if;
224: if (p_prmv_rec.sequence_num is NULL or
225: (p_prmv_rec.sequence_num = OKC_API.G_MISS_NUM and p_oper = 'I')) then
226: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SEQUENCE_NUM');
227: x_return_status := OKC_API.G_RET_STS_ERROR;
228: return;
229: end if;
230: open c1(p_prmv_rec.SQL_ID,p_prmv_rec.SEQUENCE_NUM, p_prmv_rec.id);

Line 227: x_return_status := OKC_API.G_RET_STS_ERROR;

223: end if;
224: if (p_prmv_rec.sequence_num is NULL or
225: (p_prmv_rec.sequence_num = OKC_API.G_MISS_NUM and p_oper = 'I')) then
226: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SEQUENCE_NUM');
227: x_return_status := OKC_API.G_RET_STS_ERROR;
228: return;
229: end if;
230: open c1(p_prmv_rec.SQL_ID,p_prmv_rec.SEQUENCE_NUM, p_prmv_rec.id);
231: fetch c1 into l_dummy;

Line 234: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

230: open c1(p_prmv_rec.SQL_ID,p_prmv_rec.SEQUENCE_NUM, p_prmv_rec.id);
231: fetch c1 into l_dummy;
232: close c1;
233: if (l_dummy = '!') then
234: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
235: p_msg_name => OKC_UTIL.G_UNQ,
236: p_token1 => OKC_API.G_COL_NAME_TOKEN,
237: p_token1_value => 'SEQUENCE_NUM');
238: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 236: p_token1 => OKC_API.G_COL_NAME_TOKEN,

232: close c1;
233: if (l_dummy = '!') then
234: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
235: p_msg_name => OKC_UTIL.G_UNQ,
236: p_token1 => OKC_API.G_COL_NAME_TOKEN,
237: p_token1_value => 'SEQUENCE_NUM');
238: x_return_status := OKC_API.G_RET_STS_ERROR;
239: end if;
240: exception

Line 238: x_return_status := OKC_API.G_RET_STS_ERROR;

234: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
235: p_msg_name => OKC_UTIL.G_UNQ,
236: p_token1 => OKC_API.G_COL_NAME_TOKEN,
237: p_token1_value => 'SEQUENCE_NUM');
238: x_return_status := OKC_API.G_RET_STS_ERROR;
239: end if;
240: exception
241: when OTHERS then
242: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

Line 242: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

238: x_return_status := OKC_API.G_RET_STS_ERROR;
239: end if;
240: exception
241: when OTHERS then
242: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
243: p_msg_name => g_unexpected_error,
244: p_token1 => g_sqlcode_token,
245: p_token1_value => sqlcode,
246: p_token2 => g_sqlerrm_token,

Line 248: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

244: p_token1 => g_sqlcode_token,
245: p_token1_value => sqlcode,
246: p_token2 => g_sqlerrm_token,
247: p_token2_value => sqlerrm);
248: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
249: end validate_sequence_num;
250:
251: -- Start of comments
252: --

Line 269: x_return_status := OKC_API.G_RET_STS_SUCCESS;

265: from OKC_REPORT_PRM_V
266: where sql_id = n1 and code = c2
267: and id <> n3;
268: begin
269: x_return_status := OKC_API.G_RET_STS_SUCCESS;
270: if (p_prmv_rec.CODE = 'xid') then
271: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CODE: xid');
272: x_return_status := OKC_API.G_RET_STS_ERROR;
273: return;

Line 271: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CODE: xid');

267: and id <> n3;
268: begin
269: x_return_status := OKC_API.G_RET_STS_SUCCESS;
270: if (p_prmv_rec.CODE = 'xid') then
271: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CODE: xid');
272: x_return_status := OKC_API.G_RET_STS_ERROR;
273: return;
274: end if;
275: if (substr(p_prmv_rec.CODE,1,1) = '_') then

Line 272: x_return_status := OKC_API.G_RET_STS_ERROR;

268: begin
269: x_return_status := OKC_API.G_RET_STS_SUCCESS;
270: if (p_prmv_rec.CODE = 'xid') then
271: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CODE: xid');
272: x_return_status := OKC_API.G_RET_STS_ERROR;
273: return;
274: end if;
275: if (substr(p_prmv_rec.CODE,1,1) = '_') then
276: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CODE: _...');

Line 276: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CODE: _...');

272: x_return_status := OKC_API.G_RET_STS_ERROR;
273: return;
274: end if;
275: if (substr(p_prmv_rec.CODE,1,1) = '_') then
276: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CODE: _...');
277: x_return_status := OKC_API.G_RET_STS_ERROR;
278: return;
279: end if;
280: if (instr(p_prmv_rec.CODE,'"') > 0) then

Line 277: x_return_status := OKC_API.G_RET_STS_ERROR;

273: return;
274: end if;
275: if (substr(p_prmv_rec.CODE,1,1) = '_') then
276: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CODE: _...');
277: x_return_status := OKC_API.G_RET_STS_ERROR;
278: return;
279: end if;
280: if (instr(p_prmv_rec.CODE,'"') > 0) then
281: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CODE: ..."...');

Line 281: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CODE: ..."...');

277: x_return_status := OKC_API.G_RET_STS_ERROR;
278: return;
279: end if;
280: if (instr(p_prmv_rec.CODE,'"') > 0) then
281: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CODE: ..."...');
282: x_return_status := OKC_API.G_RET_STS_ERROR;
283: return;
284: end if;
285: if (p_prmv_rec.SQL_ID is NULL or

Line 282: x_return_status := OKC_API.G_RET_STS_ERROR;

278: return;
279: end if;
280: if (instr(p_prmv_rec.CODE,'"') > 0) then
281: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CODE: ..."...');
282: x_return_status := OKC_API.G_RET_STS_ERROR;
283: return;
284: end if;
285: if (p_prmv_rec.SQL_ID is NULL or
286: (p_prmv_rec.SQL_ID = OKC_API.G_MISS_NUM and p_oper = 'I')) then

Line 286: (p_prmv_rec.SQL_ID = OKC_API.G_MISS_NUM and p_oper = 'I')) then

282: x_return_status := OKC_API.G_RET_STS_ERROR;
283: return;
284: end if;
285: if (p_prmv_rec.SQL_ID is NULL or
286: (p_prmv_rec.SQL_ID = OKC_API.G_MISS_NUM and p_oper = 'I')) then
287: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SQL_ID');
288: x_return_status := OKC_API.G_RET_STS_ERROR;
289: return;
290: end if;

Line 287: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SQL_ID');

283: return;
284: end if;
285: if (p_prmv_rec.SQL_ID is NULL or
286: (p_prmv_rec.SQL_ID = OKC_API.G_MISS_NUM and p_oper = 'I')) then
287: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SQL_ID');
288: x_return_status := OKC_API.G_RET_STS_ERROR;
289: return;
290: end if;
291: if (p_prmv_rec.code is NULL or

Line 288: x_return_status := OKC_API.G_RET_STS_ERROR;

284: end if;
285: if (p_prmv_rec.SQL_ID is NULL or
286: (p_prmv_rec.SQL_ID = OKC_API.G_MISS_NUM and p_oper = 'I')) then
287: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'SQL_ID');
288: x_return_status := OKC_API.G_RET_STS_ERROR;
289: return;
290: end if;
291: if (p_prmv_rec.code is NULL or
292: (p_prmv_rec.code = OKC_API.G_MISS_CHAR and p_oper = 'I')) then

Line 292: (p_prmv_rec.code = OKC_API.G_MISS_CHAR and p_oper = 'I')) then

288: x_return_status := OKC_API.G_RET_STS_ERROR;
289: return;
290: end if;
291: if (p_prmv_rec.code is NULL or
292: (p_prmv_rec.code = OKC_API.G_MISS_CHAR and p_oper = 'I')) then
293: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'CODE');
294: x_return_status := OKC_API.G_RET_STS_ERROR;
295: return;
296: end if;

Line 293: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'CODE');

289: return;
290: end if;
291: if (p_prmv_rec.code is NULL or
292: (p_prmv_rec.code = OKC_API.G_MISS_CHAR and p_oper = 'I')) then
293: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'CODE');
294: x_return_status := OKC_API.G_RET_STS_ERROR;
295: return;
296: end if;
297: open c1(p_prmv_rec.SQL_ID,p_prmv_rec.CODE,p_prmv_rec.id);

Line 294: x_return_status := OKC_API.G_RET_STS_ERROR;

290: end if;
291: if (p_prmv_rec.code is NULL or
292: (p_prmv_rec.code = OKC_API.G_MISS_CHAR and p_oper = 'I')) then
293: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'CODE');
294: x_return_status := OKC_API.G_RET_STS_ERROR;
295: return;
296: end if;
297: open c1(p_prmv_rec.SQL_ID,p_prmv_rec.CODE,p_prmv_rec.id);
298: fetch c1 into l_dummy;

Line 301: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

297: open c1(p_prmv_rec.SQL_ID,p_prmv_rec.CODE,p_prmv_rec.id);
298: fetch c1 into l_dummy;
299: close c1;
300: if (l_dummy = '!') then
301: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
302: p_msg_name => OKC_UTIL.G_UNQ,
303: p_token1 => OKC_API.G_COL_NAME_TOKEN,
304: p_token1_value => 'CODE');
305: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 303: p_token1 => OKC_API.G_COL_NAME_TOKEN,

299: close c1;
300: if (l_dummy = '!') then
301: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
302: p_msg_name => OKC_UTIL.G_UNQ,
303: p_token1 => OKC_API.G_COL_NAME_TOKEN,
304: p_token1_value => 'CODE');
305: x_return_status := OKC_API.G_RET_STS_ERROR;
306: end if;
307: exception

Line 305: x_return_status := OKC_API.G_RET_STS_ERROR;

301: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
302: p_msg_name => OKC_UTIL.G_UNQ,
303: p_token1 => OKC_API.G_COL_NAME_TOKEN,
304: p_token1_value => 'CODE');
305: x_return_status := OKC_API.G_RET_STS_ERROR;
306: end if;
307: exception
308: when OTHERS then
309: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

Line 309: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

305: x_return_status := OKC_API.G_RET_STS_ERROR;
306: end if;
307: exception
308: when OTHERS then
309: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
310: p_msg_name => g_unexpected_error,
311: p_token1 => g_sqlcode_token,
312: p_token1_value => sqlcode,
313: p_token2 => g_sqlerrm_token,

Line 315: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

311: p_token1 => g_sqlcode_token,
312: p_token1_value => sqlcode,
313: p_token2 => g_sqlerrm_token,
314: p_token2_value => sqlerrm);
315: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
316: end validate_code;
317:
318: FUNCTION Validate_Attributes (p_oper IN varchar2,
319: p_prmv_rec IN prmv_rec_type

Line 321: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

317:
318: FUNCTION Validate_Attributes (p_oper IN varchar2,
319: p_prmv_rec IN prmv_rec_type
320: ) RETURN VARCHAR2 IS
321: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
322: x_return_status varchar2(1) := OKC_API.G_RET_STS_SUCCESS;
323: BEGIN
324:
325: validate_type(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);

Line 322: x_return_status varchar2(1) := OKC_API.G_RET_STS_SUCCESS;

318: FUNCTION Validate_Attributes (p_oper IN varchar2,
319: p_prmv_rec IN prmv_rec_type
320: ) RETURN VARCHAR2 IS
321: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
322: x_return_status varchar2(1) := OKC_API.G_RET_STS_SUCCESS;
323: BEGIN
324:
325: validate_type(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
326: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

Line 326: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

322: x_return_status varchar2(1) := OKC_API.G_RET_STS_SUCCESS;
323: BEGIN
324:
325: validate_type(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
326: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
327: return OKC_API.G_RET_STS_UNEXP_ERROR;
328: end if;
329: if (l_return_status = OKC_API.G_RET_STS_ERROR
330: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then

Line 327: return OKC_API.G_RET_STS_UNEXP_ERROR;

323: BEGIN
324:
325: validate_type(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
326: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
327: return OKC_API.G_RET_STS_UNEXP_ERROR;
328: end if;
329: if (l_return_status = OKC_API.G_RET_STS_ERROR
330: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
331: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 329: if (l_return_status = OKC_API.G_RET_STS_ERROR

325: validate_type(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
326: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
327: return OKC_API.G_RET_STS_UNEXP_ERROR;
328: end if;
329: if (l_return_status = OKC_API.G_RET_STS_ERROR
330: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
331: x_return_status := OKC_API.G_RET_STS_ERROR;
332: end if;
333:

Line 330: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then

326: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
327: return OKC_API.G_RET_STS_UNEXP_ERROR;
328: end if;
329: if (l_return_status = OKC_API.G_RET_STS_ERROR
330: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
331: x_return_status := OKC_API.G_RET_STS_ERROR;
332: end if;
333:
334: validate_lov_query(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);

Line 331: x_return_status := OKC_API.G_RET_STS_ERROR;

327: return OKC_API.G_RET_STS_UNEXP_ERROR;
328: end if;
329: if (l_return_status = OKC_API.G_RET_STS_ERROR
330: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
331: x_return_status := OKC_API.G_RET_STS_ERROR;
332: end if;
333:
334: validate_lov_query(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
335: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

Line 335: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

331: x_return_status := OKC_API.G_RET_STS_ERROR;
332: end if;
333:
334: validate_lov_query(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
335: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
336: return OKC_API.G_RET_STS_UNEXP_ERROR;
337: end if;
338: if (l_return_status = OKC_API.G_RET_STS_ERROR
339: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then

Line 336: return OKC_API.G_RET_STS_UNEXP_ERROR;

332: end if;
333:
334: validate_lov_query(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
335: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
336: return OKC_API.G_RET_STS_UNEXP_ERROR;
337: end if;
338: if (l_return_status = OKC_API.G_RET_STS_ERROR
339: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
340: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 338: if (l_return_status = OKC_API.G_RET_STS_ERROR

334: validate_lov_query(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
335: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
336: return OKC_API.G_RET_STS_UNEXP_ERROR;
337: end if;
338: if (l_return_status = OKC_API.G_RET_STS_ERROR
339: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
340: x_return_status := OKC_API.G_RET_STS_ERROR;
341: end if;
342:

Line 339: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then

335: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
336: return OKC_API.G_RET_STS_UNEXP_ERROR;
337: end if;
338: if (l_return_status = OKC_API.G_RET_STS_ERROR
339: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
340: x_return_status := OKC_API.G_RET_STS_ERROR;
341: end if;
342:
343: validate_prompt(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);

Line 340: x_return_status := OKC_API.G_RET_STS_ERROR;

336: return OKC_API.G_RET_STS_UNEXP_ERROR;
337: end if;
338: if (l_return_status = OKC_API.G_RET_STS_ERROR
339: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
340: x_return_status := OKC_API.G_RET_STS_ERROR;
341: end if;
342:
343: validate_prompt(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
344: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

Line 344: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

340: x_return_status := OKC_API.G_RET_STS_ERROR;
341: end if;
342:
343: validate_prompt(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
344: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
345: return OKC_API.G_RET_STS_UNEXP_ERROR;
346: end if;
347: if (l_return_status = OKC_API.G_RET_STS_ERROR
348: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then

Line 345: return OKC_API.G_RET_STS_UNEXP_ERROR;

341: end if;
342:
343: validate_prompt(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
344: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
345: return OKC_API.G_RET_STS_UNEXP_ERROR;
346: end if;
347: if (l_return_status = OKC_API.G_RET_STS_ERROR
348: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
349: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 347: if (l_return_status = OKC_API.G_RET_STS_ERROR

343: validate_prompt(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
344: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
345: return OKC_API.G_RET_STS_UNEXP_ERROR;
346: end if;
347: if (l_return_status = OKC_API.G_RET_STS_ERROR
348: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
349: x_return_status := OKC_API.G_RET_STS_ERROR;
350: end if;
351:

Line 348: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then

344: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
345: return OKC_API.G_RET_STS_UNEXP_ERROR;
346: end if;
347: if (l_return_status = OKC_API.G_RET_STS_ERROR
348: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
349: x_return_status := OKC_API.G_RET_STS_ERROR;
350: end if;
351:
352: validate_required_yn(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);

Line 349: x_return_status := OKC_API.G_RET_STS_ERROR;

345: return OKC_API.G_RET_STS_UNEXP_ERROR;
346: end if;
347: if (l_return_status = OKC_API.G_RET_STS_ERROR
348: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
349: x_return_status := OKC_API.G_RET_STS_ERROR;
350: end if;
351:
352: validate_required_yn(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
353: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

Line 353: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

349: x_return_status := OKC_API.G_RET_STS_ERROR;
350: end if;
351:
352: validate_required_yn(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
353: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
354: return OKC_API.G_RET_STS_UNEXP_ERROR;
355: end if;
356: if (l_return_status = OKC_API.G_RET_STS_ERROR
357: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then

Line 354: return OKC_API.G_RET_STS_UNEXP_ERROR;

350: end if;
351:
352: validate_required_yn(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
353: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
354: return OKC_API.G_RET_STS_UNEXP_ERROR;
355: end if;
356: if (l_return_status = OKC_API.G_RET_STS_ERROR
357: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
358: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 356: if (l_return_status = OKC_API.G_RET_STS_ERROR

352: validate_required_yn(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
353: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
354: return OKC_API.G_RET_STS_UNEXP_ERROR;
355: end if;
356: if (l_return_status = OKC_API.G_RET_STS_ERROR
357: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
358: x_return_status := OKC_API.G_RET_STS_ERROR;
359: end if;
360:

Line 357: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then

353: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
354: return OKC_API.G_RET_STS_UNEXP_ERROR;
355: end if;
356: if (l_return_status = OKC_API.G_RET_STS_ERROR
357: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
358: x_return_status := OKC_API.G_RET_STS_ERROR;
359: end if;
360:
361: validate_sequence_num(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);

Line 358: x_return_status := OKC_API.G_RET_STS_ERROR;

354: return OKC_API.G_RET_STS_UNEXP_ERROR;
355: end if;
356: if (l_return_status = OKC_API.G_RET_STS_ERROR
357: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
358: x_return_status := OKC_API.G_RET_STS_ERROR;
359: end if;
360:
361: validate_sequence_num(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
362: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

Line 362: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

358: x_return_status := OKC_API.G_RET_STS_ERROR;
359: end if;
360:
361: validate_sequence_num(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
362: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
363: return OKC_API.G_RET_STS_UNEXP_ERROR;
364: end if;
365: if (l_return_status = OKC_API.G_RET_STS_ERROR
366: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then

Line 363: return OKC_API.G_RET_STS_UNEXP_ERROR;

359: end if;
360:
361: validate_sequence_num(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
362: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
363: return OKC_API.G_RET_STS_UNEXP_ERROR;
364: end if;
365: if (l_return_status = OKC_API.G_RET_STS_ERROR
366: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
367: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 365: if (l_return_status = OKC_API.G_RET_STS_ERROR

361: validate_sequence_num(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
362: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
363: return OKC_API.G_RET_STS_UNEXP_ERROR;
364: end if;
365: if (l_return_status = OKC_API.G_RET_STS_ERROR
366: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
367: x_return_status := OKC_API.G_RET_STS_ERROR;
368: end if;
369:

Line 366: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then

362: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
363: return OKC_API.G_RET_STS_UNEXP_ERROR;
364: end if;
365: if (l_return_status = OKC_API.G_RET_STS_ERROR
366: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
367: x_return_status := OKC_API.G_RET_STS_ERROR;
368: end if;
369:
370: validate_code(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);

Line 367: x_return_status := OKC_API.G_RET_STS_ERROR;

363: return OKC_API.G_RET_STS_UNEXP_ERROR;
364: end if;
365: if (l_return_status = OKC_API.G_RET_STS_ERROR
366: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
367: x_return_status := OKC_API.G_RET_STS_ERROR;
368: end if;
369:
370: validate_code(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
371: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

Line 371: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

367: x_return_status := OKC_API.G_RET_STS_ERROR;
368: end if;
369:
370: validate_code(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
371: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
372: return OKC_API.G_RET_STS_UNEXP_ERROR;
373: end if;
374: if (l_return_status = OKC_API.G_RET_STS_ERROR
375: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then

Line 372: return OKC_API.G_RET_STS_UNEXP_ERROR;

368: end if;
369:
370: validate_code(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
371: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
372: return OKC_API.G_RET_STS_UNEXP_ERROR;
373: end if;
374: if (l_return_status = OKC_API.G_RET_STS_ERROR
375: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
376: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 374: if (l_return_status = OKC_API.G_RET_STS_ERROR

370: validate_code(p_oper => p_oper, x_return_status => l_return_status, p_prmv_rec => p_prmv_rec);
371: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
372: return OKC_API.G_RET_STS_UNEXP_ERROR;
373: end if;
374: if (l_return_status = OKC_API.G_RET_STS_ERROR
375: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
376: x_return_status := OKC_API.G_RET_STS_ERROR;
377: end if;
378:

Line 375: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then

371: if (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
372: return OKC_API.G_RET_STS_UNEXP_ERROR;
373: end if;
374: if (l_return_status = OKC_API.G_RET_STS_ERROR
375: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
376: x_return_status := OKC_API.G_RET_STS_ERROR;
377: end if;
378:
379: return x_return_status;

Line 376: x_return_status := OKC_API.G_RET_STS_ERROR;

372: return OKC_API.G_RET_STS_UNEXP_ERROR;
373: end if;
374: if (l_return_status = OKC_API.G_RET_STS_ERROR
375: and x_return_status = OKC_API.G_RET_STS_SUCCESS) then
376: x_return_status := OKC_API.G_RET_STS_ERROR;
377: end if;
378:
379: return x_return_status;
380: exception

Line 382: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

378:
379: return x_return_status;
380: exception
381: when OTHERS then
382: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
383: p_msg_name => g_unexpected_error,
384: p_token1 => g_sqlcode_token,
385: p_token1_value => sqlcode,
386: p_token2 => g_sqlerrm_token,

Line 388: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

384: p_token1 => g_sqlcode_token,
385: p_token1_value => sqlcode,
386: p_token2 => g_sqlerrm_token,
387: p_token2_value => sqlerrm);
388: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
389: return x_return_status;
390: END Validate_Attributes;
391:
392: ---------------------------------------------------------------------------

Line 417: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);

413: WHEN E_Resource_Busy THEN
414: IF (sql_csr%ISOPEN) THEN
415: CLOSE sql_csr;
416: END IF;
417: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
418: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
419: end;
420:
421: PROCEDURE insert_row(

Line 432: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

428: x_prmv_rec OUT NOCOPY prmv_rec_type) IS
429:
430: l_api_version CONSTANT NUMBER := 1;
431: l_api_name CONSTANT VARCHAR2(30) := 'insert_row';
432: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
433: l_prmv_rec prmv_rec_type;
434:
435: begin
436:

Line 437: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

433: l_prmv_rec prmv_rec_type;
434:
435: begin
436:
437: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
438: G_PKG_NAME,
439: p_init_msg_list,
440: l_api_version,
441: p_api_version,

Line 444: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

440: l_api_version,
441: p_api_version,
442: '_PVT',
443: x_return_status);
444: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
445: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
446: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
447: RAISE OKC_API.G_EXCEPTION_ERROR;
448: END IF;

Line 445: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

441: p_api_version,
442: '_PVT',
443: x_return_status);
444: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
445: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
446: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
447: RAISE OKC_API.G_EXCEPTION_ERROR;
448: END IF;
449:

Line 446: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

442: '_PVT',
443: x_return_status);
444: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
445: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
446: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
447: RAISE OKC_API.G_EXCEPTION_ERROR;
448: END IF;
449:
450: l_prmv_rec.ID := get_seq_id;

Line 447: RAISE OKC_API.G_EXCEPTION_ERROR;

443: x_return_status);
444: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
445: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
446: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
447: RAISE OKC_API.G_EXCEPTION_ERROR;
448: END IF;
449:
450: l_prmv_rec.ID := get_seq_id;
451: l_prmv_rec.SQL_ID := p_prmv_rec.SQL_ID;

Line 466: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

462: l_prmv_rec.LAST_UPDATE_DATE := SYSDATE;
463: l_prmv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
464:
465: l_return_status := Validate_Attributes('I',l_prmv_rec);
466: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
467: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
468: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
469: RAISE OKC_API.G_EXCEPTION_ERROR;
470: END IF;

Line 467: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

463: l_prmv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
464:
465: l_return_status := Validate_Attributes('I',l_prmv_rec);
466: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
467: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
468: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
469: RAISE OKC_API.G_EXCEPTION_ERROR;
470: END IF;
471:

Line 468: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

464:
465: l_return_status := Validate_Attributes('I',l_prmv_rec);
466: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
467: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
468: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
469: RAISE OKC_API.G_EXCEPTION_ERROR;
470: END IF;
471:
472: insert into OKC_REPORT_PRM_B

Line 469: RAISE OKC_API.G_EXCEPTION_ERROR;

465: l_return_status := Validate_Attributes('I',l_prmv_rec);
466: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
467: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
468: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
469: RAISE OKC_API.G_EXCEPTION_ERROR;
470: END IF;
471:
472: insert into OKC_REPORT_PRM_B
473: (

Line 531: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

527: WHERE L.INSTALLED_FLAG IN ('I', 'B')
528: ;
529: date_sql(l_prmv_rec.SQL_ID);
530: x_prmv_rec := l_prmv_rec;
531: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
532: EXCEPTION
533: WHEN OKC_API.G_EXCEPTION_ERROR THEN
534: x_return_status := OKC_API.HANDLE_EXCEPTIONS
535: (

Line 533: WHEN OKC_API.G_EXCEPTION_ERROR THEN

529: date_sql(l_prmv_rec.SQL_ID);
530: x_prmv_rec := l_prmv_rec;
531: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
532: EXCEPTION
533: WHEN OKC_API.G_EXCEPTION_ERROR THEN
534: x_return_status := OKC_API.HANDLE_EXCEPTIONS
535: (
536: l_api_name,
537: G_PKG_NAME,

Line 534: x_return_status := OKC_API.HANDLE_EXCEPTIONS

530: x_prmv_rec := l_prmv_rec;
531: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
532: EXCEPTION
533: WHEN OKC_API.G_EXCEPTION_ERROR THEN
534: x_return_status := OKC_API.HANDLE_EXCEPTIONS
535: (
536: l_api_name,
537: G_PKG_NAME,
538: 'OKC_API.G_RET_STS_ERROR',

Line 538: 'OKC_API.G_RET_STS_ERROR',

534: x_return_status := OKC_API.HANDLE_EXCEPTIONS
535: (
536: l_api_name,
537: G_PKG_NAME,
538: 'OKC_API.G_RET_STS_ERROR',
539: x_msg_count,
540: x_msg_data,
541: '_PVT'
542: );

Line 543: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

539: x_msg_count,
540: x_msg_data,
541: '_PVT'
542: );
543: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
544: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
545: (
546: l_api_name,
547: G_PKG_NAME,

Line 544: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

540: x_msg_data,
541: '_PVT'
542: );
543: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
544: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
545: (
546: l_api_name,
547: G_PKG_NAME,
548: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 548: 'OKC_API.G_RET_STS_UNEXP_ERROR',

544: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
545: (
546: l_api_name,
547: G_PKG_NAME,
548: 'OKC_API.G_RET_STS_UNEXP_ERROR',
549: x_msg_count,
550: x_msg_data,
551: '_PVT'
552: );

Line 554: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

550: x_msg_data,
551: '_PVT'
552: );
553: WHEN OTHERS THEN
554: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
555: (
556: l_api_name,
557: G_PKG_NAME,
558: 'OTHERS',

Line 585: OKC_API.G_MISS_NUM,OBJECT_VERSION_NUMBER,p_prmv_rec.object_version_number)

581: FROM OKC_REPORT_PRM_V
582: WHERE ID = p_prmv_rec.id
583: AND OBJECT_VERSION_NUMBER =
584: decode(p_prmv_rec.object_version_number,NULL,OBJECT_VERSION_NUMBER,
585: OKC_API.G_MISS_NUM,OBJECT_VERSION_NUMBER,p_prmv_rec.object_version_number)
586: FOR UPDATE OF OBJECT_VERSION_NUMBER NOWAIT;
587:
588: CURSOR lchk_csr (p_prmv_rec IN prmv_rec_type) IS
589: SELECT OBJECT_VERSION_NUMBER

Line 595: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

591: WHERE ID = p_prmv_rec.id;
592:
593: l_api_version CONSTANT NUMBER := 1;
594: l_api_name CONSTANT VARCHAR2(30) := 'lock_row';
595: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
596:
597: l_object_version_number NUMBER;
598: lc_object_version_number NUMBER;
599: l_row_notfound BOOLEAN := FALSE;

Line 604: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

600: lc_row_notfound BOOLEAN := FALSE;
601:
602: BEGIN
603: x_return_status := 'S';
604: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
605: p_init_msg_list,
606: '_PVT',
607: x_return_status);
608: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 608: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

604: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
605: p_init_msg_list,
606: '_PVT',
607: x_return_status);
608: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
609: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
610: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
611: RAISE OKC_API.G_EXCEPTION_ERROR;
612: END IF;

Line 609: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

605: p_init_msg_list,
606: '_PVT',
607: x_return_status);
608: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
609: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
610: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
611: RAISE OKC_API.G_EXCEPTION_ERROR;
612: END IF;
613: BEGIN

Line 610: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

606: '_PVT',
607: x_return_status);
608: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
609: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
610: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
611: RAISE OKC_API.G_EXCEPTION_ERROR;
612: END IF;
613: BEGIN
614: OPEN lock_csr(p_prmv_rec);

Line 611: RAISE OKC_API.G_EXCEPTION_ERROR;

607: x_return_status);
608: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
609: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
610: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
611: RAISE OKC_API.G_EXCEPTION_ERROR;
612: END IF;
613: BEGIN
614: OPEN lock_csr(p_prmv_rec);
615: FETCH lock_csr INTO l_object_version_number;

Line 623: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);

619: WHEN E_Resource_Busy THEN
620: IF (lock_csr%ISOPEN) THEN
621: CLOSE lock_csr;
622: END IF;
623: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
624: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
625: END;
626:
627: IF ( l_row_notfound ) THEN

Line 633: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);

629: FETCH lchk_csr INTO lc_object_version_number;
630: lc_row_notfound := lchk_csr%NOTFOUND;
631: CLOSE lchk_csr;
632: IF (lc_row_notfound) THEN
633: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
634: RAISE OKC_API.G_EXCEPTION_ERROR;
635: ELSE
636: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
637: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 634: RAISE OKC_API.G_EXCEPTION_ERROR;

630: lc_row_notfound := lchk_csr%NOTFOUND;
631: CLOSE lchk_csr;
632: IF (lc_row_notfound) THEN
633: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
634: RAISE OKC_API.G_EXCEPTION_ERROR;
635: ELSE
636: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
637: RAISE OKC_API.G_EXCEPTION_ERROR;
638: END IF;

Line 636: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);

632: IF (lc_row_notfound) THEN
633: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
634: RAISE OKC_API.G_EXCEPTION_ERROR;
635: ELSE
636: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
637: RAISE OKC_API.G_EXCEPTION_ERROR;
638: END IF;
639: END IF;
640:

Line 637: RAISE OKC_API.G_EXCEPTION_ERROR;

633: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
634: RAISE OKC_API.G_EXCEPTION_ERROR;
635: ELSE
636: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
637: RAISE OKC_API.G_EXCEPTION_ERROR;
638: END IF;
639: END IF;
640:
641: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 641: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

637: RAISE OKC_API.G_EXCEPTION_ERROR;
638: END IF;
639: END IF;
640:
641: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
642: EXCEPTION
643: WHEN OKC_API.G_EXCEPTION_ERROR THEN
644: x_return_status := OKC_API.HANDLE_EXCEPTIONS
645: (

Line 643: WHEN OKC_API.G_EXCEPTION_ERROR THEN

639: END IF;
640:
641: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
642: EXCEPTION
643: WHEN OKC_API.G_EXCEPTION_ERROR THEN
644: x_return_status := OKC_API.HANDLE_EXCEPTIONS
645: (
646: l_api_name,
647: G_PKG_NAME,

Line 644: x_return_status := OKC_API.HANDLE_EXCEPTIONS

640:
641: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
642: EXCEPTION
643: WHEN OKC_API.G_EXCEPTION_ERROR THEN
644: x_return_status := OKC_API.HANDLE_EXCEPTIONS
645: (
646: l_api_name,
647: G_PKG_NAME,
648: 'OKC_API.G_RET_STS_ERROR',

Line 648: 'OKC_API.G_RET_STS_ERROR',

644: x_return_status := OKC_API.HANDLE_EXCEPTIONS
645: (
646: l_api_name,
647: G_PKG_NAME,
648: 'OKC_API.G_RET_STS_ERROR',
649: x_msg_count,
650: x_msg_data,
651: '_PVT'
652: );

Line 653: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

649: x_msg_count,
650: x_msg_data,
651: '_PVT'
652: );
653: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
654: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
655: (
656: l_api_name,
657: G_PKG_NAME,

Line 654: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

650: x_msg_data,
651: '_PVT'
652: );
653: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
654: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
655: (
656: l_api_name,
657: G_PKG_NAME,
658: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 658: 'OKC_API.G_RET_STS_UNEXP_ERROR',

654: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
655: (
656: l_api_name,
657: G_PKG_NAME,
658: 'OKC_API.G_RET_STS_UNEXP_ERROR',
659: x_msg_count,
660: x_msg_data,
661: '_PVT'
662: );

Line 664: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

660: x_msg_data,
661: '_PVT'
662: );
663: WHEN OTHERS THEN
664: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
665: (
666: l_api_name,
667: G_PKG_NAME,
668: 'OTHERS',

Line 690: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

686: x_prmv_rec OUT NOCOPY prmv_rec_type) IS
687:
688: l_api_version CONSTANT NUMBER := 1;
689: l_api_name CONSTANT VARCHAR2(30) := 'update_row';
690: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
691: l_prmv_rec prmv_rec_type := p_prmv_rec;
692:
693: begin
694:

Line 695: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

691: l_prmv_rec prmv_rec_type := p_prmv_rec;
692:
693: begin
694:
695: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
696: G_PKG_NAME,
697: p_init_msg_list,
698: l_api_version,
699: p_api_version,

Line 702: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

698: l_api_version,
699: p_api_version,
700: '_PVT',
701: x_return_status);
702: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
703: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
704: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
705: RAISE OKC_API.G_EXCEPTION_ERROR;
706: END IF;

Line 703: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

699: p_api_version,
700: '_PVT',
701: x_return_status);
702: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
703: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
704: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
705: RAISE OKC_API.G_EXCEPTION_ERROR;
706: END IF;
707:

Line 704: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

700: '_PVT',
701: x_return_status);
702: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
703: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
704: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
705: RAISE OKC_API.G_EXCEPTION_ERROR;
706: END IF;
707:
708: lock_row(p_init_msg_list => 'F',

Line 705: RAISE OKC_API.G_EXCEPTION_ERROR;

701: x_return_status);
702: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
703: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
704: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
705: RAISE OKC_API.G_EXCEPTION_ERROR;
706: END IF;
707:
708: lock_row(p_init_msg_list => 'F',
709: x_return_status => l_return_status,

Line 713: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

709: x_return_status => l_return_status,
710: x_msg_count => x_msg_count,
711: x_msg_data => x_msg_data,
712: p_prmv_rec => p_prmv_rec);
713: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
714: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
715: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
716: RAISE OKC_API.G_EXCEPTION_ERROR;
717: END IF;

Line 714: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

710: x_msg_count => x_msg_count,
711: x_msg_data => x_msg_data,
712: p_prmv_rec => p_prmv_rec);
713: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
714: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
715: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
716: RAISE OKC_API.G_EXCEPTION_ERROR;
717: END IF;
718:

Line 715: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

711: x_msg_data => x_msg_data,
712: p_prmv_rec => p_prmv_rec);
713: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
714: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
715: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
716: RAISE OKC_API.G_EXCEPTION_ERROR;
717: END IF;
718:
719: l_prmv_rec.ID := p_prmv_rec.ID;

Line 716: RAISE OKC_API.G_EXCEPTION_ERROR;

712: p_prmv_rec => p_prmv_rec);
713: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
714: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
715: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
716: RAISE OKC_API.G_EXCEPTION_ERROR;
717: END IF;
718:
719: l_prmv_rec.ID := p_prmv_rec.ID;
720: select

Line 750: if (p_prmv_rec.SQL_ID is NULL or p_prmv_rec.SQL_ID <> OKC_API.G_MISS_NUM) then

746: l_prmv_rec.LAST_UPDATE_DATE := SYSDATE;
747: l_prmv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
748:
749:
750: if (p_prmv_rec.SQL_ID is NULL or p_prmv_rec.SQL_ID <> OKC_API.G_MISS_NUM) then
751: l_prmv_rec.SQL_ID := p_prmv_rec.SQL_ID;
752: end if;
753: if (p_prmv_rec.SEQUENCE_NUM is NULL or p_prmv_rec.SEQUENCE_NUM <> OKC_API.G_MISS_NUM) then
754: l_prmv_rec.SEQUENCE_NUM := p_prmv_rec.SEQUENCE_NUM;

Line 753: if (p_prmv_rec.SEQUENCE_NUM is NULL or p_prmv_rec.SEQUENCE_NUM <> OKC_API.G_MISS_NUM) then

749:
750: if (p_prmv_rec.SQL_ID is NULL or p_prmv_rec.SQL_ID <> OKC_API.G_MISS_NUM) then
751: l_prmv_rec.SQL_ID := p_prmv_rec.SQL_ID;
752: end if;
753: if (p_prmv_rec.SEQUENCE_NUM is NULL or p_prmv_rec.SEQUENCE_NUM <> OKC_API.G_MISS_NUM) then
754: l_prmv_rec.SEQUENCE_NUM := p_prmv_rec.SEQUENCE_NUM;
755: end if;
756: if (p_prmv_rec.CODE is NULL or p_prmv_rec.CODE <> OKC_API.G_MISS_CHAR) then
757: l_prmv_rec.CODE := p_prmv_rec.CODE;

Line 756: if (p_prmv_rec.CODE is NULL or p_prmv_rec.CODE <> OKC_API.G_MISS_CHAR) then

752: end if;
753: if (p_prmv_rec.SEQUENCE_NUM is NULL or p_prmv_rec.SEQUENCE_NUM <> OKC_API.G_MISS_NUM) then
754: l_prmv_rec.SEQUENCE_NUM := p_prmv_rec.SEQUENCE_NUM;
755: end if;
756: if (p_prmv_rec.CODE is NULL or p_prmv_rec.CODE <> OKC_API.G_MISS_CHAR) then
757: l_prmv_rec.CODE := p_prmv_rec.CODE;
758: end if;
759: if (p_prmv_rec.PROMPT is NULL or p_prmv_rec.PROMPT <> OKC_API.G_MISS_CHAR) then
760: l_prmv_rec.PROMPT := p_prmv_rec.PROMPT;

Line 759: if (p_prmv_rec.PROMPT is NULL or p_prmv_rec.PROMPT <> OKC_API.G_MISS_CHAR) then

755: end if;
756: if (p_prmv_rec.CODE is NULL or p_prmv_rec.CODE <> OKC_API.G_MISS_CHAR) then
757: l_prmv_rec.CODE := p_prmv_rec.CODE;
758: end if;
759: if (p_prmv_rec.PROMPT is NULL or p_prmv_rec.PROMPT <> OKC_API.G_MISS_CHAR) then
760: l_prmv_rec.PROMPT := p_prmv_rec.PROMPT;
761: end if;
762: if (p_prmv_rec.TYPE is NULL or p_prmv_rec.TYPE <> OKC_API.G_MISS_CHAR) then
763: l_prmv_rec.TYPE := p_prmv_rec.TYPE;

Line 762: if (p_prmv_rec.TYPE is NULL or p_prmv_rec.TYPE <> OKC_API.G_MISS_CHAR) then

758: end if;
759: if (p_prmv_rec.PROMPT is NULL or p_prmv_rec.PROMPT <> OKC_API.G_MISS_CHAR) then
760: l_prmv_rec.PROMPT := p_prmv_rec.PROMPT;
761: end if;
762: if (p_prmv_rec.TYPE is NULL or p_prmv_rec.TYPE <> OKC_API.G_MISS_CHAR) then
763: l_prmv_rec.TYPE := p_prmv_rec.TYPE;
764: end if;
765: if (p_prmv_rec.REQUIRED_YN is NULL or p_prmv_rec.REQUIRED_YN <> OKC_API.G_MISS_CHAR) then
766: l_prmv_rec.REQUIRED_YN := p_prmv_rec.REQUIRED_YN;

Line 765: if (p_prmv_rec.REQUIRED_YN is NULL or p_prmv_rec.REQUIRED_YN <> OKC_API.G_MISS_CHAR) then

761: end if;
762: if (p_prmv_rec.TYPE is NULL or p_prmv_rec.TYPE <> OKC_API.G_MISS_CHAR) then
763: l_prmv_rec.TYPE := p_prmv_rec.TYPE;
764: end if;
765: if (p_prmv_rec.REQUIRED_YN is NULL or p_prmv_rec.REQUIRED_YN <> OKC_API.G_MISS_CHAR) then
766: l_prmv_rec.REQUIRED_YN := p_prmv_rec.REQUIRED_YN;
767: end if;
768: if (p_prmv_rec.LOV_QUERY is NULL or p_prmv_rec.LOV_QUERY <> OKC_API.G_MISS_CHAR) then
769: l_prmv_rec.LOV_QUERY := p_prmv_rec.LOV_QUERY;

Line 768: if (p_prmv_rec.LOV_QUERY is NULL or p_prmv_rec.LOV_QUERY <> OKC_API.G_MISS_CHAR) then

764: end if;
765: if (p_prmv_rec.REQUIRED_YN is NULL or p_prmv_rec.REQUIRED_YN <> OKC_API.G_MISS_CHAR) then
766: l_prmv_rec.REQUIRED_YN := p_prmv_rec.REQUIRED_YN;
767: end if;
768: if (p_prmv_rec.LOV_QUERY is NULL or p_prmv_rec.LOV_QUERY <> OKC_API.G_MISS_CHAR) then
769: l_prmv_rec.LOV_QUERY := p_prmv_rec.LOV_QUERY;
770: end if;
771:
772: l_return_status := Validate_Attributes('U',l_prmv_rec);

Line 773: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

769: l_prmv_rec.LOV_QUERY := p_prmv_rec.LOV_QUERY;
770: end if;
771:
772: l_return_status := Validate_Attributes('U',l_prmv_rec);
773: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
774: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
775: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
776: RAISE OKC_API.G_EXCEPTION_ERROR;
777: END IF;

Line 774: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

770: end if;
771:
772: l_return_status := Validate_Attributes('U',l_prmv_rec);
773: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
774: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
775: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
776: RAISE OKC_API.G_EXCEPTION_ERROR;
777: END IF;
778:

Line 775: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

771:
772: l_return_status := Validate_Attributes('U',l_prmv_rec);
773: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
774: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
775: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
776: RAISE OKC_API.G_EXCEPTION_ERROR;
777: END IF;
778:
779: UPDATE OKC_REPORT_PRM_B set

Line 776: RAISE OKC_API.G_EXCEPTION_ERROR;

772: l_return_status := Validate_Attributes('U',l_prmv_rec);
773: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
774: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
775: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
776: RAISE OKC_API.G_EXCEPTION_ERROR;
777: END IF;
778:
779: UPDATE OKC_REPORT_PRM_B set
780: SQL_ID = l_prmv_rec.SQL_ID

Line 804: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

800: and USERENV('LANG') in (LANGUAGE, SOURCE_LANG);
801:
802: date_sql(l_prmv_rec.SQL_ID);
803: x_prmv_rec := l_prmv_rec;
804: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
805: EXCEPTION
806: WHEN OKC_API.G_EXCEPTION_ERROR THEN
807: x_return_status := OKC_API.HANDLE_EXCEPTIONS
808: (

Line 806: WHEN OKC_API.G_EXCEPTION_ERROR THEN

802: date_sql(l_prmv_rec.SQL_ID);
803: x_prmv_rec := l_prmv_rec;
804: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
805: EXCEPTION
806: WHEN OKC_API.G_EXCEPTION_ERROR THEN
807: x_return_status := OKC_API.HANDLE_EXCEPTIONS
808: (
809: l_api_name,
810: G_PKG_NAME,

Line 807: x_return_status := OKC_API.HANDLE_EXCEPTIONS

803: x_prmv_rec := l_prmv_rec;
804: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
805: EXCEPTION
806: WHEN OKC_API.G_EXCEPTION_ERROR THEN
807: x_return_status := OKC_API.HANDLE_EXCEPTIONS
808: (
809: l_api_name,
810: G_PKG_NAME,
811: 'OKC_API.G_RET_STS_ERROR',

Line 811: 'OKC_API.G_RET_STS_ERROR',

807: x_return_status := OKC_API.HANDLE_EXCEPTIONS
808: (
809: l_api_name,
810: G_PKG_NAME,
811: 'OKC_API.G_RET_STS_ERROR',
812: x_msg_count,
813: x_msg_data,
814: '_PVT'
815: );

Line 816: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

812: x_msg_count,
813: x_msg_data,
814: '_PVT'
815: );
816: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
817: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
818: (
819: l_api_name,
820: G_PKG_NAME,

Line 817: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

813: x_msg_data,
814: '_PVT'
815: );
816: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
817: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
818: (
819: l_api_name,
820: G_PKG_NAME,
821: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 821: 'OKC_API.G_RET_STS_UNEXP_ERROR',

817: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
818: (
819: l_api_name,
820: G_PKG_NAME,
821: 'OKC_API.G_RET_STS_UNEXP_ERROR',
822: x_msg_count,
823: x_msg_data,
824: '_PVT'
825: );

Line 827: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

823: x_msg_data,
824: '_PVT'
825: );
826: WHEN OTHERS THEN
827: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
828: (
829: l_api_name,
830: G_PKG_NAME,
831: 'OTHERS',

Line 852: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

848: p_prmv_rec IN prmv_rec_type) IS
849:
850: l_api_version CONSTANT NUMBER := 1;
851: l_api_name CONSTANT VARCHAR2(30) := 'delete_row';
852: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
853:
854: cursor sql_csr(p NUMBER) is
855: select S.id
856: from okc_report_prm_v PRM, okc_report_sql_v S

Line 863: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

859: l_sql_id NUMBER;
860:
861: begin
862:
863: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
864: G_PKG_NAME,
865: p_init_msg_list,
866: l_api_version,
867: p_api_version,

Line 870: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

866: l_api_version,
867: p_api_version,
868: '_PVT',
869: x_return_status);
870: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
871: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
872: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
873: RAISE OKC_API.G_EXCEPTION_ERROR;
874: END IF;

Line 871: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

867: p_api_version,
868: '_PVT',
869: x_return_status);
870: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
871: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
872: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
873: RAISE OKC_API.G_EXCEPTION_ERROR;
874: END IF;
875:

Line 872: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

868: '_PVT',
869: x_return_status);
870: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
871: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
872: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
873: RAISE OKC_API.G_EXCEPTION_ERROR;
874: END IF;
875:
876: lock_row(p_init_msg_list => 'F',

Line 873: RAISE OKC_API.G_EXCEPTION_ERROR;

869: x_return_status);
870: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
871: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
872: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
873: RAISE OKC_API.G_EXCEPTION_ERROR;
874: END IF;
875:
876: lock_row(p_init_msg_list => 'F',
877: x_return_status => l_return_status,

Line 881: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

877: x_return_status => l_return_status,
878: x_msg_count => x_msg_count,
879: x_msg_data => x_msg_data,
880: p_prmv_rec => p_prmv_rec);
881: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
882: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
883: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
884: RAISE OKC_API.G_EXCEPTION_ERROR;
885: END IF;

Line 882: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

878: x_msg_count => x_msg_count,
879: x_msg_data => x_msg_data,
880: p_prmv_rec => p_prmv_rec);
881: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
882: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
883: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
884: RAISE OKC_API.G_EXCEPTION_ERROR;
885: END IF;
886:

Line 883: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

879: x_msg_data => x_msg_data,
880: p_prmv_rec => p_prmv_rec);
881: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
882: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
883: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
884: RAISE OKC_API.G_EXCEPTION_ERROR;
885: END IF;
886:
887: delete

Line 884: RAISE OKC_API.G_EXCEPTION_ERROR;

880: p_prmv_rec => p_prmv_rec);
881: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
882: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
883: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
884: RAISE OKC_API.G_EXCEPTION_ERROR;
885: END IF;
886:
887: delete
888: from OKC_REPORT_PRM_B

Line 902: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

898: if (l_sql_id is not null) then
899: date_sql(l_sql_id);
900: end if;
901:
902: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
903: EXCEPTION
904: WHEN OKC_API.G_EXCEPTION_ERROR THEN
905: x_return_status := OKC_API.HANDLE_EXCEPTIONS
906: (

Line 904: WHEN OKC_API.G_EXCEPTION_ERROR THEN

900: end if;
901:
902: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
903: EXCEPTION
904: WHEN OKC_API.G_EXCEPTION_ERROR THEN
905: x_return_status := OKC_API.HANDLE_EXCEPTIONS
906: (
907: l_api_name,
908: G_PKG_NAME,

Line 905: x_return_status := OKC_API.HANDLE_EXCEPTIONS

901:
902: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
903: EXCEPTION
904: WHEN OKC_API.G_EXCEPTION_ERROR THEN
905: x_return_status := OKC_API.HANDLE_EXCEPTIONS
906: (
907: l_api_name,
908: G_PKG_NAME,
909: 'OKC_API.G_RET_STS_ERROR',

Line 909: 'OKC_API.G_RET_STS_ERROR',

905: x_return_status := OKC_API.HANDLE_EXCEPTIONS
906: (
907: l_api_name,
908: G_PKG_NAME,
909: 'OKC_API.G_RET_STS_ERROR',
910: x_msg_count,
911: x_msg_data,
912: '_PVT'
913: );

Line 914: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

910: x_msg_count,
911: x_msg_data,
912: '_PVT'
913: );
914: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
915: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
916: (
917: l_api_name,
918: G_PKG_NAME,

Line 915: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

911: x_msg_data,
912: '_PVT'
913: );
914: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
915: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
916: (
917: l_api_name,
918: G_PKG_NAME,
919: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 919: 'OKC_API.G_RET_STS_UNEXP_ERROR',

915: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
916: (
917: l_api_name,
918: G_PKG_NAME,
919: 'OKC_API.G_RET_STS_UNEXP_ERROR',
920: x_msg_count,
921: x_msg_data,
922: '_PVT'
923: );

Line 925: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

921: x_msg_data,
922: '_PVT'
923: );
924: WHEN OTHERS THEN
925: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
926: (
927: l_api_name,
928: G_PKG_NAME,
929: 'OTHERS',