eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.AHL_DI_SUBSCRIPTION_PVT dependencies on FND_MSG_PUB

Line 267: FND_MSG_PUB.ADD;

263: AND l_document_id IS NULL))
264:
265: THEN
266: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOCUMENT_ID_NULL');
267: FND_MSG_PUB.ADD;
268: END IF;
269: -- This condition checks Status Code, When the action is insert or update
270: IF ((p_subscription_id IS NULL AND
271: p_status_code IS NULL) OR

Line 277: FND_MSG_PUB.ADD;

273: (p_subscription_id IS NOT NULL
274: AND l_status_code IS NULL))
275: THEN
276: FND_MESSAGE.SET_NAME('AHL','AHL_DI_STATUS_CODE_NULL');
277: FND_MSG_PUB.ADD;
278: END IF;
279:
280: -- Perf Fixes for 4919023
281: /*

Line 306: FND_MSG_PUB.ADD;

302: AND p_quantity IS NULL))
303: THEN
304: FND_MESSAGE.SET_NAME('AHL','AHL_DI_QUAN_REQID_NULL');
305: FND_MESSAGE.SET_TOKEN('REQ',l_requested_by_name);
306: FND_MSG_PUB.ADD;
307: END IF;
308:
309:
310: -- Enhancement #2525108: check PO Number against PO Numbers in PO_PURCHASE_ORDER_V: pbarman april 2003

Line 320: FND_MSG_PUB.ADD;

316: OPEN for_ponumber_id(p_purchase_order_no);
317: FETCH for_ponumber_id INTO l_purchase_order_no;
318: IF for_ponumber_id%NOTFOUND THEN
319: FND_MESSAGE.SET_NAME('AHL','AHL_DI_PO_NUM_NOT_EXISTS');
320: FND_MSG_PUB.ADD;
321: END IF;
322: CLOSE for_ponumber_id;
323: END IF;
324: END IF;

Line 347: FND_MSG_PUB.ADD;

343: FETCH subc_from_pty_info INTO l_dummy;
344: IF subc_from_pty_info%NOTFOUND
345: THEN
346: FND_MESSAGE.SET_NAME('AHL','AHL_DI_SUB_PTY_ID_INVALID');
347: FND_MSG_PUB.ADD;
348: END IF;
349: CLOSE subc_from_pty_info;
350: END IF;
351: --Validates Requested by

Line 361: FND_MSG_PUB.ADD;

357: AND l_requested_by_party_id IS NULL))
358: THEN
359:
360: FND_MESSAGE.SET_NAME('AHL','AHL_DI_REQUES_BY_PARTY_ID_NULL');
361: FND_MSG_PUB.ADD;
362: END IF;
363: -- Validates the Quantity Field
364: IF p_quantity IS NOT NULL
365: OR

Line 373: FND_MSG_PUB.ADD;

369: --FND_MESSAGE.SET_NAME('AHL','AHL_DI_QUANTITY_INVALID');
370:
371: FND_MESSAGE.SET_NAME('AHL','AHL_DI_QUAN_REQID_NULL');
372: FND_MESSAGE.SET_TOKEN('REQ',l_requested_by_name);
373: FND_MSG_PUB.ADD;
374: END IF;
375: END IF;
376: -- Validations for start date
377: IF (p_start_date IS NOT NULL

Line 390: FND_MSG_PUB.ADD;

386: IF(p_start_date > nvl(l_end_date, p_start_date)) OR
387: (l_start_date > nvl(l_end_date,l_start_date))
388: THEN
389: FND_MESSAGE.SET_NAME('AHL','AHL_DI_INVALID_DATE');
390: FND_MSG_PUB.ADD;
391: END IF;
392: */
393: IF(p_start_date >= nvl(l_end_date, p_start_date)) OR
394: (l_start_date >= nvl(l_end_date,l_start_date))

Line 397: FND_MSG_PUB.ADD;

393: IF(p_start_date >= nvl(l_end_date, p_start_date)) OR
394: (l_start_date >= nvl(l_end_date,l_start_date))
395: THEN
396: FND_MESSAGE.SET_NAME('AHL','AHL_DI_INVALID_DATE_RANGE');
397: FND_MSG_PUB.ADD;
398: END IF;
399:
400: --Modified pjha 12-Jun-2002 for date range check and for picking right message bug# 2314334 End
401: END IF;

Line 410: FND_MSG_PUB.ADD;

406: FETCH get_status_code INTO l_dummy;
407: IF get_status_code%NOTFOUND
408: THEN
409: FND_MESSAGE.SET_NAME('AHL','AHL_DI_STATUS_CODE_NOT_EXISTS');
410: FND_MSG_PUB.ADD;
411: END IF;
412: CLOSE get_status_code;
413: END IF;
414: -- This condition checks the document id exists in ahl documents table

Line 422: FND_MSG_PUB.ADD;

418: FETCH Check_doc_info INTO l_dummy;
419: IF Check_doc_info%NOTFOUND
420: THEN
421: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOCUMENT_ID_NOT_EXISTS');
422: FND_MSG_PUB.ADD;
423: END IF;
424: CLOSE Check_doc_info;
425: END IF;
426: -- Checks for existence of status code in fnd lookups

Line 434: FND_MSG_PUB.ADD;

430: FETCH get_media_type_code INTO l_dummy;
431: IF get_media_type_code%NOTFOUND
432: THEN
433: FND_MESSAGE.SET_NAME('AHL','AHL_DI_MEDTYP_CODE_NOT_EXISTS');
434: FND_MSG_PUB.ADD;
435: END IF;
436: CLOSE get_media_type_code;
437: END IF;
438: -- Checks for existence of subscription type code in fnd lookups

Line 446: FND_MSG_PUB.ADD;

442: FETCH get_sub_type_code INTO l_dummy;
443: IF get_sub_type_code%NOTFOUND
444: THEN
445: FND_MESSAGE.SET_NAME('AHL','AHL_DI_SUBTYP_CODE_NOT_EXISTS');
446: FND_MSG_PUB.ADD;
447: END IF;
448: CLOSE get_sub_type_code;
449: END IF;
450: -- Checks for existence of frequency code in fnd lookups

Line 458: FND_MSG_PUB.ADD;

454: FETCH get_frequency_code INTO l_dummy;
455: IF get_frequency_code%NOTFOUND
456: THEN
457: FND_MESSAGE.SET_NAME('AHL','AHL_DI_FREQCY_CODE_NOT_EXISTS');
458: FND_MSG_PUB.ADD;
459: END IF;
460: CLOSE get_frequency_code;
461: END IF;
462: -- Checks for Duplicate Record, when inserting new subscription record

Line 479: FND_MSG_PUB.ADD;

475: */
476:
477: FND_MESSAGE.SET_NAME('AHL','AHL_DI_SUBS_DUP_RECORD');
478: FND_MESSAGE.SET_TOKEN('REQID',l_requested_by_name);
479: FND_MSG_PUB.ADD;
480: END IF;
481: CLOSE dup_rec;
482: END IF;
483: END IF;

Line 536: FND_MSG_PUB.initialize;

532: END IF;
533: -- Standard call to check for call compatibility.
534: IF FND_API.to_boolean(p_init_msg_list)
535: THEN
536: FND_MSG_PUB.initialize;
537: END IF;
538: -- Initialize API return status to success
539: x_return_status := FND_API.G_RET_STS_SUCCESS;
540: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 570: l_msg_count := FND_MSG_PUB.count_msg;

566: p_delete_flag =>p_x_subscription_tbl(i).delete_flag
567: );
568: END LOOP;
569: -- Standard call to get message count and if count is get message info.
570: l_msg_count := FND_MSG_PUB.count_msg;
571:
572: IF l_msg_count > 0 THEN
573: X_msg_count := l_msg_count;
574: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 794: l_msg_count := FND_MSG_PUB.count_msg;

790: --Assign the values
791: p_x_subscription_tbl(i).subscription_id := l_subscription_id;
792: p_x_subscription_tbl(i).object_version_number := 1;
793: --
794: l_msg_count := FND_MSG_PUB.count_msg;
795: IF l_msg_count > 0 THEN
796: X_msg_count := l_msg_count;
797: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
798: RAISE FND_API.G_EXC_ERROR;

Line 822: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

818: EXCEPTION
819: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
820: ROLLBACK TO create_subscription;
821: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
822: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
823: p_count => x_msg_count,
824: p_data => x_msg_data);
825:
826: IF G_DEBUG='Y' THEN

Line 839: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

835:
836: WHEN FND_API.G_EXC_ERROR THEN
837: ROLLBACK TO create_subscription;
838: X_return_status := FND_API.G_RET_STS_ERROR;
839: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
840: p_count => x_msg_count,
841: p_data => X_msg_data);
842: -- Debug info.
843: IF G_DEBUG='Y' THEN

Line 858: FND_MSG_PUB.ADD;

854: WHEN DUP_VAL_ON_INDEX THEN
855: ROLLBACK TO create_subscription;
856: X_return_status := FND_API.G_RET_STS_ERROR;
857: FND_MESSAGE.SET_NAME('AHL','AHL_DI_SUBSC_DUP_RECORD');
858: FND_MSG_PUB.ADD;
859: -- Check if API is called in debug mode. If yes, disable debug.
860: IF G_DEBUG='Y' THEN
861: AHL_DEBUG_PUB.disable_debug;
862:

Line 869: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

865:
866: WHEN OTHERS THEN
867: ROLLBACK TO create_subscription;
868: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
869: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
870: THEN
871: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_SUBSCRIPTION_PVT',
872: p_procedure_name => 'CREATE_SUBSCRIPTION',
873: p_error_text => SUBSTR(SQLERRM,1,240));

Line 871: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_SUBSCRIPTION_PVT',

867: ROLLBACK TO create_subscription;
868: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
869: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
870: THEN
871: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_SUBSCRIPTION_PVT',
872: p_procedure_name => 'CREATE_SUBSCRIPTION',
873: p_error_text => SUBSTR(SQLERRM,1,240));
874: END IF;
875: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 875: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

871: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_SUBSCRIPTION_PVT',
872: p_procedure_name => 'CREATE_SUBSCRIPTION',
873: p_error_text => SUBSTR(SQLERRM,1,240));
874: END IF;
875: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
876: p_count => x_msg_count,
877: p_data => X_msg_data);
878: -- Debug info.
879: IF G_DEBUG='Y' THEN

Line 1042: FND_MSG_PUB.initialize;

1038: END IF;
1039: -- Standard call to check for call compatibility.
1040: IF FND_API.to_boolean(p_init_msg_list)
1041: THEN
1042: FND_MSG_PUB.initialize;
1043: END IF;
1044: -- Initialize API return status to success
1045: x_return_status := 'S';
1046: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 1125: FND_MSG_PUB.ADD;

1121: END IF;
1122:
1123: FND_MESSAGE.SET_NAME('AHL','AHL_DI_SUBS_DUP_RECORD');
1124: FND_MESSAGE.SET_TOKEN('REQID',l_requested_by_name);
1125: FND_MSG_PUB.ADD;
1126: END IF;
1127: END IF;
1128: END LOOP;
1129: IF (l_dup_flag = 'N') THEN

Line 1149: FND_MSG_PUB.ADD;

1145: END IF;
1146:
1147: FND_MESSAGE.SET_NAME('AHL','AHL_DI_SUBS_DUP_RECORD');
1148: FND_MESSAGE.SET_TOKEN('REQID',l_requested_by_name);
1149: FND_MSG_PUB.ADD;
1150: END IF;
1151: l_dup_flag := 'N';
1152: END IF;
1153: CLOSE get_old_sub;

Line 1158: l_msg_count := FND_MSG_PUB.count_msg;

1154: END IF;
1155: END LOOP;
1156: --End of Validations
1157: -- Standard call to get message count
1158: l_msg_count := FND_MSG_PUB.count_msg;
1159:
1160: IF l_msg_count > 0 THEN
1161: X_msg_count := l_msg_count;
1162: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1183: FND_MSG_PUB.ADD;

1179: -- updating same record...02/05/02
1180: if (l_subscription_info.object_version_number <>p_x_subscription_tbl(i).object_version_number)
1181: then
1182: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
1183: FND_MSG_PUB.ADD;
1184: RAISE FND_API.G_EXC_ERROR;
1185: end if;
1186: -- The following conditions compare the new record value with old record
1187: -- value, if its different then assign the new value else continue

Line 1407: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1403: EXCEPTION
1404: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1405: ROLLBACK TO modify_subscription;
1406: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1407: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1408: p_count => x_msg_count,
1409: p_data => x_msg_data);
1410:
1411: IF G_DEBUG='Y' THEN

Line 1424: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1420:
1421: WHEN FND_API.G_EXC_ERROR THEN
1422: ROLLBACK TO modify_subscription;
1423: X_return_status := FND_API.G_RET_STS_ERROR;
1424: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1425: p_count => x_msg_count,
1426: p_data => X_msg_data);
1427: -- Debug info.
1428: IF G_DEBUG='Y' THEN

Line 1441: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

1437:
1438: WHEN OTHERS THEN
1439: ROLLBACK TO modify_subscription;
1440: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1441: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1442: THEN
1443: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_SUBSCRIPTION_PVT',
1444: p_procedure_name => 'MODIFY_SUBSCRIPTION',
1445: p_error_text => SUBSTR(SQLERRM,1,240));

Line 1443: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_SUBSCRIPTION_PVT',

1439: ROLLBACK TO modify_subscription;
1440: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1441: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1442: THEN
1443: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_SUBSCRIPTION_PVT',
1444: p_procedure_name => 'MODIFY_SUBSCRIPTION',
1445: p_error_text => SUBSTR(SQLERRM,1,240));
1446: END IF;
1447: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 1447: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1443: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_SUBSCRIPTION_PVT',
1444: p_procedure_name => 'MODIFY_SUBSCRIPTION',
1445: p_error_text => SUBSTR(SQLERRM,1,240));
1446: END IF;
1447: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1448: p_count => x_msg_count,
1449: p_data => X_msg_data);
1450:
1451: -- Debug info.

Line 1507: FND_MSG_PUB.initialize;

1503: SAVEPOINT delete_subscriptions;
1504: -- Standard call to check for call compatibility.
1505: IF FND_API.to_boolean(p_init_msg_list)
1506: THEN
1507: FND_MSG_PUB.initialize;
1508: END IF;
1509: -- Initialize API return status to success
1510: x_return_status := 'S';
1511: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 1532: FND_MSG_PUB.ADD;

1528:
1529: IF (get_sub_rec_b_info%NOTFOUND)
1530: THEN
1531: FND_MESSAGE.SET_NAME('AHL','AHL_DI_SUB_RECORD_NOT_EXISTS');
1532: FND_MSG_PUB.ADD;
1533: END IF;
1534: CLOSE get_sub_rec_b_info;
1535: /* No need, it's done in modify document
1536: -- Check for version number

Line 1540: FND_MSG_PUB.ADD;

1536: -- Check for version number
1537: IF (l_object_version_number <> p_x_subscription_tbl(i).object_version_number)
1538: THEN
1539: FND_MESSAGE.SET_NAME('AHL','AHL_DI_SUB_RECORD_CHANGED');
1540: FND_MSG_PUB.ADD;
1541: END IF;
1542: */
1543: -- Validate with end date
1544: /* Not required, user should be able to delete subscriptions

Line 1549: FND_MSG_PUB.ADD;

1545: after they have become obsolete: pjha 09-Jul-2002
1546: IF (l_end_date IS NOT NULL AND l_end_date < sysdate )
1547: THEN
1548: FND_MESSAGE.SET_NAME('AHL','AHL_DI_SUB_RECORD_CLOSED');
1549: FND_MSG_PUB.ADD;
1550: END IF;
1551: */
1552: /* Not required
1553: -- Check for start date

Line 1557: FND_MSG_PUB.ADD;

1553: -- Check for start date
1554: IF l_start_date IS NULL
1555: THEN
1556: FND_MESSAGE.SET_NAME('AHL','AHL_DI_START_DATE_INVALID');
1557: FND_MSG_PUB.ADD;
1558: END IF;
1559:
1560: --Check for End Date
1561: IF (TRUNC(NVL(l_end_date, SYSDATE)) >

Line 1565: FND_MSG_PUB.ADD;

1561: IF (TRUNC(NVL(l_end_date, SYSDATE)) >
1562: TRUNC(NVL(p_x_subscription_tbl(i).end_date,SYSDATE)))
1563: THEN
1564: FND_MESSAGE.SET_NAME('AHL','AHL_DI_SUB_E_DATE_INVALID');
1565: FND_MSG_PUB.ADD;
1566: END IF;
1567: */
1568: -- Update the end date in subscriptions table
1569: -- Modified pjha 15-May-2002 for modifying 'subscribed to' Begin

Line 1596: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1592: EXCEPTION
1593: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1594: ROLLBACK TO delete_subscription;
1595: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1596: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1597: p_count => x_msg_count,
1598: p_data => x_msg_data);
1599:
1600: WHEN FND_API.G_EXC_ERROR THEN

Line 1603: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1599:
1600: WHEN FND_API.G_EXC_ERROR THEN
1601: ROLLBACK TO delete_subscription;
1602: X_return_status := FND_API.G_RET_STS_ERROR;
1603: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1604: p_count => x_msg_count,
1605: p_data => X_msg_data);
1606: WHEN OTHERS THEN
1607: ROLLBACK TO delete_subscription;

Line 1609: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

1605: p_data => X_msg_data);
1606: WHEN OTHERS THEN
1607: ROLLBACK TO delete_subscription;
1608: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1609: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1610: THEN
1611: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_SUBSCRIPTION_PVT',
1612: p_procedure_name => 'DELETE_SUBSCRIPTION',
1613: p_error_text => SUBSTR(SQLERRM,1,240));

Line 1611: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_SUBSCRIPTION_PVT',

1607: ROLLBACK TO delete_subscription;
1608: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1609: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1610: THEN
1611: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_SUBSCRIPTION_PVT',
1612: p_procedure_name => 'DELETE_SUBSCRIPTION',
1613: p_error_text => SUBSTR(SQLERRM,1,240));
1614: END IF;
1615: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 1615: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1611: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_SUBSCRIPTION_PVT',
1612: p_procedure_name => 'DELETE_SUBSCRIPTION',
1613: p_error_text => SUBSTR(SQLERRM,1,240));
1614: END IF;
1615: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1616: p_count => x_msg_count,
1617: p_data => X_msg_data);
1618:
1619: END DELETE_SUBSCRIPTION;