DBA Data[Home] [Help]

APPS.AHL_FMP_MR_EFFECTIVITY_PVT dependencies on FND_MSG_PUB

Line 84: FND_MSG_PUB.add;

80:
81: IF ( p_mr_header_id = FND_API.G_MISS_NUM OR
82: p_mr_header_id IS NULL ) THEN
83: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_MR_HEADER_ID_NULL' );
84: FND_MSG_PUB.add;
85: x_return_status := FND_API.G_RET_STS_ERROR;
86: RETURN;
87: IF G_DEBUG = 'Y' THEN
88: AHL_DEBUG_PUB.debug('MR_HEADER_ID is null to validate_api_inputs' );

Line 96: FND_MSG_PUB.ADD;

92:
93: IF G_APPLN_USAGE IS NULL
94: THEN
95: FND_MESSAGE.SET_NAME('AHL','AHL_COM_APP_PRFL_UNDEF');
96: FND_MSG_PUB.ADD;
97: IF G_DEBUG = 'Y' THEN
98: AHL_DEBUG_PUB.debug('APPLN USAGE CODE IS NULL IN VALIDATE_API_INPUTS' );
99: END IF;
100: END IF;

Line 112: FND_MSG_PUB.add;

108: --check if mr is terminated and get the mr status.
109: l_mr_status_code :=AHL_FMP_COMMON_PVT.check_mr_status(p_mr_header_id);
110: IF l_mr_status_code IS NULL THEN
111: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_INVALID_MR' );
112: FND_MSG_PUB.add;
113: x_return_status := FND_API.G_RET_STS_ERROR;
114: RETURN;
115: END IF;
116:

Line 142: FND_MSG_PUB.add;

138:
139: IF l_error_code is not null THEN
140: AHL_DEBUG_PUB.debug('Error here.....'||L_ERROR_CODE);
141: FND_MESSAGE.set_name( 'AHL', l_error_code );
142: FND_MSG_PUB.add;
143: RETURN;
144: END IF;
145:
146:

Line 153: FND_MSG_PUB.add;

149: -- Check if atleast one record is passed in p_effectivity_tbl
150: IF ( p_effectivity_tbl.count < 1 ) THEN
151: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_INVALID_PROCEDURE_CALL' );
152: FND_MESSAGE.set_token( 'PROCEDURE', G_PKG_NAME || '.' || G_API_NAME );
153: FND_MSG_PUB.add;
154: x_return_status := FND_API.G_RET_STS_ERROR;
155: RETURN;
156: END IF;
157:

Line 167: FND_MSG_PUB.add;

163: p_effectivity_tbl(i).dml_operation <> 'C' ) THEN
164: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_INVALID_DML' );
165: FND_MESSAGE.set_token( 'FIELD', p_effectivity_tbl(i).dml_operation );
166: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_tbl(i) ) );
167: FND_MSG_PUB.add;
168: x_return_status := FND_API.G_RET_STS_ERROR;
169: END IF;
170:
171: IF ( l_pm_install_flag = 'Y' AND

Line 185: FND_MSG_PUB.add;

181: p_eff_obj_version => p_effectivity_tbl(i).OBJECT_VERSION_NUMBER
182: );
183: IF ( NVL( l_return_status, 'X' ) <> FND_API.G_RET_STS_SUCCESS ) THEN
184: FND_MESSAGE.set_name( 'AHL', l_error_code );
185: FND_MSG_PUB.add;
186: x_return_status := FND_API.G_RET_STS_ERROR;
187: RETURN;
188: END IF;
189: END IF;

Line 207: FND_MSG_PUB.add;

203: );
204:
205: IF ( NVL( l_return_status, 'X' ) <> FND_API.G_RET_STS_SUCCESS ) THEN
206: FND_MESSAGE.set_name( 'AHL', l_error_code );
207: FND_MSG_PUB.add;
208: x_return_status := FND_API.G_RET_STS_ERROR;
209: RETURN;
210: END IF;
211: END IF;

Line 220: FND_MSG_PUB.add;

216: p_super_user ='Y' AND
217: l_mr_status_code = 'COMPLETE') THEN
218: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_INVALID_UPDATE' );
219: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_tbl(i) ) );
220: FND_MSG_PUB.add;
221: x_return_status := FND_API.G_RET_STS_ERROR;
222: RETURN;
223: END IF;
224:

Line 236: FND_MSG_PUB.add;

232: ( p_effectivity_tbl(i).position_ref_meaning IS NOT NULL AND
233: p_effectivity_tbl(i).position_ref_meaning <> FND_API.G_MISS_CHAR ) ) THEN
234: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_PM_INPUT_MC_POS' );
235: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_tbl(i) ) );
236: FND_MSG_PUB.add;
237: x_return_status := FND_API.G_RET_STS_ERROR;
238: END IF;
239:
240: IF ( ( p_effectivity_tbl(i).position_inventory_item_id IS NOT NULL AND

Line 246: FND_MSG_PUB.add;

242: ( p_effectivity_tbl(i).position_item_number IS NOT NULL AND
243: p_effectivity_tbl(i).position_item_number <> FND_API.G_MISS_CHAR ) ) THEN
244: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_PM_INPUT_MC_POS_ITEM' );
245: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_tbl(i) ) );
246: FND_MSG_PUB.add;
247: x_return_status := FND_API.G_RET_STS_ERROR;
248: END IF;
249:
250: IF ( ( p_effectivity_tbl(i).pc_node_id IS NOT NULL AND

Line 256: FND_MSG_PUB.add;

252: ( p_effectivity_tbl(i).pc_node_name IS NOT NULL AND
253: p_effectivity_tbl(i).pc_node_name <> FND_API.G_MISS_CHAR ) ) THEN
254: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_PM_INPUT_PC_NODE' );
255: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_tbl(i) ) );
256: FND_MSG_PUB.add;
257: x_return_status := FND_API.G_RET_STS_ERROR;
258: END IF;
259:
260: END IF;

Line 339: FND_MSG_PUB.add;

335: FND_MESSAGE.set_token( 'FIELD', p_x_effectivity_rec.item_number );
336: END IF;
337:
338: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_x_effectivity_rec ) );
339: FND_MSG_PUB.add;
340: END IF;
341:
342: END IF;
343:

Line 370: FND_MSG_PUB.add;

366: FND_MESSAGE.set_token( 'FIELD', p_x_effectivity_rec.position_ref_meaning );
367: END IF;
368:
369: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_x_effectivity_rec ) );
370: FND_MSG_PUB.add;
371: END IF;
372:
373: END IF;
374:

Line 402: FND_MSG_PUB.add;

398: FND_MESSAGE.set_token( 'FIELD', p_x_effectivity_rec.position_item_number );
399: END IF;
400:
401: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_x_effectivity_rec ) );
402: FND_MSG_PUB.add;
403: END IF;
404:
405: END IF;
406:

Line 432: FND_MSG_PUB.add;

428: FND_MESSAGE.set_token( 'FIELD', p_x_effectivity_rec.pc_node_name );
429: END IF;
430:
431: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_x_effectivity_rec ) );
432: FND_MSG_PUB.add;
433: END IF;
434:
435: END IF;
436:

Line 642: FND_MSG_PUB.add;

638:
639: IF get_old_rec%NOTFOUND THEN
640: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_INVALID_MR_EFF_REC' );
641: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_x_effectivity_rec ) );
642: FND_MSG_PUB.add;
643: CLOSE get_old_rec;
644: RAISE FND_API.G_EXC_ERROR;
645: END IF;
646:

Line 817: FND_MSG_PUB.add;

813: IF ( p_effectivity_rec.name IS NULL OR
814: p_effectivity_rec.name = FND_API.G_MISS_CHAR ) THEN
815: FND_MESSAGE.set_name( 'AHL','AHL_FMP_EFFECTIVITY_NAME_NULL' );
816: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_rec ) );
817: FND_MSG_PUB.add;
818: END IF;
819: RETURN;
820: END IF;
821:

Line 827: FND_MSG_PUB.add;

823: -- Check if the Effectivity Name column does not contains a null value.
824: IF ( p_effectivity_rec.name = FND_API.G_MISS_CHAR ) THEN
825: FND_MESSAGE.set_name( 'AHL','AHL_FMP_EFFECTIVITY_NAME_NULL' );
826: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_rec ) );
827: FND_MSG_PUB.add;
828: END IF;
829: END IF;
830:
831: -- Check if the mandatory Effectivity ID column contains a null value.

Line 836: FND_MSG_PUB.add;

832: IF ( p_effectivity_rec.mr_effectivity_id IS NULL OR
833: p_effectivity_rec.mr_effectivity_id = FND_API.G_MISS_NUM ) THEN
834: FND_MESSAGE.set_name( 'AHL','AHL_FMP_EFFECTIVITY_ID_NULL' );
835: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_rec ) );
836: FND_MSG_PUB.add;
837: RETURN;
838: END IF;
839:
840: -- Check if the mandatory Object Version Number column contains a null value.

Line 845: FND_MSG_PUB.add;

841: IF ( p_effectivity_rec.object_version_number IS NULL OR
842: p_effectivity_rec.object_version_number = FND_API.G_MISS_NUM ) THEN
843: FND_MESSAGE.set_name( 'AHL','AHL_FMP_MRE_OBJ_VERSION_NULL' );
844: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_rec ) );
845: FND_MSG_PUB.add;
846: RETURN;
847: END IF;
848:
849: END validate_attributes;

Line 924: FND_MSG_PUB.add;

920: IF ( p_effectivity_rec.inventory_item_id IS NULL AND
921: p_effectivity_rec.item_number IS NULL ) THEN
922: FND_MESSAGE.set_name( 'AHL','AHL_FMP_PM_ITEM_NULL' );
923: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_rec ) );
924: FND_MSG_PUB.add;
925: END IF;
926:
927: ELSE
928:

Line 945: FND_MSG_PUB.add;

941: nvl(l_prog_type, 'X') <> 'MO_PROC') THEN
942: -- Tamal [MEL/CDL RM-FMP Enhancements] Ends here...
943: FND_MESSAGE.set_name( 'AHL','AHL_FMP_ITEM_POS_NULL' );
944: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_rec ) );
945: FND_MSG_PUB.add;
946: END IF;
947:
948: -- Check if Master Configuration Item contains a value but, the Position is NULL
949: IF ( p_effectivity_rec.relationship_id IS NULL AND

Line 955: FND_MSG_PUB.add;

951: ( p_effectivity_rec.position_inventory_item_id IS NOT NULL OR
952: p_effectivity_rec.position_item_number IS NOT NULL ) ) THEN
953: FND_MESSAGE.set_name( 'AHL','AHL_FMP_POS_NULL_ITEM_NOTNULL' );
954: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_rec ) );
955: FND_MSG_PUB.add;
956: END IF;
957:
958: -- Check if both Item and Master Configuration Position contain values
959: IF ( ( p_effectivity_rec.inventory_item_id IS NOT NULL OR

Line 965: FND_MSG_PUB.add;

961: ( p_effectivity_rec.relationship_id IS NOT NULL OR
962: p_effectivity_rec.position_ref_meaning IS NOT NULL ) ) THEN
963: FND_MESSAGE.set_name( 'AHL','AHL_FMP_BOTH_ITEM_POS_NOTNULL' );
964: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_rec ) );
965: FND_MSG_PUB.add;
966: END IF;
967:
968: -- Check if both Item and Master Configuration Item contain values
969: IF ( ( p_effectivity_rec.inventory_item_id IS NOT NULL OR

Line 975: FND_MSG_PUB.add;

971: ( p_effectivity_rec.position_inventory_item_id IS NOT NULL OR
972: p_effectivity_rec.position_item_number IS NOT NULL ) ) THEN
973: FND_MESSAGE.set_name( 'AHL','AHL_FMP_BOTH_ITEM_POS_ITEM' );
974: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_rec ) );
975: FND_MSG_PUB.add;
976: END IF;
977:
978: -- Check if the given Item can be installed in the given Master Configuration Position
979: IF ( p_effectivity_rec.relationship_id IS NOT NULL AND

Line 1008: FND_MSG_PUB.add;

1004: FND_MESSAGE.set_token( 'FIELD2', p_effectivity_rec.position_ref_meaning );
1005: END IF;
1006:
1007: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_rec ) );
1008: FND_MSG_PUB.add;
1009: END IF; */
1010:
1011: --pdoki added for Bug 6719371
1012: OPEN check_alternate( p_effectivity_rec.relationship_id , p_effectivity_rec.position_inventory_item_id );

Line 1036: FND_MSG_PUB.add;

1032: FND_MESSAGE.set_token( 'FIELD2', p_effectivity_rec.position_ref_meaning );
1033: END IF;
1034:
1035: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_rec ) );
1036: FND_MSG_PUB.add;
1037: END IF;
1038: CLOSE check_alternate;
1039: END IF;
1040:

Line 1080: FND_MSG_PUB.add;

1076:
1077: IF ( NVL( l_return_status, 'X' ) <> FND_API.G_RET_STS_SUCCESS ) THEN
1078: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_EFFECTIVITY_DTLS_EXIST' );
1079: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_rec ) );
1080: FND_MSG_PUB.add;
1081: END IF;
1082:
1083: END IF;
1084:

Line 1130: FND_MSG_PUB.add;

1126:
1127: IF ( NVL( l_return_status, 'X' ) <> FND_API.G_RET_STS_SUCCESS ) THEN
1128: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_INTERVALS_EXIST' );
1129: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_rec ) );
1130: FND_MSG_PUB.add;
1131: END IF;
1132:
1133: END IF;
1134:

Line 1196: FND_MSG_PUB.add;

1192: EXIT WHEN get_dup_name%NOTFOUND;
1193:
1194: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_EFFECTIVITY_NAME_DUP' );
1195: FND_MESSAGE.set_token( 'RECORD', l_effectivity_name );
1196: FND_MSG_PUB.add;
1197:
1198: END LOOP;
1199:
1200: IF ( get_dup_name%ROWCOUNT > 0 ) THEN

Line 1227: FND_MSG_PUB.add;

1223: l_item_number := to_char(l_inventory_item_id);
1224: end if;
1225: close get_item_number;
1226: FND_MESSAGE.set_token( 'RECORD', l_item_number );
1227: FND_MSG_PUB.add;
1228: end if;
1229:
1230: END LOOP;
1231:

Line 1284: FND_MSG_PUB.initialize;

1280: END IF;
1281:
1282: -- Initialize message list if p_init_msg_list is set to TRUE.
1283: IF FND_API.to_boolean( p_init_msg_list ) THEN
1284: FND_MSG_PUB.initialize;
1285: END IF;
1286:
1287: -- Enable Debug (optional)
1288: IF ( G_DEBUG = 'Y' ) THEN

Line 1313: l_msg_count := FND_MSG_PUB.count_msg;

1309: RTRIM(LTRIM(g_appln_usage)), -- IN
1310: x_return_status, -- OUT
1311: p_super_user
1312: );
1313: l_msg_count := FND_MSG_PUB.count_msg;
1314: IF l_msg_count > 0 THEN
1315: AHL_DEBUG_PUB.debug('After validate with error ' );
1316: x_msg_count := l_msg_count;
1317: RAISE FND_API.G_EXC_ERROR;

Line 1449: l_msg_count := FND_MSG_PUB.count_msg;

1445: AHL_DEBUG_PUB.debug( G_PKG_NAME || '.' || G_API_NAME || ' : after validate_record' );
1446: END IF;
1447:
1448: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception
1449: l_msg_count := FND_MSG_PUB.count_msg;
1450: IF l_msg_count > 0 THEN
1451: x_msg_count := l_msg_count;
1452: RAISE FND_API.G_EXC_ERROR;
1453: END IF;

Line 1533: FND_MSG_PUB.add;

1529: WHEN OTHERS THEN
1530: IF ( SQLCODE = -1 ) THEN
1531: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_EFFECTIVITY_NAME_DUP' );
1532: FND_MESSAGE.set_token( 'RECORD', p_x_effectivity_tbl(i).name );
1533: FND_MSG_PUB.add;
1534: END IF;
1535: END;
1536:
1537: ELSIF ( p_x_effectivity_tbl(i).dml_operation = 'U' ) THEN

Line 1577: FND_MSG_PUB.add;

1573: -- If the record does not exist, then, abort API.
1574: IF ( SQL%ROWCOUNT = 0 ) THEN
1575: FND_MESSAGE.set_name('AHL','AHL_FMP_RECORD_CHANGED');
1576: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_x_effectivity_tbl(i) ) );
1577: FND_MSG_PUB.add;
1578: END IF;
1579:
1580: -- Set OUT values
1581: p_x_effectivity_tbl(i).object_version_number := p_x_effectivity_tbl(i).object_version_number + 1;

Line 1588: FND_MSG_PUB.add;

1584: WHEN OTHERS THEN
1585: IF ( SQLCODE = -1 ) THEN
1586: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_EFFECTIVITY_NAME_DUP' );
1587: FND_MESSAGE.set_token( 'RECORD', p_x_effectivity_tbl(i).name );
1588: FND_MSG_PUB.add;
1589: END IF;
1590: END;
1591:
1592: ELSIF ( p_x_effectivity_tbl(i).dml_operation = 'D' ) THEN

Line 1603: FND_MSG_PUB.add;

1599: -- If the record does not exist, then, abort API.
1600: IF ( SQL%ROWCOUNT = 0 ) THEN
1601: FND_MESSAGE.set_name('AHL','AHL_FMP_RECORD_CHANGED');
1602: FND_MESSAGE.set_token( 'RECORD', TO_CHAR( i ) );
1603: FND_MSG_PUB.add;
1604: END IF;
1605:
1606: -- Delete the record in related Tables
1607: DELETE AHL_MR_EFFECTIVITY_DTLS

Line 1635: l_msg_count := FND_MSG_PUB.count_msg;

1631: AHL_DEBUG_PUB.debug( G_PKG_NAME || '.' || G_API_NAME || ' : after DML operation' );
1632: END IF;
1633:
1634: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception
1635: l_msg_count := FND_MSG_PUB.count_msg;
1636: IF l_msg_count > 0 THEN
1637: x_msg_count := l_msg_count;
1638: RAISE FND_API.G_EXC_ERROR;
1639: END IF;

Line 1661: l_msg_count := FND_MSG_PUB.count_msg;

1657: END IF;
1658:
1659:
1660: -- If any severe error occurs, then, abort API.
1661: l_msg_count := FND_MSG_PUB.count_msg;
1662: IF l_msg_count > 0 THEN
1663: x_msg_count := l_msg_count;
1664: RAISE FND_API.G_EXC_ERROR;
1665: END IF;

Line 1677: FND_MSG_PUB.count_and_get

1673: COMMIT WORK;
1674: END IF;
1675:
1676: -- Count and Get messages (optional)
1677: FND_MSG_PUB.count_and_get
1678: (
1679: p_encoded => FND_API.G_FALSE,
1680: p_count => x_msg_count,
1681: p_data => x_msg_data

Line 1694: FND_MSG_PUB.count_and_get

1690:
1691: WHEN FND_API.G_EXC_ERROR THEN
1692: ROLLBACK TO process_effectivity_PVT;
1693: x_return_status := FND_API.G_RET_STS_ERROR ;
1694: FND_MSG_PUB.count_and_get
1695: (
1696: p_encoded => FND_API.G_FALSE,
1697: p_count => x_msg_count,
1698: p_data => x_msg_data

Line 1709: FND_MSG_PUB.count_and_get

1705:
1706: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1707: ROLLBACK TO process_effectivity_PVT;
1708: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1709: FND_MSG_PUB.count_and_get
1710: (
1711: p_encoded => FND_API.G_FALSE,
1712: p_count => x_msg_count,
1713: p_data => x_msg_data

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

1720:
1721: WHEN OTHERS THEN
1722: ROLLBACK TO process_effectivity_PVT;
1723: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1724: IF FND_MSG_PUB.check_msg_level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1725: THEN
1726: FND_MSG_PUB.add_exc_msg
1727: (
1728: p_pkg_name => G_PKG_NAME,

Line 1726: FND_MSG_PUB.add_exc_msg

1722: ROLLBACK TO process_effectivity_PVT;
1723: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1724: IF FND_MSG_PUB.check_msg_level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1725: THEN
1726: FND_MSG_PUB.add_exc_msg
1727: (
1728: p_pkg_name => G_PKG_NAME,
1729: p_procedure_name => G_API_NAME,
1730: p_error_text => SUBSTRB(SQLERRM,1,240)

Line 1733: FND_MSG_PUB.count_and_get

1729: p_procedure_name => G_API_NAME,
1730: p_error_text => SUBSTRB(SQLERRM,1,240)
1731: );
1732: END IF;
1733: FND_MSG_PUB.count_and_get
1734: (
1735: p_encoded => FND_API.G_FALSE,
1736: p_count => x_msg_count,
1737: p_data => x_msg_data