DBA Data[Home] [Help]

APPS.AHL_DI_ASSO_DOC_GEN_PVT dependencies on FND_MSG_PUB

Line 252: FND_MSG_PUB.ADD;

248:
249: IF L_TYPE_CODE='PROGRAM'
250: THEN
251: FND_MESSAGE.SET_NAME('AHL','AHL_DI_MR_NOTEDITABLE');
252: FND_MSG_PUB.ADD;
253: END IF;
254: END IF;
255: END IF;
256: END IF;

Line 269: FND_MSG_PUB.ADD;

265: IF(get_doc_assos_rec_b_info%NOTFOUND)
266: THEN
267: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_TITLE_INVALID');
268: FND_MESSAGE.SET_TOKEN('RECORD',l_record);
269: FND_MSG_PUB.ADD;
270: CLOSE get_doc_assos_rec_b_info;
271: RETURN;
272: END IF;
273: CLOSE get_doc_assos_rec_b_info;

Line 287: FND_MSG_PUB.ADD;

283: FETCH get_doc_assos_ovn INTO l_object_version_number;
284: IF (get_doc_assos_ovn%NOTFOUND)
285: THEN
286: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_TL_REC_INVALID');
287: FND_MSG_PUB.ADD;
288: END IF;
289: CLOSE get_doc_assos_ovn;
290: -- Check for version number
291: IF (l_object_version_number <> p_object_version_num)

Line 294: FND_MSG_PUB.ADD;

290: -- Check for version number
291: IF (l_object_version_number <> p_object_version_num)
292: THEN
293: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_TL_REC_CHANGED');
294: FND_MSG_PUB.ADD;
295: END IF;
296: END IF;
297: /**/
298:

Line 307: --FND_MSG_PUB.ADD;

303: --FP #8410484
304: --IF l_status <> 'DRAFT' AND l_status <> 'APPROVAL_REJECTED'
305: --THEN
306: --FND_MESSAGE.SET_NAME('AHL','AHL_RM_OP_STAT_DRFT_ASO');
307: --FND_MSG_PUB.ADD;
308: --RETURN;
309: --END IF;
310: -- End of FP #8410484
311: END IF;

Line 321: --FND_MSG_PUB.ADD;

317: --FP #8410484
318: --IF l_status <> 'DRAFT' AND l_status <> 'APPROVAL_REJECTED'
319: --THEN
320: --FND_MESSAGE.SET_NAME('AHL','AHL_RM_ROU_STAT_DRFT_ASO');
321: --FND_MSG_PUB.ADD;
322: --RETURN;
323: --END IF;
324: -- End of FP #8410484
325: END IF;

Line 359: FND_MSG_PUB.ADD;

355: -- present in the table which have this association
356: IF (p_document_id <> l_document_id OR p_doc_revision_id <> l_doc_revision_id OR
357: l_aso_object_type_code <> p_aso_object_type_code OR l_aso_object_id <> p_aso_object_id) THEN
358: FND_MESSAGE.SET_NAME('AHL','AHL_DI_INVALID_ASSOC_STATUS');
359: FND_MSG_PUB.ADD;
360: RAISE FND_API.G_EXC_ERROR;
361: END IF;
362: END IF;
363: IF G_DEBUG='Y' THEN

Line 370: FND_MSG_PUB.ADD;

366: -- Document Association/Updation is only allowed in DRAFT,APPROVAL_REJECTED and COMPLETE status.
367: IF l_status <> 'DRAFT' AND l_status <> 'APPROVAL_REJECTED' AND l_status<>'COMPLETE'
368: THEN
369: FND_MESSAGE.SET_NAME('AHL','AHL_DI_OBJ_STAT_INVALID');
370: FND_MSG_PUB.ADD;
371: RETURN;
372: END IF;
373: -- End of FP #8410484
374: IF p_Doc_revision_id IS NOT NULL and p_doc_revision_id <> FND_API.G_MISS_NUM

Line 382: FND_MSG_PUB.ADD;

378: IF get_rev_dat%notfound
379: THEN
380: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_INVALID');
381: FND_MESSAGE.SET_TOKEN('field',l_record);
382: FND_MSG_PUB.ADD;
383: CLOSE get_rev_dat;
384: RETURN;
385: ELSE
386: IF TRUNC(NVL(l_rev_rec1.obsolete_date,SYSDATE+1)) <= TRUNC(sysdate)

Line 392: FND_MSG_PUB.ADD;

388: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_OBSOLETE');
389: FND_MESSAGE.SET_TOKEN('FIELD1',l_record);
390: FND_MESSAGE.SET_TOKEN('FIELD2',l_rev_Rec1.REVISION_NO);
391: --FND_MESSAGE.SET_TOKEN('RECORD',l_record);
392: FND_MSG_PUB.ADD;
393: CLOSE get_rev_dat;
394: RETURN;
395: END IF;
396: END IF;

Line 406: FND_MSG_PUB.ADD;

402: ((p_doc_title_asso_id IS NOT NULL AND
403: p_doc_title_asso_id <> FND_API.G_MISS_NUM) AND l_document_id IS NULL)
404: THEN
405: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOCUMENT_ID_NULL');
406: FND_MSG_PUB.ADD;
407: RETURN;
408: END IF;
409:
410: -- This condition checks for Aso Object Type Code is Null

Line 422: FND_MSG_PUB.ADD;

418: p_doc_title_asso_id <> FND_API.G_MISS_NUM)
419: AND l_aso_object_type_code IS NULL)
420: THEN
421: FND_MESSAGE.SET_NAME('AHL','AHL_DI_ASO_OBJECT_TYPE_NULL');
422: FND_MSG_PUB.ADD;
423: RETURN;
424: END IF;
425:
426: -- This condiiton checks for Aso Object Id Value Is Null

Line 436: FND_MSG_PUB.ADD;

432: ((p_doc_title_asso_id IS NOT NULL AND
433: p_doc_title_asso_id <> FND_API.G_MISS_NUM) AND l_aso_object_id IS NULL)
434: THEN
435: FND_MESSAGE.SET_NAME('AHL','AHL_DI_ASO_OBJECT_ID_NULL');
436: FND_MSG_PUB.ADD;
437: RETURN;
438: END IF;
439:
440: --Check for Aso Object Type Code in fnd lookups

Line 449: FND_MSG_PUB.ADD;

445: FETCH get_aso_obj_type_code INTO l_dummy;
446: IF get_aso_obj_type_code%NOTFOUND
447: THEN
448: FND_MESSAGE.SET_NAME('AHL','AHL_DI_ASO_OBJ_TYPE_NOT_EXISTS');
449: FND_MSG_PUB.ADD;
450: CLOSE get_aso_obj_type_code;
451: RETURN;
452: END IF;
453: CLOSE get_aso_obj_type_code;

Line 478: FND_MSG_PUB.ADD;

474: if l_counter1>0
475: then
476: FND_MESSAGE.SET_NAME('AHL','AHL_DI_USE_LATEST_ERROR');
477: FND_MESSAGE.SET_TOKEN('DOC_NO',l_record);
478: FND_MSG_PUB.ADD;
479: RAISE FND_API.G_EXC_ERROR;
480: elsif (l_counter>0 and p_DML_OPERATION='C') OR (l_counter>1 and p_DML_OPERATION='U')
481: then
482: open CheckLatestRevFlag(NVL(p_DOC_TITLE_ASSO_ID,0),p_aso_object_id,p_aso_object_type_code,p_document_id,NVL(p_use_latest_rev_flag,'X'));

Line 488: FND_MSG_PUB.ADD;

484: IF CheckLatestRevFlag%FOUND
485: THEN
486: FND_MESSAGE.SET_NAME('AHL','AHL_DI_USE_LATEST_ERROR');
487: FND_MESSAGE.SET_TOKEN('DOC_NO',l_record);
488: FND_MSG_PUB.ADD;
489: RAISE FND_API.G_EXC_ERROR;
490: RETURN;
491: END IF;
492: close CheckLatestRevFlag;

Line 507: FND_MSG_PUB.ADD;

503: --Obsolete document cannot be attached
504: IF l_revision_status_code = 'OBSOLETE'
505: THEN
506: FND_MESSAGE.SET_NAME('AHL','AHL_DI_OBSOLETE_DOC_ATTACH');
507: FND_MSG_PUB.ADD;
508: RAISE FND_API.G_EXC_ERROR;
509: END IF;
510:
511: -- To validate that two revisions of same document are not added if the use latest = yes for that

Line 539: FND_MSG_PUB.ADD;

535: -- is already there in the table OR the table have at least one record with Use Latest ='Y' then error
536: IF(P_USE_LATEST_REV_FLAG = 'Y' and l_counter1 >0) OR (l_counter > 0 ) Then
537: FND_MESSAGE.SET_NAME('AHL','AHL_DI_USE_LATEST_ERROR');
538: FND_MESSAGE.SET_TOKEN('DOC_NO',l_record);
539: FND_MSG_PUB.ADD;
540: RAISE FND_API.G_EXC_ERROR;
541: END IF;
542:
543: --To validate that if the Use Latest Flag='Y' then only the latest revision is allowed to attach.

Line 564: FND_MSG_PUB.ADD;

560:
561: IF(p_doc_revision_id <> l_latest_doc_revision_id) THEN
562: FND_MESSAGE.SET_NAME('AHL','AHL_DI_NOT_LATEST_REVISION');
563: FND_MESSAGE.SET_TOKEN('DOC_NO',l_record);
564: FND_MSG_PUB.ADD;
565: RAISE FND_API.G_EXC_ERROR;
566: END IF;
567: END IF;
568: IF G_DEBUG='Y' THEN

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

572: END IF;
573: EXCEPTION
574: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
575: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
576: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
577: p_count => x_msg_count,
578: p_data => x_msg_data);
579: WHEN FND_API.G_EXC_ERROR THEN
580: X_return_status := FND_API.G_RET_STS_ERROR;

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

577: p_count => x_msg_count,
578: p_data => x_msg_data);
579: WHEN FND_API.G_EXC_ERROR THEN
580: X_return_status := FND_API.G_RET_STS_ERROR;
581: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
582: p_count => x_msg_count,
583: p_data => X_msg_data);
584: WHEN OTHERS THEN
585: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

582: p_count => x_msg_count,
583: p_data => X_msg_data);
584: WHEN OTHERS THEN
585: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
586: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
587: THEN
588: fnd_msg_pub.add_exc_msg(p_pkg_name =>g_pkg_name,
589: p_procedure_name =>'VALIDATE_ASSOCIATION',
590: p_error_text =>SUBSTR(SQLERRM,1,240));

Line 588: fnd_msg_pub.add_exc_msg(p_pkg_name =>g_pkg_name,

584: WHEN OTHERS THEN
585: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
586: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
587: THEN
588: fnd_msg_pub.add_exc_msg(p_pkg_name =>g_pkg_name,
589: p_procedure_name =>'VALIDATE_ASSOCIATION',
590: p_error_text =>SUBSTR(SQLERRM,1,240));
591: END IF;
592: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

588: fnd_msg_pub.add_exc_msg(p_pkg_name =>g_pkg_name,
589: p_procedure_name =>'VALIDATE_ASSOCIATION',
590: p_error_text =>SUBSTR(SQLERRM,1,240));
591: END IF;
592: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
593: p_count => x_msg_count,
594: p_data => X_msg_data);
595: END;
596:

Line 650: FND_MSG_PUB.initialize;

646: END IF;
647: -- Standard call to check for call compatibility.
648: IF FND_API.to_boolean(p_init_msg_list)
649: THEN
650: FND_MSG_PUB.initialize;
651: END IF;
652: -- Initialize API return status to success
653: x_return_status := 'S';
654: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 668: FND_MSG_PUB.ADD;

664: l_object_version_number;
665: IF (get_doc_assos_rec_b_info%NOTFOUND)
666: THEN
667: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_TL_REC_INVALID');
668: FND_MSG_PUB.ADD;
669: END IF;
670: CLOSE get_doc_assos_rec_b_info;
671:
672: -- Check for version number

Line 676: FND_MSG_PUB.ADD;

672: -- Check for version number
673: IF (l_object_version_number <> p_association_rec.object_version_number)
674: THEN
675: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_TL_REC_CHANGED');
676: FND_MSG_PUB.ADD;
677: END IF;
678: /*-------------------------------------------------------- */
679: /* procedure name: AHL_DOC_TITLE_ASSOS_PKG.DELETE_ROW */
680: /* description : Added by Senthil to call Table Handler */

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

712: EXCEPTION
713: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
714: ROLLBACK TO delete_association;
715: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
716: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
717: p_count => x_msg_count,
718: p_data => x_msg_data);
719: --Debug Info
720: IF G_DEBUG='Y' THEN

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

730:
731: WHEN FND_API.G_EXC_ERROR THEN
732: ROLLBACK TO delete_association;
733: X_return_status := FND_API.G_RET_STS_ERROR;
734: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
735: p_count => x_msg_count,
736: p_data => X_msg_data);
737: -- Debug info.
738: IF G_DEBUG='Y' THEN

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

747:
748: WHEN OTHERS THEN
749: ROLLBACK TO delete_association;
750: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
751: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
752: THEN
753: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',
754: p_procedure_name => 'DELETE_ASSOCIATION',
755: p_error_text => SUBSTR(SQLERRM,1,240));

Line 753: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',

749: ROLLBACK TO delete_association;
750: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
751: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
752: THEN
753: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',
754: p_procedure_name => 'DELETE_ASSOCIATION',
755: p_error_text => SUBSTR(SQLERRM,1,240));
756: END IF;
757: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

753: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',
754: p_procedure_name => 'DELETE_ASSOCIATION',
755: p_error_text => SUBSTR(SQLERRM,1,240));
756: END IF;
757: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
758: p_count => x_msg_count,
759: p_data => X_msg_data);
760: -- Debug info.
761: IF G_DEBUG='Y' THEN

Line 948: FND_MSG_PUB.initialize;

944: END IF;
945: -- Standard call to check for call compatibility.
946: IF FND_API.to_boolean(p_init_msg_list)
947: THEN
948: FND_MSG_PUB.initialize;
949: END IF;
950: -- Initialize API return status to success
951: x_return_status := 'S';
952: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 985: FND_MSG_PUB.ADD;

981: (p_x_association_tbl(i).use_latest_rev_flag = 'Y' OR
982: p_x_association_tbl(j).use_latest_rev_flag = 'Y')) THEN
983: FND_MESSAGE.SET_NAME('AHL','AHL_DI_USE_LATEST_ERROR');
984: FND_MESSAGE.SET_TOKEN('DOC_NO',l_record);
985: FND_MSG_PUB.ADD;
986: RAISE FND_API.G_EXC_ERROR;
987: END IF;
988: END LOOP;
989: VALIDATE_ASSOCIATION

Line 1007: l_msg_count := FND_MSG_PUB.count_msg;

1003: );
1004: IF G_DEBUG='Y' THEN
1005: AHL_DEBUG_PUB.debug( 'after validation check: '||l_record,'+adharia+');
1006: END IF;
1007: l_msg_count := FND_MSG_PUB.count_msg;
1008:
1009: IF l_msg_count > 0 THEN
1010: X_msg_count := l_msg_count;
1011: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1067: FND_MSG_PUB.ADD;

1063: THEN
1064:
1065: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_ASSOS_DUP_RECORD');
1066: FND_MESSAGE.SET_TOKEN('DUPRECORD',l_record);
1067: FND_MSG_PUB.ADD;
1068: RAISE FND_API.G_EXC_ERROR;
1069:
1070: END IF;
1071: END IF;

Line 1078: FND_MSG_PUB.ADD;

1074: IF l_found_flag = 'N'
1075: THEN
1076: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_ASSOS_DUP_RECORD');
1077: FND_MESSAGE.SET_TOKEN('DUPRECORD',l_record);
1078: FND_MSG_PUB.ADD;
1079: RAISE FND_API.G_EXC_ERROR;
1080: END IF;
1081:
1082: END IF;

Line 1127: FND_MSG_PUB.ADD;

1123: THEN
1124:
1125: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_ASSOS_DUP_RECORD');
1126: FND_MESSAGE.SET_TOKEN('DUPRECORD',l_record);
1127: FND_MSG_PUB.ADD;
1128: RAISE FND_API.G_EXC_ERROR;
1129:
1130: END IF;
1131: END IF;

Line 1138: FND_MSG_PUB.ADD;

1134: IF l_found_flag = 'N'
1135: THEN
1136: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_ASSOS_DUP_RECORD');
1137: FND_MESSAGE.SET_TOKEN('DUPRECORD',l_record);
1138: FND_MSG_PUB.ADD;
1139: RAISE FND_API.G_EXC_ERROR;
1140: END IF;
1141:
1142: END IF;

Line 1169: FND_MSG_PUB.ADD;

1165: THEN
1166:
1167: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_ASSOS_DUP_RECORD');
1168: FND_MESSAGE.SET_TOKEN('DUPRECORD',l_record);
1169: FND_MSG_PUB.ADD;
1170: RAISE FND_API.G_EXC_ERROR;
1171:
1172: END IF;
1173: END IF;

Line 1180: FND_MSG_PUB.ADD;

1176: IF l_found_flag = 'N'
1177: THEN
1178: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_ASSOS_DUP_RECORD');
1179: FND_MESSAGE.SET_TOKEN('DUPRECORD',l_record);
1180: FND_MSG_PUB.ADD;
1181: RAISE FND_API.G_EXC_ERROR;
1182: END IF;
1183: END IF;
1184: CLOSE dup_rec;

Line 1198: l_msg_count := FND_MSG_PUB.count_msg;

1194: AHL_DEBUG_PUB.debug( 'after dup check: '||l_record,'+adharia+');
1195: END IF;
1196:
1197: --Standard call to message count
1198: l_msg_count := FND_MSG_PUB.count_msg;
1199:
1200: IF l_msg_count > 0 THEN
1201: X_msg_count := l_msg_count;
1202: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1243: FND_MSG_PUB.ADD;

1239:
1240: IF (l_association_upd_info.object_version_number <>p_x_association_tbl(i).object_version_number)
1241: THEN
1242: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
1243: FND_MSG_PUB.ADD;
1244: ELSE
1245: IF G_DEBUG='Y' THEN
1246: AHL_DEBUG_PUB.debug( 'bafore 3 update Association','+DOBJASS+');
1247: END IF;

Line 1357: l_msg_count := FND_MSG_PUB.count_msg;

1353: IF G_DEBUG='Y' THEN
1354: AHL_DEBUG_PUB.debug( 'afte all update Association','+DOBJASS+');
1355: END IF;
1356:
1357: l_msg_count := FND_MSG_PUB.count_msg;
1358:
1359: IF G_DEBUG='Y' THEN
1360: AHL_DEBUG_PUB.debug( 'l_msg_count- ' || l_msg_count);
1361: END IF;

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

1388: EXCEPTION
1389: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1390: ROLLBACK TO process_association;
1391: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1392: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1393: p_count => x_msg_count,
1394: p_data => x_msg_data);
1395:
1396: --Debug Info

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

1406:
1407: WHEN FND_API.G_EXC_ERROR THEN
1408: ROLLBACK TO process_association;
1409: X_return_status := FND_API.G_RET_STS_ERROR;
1410: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1411: p_count => x_msg_count,
1412: p_data => X_msg_data);
1413:
1414: -- Debug info.

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

1424:
1425: WHEN OTHERS THEN
1426: ROLLBACK TO process_association;
1427: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1428: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1429: THEN
1430: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',
1431: p_procedure_name => 'PROCESS_ASSOCIATION',
1432: p_error_text => SUBSTR(SQLERRM,1,240));

Line 1430: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',

1426: ROLLBACK TO process_association;
1427: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1428: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1429: THEN
1430: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',
1431: p_procedure_name => 'PROCESS_ASSOCIATION',
1432: p_error_text => SUBSTR(SQLERRM,1,240));
1433: END IF;
1434: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

1430: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',
1431: p_procedure_name => 'PROCESS_ASSOCIATION',
1432: p_error_text => SUBSTR(SQLERRM,1,240));
1433: END IF;
1434: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1435: p_count => x_msg_count,
1436: p_data => X_msg_data);
1437: -- Debug info.
1438: IF G_DEBUG='Y' THEN

Line 1540: Fnd_Msg_Pub.initialize;

1536: END IF;
1537: -- Standard call to check for call compatibility.
1538: IF Fnd_Api.to_boolean(p_init_msg_list)
1539: THEN
1540: Fnd_Msg_Pub.initialize;
1541: END IF;
1542: -- Initialize API return status to success
1543: x_return_status := 'S';
1544: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 1570: l_msg_count := Fnd_Msg_Pub.count_msg;

1566: P_RECORD => L_RECORD
1567: );
1568:
1569: --Standard call to message count
1570: l_msg_count := Fnd_Msg_Pub.count_msg;
1571:
1572: IF l_msg_count > 0 THEN
1573: X_msg_count := l_msg_count;
1574: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 1791: Fnd_Msg_Pub.ADD;

1787: FETCH dup_rec_check INTO l_dummy;
1788: IF dup_rec_check%FOUND THEN
1789: Fnd_Message.SET_NAME('AHL','AHL_DI_DOC_ASSOS_DUP_RECORD');
1790: Fnd_Message.SET_TOKEN('DUPRECORD',l_document_no);
1791: Fnd_Msg_Pub.ADD;
1792: RAISE Fnd_Api.G_EXC_ERROR;
1793: END IF;
1794: CLOSE dup_rec_check;
1795: ELSE

Line 1804: Fnd_Msg_Pub.ADD;

1800: FETCH dup_rec INTO l_dummy;
1801: IF dup_rec%FOUND THEN
1802: Fnd_Message.SET_NAME('AHL','AHL_DI_DOC_ASSOS_DUP_RECORD');
1803: Fnd_Message.SET_TOKEN('DUPRECORD',l_document_no);
1804: Fnd_Msg_Pub.ADD;
1805: RAISE Fnd_Api.G_EXC_ERROR;
1806: END IF;
1807: CLOSE dup_rec;
1808: END IF;

Line 1860: l_msg_count := Fnd_Msg_Pub.count_msg;

1856: X_LAST_UPDATE_DATE => sysdate,
1857: X_LAST_UPDATED_BY => fnd_global.user_id,
1858: X_LAST_UPDATE_LOGIN => fnd_global.login_id);
1859: --Standard check to count messages
1860: l_msg_count := Fnd_Msg_Pub.count_msg;
1861:
1862: IF l_msg_count > 0 THEN
1863: X_msg_count := l_msg_count;
1864: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 1887: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

1883: EXCEPTION
1884: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1885: ROLLBACK TO insert_assoc_rec;
1886: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1887: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
1888: p_count => x_msg_count,
1889: p_data => x_msg_data);
1890:
1891: --Debug Info

Line 1905: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

1901:
1902: WHEN Fnd_Api.G_EXC_ERROR THEN
1903: ROLLBACK TO insert_assoc_rec;
1904: X_return_status := Fnd_Api.G_RET_STS_ERROR;
1905: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
1906: p_count => x_msg_count,
1907: p_data => X_msg_data);
1908:
1909: -- Debug info.

Line 1923: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)

1919:
1920: WHEN OTHERS THEN
1921: ROLLBACK TO insert_assoc_rec;
1922: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1923: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
1924: THEN
1925: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',
1926: p_procedure_name => 'INSERT_ASSOC_REC',
1927: p_error_text => SUBSTR(SQLERRM,1,240));

Line 1925: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',

1921: ROLLBACK TO insert_assoc_rec;
1922: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1923: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
1924: THEN
1925: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',
1926: p_procedure_name => 'INSERT_ASSOC_REC',
1927: p_error_text => SUBSTR(SQLERRM,1,240));
1928: END IF;
1929: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

Line 1929: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

1925: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',
1926: p_procedure_name => 'INSERT_ASSOC_REC',
1927: p_error_text => SUBSTR(SQLERRM,1,240));
1928: END IF;
1929: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
1930: p_count => x_msg_count,
1931: p_data => X_msg_data);
1932: -- Debug info.
1933: IF G_DEBUG='Y' THEN

Line 2000: Fnd_Msg_Pub.initialize;

1996: END IF;
1997: -- Standard call to check for call compatibility.
1998: IF Fnd_Api.to_boolean(p_init_msg_list)
1999: THEN
2000: Fnd_Msg_Pub.initialize;
2001: END IF;
2002: -- Initialize API return status to success
2003: x_return_status := 'S';
2004: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 2032: Fnd_Msg_Pub.ADD;

2028: = l_association_rec.object_version_number
2029: FOR UPDATE OF aso_object_id NOWAIT;
2030: EXCEPTION WHEN TIMEOUT_ON_RESOURCE THEN
2031: Fnd_Message.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
2032: Fnd_Msg_Pub.ADD;
2033: x_msg_data := 'AHL_COM_RECORD_CHANGED';
2034: x_return_status := 'E' ;
2035: WHEN NO_DATA_FOUND THEN
2036: Fnd_Message.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');

Line 2037: Fnd_Msg_Pub.ADD;

2033: x_msg_data := 'AHL_COM_RECORD_CHANGED';
2034: x_return_status := 'E' ;
2035: WHEN NO_DATA_FOUND THEN
2036: Fnd_Message.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
2037: Fnd_Msg_Pub.ADD;
2038: x_msg_data := 'AHL_COM_RECORD_CHANGED';
2039: x_return_status := 'E' ;
2040: WHEN OTHERS THEN
2041: IF SQLCODE = -54 THEN

Line 2043: Fnd_Msg_Pub.ADD;

2039: x_return_status := 'E' ;
2040: WHEN OTHERS THEN
2041: IF SQLCODE = -54 THEN
2042: Fnd_Message.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
2043: Fnd_Msg_Pub.ADD;
2044: x_msg_data := 'AHL_COM_RECORD_CHANGED';
2045: x_return_status := 'E' ;
2046: ELSE
2047: RAISE;

Line 2050: l_msg_count := Fnd_Msg_Pub.count_msg;

2046: ELSE
2047: RAISE;
2048: END IF;
2049: END;
2050: l_msg_count := Fnd_Msg_Pub.count_msg;
2051: IF l_msg_count > 0 THEN
2052: x_msg_count := l_msg_count;
2053: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2054: RAISE Fnd_Api.G_EXC_ERROR;

Line 2076: l_msg_count := Fnd_Msg_Pub.count_msg;

2072:
2073: END LOOP;
2074: CLOSE get_assos_b_cur;
2075: --Standard check to count messages
2076: l_msg_count := Fnd_Msg_Pub.count_msg;
2077:
2078: IF l_msg_count > 0 THEN
2079: X_msg_count := l_msg_count;
2080: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 2102: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

2098: EXCEPTION
2099: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2100: ROLLBACK TO copy_association;
2101: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2102: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
2103: p_count => x_msg_count,
2104: p_data => x_msg_data);
2105:
2106: --Debug Info

Line 2120: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

2116:
2117: WHEN Fnd_Api.G_EXC_ERROR THEN
2118: ROLLBACK TO copy_association;
2119: X_return_status := Fnd_Api.G_RET_STS_ERROR;
2120: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
2121: p_count => x_msg_count,
2122: p_data => X_msg_data);
2123: -- Debug info.
2124: IF G_DEBUG='Y' THEN

Line 2137: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)

2133:
2134: WHEN OTHERS THEN
2135: ROLLBACK TO copy_association;
2136: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2137: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
2138: THEN
2139: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',
2140: p_procedure_name => 'COPY_ASSOCIATION',
2141: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2139: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',

2135: ROLLBACK TO copy_association;
2136: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2137: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
2138: THEN
2139: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',
2140: p_procedure_name => 'COPY_ASSOCIATION',
2141: p_error_text => SUBSTR(SQLERRM,1,240));
2142: END IF;
2143: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

Line 2143: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

2139: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',
2140: p_procedure_name => 'COPY_ASSOCIATION',
2141: p_error_text => SUBSTR(SQLERRM,1,240));
2142: END IF;
2143: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
2144: p_count => x_msg_count,
2145: p_data => X_msg_data);
2146:
2147: -- Debug info.

Line 2210: Fnd_Msg_Pub.initialize;

2206:
2207: -- Standard call to check for call compatibility.
2208: IF Fnd_Api.to_boolean(p_init_msg_list)
2209: THEN
2210: Fnd_Msg_Pub.initialize;
2211: END IF;
2212: -- Initialize API return status to success
2213: x_return_status := 'S';
2214: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 2242: FND_MSG_PUB.ADD;

2238: THEN
2239:
2240: l_count_assoc := l_count_assoc + 1;
2241: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_ASSOS_NOT_FOUND');
2242: FND_MSG_PUB.ADD;
2243: AHL_DEBUG_PUB.debug( 'AHL_DI_ASSO_DOC_GEN_PVT.delete all Association: the revision id of revision deleted is '|| l_doc_asso_rec.doc_revision_id);
2244: END IF;
2245:
2246: END LOOP;

Line 2253: FND_MSG_PUB.ADD;

2249:
2250: IF l_count_assoc = 0
2251: THEN
2252: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_ASSOS_NOT_FOUND');
2253: FND_MSG_PUB.ADD;
2254: AHL_DEBUG_PUB.debug( 'no revisions found that are attached to the object id'|| p_aso_object_id );
2255: ELSE
2256:
2257: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_ASSOS_DELETED');

Line 2258: FND_MSG_PUB.ADD;

2254: AHL_DEBUG_PUB.debug( 'no revisions found that are attached to the object id'|| p_aso_object_id );
2255: ELSE
2256:
2257: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_ASSOS_DELETED');
2258: FND_MSG_PUB.ADD;
2259: AHL_DEBUG_PUB.debug( 'number of revisions found that are attached to the object id'|| p_aso_object_id ||' are '|| l_count_assoc);
2260:
2261: END IF;
2262:

Line 2286: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

2282: EXCEPTION
2283: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2284: ROLLBACK TO copy_association;
2285: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2286: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
2287: p_count => x_msg_count,
2288: p_data => x_msg_data);
2289:
2290: --Debug Info

Line 2304: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

2300:
2301: WHEN Fnd_Api.G_EXC_ERROR THEN
2302: ROLLBACK TO copy_association;
2303: X_return_status := Fnd_Api.G_RET_STS_ERROR;
2304: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
2305: p_count => x_msg_count,
2306: p_data => X_msg_data);
2307: -- Debug info.
2308: IF G_DEBUG='Y' THEN

Line 2321: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)

2317:
2318: WHEN OTHERS THEN
2319: ROLLBACK TO copy_association;
2320: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2321: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
2322: THEN
2323: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',
2324: p_procedure_name => 'DELETE_ALL_ASSOCIATION',
2325: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2323: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',

2319: ROLLBACK TO copy_association;
2320: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2321: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
2322: THEN
2323: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',
2324: p_procedure_name => 'DELETE_ALL_ASSOCIATION',
2325: p_error_text => SUBSTR(SQLERRM,1,240));
2326: END IF;
2327: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

Line 2327: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

2323: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_DI_ASSO_DOC_GEN_PVT',
2324: p_procedure_name => 'DELETE_ALL_ASSOCIATION',
2325: p_error_text => SUBSTR(SQLERRM,1,240));
2326: END IF;
2327: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
2328: p_count => x_msg_count,
2329: p_data => X_msg_data);
2330:
2331: -- Debug info.