DBA Data[Home] [Help]

APPS.EAM_PERMIT_VALIDATE_PVT dependencies on EAM_PROCESS_WO_PVT

Line 22: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Quering Permit'); END IF;

18: l_return_status VARCHAR2(1);
19: l_work_permit_header_rec EAM_PROCESS_SAFETY_PUB.eam_wp_header_rec_type;
20:
21: BEGIN
22: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Quering Permit'); END IF;
23: EAM_PERMIT_UTILITY_PVT.QUERY_ROW (
24: p_work_permit_id => p_work_permit_header_rec.PERMIT_ID ,
25: p_organization_id => p_work_permit_header_rec.organization_id ,
26: x_work_permit_header_rec => l_work_permit_header_rec ,

Line 29: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Query Row Returned with : ' || l_return_status);

25: p_organization_id => p_work_permit_header_rec.organization_id ,
26: x_work_permit_header_rec => l_work_permit_header_rec ,
27: x_Return_status => l_return_status );
28:
29: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Query Row Returned with : ' || l_return_status);
30: END IF;
31: IF l_return_status = EAM_PROCESS_WO_PVT.G_RECORD_FOUND AND p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_CREATE THEN
32: -- l_token_tbl(1).token_name := 'EAM_WO_PERMIT';
33: -- l_token_tbl(1).token_value := p_work_permit_header_rec.direct_item_sequence_id;

Line 31: IF l_return_status = EAM_PROCESS_WO_PVT.G_RECORD_FOUND AND p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_CREATE THEN

27: x_Return_status => l_return_status );
28:
29: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Query Row Returned with : ' || l_return_status);
30: END IF;
31: IF l_return_status = EAM_PROCESS_WO_PVT.G_RECORD_FOUND AND p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_CREATE THEN
32: -- l_token_tbl(1).token_name := 'EAM_WO_PERMIT';
33: -- l_token_tbl(1).token_value := p_work_permit_header_rec.direct_item_sequence_id;
34: -- l_out_mesg_token_tbl := l_mesg_token_tbl;
35: EAM_ERROR_MESSAGE_PVT.Add_Error_Token (

Line 43: ELSIF l_return_status = EAM_PROCESS_WO_PVT.G_RECORD_NOT_FOUND AND p_work_permit_header_rec.transaction_type IN (EAM_PROCESS_WO_PVT.G_OPR_UPDATE, EAM_PROCESS_WO_PVT.G_OPR_DELETE) THEN

39: p_token_tbl => l_token_tbl );
40: l_mesg_token_tbl := l_out_mesg_token_tbl;
41: l_return_status := FND_API.G_RET_STS_ERROR;
42:
43: ELSIF l_return_status = EAM_PROCESS_WO_PVT.G_RECORD_NOT_FOUND AND p_work_permit_header_rec.transaction_type IN (EAM_PROCESS_WO_PVT.G_OPR_UPDATE, EAM_PROCESS_WO_PVT.G_OPR_DELETE) THEN
44: l_token_tbl(1).token_name := 'PERMIT_NAME';
45: l_token_tbl(1).token_value := p_work_permit_header_rec.PERMIT_NAME;
46:
47: l_out_mesg_token_tbl := l_mesg_token_tbl;

Line 92: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Within Permit Check Attributes . . . '); END IF;

88: l_Token_Tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
89: l_permit_id number;
90:
91: BEGIN
92: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Within Permit Check Attributes . . . '); END IF;
93:
94: /*IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating organization_id . . . '); END IF;
95:
96: DECLARE

Line 94: /*IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating organization_id . . . '); END IF;

90:
91: BEGIN
92: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Within Permit Check Attributes . . . '); END IF;
93:
94: /*IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating organization_id . . . '); END IF;
95:
96: DECLARE
97: l_disable_date DATE;
98: BEGIN

Line 140: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating organization_id (EAM enabled) . . . ');

136: x_mesg_token_tbl := l_mesg_token_tbl ;
137: RETURN;
138: END;
139:
140: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating organization_id (EAM enabled) . . . ');
141: END IF;
142:
143: BEGIN
144: SELECT 1

Line 168: /* IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating if Permit ID already exists for create . . . '); END IF;

164: x_mesg_token_tbl := l_mesg_token_tbl ;
165: RETURN;
166: END;
167:
168: /* IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating if Permit ID already exists for create . . . '); END IF;
169:
170: DECLARE
171: l_count NUMBER;
172: BEGIN

Line 173: IF (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_CREATE) THEN

169:
170: DECLARE
171: l_count NUMBER;
172: BEGIN
173: IF (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_CREATE) THEN
174: SELECT COUNT(*)
175: INTO l_count
176: FROM EAM_WORK_PERMITS
177: WHERE PERMIT_ID = p_work_permit_header_rec.PERMIT_ID

Line 200: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating if Permit ID exists for update . . . '); END IF;

196: x_mesg_token_tbl := l_mesg_token_tbl ;
197: RETURN;
198: END; */
199:
200: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating if Permit ID exists for update . . . '); END IF;
201: DECLARE
202: l_count NUMBER;
203: BEGIN
204: IF (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_UPDATE) THEN

Line 204: IF (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_UPDATE) THEN

200: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating if Permit ID exists for update . . . '); END IF;
201: DECLARE
202: l_count NUMBER;
203: BEGIN
204: IF (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_UPDATE) THEN
205: SELECT COUNT(*)
206: INTO l_count
207: FROM EAM_WORK_PERMITS
208: WHERE PERMIT_ID = p_work_permit_header_rec.PERMIT_ID

Line 232: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating Permit Name . . . '); END IF;

228: x_mesg_token_tbl := l_mesg_token_tbl ;
229: RETURN;
230: END;
231:
232: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating Permit Name . . . '); END IF;
233: DECLARE
234: l_count NUMBER;
235: BEGIN
236: IF (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_CREATE) THEN

Line 236: IF (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_CREATE) THEN

232: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating Permit Name . . . '); END IF;
233: DECLARE
234: l_count NUMBER;
235: BEGIN
236: IF (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_CREATE) THEN
237: SELECT COUNT(*)
238: INTO l_count
239: FROM EAM_WORK_PERMITS
240: WHERE PERMIT_NAME = p_work_permit_header_rec.PERMIT_NAME

Line 249: IF (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_UPDATE) THEN

245: END IF;
246:
247: -- Permit name should be validated incase of copy permit,where transaction type is update.
248:
249: IF (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_UPDATE) THEN
250: BEGIN
251: SELECT permit_id
252: INTO l_permit_id
253: FROM EAM_WORK_PERMITS

Line 284: /* IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating status_type. . . '); END IF;

280: RETURN;
281: END;
282:
283: -- status_type
284: /* IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating status_type. . . '); END IF;
285: BEGIN
286: IF (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_CREATE AND p_work_permit_header_rec.status_type NOT IN (wip_constants.released, wip_constants.draft)) THEN
287: raise fnd_api.g_exc_unexpected_error;
288: elsif (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_UPDATE AND p_work_permit_header_rec.status_type NOT IN (wip_constants.released, wip_constants.cancelled,wip_constants.comp_chrg,wip_constants.comp_nochrg )) THEN

Line 286: IF (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_CREATE AND p_work_permit_header_rec.status_type NOT IN (wip_constants.released, wip_constants.draft)) THEN

282:
283: -- status_type
284: /* IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating status_type. . . '); END IF;
285: BEGIN
286: IF (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_CREATE AND p_work_permit_header_rec.status_type NOT IN (wip_constants.released, wip_constants.draft)) THEN
287: raise fnd_api.g_exc_unexpected_error;
288: elsif (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_UPDATE AND p_work_permit_header_rec.status_type NOT IN (wip_constants.released, wip_constants.cancelled,wip_constants.comp_chrg,wip_constants.comp_nochrg )) THEN
289: raise fnd_api.g_exc_unexpected_error;
290: END IF;

Line 288: elsif (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_UPDATE AND p_work_permit_header_rec.status_type NOT IN (wip_constants.released, wip_constants.cancelled,wip_constants.comp_chrg,wip_constants.comp_nochrg )) THEN

284: /* IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating status_type. . . '); END IF;
285: BEGIN
286: IF (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_CREATE AND p_work_permit_header_rec.status_type NOT IN (wip_constants.released, wip_constants.draft)) THEN
287: raise fnd_api.g_exc_unexpected_error;
288: elsif (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_UPDATE AND p_work_permit_header_rec.status_type NOT IN (wip_constants.released, wip_constants.cancelled,wip_constants.comp_chrg,wip_constants.comp_nochrg )) THEN
289: raise fnd_api.g_exc_unexpected_error;
290: END IF;
291: x_return_status := FND_API.G_RET_STS_SUCCESS;
292: EXCEPTION

Line 308: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating status_type for cancelled. . . '); END IF;

304: x_mesg_token_tbl := l_mesg_token_tbl ;
305: RETURN;
306: END;
307:
308: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating status_type for cancelled. . . '); END IF;
309: BEGIN
310: IF (p_work_permit_header_rec.transaction_type= EAM_PROCESS_WO_PVT.G_OPR_UPDATE AND
311: p_work_permit_header_rec.status_type = wip_constants.cancelled OR
312: p_work_permit_header_rec.PERMIT_NAME <> p_old_work_permit_header_rec.PERMIT_NAME OR

Line 310: IF (p_work_permit_header_rec.transaction_type= EAM_PROCESS_WO_PVT.G_OPR_UPDATE AND

306: END;
307:
308: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating status_type for cancelled. . . '); END IF;
309: BEGIN
310: IF (p_work_permit_header_rec.transaction_type= EAM_PROCESS_WO_PVT.G_OPR_UPDATE AND
311: p_work_permit_header_rec.status_type = wip_constants.cancelled OR
312: p_work_permit_header_rec.PERMIT_NAME <> p_old_work_permit_header_rec.PERMIT_NAME OR
313: p_work_permit_header_rec.PERMIT_TYPE <> p_old_work_permit_header_rec.PERMIT_TYPE OR
314: p_work_permit_header_rec.DESCRIPTION <> p_old_work_permit_header_rec.DESCRIPTION OR

Line 358: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating user_id . . . '); END IF;

354: RETURN;
355: END;*/
356:
357: -- user_id
358: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating user_id . . . '); END IF;
359: BEGIN
360: IF (p_work_permit_header_rec.user_id IS NOT NULL) THEN
361: SELECT 1
362: INTO g_dummy

Line 384: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating responsibility_id . . . '); END IF;

380: RETURN;
381: END;
382:
383: -- responsibility_id
384: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating responsibility_id . . . '); END IF;
385: BEGIN
386: IF (p_work_permit_header_rec.responsibility_id IS NOT NULL) THEN
387: SELECT 1
388: INTO g_dummy

Line 426: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Checking required attributes for Permit . . . '); END IF;

422: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
423: l_Token_Tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
424:
425: BEGIN
426: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Checking required attributes for Permit . . . '); END IF;
427: x_return_status := FND_API.G_RET_STS_SUCCESS;
428: IF p_work_permit_header_rec.PERMIT_ID IS NULL THEN
429: -- l_token_tbl(1).token_name := 'OPERATION_SEQ_NUM';
430: -- l_token_tbl(1).token_value := p_eam_op_rec.operation_seq_num;