DBA Data[Home] [Help]

APPS.AHL_PRD_BLK_PARTS_CHANGE_PVT dependencies on FND_MESSAGE

Line 2301: FND_MESSAGE.SET_NAME('AHL', 'AHL_PRD_BLK_PC_INST_ERR_INPUT');

2297: for j IN P_X_PARTS_REC_TBL.FIRST..P_X_PARTS_REC_TBL.LAST LOOP
2298: IF (P_X_PARTS_REC_TBL(j).OPERATION_TYPE = 'C' AND
2299: (P_X_PARTS_REC_TBL(j).INSTALLED_INSTANCE_NUM IS NULL OR
2300: P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM IS NULL)) THEN
2301: FND_MESSAGE.SET_NAME('AHL', 'AHL_PRD_BLK_PC_INST_ERR_INPUT');
2302: FND_MESSAGE.SET_TOKEN('OPERATION_SEQUENCE_NUM',P_X_PARTS_REC_TBL(j).OPERATION_SEQUENCE_NUM,false);
2303: IF(P_X_PARTS_REC_TBL(j).INSTALLED_INSTANCE_NUM IS NOT NULL)THEN
2304: OPEN item_info_csr(P_X_PARTS_REC_TBL(j).INSTALLED_INSTANCE_NUM);
2305: FETCH item_info_csr INTO l_item,l_serial;

Line 2302: FND_MESSAGE.SET_TOKEN('OPERATION_SEQUENCE_NUM',P_X_PARTS_REC_TBL(j).OPERATION_SEQUENCE_NUM,false);

2298: IF (P_X_PARTS_REC_TBL(j).OPERATION_TYPE = 'C' AND
2299: (P_X_PARTS_REC_TBL(j).INSTALLED_INSTANCE_NUM IS NULL OR
2300: P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM IS NULL)) THEN
2301: FND_MESSAGE.SET_NAME('AHL', 'AHL_PRD_BLK_PC_INST_ERR_INPUT');
2302: FND_MESSAGE.SET_TOKEN('OPERATION_SEQUENCE_NUM',P_X_PARTS_REC_TBL(j).OPERATION_SEQUENCE_NUM,false);
2303: IF(P_X_PARTS_REC_TBL(j).INSTALLED_INSTANCE_NUM IS NOT NULL)THEN
2304: OPEN item_info_csr(P_X_PARTS_REC_TBL(j).INSTALLED_INSTANCE_NUM);
2305: FETCH item_info_csr INTO l_item,l_serial;
2306: CLOSE item_info_csr;

Line 2311: FND_MESSAGE.SET_TOKEN('INSTALLED_PART',l_item,false);

2307: ELSE
2308: l_item := '';
2309: l_serial := '';
2310: END IF;
2311: FND_MESSAGE.SET_TOKEN('INSTALLED_PART',l_item,false);
2312: FND_MESSAGE.SET_TOKEN('INSTALLED_SERIAL',l_serial,false);
2313: IF(P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM IS NOT NULL)THEN
2314: OPEN item_info_csr(P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM);
2315: FETCH item_info_csr INTO l_item,l_serial;

Line 2312: FND_MESSAGE.SET_TOKEN('INSTALLED_SERIAL',l_serial,false);

2308: l_item := '';
2309: l_serial := '';
2310: END IF;
2311: FND_MESSAGE.SET_TOKEN('INSTALLED_PART',l_item,false);
2312: FND_MESSAGE.SET_TOKEN('INSTALLED_SERIAL',l_serial,false);
2313: IF(P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM IS NOT NULL)THEN
2314: OPEN item_info_csr(P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM);
2315: FETCH item_info_csr INTO l_item,l_serial;
2316: CLOSE item_info_csr;

Line 2321: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_PART',l_item,false);

2317: ELSE
2318: l_item := '';
2319: l_serial := '';
2320: END IF;
2321: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_PART',l_item,false);
2322: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_SERIAL',l_serial,false);
2323: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE_LEVEL := 'E' ;
2324: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE := FND_MESSAGE.get;
2325: l_error_msg_index := l_error_msg_index + 1;

Line 2322: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_SERIAL',l_serial,false);

2318: l_item := '';
2319: l_serial := '';
2320: END IF;
2321: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_PART',l_item,false);
2322: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_SERIAL',l_serial,false);
2323: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE_LEVEL := 'E' ;
2324: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE := FND_MESSAGE.get;
2325: l_error_msg_index := l_error_msg_index + 1;
2326: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;

Line 2324: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE := FND_MESSAGE.get;

2320: END IF;
2321: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_PART',l_item,false);
2322: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_SERIAL',l_serial,false);
2323: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE_LEVEL := 'E' ;
2324: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE := FND_MESSAGE.get;
2325: l_error_msg_index := l_error_msg_index + 1;
2326: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
2327: ELSIF(P_X_PARTS_REC_TBL(j).OPERATION_TYPE = 'D' AND
2328: (P_X_PARTS_REC_TBL(j).REMOVED_INSTANCE_NUM IS NULL OR P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM IS NULL))THEN

Line 2329: FND_MESSAGE.SET_NAME('AHL', 'AHL_PRD_BLK_PC_REM_ERR_INPUT');

2325: l_error_msg_index := l_error_msg_index + 1;
2326: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
2327: ELSIF(P_X_PARTS_REC_TBL(j).OPERATION_TYPE = 'D' AND
2328: (P_X_PARTS_REC_TBL(j).REMOVED_INSTANCE_NUM IS NULL OR P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM IS NULL))THEN
2329: FND_MESSAGE.SET_NAME('AHL', 'AHL_PRD_BLK_PC_REM_ERR_INPUT');
2330: FND_MESSAGE.SET_TOKEN('OPERATION_SEQUENCE_NUM',P_X_PARTS_REC_TBL(j).OPERATION_SEQUENCE_NUM,false);
2331: IF(P_X_PARTS_REC_TBL(j).REMOVED_INSTANCE_NUM IS NOT NULL)THEN
2332: OPEN item_info_csr(P_X_PARTS_REC_TBL(j).REMOVED_INSTANCE_NUM);
2333: FETCH item_info_csr INTO l_item,l_serial;

Line 2330: FND_MESSAGE.SET_TOKEN('OPERATION_SEQUENCE_NUM',P_X_PARTS_REC_TBL(j).OPERATION_SEQUENCE_NUM,false);

2326: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
2327: ELSIF(P_X_PARTS_REC_TBL(j).OPERATION_TYPE = 'D' AND
2328: (P_X_PARTS_REC_TBL(j).REMOVED_INSTANCE_NUM IS NULL OR P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM IS NULL))THEN
2329: FND_MESSAGE.SET_NAME('AHL', 'AHL_PRD_BLK_PC_REM_ERR_INPUT');
2330: FND_MESSAGE.SET_TOKEN('OPERATION_SEQUENCE_NUM',P_X_PARTS_REC_TBL(j).OPERATION_SEQUENCE_NUM,false);
2331: IF(P_X_PARTS_REC_TBL(j).REMOVED_INSTANCE_NUM IS NOT NULL)THEN
2332: OPEN item_info_csr(P_X_PARTS_REC_TBL(j).REMOVED_INSTANCE_NUM);
2333: FETCH item_info_csr INTO l_item,l_serial;
2334: CLOSE item_info_csr;

Line 2339: FND_MESSAGE.SET_TOKEN('REMOVED_PART',l_item,false);

2335: ELSE
2336: l_item := '';
2337: l_serial := '';
2338: END IF;
2339: FND_MESSAGE.SET_TOKEN('REMOVED_PART',l_item,false);
2340: FND_MESSAGE.SET_TOKEN('REMOVED_SERIAL',l_serial,false);
2341: IF(P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM IS NOT NULL)THEN
2342: OPEN item_info_csr(P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM);
2343: FETCH item_info_csr INTO l_item,l_serial;

Line 2340: FND_MESSAGE.SET_TOKEN('REMOVED_SERIAL',l_serial,false);

2336: l_item := '';
2337: l_serial := '';
2338: END IF;
2339: FND_MESSAGE.SET_TOKEN('REMOVED_PART',l_item,false);
2340: FND_MESSAGE.SET_TOKEN('REMOVED_SERIAL',l_serial,false);
2341: IF(P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM IS NOT NULL)THEN
2342: OPEN item_info_csr(P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM);
2343: FETCH item_info_csr INTO l_item,l_serial;
2344: CLOSE item_info_csr;

Line 2349: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_PART',l_item,false);

2345: ELSE
2346: l_item := '';
2347: l_serial := '';
2348: END IF;
2349: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_PART',l_item,false);
2350: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_SERIAL',l_serial,false);
2351: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE_LEVEL := 'E' ;
2352: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE := FND_MESSAGE.get;
2353: l_error_msg_index := l_error_msg_index + 1;

Line 2350: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_SERIAL',l_serial,false);

2346: l_item := '';
2347: l_serial := '';
2348: END IF;
2349: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_PART',l_item,false);
2350: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_SERIAL',l_serial,false);
2351: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE_LEVEL := 'E' ;
2352: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE := FND_MESSAGE.get;
2353: l_error_msg_index := l_error_msg_index + 1;
2354: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;

Line 2352: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE := FND_MESSAGE.get;

2348: END IF;
2349: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_PART',l_item,false);
2350: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_SERIAL',l_serial,false);
2351: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE_LEVEL := 'E' ;
2352: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE := FND_MESSAGE.get;
2353: l_error_msg_index := l_error_msg_index + 1;
2354: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
2355: END IF;
2356: END LOOP;

Line 2363: FND_MESSAGE.Set_Name('AHL', 'AHL_PRD_BLK_PC_ERRORS');

2359: -- Initialize message list if p_init_msg_list is set to TRUE
2360: IF FND_API.TO_BOOLEAN(P_INIT_MSG_LIST) THEN
2361: FND_MSG_PUB.INITIALIZE;
2362: END IF;
2363: FND_MESSAGE.Set_Name('AHL', 'AHL_PRD_BLK_PC_ERRORS');
2364: FND_MSG_PUB.ADD;
2365: RAISE FND_API.G_EXC_ERROR;
2366: END IF;
2367:

Line 2428: FND_MESSAGE.SET_NAME('AHL', 'AHL_PRD_BLK_PC_INST_ERR');

2424: END IF;
2425: X_RETURN_STATUS := l_RETURN_STATUS;
2426: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE_LEVEL := 'E' ;
2427: IF(P_X_PARTS_REC_TBL(j).OPERATION_TYPE = 'C')THEN
2428: FND_MESSAGE.SET_NAME('AHL', 'AHL_PRD_BLK_PC_INST_ERR');
2429: --FND_MESSAGE.SET_TOKEN('INSTALLED_INSTANCE_NUM',P_X_PARTS_REC_TBL(j).INSTALLED_INSTANCE_NUM,false);
2430: IF(P_X_PARTS_REC_TBL(j).INSTALLED_INSTANCE_NUM IS NOT NULL)THEN
2431: OPEN item_info_csr(P_X_PARTS_REC_TBL(j).INSTALLED_INSTANCE_NUM);
2432: FETCH item_info_csr INTO l_item,l_serial;

Line 2429: --FND_MESSAGE.SET_TOKEN('INSTALLED_INSTANCE_NUM',P_X_PARTS_REC_TBL(j).INSTALLED_INSTANCE_NUM,false);

2425: X_RETURN_STATUS := l_RETURN_STATUS;
2426: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE_LEVEL := 'E' ;
2427: IF(P_X_PARTS_REC_TBL(j).OPERATION_TYPE = 'C')THEN
2428: FND_MESSAGE.SET_NAME('AHL', 'AHL_PRD_BLK_PC_INST_ERR');
2429: --FND_MESSAGE.SET_TOKEN('INSTALLED_INSTANCE_NUM',P_X_PARTS_REC_TBL(j).INSTALLED_INSTANCE_NUM,false);
2430: IF(P_X_PARTS_REC_TBL(j).INSTALLED_INSTANCE_NUM IS NOT NULL)THEN
2431: OPEN item_info_csr(P_X_PARTS_REC_TBL(j).INSTALLED_INSTANCE_NUM);
2432: FETCH item_info_csr INTO l_item,l_serial;
2433: CLOSE item_info_csr;

Line 2438: FND_MESSAGE.SET_TOKEN('INSTALLED_PART',l_item,false);

2434: ELSE
2435: l_item := '';
2436: l_serial := '';
2437: END IF;
2438: FND_MESSAGE.SET_TOKEN('INSTALLED_PART',l_item,false);
2439: FND_MESSAGE.SET_TOKEN('INSTALLED_SERIAL',l_serial,false);
2440: ELSE
2441: FND_MESSAGE.SET_NAME('AHL', 'AHL_PRD_BLK_PC_REM_ERR');
2442: --FND_MESSAGE.SET_TOKEN('REMOVED_INSTANCE_NUM',P_X_PARTS_REC_TBL(j).REMOVED_INSTANCE_NUM,false);

Line 2439: FND_MESSAGE.SET_TOKEN('INSTALLED_SERIAL',l_serial,false);

2435: l_item := '';
2436: l_serial := '';
2437: END IF;
2438: FND_MESSAGE.SET_TOKEN('INSTALLED_PART',l_item,false);
2439: FND_MESSAGE.SET_TOKEN('INSTALLED_SERIAL',l_serial,false);
2440: ELSE
2441: FND_MESSAGE.SET_NAME('AHL', 'AHL_PRD_BLK_PC_REM_ERR');
2442: --FND_MESSAGE.SET_TOKEN('REMOVED_INSTANCE_NUM',P_X_PARTS_REC_TBL(j).REMOVED_INSTANCE_NUM,false);
2443: IF(P_X_PARTS_REC_TBL(j).REMOVED_INSTANCE_NUM IS NOT NULL)THEN

Line 2441: FND_MESSAGE.SET_NAME('AHL', 'AHL_PRD_BLK_PC_REM_ERR');

2437: END IF;
2438: FND_MESSAGE.SET_TOKEN('INSTALLED_PART',l_item,false);
2439: FND_MESSAGE.SET_TOKEN('INSTALLED_SERIAL',l_serial,false);
2440: ELSE
2441: FND_MESSAGE.SET_NAME('AHL', 'AHL_PRD_BLK_PC_REM_ERR');
2442: --FND_MESSAGE.SET_TOKEN('REMOVED_INSTANCE_NUM',P_X_PARTS_REC_TBL(j).REMOVED_INSTANCE_NUM,false);
2443: IF(P_X_PARTS_REC_TBL(j).REMOVED_INSTANCE_NUM IS NOT NULL)THEN
2444: OPEN item_info_csr(P_X_PARTS_REC_TBL(j).REMOVED_INSTANCE_NUM);
2445: FETCH item_info_csr INTO l_item,l_serial;

Line 2442: --FND_MESSAGE.SET_TOKEN('REMOVED_INSTANCE_NUM',P_X_PARTS_REC_TBL(j).REMOVED_INSTANCE_NUM,false);

2438: FND_MESSAGE.SET_TOKEN('INSTALLED_PART',l_item,false);
2439: FND_MESSAGE.SET_TOKEN('INSTALLED_SERIAL',l_serial,false);
2440: ELSE
2441: FND_MESSAGE.SET_NAME('AHL', 'AHL_PRD_BLK_PC_REM_ERR');
2442: --FND_MESSAGE.SET_TOKEN('REMOVED_INSTANCE_NUM',P_X_PARTS_REC_TBL(j).REMOVED_INSTANCE_NUM,false);
2443: IF(P_X_PARTS_REC_TBL(j).REMOVED_INSTANCE_NUM IS NOT NULL)THEN
2444: OPEN item_info_csr(P_X_PARTS_REC_TBL(j).REMOVED_INSTANCE_NUM);
2445: FETCH item_info_csr INTO l_item,l_serial;
2446: CLOSE item_info_csr;

Line 2451: FND_MESSAGE.SET_TOKEN('REMOVED_PART',l_item,false);

2447: ELSE
2448: l_item := '';
2449: l_serial := '';
2450: END IF;
2451: FND_MESSAGE.SET_TOKEN('REMOVED_PART',l_item,false);
2452: FND_MESSAGE.SET_TOKEN('REMOVED_SERIAL',l_serial,false);
2453: END IF;
2454: FND_MESSAGE.SET_TOKEN('OPERATION_SEQUENCE_NUM',P_X_PARTS_REC_TBL(j).OPERATION_SEQUENCE_NUM,false);
2455: --FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_INSTANCE_NUM',P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM,false);

Line 2452: FND_MESSAGE.SET_TOKEN('REMOVED_SERIAL',l_serial,false);

2448: l_item := '';
2449: l_serial := '';
2450: END IF;
2451: FND_MESSAGE.SET_TOKEN('REMOVED_PART',l_item,false);
2452: FND_MESSAGE.SET_TOKEN('REMOVED_SERIAL',l_serial,false);
2453: END IF;
2454: FND_MESSAGE.SET_TOKEN('OPERATION_SEQUENCE_NUM',P_X_PARTS_REC_TBL(j).OPERATION_SEQUENCE_NUM,false);
2455: --FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_INSTANCE_NUM',P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM,false);
2456: IF(P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM IS NOT NULL)THEN

Line 2454: FND_MESSAGE.SET_TOKEN('OPERATION_SEQUENCE_NUM',P_X_PARTS_REC_TBL(j).OPERATION_SEQUENCE_NUM,false);

2450: END IF;
2451: FND_MESSAGE.SET_TOKEN('REMOVED_PART',l_item,false);
2452: FND_MESSAGE.SET_TOKEN('REMOVED_SERIAL',l_serial,false);
2453: END IF;
2454: FND_MESSAGE.SET_TOKEN('OPERATION_SEQUENCE_NUM',P_X_PARTS_REC_TBL(j).OPERATION_SEQUENCE_NUM,false);
2455: --FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_INSTANCE_NUM',P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM,false);
2456: IF(P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM IS NOT NULL)THEN
2457: OPEN item_info_csr(P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM);
2458: FETCH item_info_csr INTO l_item,l_serial;

Line 2455: --FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_INSTANCE_NUM',P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM,false);

2451: FND_MESSAGE.SET_TOKEN('REMOVED_PART',l_item,false);
2452: FND_MESSAGE.SET_TOKEN('REMOVED_SERIAL',l_serial,false);
2453: END IF;
2454: FND_MESSAGE.SET_TOKEN('OPERATION_SEQUENCE_NUM',P_X_PARTS_REC_TBL(j).OPERATION_SEQUENCE_NUM,false);
2455: --FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_INSTANCE_NUM',P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM,false);
2456: IF(P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM IS NOT NULL)THEN
2457: OPEN item_info_csr(P_X_PARTS_REC_TBL(j).PARENT_INSTALLED_INSTANCE_NUM);
2458: FETCH item_info_csr INTO l_item,l_serial;
2459: CLOSE item_info_csr;

Line 2464: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_PART',l_item,false);

2460: ELSE
2461: l_item := '';
2462: l_serial := '';
2463: END IF;
2464: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_PART',l_item,false);
2465: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_SERIAL',l_serial,false);
2466: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE := FND_MESSAGE.get;
2467: IF(l_MSG_COUNT = 1)THEN
2468: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE := X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE || l_MSG_DATA ;

Line 2465: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_SERIAL',l_serial,false);

2461: l_item := '';
2462: l_serial := '';
2463: END IF;
2464: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_PART',l_item,false);
2465: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_SERIAL',l_serial,false);
2466: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE := FND_MESSAGE.get;
2467: IF(l_MSG_COUNT = 1)THEN
2468: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE := X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE || l_MSG_DATA ;
2469: ELSE

Line 2466: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE := FND_MESSAGE.get;

2462: l_serial := '';
2463: END IF;
2464: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_PART',l_item,false);
2465: FND_MESSAGE.SET_TOKEN('PARENT_INSTALLED_SERIAL',l_serial,false);
2466: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE := FND_MESSAGE.get;
2467: IF(l_MSG_COUNT = 1)THEN
2468: X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE := X_ERROR_MSG_TBL(l_error_msg_index).MESSAGE || l_MSG_DATA ;
2469: ELSE
2470: FOR i IN 1..l_MSG_COUNT LOOP

Line 2504: FND_MESSAGE.Set_Name('AHL', 'AHL_PRD_BLK_PC_ERRORS');

2500: -- Initialize message list if p_init_msg_list is set to TRUE
2501: IF FND_API.TO_BOOLEAN(P_INIT_MSG_LIST) THEN
2502: FND_MSG_PUB.INITIALIZE;
2503: END IF;
2504: FND_MESSAGE.Set_Name('AHL', 'AHL_PRD_BLK_PC_ERRORS');
2505: FND_MSG_PUB.ADD;
2506: RAISE FND_API.G_EXC_ERROR;
2507: END IF;
2508: -- Standard check of p_commit