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_MEL_CDL_HEADERS_PVT dependencies on FND_MSG_PUB

Line 91: FND_MSG_PUB.INITIALIZE;

87:
88: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
89: IF FND_API.TO_BOOLEAN(p_init_msg_list)
90: THEN
91: FND_MSG_PUB.INITIALIZE;
92: END IF;
93:
94: -- Log API entry point
95: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)

Line 114: FND_MSG_PUB.ADD;

110: THEN
111: CLOSE check_pc_right;
112: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_PC_INVALID');
113: -- MEL/CDL can only be associated to nodes of primary complete Product Classifications of unit association type.
114: FND_MSG_PUB.ADD;
115: RAISE FND_API.G_EXC_ERROR;
116: END IF;
117: CLOSE check_pc_right;
118:

Line 129: FND_MSG_PUB.ADD;

125: THEN
126: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_EXISTS');
127: -- TYPE is already associated with the Product Classification Node
128: FND_MESSAGE.SET_TOKEN('TYPE', p_x_mel_cdl_header_rec.mel_cdl_type_code);
129: FND_MSG_PUB.ADD;
130: END IF;
131: CLOSE check_can_create;
132:
133: -- Verify revision is unique across all revisions of MEL/CDL

Line 141: FND_MSG_PUB.ADD;

137: IF (p_x_mel_cdl_header_rec.revision_date IS NULL OR p_x_mel_cdl_header_rec.revision_date = FND_API.G_MISS_DATE)
138: THEN
139: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_REV_DATE_MAND');
140: -- MEL/CDL revision date is mandatory
141: FND_MSG_PUB.ADD;
142: END IF;
143:
144: -- Verify expiration date is greater than revision date
145: IF (nvl(p_x_mel_cdl_header_rec.expired_date, p_x_mel_cdl_header_rec.revision_date) < p_x_mel_cdl_header_rec.revision_date)

Line 149: FND_MSG_PUB.ADD;

145: IF (nvl(p_x_mel_cdl_header_rec.expired_date, p_x_mel_cdl_header_rec.revision_date) < p_x_mel_cdl_header_rec.revision_date)
146: THEN
147: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_EXP_DATE_LESS');
148: -- MEL/CDL expiration date should be greater than revision date
149: FND_MSG_PUB.ADD;
150: END IF;
151:
152: -- Check Error Message stack.
153: x_msg_count := FND_MSG_PUB.count_msg;

Line 153: x_msg_count := FND_MSG_PUB.count_msg;

149: FND_MSG_PUB.ADD;
150: END IF;
151:
152: -- Check Error Message stack.
153: x_msg_count := FND_MSG_PUB.count_msg;
154: IF (x_msg_count > 0)
155: THEN
156: RAISE FND_API.G_EXC_ERROR;
157: END IF;

Line 270: x_msg_count := FND_MSG_PUB.count_msg;

266: );
267: END IF;
268:
269: -- Check Error Message stack.
270: x_msg_count := FND_MSG_PUB.count_msg;
271: IF (x_msg_count > 0)
272: THEN
273: RAISE FND_API.G_EXC_ERROR;
274: END IF;

Line 283: FND_MSG_PUB.count_and_get

279: COMMIT WORK;
280: END IF;
281:
282: -- Standard call to get message count and if count is 1, get message info
283: FND_MSG_PUB.count_and_get
284: (
285: p_count => x_msg_count,
286: p_data => x_msg_data,
287: p_encoded => FND_API.G_FALSE

Line 294: FND_MSG_PUB.count_and_get

290: EXCEPTION
291: WHEN FND_API.G_EXC_ERROR THEN
292: x_return_status := FND_API.G_RET_STS_ERROR;
293: Rollback to Create_Mel_Cdl_SP;
294: FND_MSG_PUB.count_and_get
295: (
296: p_count => x_msg_count,
297: p_data => x_msg_data,
298: p_encoded => FND_API.G_FALSE

Line 304: FND_MSG_PUB.count_and_get

300:
301: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
303: Rollback to Create_Mel_Cdl_SP;
304: FND_MSG_PUB.count_and_get
305: (
306: p_count => x_msg_count,
307: p_data => x_msg_data,
308: p_encoded => FND_API.G_FALSE

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

310:
311: WHEN OTHERS THEN
312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
313: Rollback to Create_Mel_Cdl_SP;
314: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
315: THEN
316: FND_MSG_PUB.add_exc_msg
317: (
318: p_pkg_name => G_PKG_NAME,

Line 316: FND_MSG_PUB.add_exc_msg

312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
313: Rollback to Create_Mel_Cdl_SP;
314: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
315: THEN
316: FND_MSG_PUB.add_exc_msg
317: (
318: p_pkg_name => G_PKG_NAME,
319: p_procedure_name => 'Create_Mel_Cdl',
320: p_error_text => SUBSTR(SQLERRM,1,240)

Line 323: FND_MSG_PUB.count_and_get

319: p_procedure_name => 'Create_Mel_Cdl',
320: p_error_text => SUBSTR(SQLERRM,1,240)
321: );
322: END IF;
323: FND_MSG_PUB.count_and_get
324: (
325: p_count => x_msg_count,
326: p_data => x_msg_data,
327: p_encoded => FND_API.G_FALSE

Line 412: FND_MSG_PUB.INITIALIZE;

408:
409: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
410: IF FND_API.TO_BOOLEAN(p_init_msg_list)
411: THEN
412: FND_MSG_PUB.INITIALIZE;
413: END IF;
414:
415: -- Log API entry point
416: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)

Line 448: FND_MSG_PUB.ADD;

444: ELSIF (l_pc_node_id <> p_x_mel_cdl_header_rec.pc_node_id)
445: THEN
446: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_PC_ASSOC_NOTCHG');
447: -- Cannot modify MEL/CDL association to Product Classification node
448: FND_MSG_PUB.ADD;
449: RAISE FND_API.G_EXC_ERROR;
450: END IF;
451:
452: -- Verify only DRAFT/APPROVAL_PENDING MEL/CDL is being modified

Line 457: FND_MSG_PUB.ADD;

453: IF (l_status NOT IN ('DRAFT','APPROVAL_REJECTED'))
454: THEN
455: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_NOT_DRAFT_UPD');
456: -- Cannot update MEL/CDL not in draft or approval rejected status
457: FND_MSG_PUB.ADD;
458: RAISE FND_API.G_EXC_ERROR;
459: END IF;
460:
461: -- Verify MEL/CDL type is not null and exists as lookup

Line 474: FND_MSG_PUB.ADD;

470: THEN
471: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_OTH_EXISTS');
472: -- A TYPE is already associated with the Product Classification Node, hence cannot modify MEL/CDL type
473: FND_MESSAGE.SET_TOKEN('TYPE', p_x_mel_cdl_header_rec.mel_cdl_type_code);
474: FND_MSG_PUB.ADD;
475: RAISE FND_API.G_EXC_ERROR;
476: ELSE
477: -- This means that the changed MEL/CDL is the 1st revision of the changed type, hence default version number
478: p_x_mel_cdl_header_rec.version_number := 1;

Line 491: FND_MSG_PUB.ADD;

487: IF (p_x_mel_cdl_header_rec.revision_date IS NULL OR p_x_mel_cdl_header_rec.revision_date = FND_API.G_MISS_DATE)
488: THEN
489: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_REV_DATE_MAND');
490: -- MEL/CDL revision date is mandatory
491: FND_MSG_PUB.ADD;
492: ELSIF (p_x_mel_cdl_header_rec.revision_date <= nvl(l_prev_rev_date, p_x_mel_cdl_header_rec.revision_date - 1))
493: THEN
494: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_REV_DATE_LESS');
495: -- MEL/CDL revision date cannot be less than that of the prior revision

Line 496: FND_MSG_PUB.ADD;

492: ELSIF (p_x_mel_cdl_header_rec.revision_date <= nvl(l_prev_rev_date, p_x_mel_cdl_header_rec.revision_date - 1))
493: THEN
494: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_REV_DATE_LESS');
495: -- MEL/CDL revision date cannot be less than that of the prior revision
496: FND_MSG_PUB.ADD;
497: END IF;
498:
499: -- Verify expiration date is greater than revision date
500: IF (nvl(p_x_mel_cdl_header_rec.expired_date, p_x_mel_cdl_header_rec.revision_date) < p_x_mel_cdl_header_rec.revision_date)

Line 504: FND_MSG_PUB.ADD;

500: IF (nvl(p_x_mel_cdl_header_rec.expired_date, p_x_mel_cdl_header_rec.revision_date) < p_x_mel_cdl_header_rec.revision_date)
501: THEN
502: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_EXP_DATE_LESS');
503: -- MEL/CDL expiration date should be greater than revision date
504: FND_MSG_PUB.ADD;
505: END IF;
506:
507: -- Check Error Message stack.
508: x_msg_count := FND_MSG_PUB.count_msg;

Line 508: x_msg_count := FND_MSG_PUB.count_msg;

504: FND_MSG_PUB.ADD;
505: END IF;
506:
507: -- Check Error Message stack.
508: x_msg_count := FND_MSG_PUB.count_msg;
509: IF (x_msg_count > 0)
510: THEN
511: RAISE FND_API.G_EXC_ERROR;
512: END IF;

Line 580: x_msg_count := FND_MSG_PUB.count_msg;

576: );
577: END IF;
578:
579: -- Check Error Message stack.
580: x_msg_count := FND_MSG_PUB.count_msg;
581: IF (x_msg_count > 0)
582: THEN
583: RAISE FND_API.G_EXC_ERROR;
584: END IF;

Line 593: FND_MSG_PUB.count_and_get

589: COMMIT WORK;
590: END IF;
591:
592: -- Standard call to get message count and if count is 1, get message info
593: FND_MSG_PUB.count_and_get
594: (
595: p_count => x_msg_count,
596: p_data => x_msg_data,
597: p_encoded => FND_API.G_FALSE

Line 604: FND_MSG_PUB.count_and_get

600: EXCEPTION
601: WHEN FND_API.G_EXC_ERROR THEN
602: x_return_status := FND_API.G_RET_STS_ERROR;
603: Rollback to Update_Mel_Cdl_SP;
604: FND_MSG_PUB.count_and_get
605: (
606: p_count => x_msg_count,
607: p_data => x_msg_data,
608: p_encoded => FND_API.G_FALSE

Line 614: FND_MSG_PUB.count_and_get

610:
611: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
612: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
613: Rollback to Update_Mel_Cdl_SP;
614: FND_MSG_PUB.count_and_get
615: (
616: p_count => x_msg_count,
617: p_data => x_msg_data,
618: p_encoded => FND_API.G_FALSE

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

620:
621: WHEN OTHERS THEN
622: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
623: Rollback to Update_Mel_Cdl_SP;
624: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
625: THEN
626: FND_MSG_PUB.add_exc_msg
627: (
628: p_pkg_name => G_PKG_NAME,

Line 626: FND_MSG_PUB.add_exc_msg

622: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
623: Rollback to Update_Mel_Cdl_SP;
624: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
625: THEN
626: FND_MSG_PUB.add_exc_msg
627: (
628: p_pkg_name => G_PKG_NAME,
629: p_procedure_name => 'Update_Mel_Cdl',
630: p_error_text => SUBSTR(SQLERRM,1,240)

Line 633: FND_MSG_PUB.count_and_get

629: p_procedure_name => 'Update_Mel_Cdl',
630: p_error_text => SUBSTR(SQLERRM,1,240)
631: );
632: END IF;
633: FND_MSG_PUB.count_and_get
634: (
635: p_count => x_msg_count,
636: p_data => x_msg_data,
637: p_encoded => FND_API.G_FALSE

Line 704: FND_MSG_PUB.INITIALIZE;

700:
701: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
702: IF FND_API.TO_BOOLEAN(p_init_msg_list)
703: THEN
704: FND_MSG_PUB.INITIALIZE;
705: END IF;
706:
707: -- Log API entry point
708: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)

Line 732: FND_MSG_PUB.ADD;

728: IF (l_status NOT IN ('DRAFT','APPROVAL_REJECTED'))
729: THEN
730: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_NOT_DRAFT_DEL');
731: -- Cannot delete MEL/CDL not in draft or approval rejected status
732: FND_MSG_PUB.ADD;
733: RAISE FND_API.G_EXC_ERROR;
734: END IF;
735:
736: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)

Line 761: x_msg_count := FND_MSG_PUB.count_msg;

757: x_msg_data
758: );
759:
760: -- Check Error Message stack.
761: x_msg_count := FND_MSG_PUB.count_msg;
762: IF (x_msg_count > 0 OR x_return_status <> FND_API.G_RET_STS_SUCCESS)
763: THEN
764: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)
765: THEN

Line 870: x_msg_count := FND_MSG_PUB.count_msg;

866: );
867: END IF;
868:
869: -- Check Error Message stack.
870: x_msg_count := FND_MSG_PUB.count_msg;
871: IF (x_msg_count > 0)
872: THEN
873: RAISE FND_API.G_EXC_ERROR;
874: END IF;

Line 883: FND_MSG_PUB.count_and_get

879: COMMIT WORK;
880: END IF;
881:
882: -- Standard call to get message count and if count is 1, get message info
883: FND_MSG_PUB.count_and_get
884: (
885: p_count => x_msg_count,
886: p_data => x_msg_data,
887: p_encoded => FND_API.G_FALSE

Line 894: FND_MSG_PUB.count_and_get

890: EXCEPTION
891: WHEN FND_API.G_EXC_ERROR THEN
892: x_return_status := FND_API.G_RET_STS_ERROR;
893: Rollback to Delete_Mel_Cdl_SP;
894: FND_MSG_PUB.count_and_get
895: (
896: p_count => x_msg_count,
897: p_data => x_msg_data,
898: p_encoded => FND_API.G_FALSE

Line 904: FND_MSG_PUB.count_and_get

900:
901: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
903: Rollback to Delete_Mel_Cdl_SP;
904: FND_MSG_PUB.count_and_get
905: (
906: p_count => x_msg_count,
907: p_data => x_msg_data,
908: p_encoded => FND_API.G_FALSE

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

910:
911: WHEN OTHERS THEN
912: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
913: Rollback to Delete_Mel_Cdl_SP;
914: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
915: THEN
916: FND_MSG_PUB.add_exc_msg
917: (
918: p_pkg_name => G_PKG_NAME,

Line 916: FND_MSG_PUB.add_exc_msg

912: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
913: Rollback to Delete_Mel_Cdl_SP;
914: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
915: THEN
916: FND_MSG_PUB.add_exc_msg
917: (
918: p_pkg_name => G_PKG_NAME,
919: p_procedure_name => 'Delete_Mel_Cdl',
920: p_error_text => SUBSTR(SQLERRM,1,240)

Line 923: FND_MSG_PUB.count_and_get

919: p_procedure_name => 'Delete_Mel_Cdl',
920: p_error_text => SUBSTR(SQLERRM,1,240)
921: );
922: END IF;
923: FND_MSG_PUB.count_and_get
924: (
925: p_count => x_msg_count,
926: p_data => x_msg_data,
927: p_encoded => FND_API.G_FALSE

Line 1138: FND_MSG_PUB.INITIALIZE;

1134:
1135: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
1136: IF FND_API.TO_BOOLEAN(p_init_msg_list)
1137: THEN
1138: FND_MSG_PUB.INITIALIZE;
1139: END IF;
1140:
1141: -- Log API entry point
1142: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)

Line 1166: FND_MSG_PUB.ADD;

1162: IF (l_mel_cdl_rec.status_code <> 'COMPLETE')
1163: THEN
1164: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_REV_NOT_COMP');
1165: -- MEL/CDL is not complete, hence cannot create a new revision
1166: FND_MSG_PUB.ADD;
1167: END IF;
1168:
1169: -- Retrieve the max version of the MEL/CDL line for the particular PC Node
1170: SELECT nvl(max(version_number), 1)

Line 1181: FND_MSG_PUB.ADD;

1177: IF (l_max_rev <> l_mel_cdl_rec.version_number)
1178: THEN
1179: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_REV_NOT_LATEST');
1180: -- MEL/CDL is not the latest revision, hence cannot create a new revision
1181: FND_MSG_PUB.ADD;
1182: END IF;
1183:
1184: -- Check Error Message stack.
1185: x_msg_count := FND_MSG_PUB.count_msg;

Line 1185: x_msg_count := FND_MSG_PUB.count_msg;

1181: FND_MSG_PUB.ADD;
1182: END IF;
1183:
1184: -- Check Error Message stack.
1185: x_msg_count := FND_MSG_PUB.count_msg;
1186: IF (x_msg_count > 0)
1187: THEN
1188: RAISE FND_API.G_EXC_ERROR;
1189: END IF;

Line 1420: x_msg_count := FND_MSG_PUB.count_msg;

1416: x_msg_data => l_msg_data
1417: );
1418:
1419: -- Check Error Message stack.
1420: x_msg_count := FND_MSG_PUB.count_msg;
1421: IF (x_msg_count > 0 OR l_return_status <> FND_API.G_RET_STS_SUCCESS)
1422: THEN
1423: IF (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level)
1424: THEN

Line 1623: x_msg_count := FND_MSG_PUB.count_msg;

1619: END LOOP;
1620: END IF;
1621:
1622: -- Check Error Message stack.
1623: x_msg_count := FND_MSG_PUB.count_msg;
1624: IF (x_msg_count > 0)
1625: THEN
1626: RAISE FND_API.G_EXC_ERROR;
1627: END IF;

Line 1641: FND_MSG_PUB.ADD;

1637: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
1638: THEN
1639: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_OPEN_NRS_EXIST');
1640: -- There exist(s) open Non-routines for the MEL/CDL
1641: FND_MSG_PUB.ADD;
1642: END IF;
1643: -- API body ends here
1644:
1645: -- Log API exit point

Line 1663: FND_MSG_PUB.count_and_get

1659: COMMIT WORK;
1660: END IF;
1661:
1662: -- Standard call to get message count and if count is 1, get message info
1663: FND_MSG_PUB.count_and_get
1664: (
1665: p_count => x_msg_count,
1666: p_data => x_msg_data,
1667: p_encoded => FND_API.G_FALSE

Line 1674: FND_MSG_PUB.count_and_get

1670: EXCEPTION
1671: WHEN FND_API.G_EXC_ERROR THEN
1672: x_return_status := FND_API.G_RET_STS_ERROR;
1673: Rollback to Create_Mel_Cdl_Revision_SP;
1674: FND_MSG_PUB.count_and_get
1675: (
1676: p_count => x_msg_count,
1677: p_data => x_msg_data,
1678: p_encoded => FND_API.G_FALSE

Line 1684: FND_MSG_PUB.count_and_get

1680:
1681: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1683: Rollback to Create_Mel_Cdl_Revision_SP;
1684: FND_MSG_PUB.count_and_get
1685: (
1686: p_count => x_msg_count,
1687: p_data => x_msg_data,
1688: p_encoded => FND_API.G_FALSE

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

1690:
1691: WHEN OTHERS THEN
1692: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1693: Rollback to Create_Mel_Cdl_Revision_SP;
1694: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1695: THEN
1696: FND_MSG_PUB.add_exc_msg
1697: (
1698: p_pkg_name => G_PKG_NAME,

Line 1696: FND_MSG_PUB.add_exc_msg

1692: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1693: Rollback to Create_Mel_Cdl_Revision_SP;
1694: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1695: THEN
1696: FND_MSG_PUB.add_exc_msg
1697: (
1698: p_pkg_name => G_PKG_NAME,
1699: p_procedure_name => 'Create_Mel_Cdl_Revision',
1700: p_error_text => SUBSTR(SQLERRM,1,240)

Line 1703: FND_MSG_PUB.count_and_get

1699: p_procedure_name => 'Create_Mel_Cdl_Revision',
1700: p_error_text => SUBSTR(SQLERRM,1,240)
1701: );
1702: END IF;
1703: FND_MSG_PUB.count_and_get
1704: (
1705: p_count => x_msg_count,
1706: p_data => x_msg_data,
1707: p_encoded => FND_API.G_FALSE

Line 1816: FND_MSG_PUB.INITIALIZE;

1812:
1813: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
1814: IF FND_API.TO_BOOLEAN(p_init_msg_list)
1815: THEN
1816: FND_MSG_PUB.INITIALIZE;
1817: END IF;
1818:
1819: -- Log API entry point
1820: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)

Line 1854: FND_MSG_PUB.ADD;

1850: IF (l_status NOT IN ('DRAFT','APPROVAL_REJECTED'))
1851: THEN
1852: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_NOT_DRAFT_APPR');
1853: -- MEL/CDL is not in draft or approval rejected status, hence cannot submit for approval
1854: FND_MSG_PUB.ADD;
1855: RAISE FND_API.G_EXC_ERROR;
1856: END IF;
1857:
1858: -- Verify that revision of the MEL/CDL being submitted for approval is unique

Line 1866: FND_MSG_PUB.ADD;

1862: THEN
1863: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_DUP_REVISION');
1864: FND_MESSAGE.SET_TOKEN('REV', l_revision);
1865: -- An MEL/CDL with revision 'REV' is already associated with the Product Classification node
1866: FND_MSG_PUB.ADD;
1867: END IF;
1868: CLOSE check_dup_rev;
1869:
1870: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)

Line 1903: x_msg_count := FND_MSG_PUB.count_msg;

1899: );
1900: END IF;
1901:
1902: -- Check Error Message stack.
1903: x_msg_count := FND_MSG_PUB.count_msg;
1904: IF (x_msg_count > 0 OR l_return_status <> FND_API.G_RET_STS_SUCCESS)
1905: THEN
1906: RAISE FND_API.G_EXC_ERROR;
1907: END IF;

Line 2013: x_msg_count := FND_MSG_PUB.count_msg;

2009: );
2010: END IF;
2011:
2012: -- Check Error Message stack.
2013: x_msg_count := FND_MSG_PUB.count_msg;
2014: IF (x_msg_count > 0)
2015: THEN
2016: RAISE FND_API.G_EXC_ERROR;
2017: END IF;

Line 2026: FND_MSG_PUB.count_and_get

2022: COMMIT WORK;
2023: END IF;
2024:
2025: -- Standard call to get message count and if count is 1, get message info
2026: FND_MSG_PUB.count_and_get
2027: (
2028: p_count => x_msg_count,
2029: p_data => x_msg_data,
2030: p_encoded => FND_API.G_FALSE

Line 2037: FND_MSG_PUB.count_and_get

2033: EXCEPTION
2034: WHEN FND_API.G_EXC_ERROR THEN
2035: x_return_status := FND_API.G_RET_STS_ERROR;
2036: Rollback to Initiate_Mel_Cdl_Approval_SP;
2037: FND_MSG_PUB.count_and_get
2038: (
2039: p_count => x_msg_count,
2040: p_data => x_msg_data,
2041: p_encoded => FND_API.G_FALSE

Line 2047: FND_MSG_PUB.count_and_get

2043:
2044: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2045: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2046: Rollback to Initiate_Mel_Cdl_Approval_SP;
2047: FND_MSG_PUB.count_and_get
2048: (
2049: p_count => x_msg_count,
2050: p_data => x_msg_data,
2051: p_encoded => FND_API.G_FALSE

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

2053:
2054: WHEN OTHERS THEN
2055: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2056: Rollback to Initiate_Mel_Cdl_Approval_SP;
2057: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2058: THEN
2059: FND_MSG_PUB.add_exc_msg
2060: (
2061: p_pkg_name => G_PKG_NAME,

Line 2059: FND_MSG_PUB.add_exc_msg

2055: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2056: Rollback to Initiate_Mel_Cdl_Approval_SP;
2057: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2058: THEN
2059: FND_MSG_PUB.add_exc_msg
2060: (
2061: p_pkg_name => G_PKG_NAME,
2062: p_procedure_name => 'Initiate_Mel_Cdl_Approval',
2063: p_error_text => SUBSTR(SQLERRM,1,240)

Line 2066: FND_MSG_PUB.count_and_get

2062: p_procedure_name => 'Initiate_Mel_Cdl_Approval',
2063: p_error_text => SUBSTR(SQLERRM,1,240)
2064: );
2065: END IF;
2066: FND_MSG_PUB.count_and_get
2067: (
2068: p_count => x_msg_count,
2069: p_data => x_msg_data,
2070: p_encoded => FND_API.G_FALSE

Line 2101: FND_MSG_PUB.ADD;

2097: THEN
2098: CLOSE check_exists;
2099: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_NOTFOUND');
2100: -- MEL/CDL is not found
2101: FND_MSG_PUB.ADD;
2102: RAISE FND_API.G_EXC_ERROR;
2103: ELSE
2104: CLOSE check_exists;
2105: IF (l_ovn <> p_mel_cdl_object_version)

Line 2109: FND_MSG_PUB.ADD;

2105: IF (l_ovn <> p_mel_cdl_object_version)
2106: THEN
2107: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_COM_RECORD_CHANGED');
2108: -- Record has been modified by another user
2109: FND_MSG_PUB.ADD;
2110: RAISE FND_API.G_EXC_ERROR;
2111: END IF;
2112: END IF;
2113:

Line 2134: FND_MSG_PUB.ADD;

2130: IF (p_x_mel_cdl_header_rec.mel_cdl_type_meaning IS NULL OR p_x_mel_cdl_header_rec.mel_cdl_type_meaning = FND_API.G_MISS_CHAR)
2131: THEN
2132: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_TYPE_MAND');
2133: -- MEL/CDL type is mandatory
2134: FND_MSG_PUB.ADD;
2135: ELSE
2136: AHL_UTIL_MC_PKG.Convert_To_LookupCode
2137: (
2138: p_lookup_type => 'AHL_MEL_CDL_TYPE',

Line 2147: FND_MSG_PUB.ADD;

2143: IF NOT (l_ret_val)
2144: THEN
2145: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_TYPE_INV');
2146: -- MEL/CDL type is invalid
2147: FND_MSG_PUB.ADD;
2148: END IF;
2149: END IF;
2150: ELSE
2151: IF NOT (AHL_UTIL_MC_PKG.Validate_Lookup_Code('AHL_MEL_CDL_TYPE', p_x_mel_cdl_header_rec.mel_cdl_type_code))

Line 2155: FND_MSG_PUB.ADD;

2151: IF NOT (AHL_UTIL_MC_PKG.Validate_Lookup_Code('AHL_MEL_CDL_TYPE', p_x_mel_cdl_header_rec.mel_cdl_type_code))
2152: THEN
2153: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_TYPE_INV');
2154: -- MEL/CDL type is invalid
2155: FND_MSG_PUB.ADD;
2156: END IF;
2157: END IF;
2158:
2159: END Convert_Value_To_Id;

Line 2182: FND_MSG_PUB.ADD;

2178: IF (p_x_mel_cdl_header_rec.revision IS NULL OR p_x_mel_cdl_header_rec.revision = FND_API.G_MISS_CHAR)
2179: THEN
2180: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_REV_MAND');
2181: -- MEL/CDL revision is mandatory
2182: FND_MSG_PUB.ADD;
2183: ELSE
2184: OPEN check_dup_rev;
2185: FETCH check_dup_rev INTO l_dummy_varchar;
2186: IF (check_dup_rev%FOUND)

Line 2191: FND_MSG_PUB.ADD;

2187: THEN
2188: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_DUP_REVISION');
2189: FND_MESSAGE.SET_TOKEN('REV', p_x_mel_cdl_header_rec.revision);
2190: -- An MEL/CDL with revision 'REV' is already associated with the Product Classification node
2191: FND_MSG_PUB.ADD;
2192: END IF;
2193: CLOSE check_dup_rev;
2194: END IF;
2195: