DBA Data[Home] [Help]

APPS.AHL_PC_NODE_PVT dependencies on FND_MSG_PUB

Line 67: FND_MSG_PUB.Initialize;

63:
64: -- Initialize message list if p_init_msg_list is set to TRUE
65: IF FND_API.To_Boolean(p_init_msg_list)
66: THEN
67: FND_MSG_PUB.Initialize;
68: END IF;
69:
70: -- Initialize API return status to success
71: X_return_status := FND_API.G_RET_STS_SUCCESS;

Line 80: x_msg_count := FND_MSG_PUB.count_msg;

76: VALIDATE_NODE (p_x_node_rec);
77: END IF;
78:
79: -- Check Error Message stack.
80: x_msg_count := FND_MSG_PUB.count_msg;
81: IF X_msg_count > 0 THEN
82: RAISE FND_API.G_EXC_ERROR;
83: END IF;
84:

Line 148: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,

144: COMMIT WORK;
145: END IF;
146:
147: -- Standard call to get message count and if count is 1, get message info
148: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
149: p_data => X_msg_data,
150: p_encoded => fnd_api.g_false );
151:
152: EXCEPTION

Line 156: FND_MSG_PUB.count_and_get( p_count => X_msg_count,

152: EXCEPTION
153: WHEN FND_API.G_EXC_ERROR THEN
154: X_return_status := FND_API.G_RET_STS_ERROR;
155: Rollback to CREATE_NODE_PVT;
156: FND_MSG_PUB.count_and_get( p_count => X_msg_count,
157: p_data => X_msg_data,
158: p_encoded => fnd_api.g_false );
159:
160: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 163: FND_MSG_PUB.count_and_get( p_count => X_msg_count,

159:
160: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
161: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
162: Rollback to CREATE_NODE_PVT;
163: FND_MSG_PUB.count_and_get( p_count => X_msg_count,
164: p_data => X_msg_data,
165: p_encoded => fnd_api.g_false );
166:
167: WHEN OTHERS THEN

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

166:
167: WHEN OTHERS THEN
168: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
169: Rollback to CREATE_NODE_PVT;
170: IF FND_MSG_PUB.check_msg_level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
171: THEN
172: fnd_msg_pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
173: p_procedure_name => 'CREATE_NODE',
174: p_error_text => SUBSTR(SQLERRM,1,240) );

Line 172: fnd_msg_pub.add_exc_msg( p_pkg_name => G_PKG_NAME,

168: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
169: Rollback to CREATE_NODE_PVT;
170: IF FND_MSG_PUB.check_msg_level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
171: THEN
172: fnd_msg_pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
173: p_procedure_name => 'CREATE_NODE',
174: p_error_text => SUBSTR(SQLERRM,1,240) );
175: END IF;
176: FND_MSG_PUB.count_and_get( p_count => X_msg_count,

Line 176: FND_MSG_PUB.count_and_get( p_count => X_msg_count,

172: fnd_msg_pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
173: p_procedure_name => 'CREATE_NODE',
174: p_error_text => SUBSTR(SQLERRM,1,240) );
175: END IF;
176: FND_MSG_PUB.count_and_get( p_count => X_msg_count,
177: p_data => X_msg_data,
178: p_encoded => fnd_api.g_false );
179:
180: END CREATE_NODE;

Line 225: FND_MSG_PUB.Initialize;

221:
222: -- Initialize message list if p_init_msg_list is set to TRUE
223: IF FND_API.To_Boolean(p_init_msg_list)
224: THEN
225: FND_MSG_PUB.Initialize;
226: END IF;
227:
228: -- Initialize API return status to success
229: X_return_status := FND_API.G_RET_STS_SUCCESS;

Line 237: X_msg_count := FND_MSG_PUB.count_msg;

233: VALIDATE_NODE (p_x_node_rec);
234: END IF;
235:
236: -- Check Error Message stack.
237: X_msg_count := FND_MSG_PUB.count_msg;
238: IF X_msg_count > 0 THEN
239: RAISE FND_API.G_EXC_ERROR;
240: END IF;
241:

Line 252: FND_MSG_PUB.ADD;

248: IF (pc_node_csr%NOTFOUND)
249: THEN
250: CLOSE pc_node_csr;
251: FND_MESSAGE.Set_Name('AHL','AHL_PC_NODE_NOT_FOUND');
252: FND_MSG_PUB.ADD;
253: RAISE FND_API.G_EXC_ERROR;
254: END IF;
255: CLOSE pc_node_csr;
256:

Line 262: FND_MSG_PUB.ADD;

258:
259: IF (l_object_version_number <> p_x_node_rec.object_version_number)
260: THEN
261: FND_MESSAGE.Set_Name('AHL','AHL_COM_RECORD_CHANGED');
262: FND_MSG_PUB.ADD;
263: END IF;
264:
265: IF (l_pc_status <> 'DRAFT' and l_pc_status <> 'APPROVAL_REJECTED')
266: THEN

Line 268: FND_MSG_PUB.ADD;

264:
265: IF (l_pc_status <> 'DRAFT' and l_pc_status <> 'APPROVAL_REJECTED')
266: THEN
267: FND_MESSAGE.Set_Name('AHL','AHL_PC_STATUS_COMPLETE');
268: FND_MSG_PUB.ADD;
269: END IF;
270:
271: IF (p_x_node_rec.DRAFT_FLAG = 'Y')
272: THEN

Line 274: FND_MSG_PUB.ADD;

270:
271: IF (p_x_node_rec.DRAFT_FLAG = 'Y')
272: THEN
273: FND_MESSAGE.Set_Name('AHL','AHL_PC_DRAFT_PC_EXISTS');
274: FND_MSG_PUB.ADD;
275: END IF;
276:
277: -- Check Error Message stack.
278: X_msg_count := FND_MSG_PUB.count_msg;

Line 278: X_msg_count := FND_MSG_PUB.count_msg;

274: FND_MSG_PUB.ADD;
275: END IF;
276:
277: -- Check Error Message stack.
278: X_msg_count := FND_MSG_PUB.count_msg;
279: IF X_msg_count > 0 THEN
280: RAISE FND_API.G_EXC_ERROR;
281: END IF;
282:

Line 333: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,

329: COMMIT WORK;
330: END IF;
331:
332: -- Standard call to get message count and if count is 1, get message info
333: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
334: p_data => X_msg_data,
335: p_encoded => fnd_api.g_false );
336:
337: EXCEPTION

Line 341: FND_MSG_PUB.count_and_get( p_count => X_msg_count,

337: EXCEPTION
338: WHEN FND_API.G_EXC_ERROR THEN
339: X_return_status := FND_API.G_RET_STS_ERROR;
340: Rollback to UPDATE_NODE_PVT;
341: FND_MSG_PUB.count_and_get( p_count => X_msg_count,
342: p_data => X_msg_data,
343: p_encoded => fnd_api.g_false );
344:
345: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 348: FND_MSG_PUB.count_and_get( p_count => X_msg_count,

344:
345: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
346: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
347: Rollback to UPDATE_NODE_PVT;
348: FND_MSG_PUB.count_and_get( p_count => X_msg_count,
349: p_data => X_msg_data,
350: p_encoded => fnd_api.g_false );
351:
352: WHEN OTHERS THEN

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

351:
352: WHEN OTHERS THEN
353: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
354: Rollback to UPDATE_NODE_PVT;
355: IF FND_MSG_PUB.check_msg_level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
356: THEN
357: fnd_msg_pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
358: p_procedure_name => 'UPDATE_NODE',
359: p_error_text => SUBSTR(SQLERRM,1,240) );

Line 357: fnd_msg_pub.add_exc_msg( p_pkg_name => G_PKG_NAME,

353: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
354: Rollback to UPDATE_NODE_PVT;
355: IF FND_MSG_PUB.check_msg_level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
356: THEN
357: fnd_msg_pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
358: p_procedure_name => 'UPDATE_NODE',
359: p_error_text => SUBSTR(SQLERRM,1,240) );
360: END IF;
361: FND_MSG_PUB.count_and_get( p_count => X_msg_count,

Line 361: FND_MSG_PUB.count_and_get( p_count => X_msg_count,

357: fnd_msg_pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
358: p_procedure_name => 'UPDATE_NODE',
359: p_error_text => SUBSTR(SQLERRM,1,240) );
360: END IF;
361: FND_MSG_PUB.count_and_get( p_count => X_msg_count,
362: p_data => X_msg_data,
363: p_encoded => fnd_api.g_false );
364:
365: END UPDATE_NODE;

Line 426: FND_MSG_PUB.Initialize;

422:
423: -- Initialize message list if p_init_msg_list is set to TRUE
424: IF FND_API.To_Boolean(p_init_msg_list)
425: THEN
426: FND_MSG_PUB.Initialize;
427: END IF;
428:
429: -- Initialize API return status to success
430: X_return_status := FND_API.G_RET_STS_SUCCESS;

Line 435: X_msg_count := FND_MSG_PUB.count_msg;

431:
432: VALIDATE_NODE (p_x_node_rec);
433:
434: -- Check Error Message stack.
435: X_msg_count := FND_MSG_PUB.count_msg;
436: IF X_msg_count > 0 THEN
437: RAISE FND_API.G_EXC_ERROR;
438: END IF;
439:

Line 729: X_msg_count := FND_MSG_PUB.count_msg;

725: END LOOP;
726: END IF;
727:
728: -- Check Error Message stack.
729: X_msg_count := FND_MSG_PUB.count_msg;
730: IF X_msg_count > 0 THEN
731: RAISE FND_API.G_EXC_ERROR;
732: END IF;
733:

Line 761: FND_MSG_PUB.ADD;

757: WHERE pc_node_id = p_x_node_rec.pc_node_id;
758:
759: FND_MESSAGE.Set_Name('AHL','AHL_PC_NODE_DEL_OPEN_NR');
760: FND_MESSAGE.Set_Token('PCN',p_x_node_rec.name);
761: FND_MSG_PUB.ADD;
762: ELSE
763: --There exists open Non-routines for units associated to the corresponding complete PC,
764: -- hence cannot delete the draft version.
765: FND_MESSAGE.Set_Name('AHL','AHL_PC_HEADER_DEL_OPEN_NR');

Line 766: FND_MSG_PUB.ADD;

762: ELSE
763: --There exists open Non-routines for units associated to the corresponding complete PC,
764: -- hence cannot delete the draft version.
765: FND_MESSAGE.Set_Name('AHL','AHL_PC_HEADER_DEL_OPEN_NR');
766: FND_MSG_PUB.ADD;
767: RAISE FND_API.G_EXC_ERROR;
768: END IF;
769: ELSIF (l_mel_cdl_attached <> FND_API.G_FALSE)
770: THEN

Line 772: FND_MSG_PUB.ADD;

768: END IF;
769: ELSIF (l_mel_cdl_attached <> FND_API.G_FALSE)
770: THEN
771: FND_MESSAGE.Set_Name('AHL','AHL_PC_NODE_DEL_MELCDL_ASSOS');
772: FND_MSG_PUB.ADD;
773: -- R12 [priyan MEL/CDL]
774: ELSIF (l_fmp_attached <> FND_API.G_FALSE)
775: THEN
776: FND_MESSAGE.Set_Name('AHL','AHL_PC_NODE_DEL_FMP_ASSOS');

Line 777: FND_MSG_PUB.ADD;

773: -- R12 [priyan MEL/CDL]
774: ELSIF (l_fmp_attached <> FND_API.G_FALSE)
775: THEN
776: FND_MESSAGE.Set_Name('AHL','AHL_PC_NODE_DEL_FMP_ASSOS');
777: FND_MSG_PUB.ADD;
778: -- Bug 5130623
779: -- TYPO - Added l_ump_unit_attached check below
780: ELSIF (l_ump_node_attached <> FND_API.G_FALSE OR l_ump_part_attached <> FND_API.G_FALSE OR l_ump_unit_attached <> FND_API.G_FALSE)
781: THEN

Line 783: FND_MSG_PUB.ADD;

779: -- TYPO - Added l_ump_unit_attached check below
780: ELSIF (l_ump_node_attached <> FND_API.G_FALSE OR l_ump_part_attached <> FND_API.G_FALSE OR l_ump_unit_attached <> FND_API.G_FALSE)
781: THEN
782: FND_MESSAGE.Set_Name('AHL','AHL_PC_NODE_DEL_UMP_ASSOS');
783: FND_MSG_PUB.ADD;
784: -- Bug 5130623
785: -- Commented Unconditional Else Clause.
786: /*
787: ELSE

Line 789: FND_MSG_PUB.ADD;

785: -- Commented Unconditional Else Clause.
786: /*
787: ELSE
788: FND_MESSAGE.Set_Name('AHL','AHL_PC_NODE_DEL_HAS_ASSOS');
789: FND_MSG_PUB.ADD;
790: */
791: END IF;
792:
793: -- Check Error Message stack.

Line 794: X_msg_count := FND_MSG_PUB.count_msg;

790: */
791: END IF;
792:
793: -- Check Error Message stack.
794: X_msg_count := FND_MSG_PUB.count_msg;
795: IF X_msg_count > 0 THEN
796: RAISE FND_API.G_EXC_ERROR;
797: END IF;
798:

Line 806: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,

802: COMMIT WORK;
803: END IF;
804:
805: -- Standard call to get message count and if count is 1, get message info
806: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
807: p_data => X_msg_data,
808: p_encoded => fnd_api.g_false );
809:
810: EXCEPTION

Line 814: FND_MSG_PUB.count_and_get( p_count => X_msg_count,

810: EXCEPTION
811: WHEN FND_API.G_EXC_ERROR THEN
812: X_return_status := FND_API.G_RET_STS_ERROR;
813: Rollback to DELETE_NODES_PVT;
814: FND_MSG_PUB.count_and_get( p_count => X_msg_count,
815: p_data => X_msg_data,
816: p_encoded => fnd_api.g_false );
817:
818: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 821: FND_MSG_PUB.count_and_get( p_count => X_msg_count,

817:
818: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
819: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
820: Rollback to DELETE_NODES_PVT;
821: FND_MSG_PUB.count_and_get( p_count => X_msg_count,
822: p_data => X_msg_data,
823: p_encoded => fnd_api.g_false );
824:
825: WHEN OTHERS THEN

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

824:
825: WHEN OTHERS THEN
826: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
827: Rollback to DELETE_NODES_PVT;
828: IF FND_MSG_PUB.check_msg_level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
829: THEN
830: fnd_msg_pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
831: p_procedure_name => 'DELETE_NODES',
832: p_error_text => SUBSTR(SQLERRM,1,240) );

Line 830: fnd_msg_pub.add_exc_msg( p_pkg_name => G_PKG_NAME,

826: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
827: Rollback to DELETE_NODES_PVT;
828: IF FND_MSG_PUB.check_msg_level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
829: THEN
830: fnd_msg_pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
831: p_procedure_name => 'DELETE_NODES',
832: p_error_text => SUBSTR(SQLERRM,1,240) );
833: END IF;
834: FND_MSG_PUB.count_and_get( p_count => X_msg_count,

Line 834: FND_MSG_PUB.count_and_get( p_count => X_msg_count,

830: fnd_msg_pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
831: p_procedure_name => 'DELETE_NODES',
832: p_error_text => SUBSTR(SQLERRM,1,240) );
833: END IF;
834: FND_MSG_PUB.count_and_get( p_count => X_msg_count,
835: p_data => X_msg_data,
836: p_encoded => fnd_api.g_false );
837:
838: END DELETE_NODES;

Line 957: FND_MSG_PUB.ADD;

953: CLOSE get_node_object_version;
954: IF (l_object_version_number <> p_node_rec.object_version_number)
955: THEN
956: FND_MESSAGE.Set_Name('AHL','AHL_COM_RECORD_CHANGED');
957: FND_MSG_PUB.ADD;
958: RAISE FND_API.G_EXC_ERROR;
959: END IF;
960: END IF;
961:

Line 968: FND_MSG_PUB.ADD;

964: FETCH check_header_id_exists INTO l_header_id, l_pc_status;
965: IF (check_header_id_exists%NOTFOUND)
966: THEN
967: FND_MESSAGE.Set_Name('AHL','AHL_PC_NOT_FOUND');
968: FND_MSG_PUB.ADD;
969: RAISE FND_API.G_EXC_ERROR;
970: END IF;
971:
972: -- If PC status is DRAFT/APPROVAL_REJECTED, allow node operations

Line 976: FND_MSG_PUB.ADD;

972: -- If PC status is DRAFT/APPROVAL_REJECTED, allow node operations
973: IF (l_pc_status <> 'DRAFT' and l_pc_status <> 'APPROVAL_REJECTED')
974: THEN
975: FND_MESSAGE.Set_Name('AHL','AHL_PC_STATUS_COMPLETE');
976: FND_MSG_PUB.ADD;
977: RAISE FND_API.G_EXC_ERROR;
978: END IF;
979: CLOSE check_header_id_exists;
980:

Line 989: FND_MSG_PUB.ADD;

985: FETCH check_parent_exists INTO l_dummy;
986: IF (check_parent_exists%NOTFOUND)
987: THEN
988: FND_MESSAGE.Set_Name('AHL','AHL_PC_PARENT_NODE_NOT_FOUND');
989: FND_MSG_PUB.ADD;
990: RAISE FND_API.G_EXC_ERROR;
991: END IF;
992: CLOSE check_parent_exists;
993: END IF;

Line 1006: FND_MSG_PUB.ADD;

1002: FETCH check_name_exists INTO l_dummy;
1003: IF (check_name_exists%FOUND)
1004: THEN
1005: FND_MESSAGE.Set_Name('AHL','AHL_PC_NODE_NAME_EXISTS');
1006: FND_MSG_PUB.ADD;
1007: RAISE FND_API.G_EXC_ERROR;
1008: END IF;
1009: CLOSE check_name_exists;
1010: ELSE

Line 1019: FND_MSG_PUB.ADD;

1015: FETCH check_root_node_exists INTO l_dummy;
1016: IF (check_root_node_exists%FOUND)
1017: THEN
1018: FND_MESSAGE.Set_Name('AHL','AHL_PC_ROOT_NODE_EXISTS');
1019: FND_MSG_PUB.ADD;
1020: RAISE FND_API.G_EXC_ERROR;
1021: END IF;
1022: CLOSE check_root_node_exists;
1023: END IF;

Line 1035: FND_MSG_PUB.ADD;

1031: FETCH check_id_exists INTO l_dummy;
1032: IF (check_id_exists%NOTFOUND)
1033: THEN
1034: FND_MESSAGE.Set_Name('AHL','AHL_PC_NODE_NOT_FOUND');
1035: FND_MSG_PUB.ADD;
1036: RAISE FND_API.G_EXC_ERROR;
1037: END IF;
1038: CLOSE check_id_exists;
1039: END IF;

Line 1049: FND_MSG_PUB.ADD;

1045: FETCH check_leaf_node INTO l_dummy;
1046: IF (check_leaf_node%FOUND)
1047: THEN
1048: FND_MESSAGE.Set_Name('AHL','AHL_PC_LEAF_NODE');
1049: FND_MSG_PUB.ADD;
1050: RAISE FND_API.G_EXC_ERROR;
1051: END IF;
1052: CLOSE check_leaf_node;
1053: END IF;