DBA Data[Home] [Help]

APPS.AHL_FMP_EFFECTIVITY_DTL_PVT dependencies on FND_MSG_PUB

Line 131: FND_MSG_PUB.ADD;

127: -- Check Profile value
128:
129: IF G_APPLN_USAGE IS NULL THEN
130: FND_MESSAGE.SET_NAME('AHL','AHL_COM_APP_PRFL_UNDEF');
131: FND_MSG_PUB.ADD;
132: RETURN;
133: END IF;
134:
135:

Line 138: FND_MSG_PUB.add;

134:
135:
136: IF ( G_APPLN_USAGE = 'PM' ) THEN
137: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_PM_MED_PM_INSTALL' );
138: FND_MSG_PUB.add;
139: x_return_status := FND_API.G_RET_STS_ERROR;
140: RETURN;
141: END IF;
142:

Line 148: FND_MSG_PUB.add;

144:
145: IF ( p_mr_header_id = FND_API.G_MISS_NUM OR
146: p_mr_header_id IS NULL ) THEN
147: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_MR_HEADER_ID_NULL' );
148: FND_MSG_PUB.add;
149: x_return_status := FND_API.G_RET_STS_ERROR;
150: RETURN;
151: END IF;
152:

Line 163: FND_MSG_PUB.add;

159: );
160:
161: IF ( NVL( l_return_status, 'X' ) <> FND_API.G_RET_STS_SUCCESS ) THEN
162: FND_MESSAGE.set_name( 'AHL', l_msg_data );
163: FND_MSG_PUB.add;
164: x_return_status := l_return_status;
165: RETURN;
166: END IF;
167:

Line 172: FND_MSG_PUB.add;

168: -- Check if a valid value is passed in p_mr_effectivity_id
169: IF ( p_mr_effectivity_id = FND_API.G_MISS_NUM OR
170: p_mr_effectivity_id IS NULL ) THEN
171: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_MRE_ID_NULL' );
172: FND_MSG_PUB.add;
173: x_return_status := FND_API.G_RET_STS_ERROR;
174: RETURN;
175: END IF;
176:

Line 187: FND_MSG_PUB.add;

183: );
184:
185: IF ( NVL( l_return_status, 'X' ) <> FND_API.G_RET_STS_SUCCESS ) THEN
186: FND_MESSAGE.set_name( 'AHL', l_msg_data );
187: FND_MSG_PUB.add;
188: x_return_status := l_return_status;
189: RETURN;
190: END IF;
191:

Line 196: FND_MSG_PUB.add;

192: -- Check if atleast one record is passed in p_effectivity_detail_tbl
193: IF ( p_effectivity_detail_tbl.count < 1 AND p_effty_ext_detail_tbl.count < 1 ) THEN
194: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_INVALID_PROCEDURE_CALL' );
195: FND_MESSAGE.set_token( 'PROCEDURE', G_PKG_NAME || '.' || G_API_NAME );
196: FND_MSG_PUB.add;
197: x_return_status := FND_API.G_RET_STS_ERROR;
198: RETURN;
199: END IF;
200:

Line 209: FND_MSG_PUB.add;

205: p_effectivity_detail_tbl(i).dml_operation <> 'C' ) THEN
206: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_DML_INVALID' );
207: FND_MESSAGE.set_token( 'FIELD', p_effectivity_detail_tbl(i).dml_operation );
208: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_detail_tbl(i) ) );
209: FND_MSG_PUB.add;
210: x_return_status := FND_API.G_RET_STS_ERROR;
211: RETURN;
212: END IF;
213: END LOOP;

Line 223: FND_MSG_PUB.add;

219: p_effty_ext_detail_tbl(i).dml_operation <> 'C' ) THEN
220: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_DML_INVALID' );
221: FND_MESSAGE.set_token( 'FIELD', p_effty_ext_detail_tbl(i).dml_operation );
222: FND_MESSAGE.set_token( 'RECORD', get_ext_record_identifier( p_effty_ext_detail_tbl(i) ) );
223: FND_MSG_PUB.add;
224: x_return_status := FND_API.G_RET_STS_ERROR;
225: RETURN;
226: END IF;
227: IF ( p_effty_ext_detail_tbl(i).EFFECT_EXT_DTL_REC_TYPE <> 'OWNER' AND

Line 233: FND_MSG_PUB.add;

229: p_effty_ext_detail_tbl(i).EFFECT_EXT_DTL_REC_TYPE <> 'CSIEXTATTR' ) THEN
230: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_DML_INVALID' );
231: FND_MESSAGE.set_token( 'FIELD', p_effty_ext_detail_tbl(i).EFFECT_EXT_DTL_REC_TYPE );
232: FND_MESSAGE.set_token( 'RECORD', get_ext_record_identifier( p_effty_ext_detail_tbl(i) ) );
233: FND_MSG_PUB.add;
234: x_return_status := FND_API.G_RET_STS_ERROR;
235: RETURN;
236: END IF;
237: END LOOP;

Line 381: FND_MSG_PUB.add;

377: END IF;
378: END IF;
379:
380: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_x_effectivity_detail_rec ) );
381: FND_MSG_PUB.add;
382: END IF;
383:
384: END IF;
385:

Line 411: FND_MSG_PUB.add;

407: ELSE
408: FND_MESSAGE.set_token( 'FIELD', p_x_effectivity_detail_rec.country );
409: END IF;
410: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_x_effectivity_detail_rec ) );
411: FND_MSG_PUB.add;
412: END IF;
413:
414: END IF;
415:

Line 495: FND_MSG_PUB.add;

491: END IF;
492: END IF;
493:
494: FND_MESSAGE.set_token( 'RECORD', get_ext_record_identifier( p_x_effty_ext_detail_rec ) );
495: FND_MSG_PUB.add;
496: END IF;
497: END IF;
498: END IF;
499:

Line 526: FND_MSG_PUB.add;

522: ELSE
523: FND_MESSAGE.set_token( 'FIELD', p_x_effty_ext_detail_rec.location );
524: END IF;
525: FND_MESSAGE.set_token( 'RECORD', get_ext_record_identifier( p_x_effty_ext_detail_rec ) );
526: FND_MSG_PUB.add;
527: END IF;
528: END IF;
529: END IF;
530:

Line 557: FND_MSG_PUB.add;

553: ELSE
554: FND_MESSAGE.set_token( 'FIELD', p_x_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_NAME );
555: END IF;
556: FND_MESSAGE.set_token( 'RECORD', get_ext_record_identifier( p_x_effty_ext_detail_rec ) );
557: FND_MSG_PUB.add;
558: END IF;
559: END IF;
560: END IF;
561:

Line 892: FND_MSG_PUB.add;

888:
889: IF get_old_rec%NOTFOUND THEN
890: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_INVALID_EFF_DTL_REC' );
891: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_x_effectivity_detail_rec ) );
892: FND_MSG_PUB.add;
893: CLOSE get_old_rec;
894: RAISE FND_API.G_EXC_ERROR;
895: END IF;
896:

Line 1125: FND_MSG_PUB.add;

1121: ELSIF (l_old_effty_ext_detail_rec.EFFECT_EXT_DTL_REC_TYPE = 'CSIEXTATTR')THEN
1122: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_INVEFF_EXT_ATTR_REC' );
1123: END IF;
1124: FND_MESSAGE.set_token( 'RECORD', get_ext_record_identifier( p_x_effty_ext_detail_rec ) );
1125: FND_MSG_PUB.add;
1126: CLOSE get_old_rec;
1127: RAISE FND_API.G_EXC_ERROR;
1128: END IF;
1129:

Line 1288: FND_MSG_PUB.add;

1284: IF ( p_effectivity_detail_rec.exclude_flag IS NULL OR
1285: p_effectivity_detail_rec.exclude_flag = FND_API.G_MISS_CHAR ) THEN
1286: FND_MESSAGE.set_name( 'AHL','AHL_FMP_EX_FLAG_NULL' );
1287: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_detail_rec ) );
1288: FND_MSG_PUB.add;
1289: ELSE
1290: -- Check if the Exclude Flag does not contain an invalid value.
1291: IF ( p_effectivity_detail_rec.exclude_flag <> 'Y' AND
1292: p_effectivity_detail_rec.exclude_flag <> 'N' ) THEN

Line 1296: FND_MSG_PUB.add;

1292: p_effectivity_detail_rec.exclude_flag <> 'N' ) THEN
1293: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_EX_FLAG' );
1294: FND_MESSAGE.set_token( 'FIELD', p_effectivity_detail_rec.exclude_flag );
1295: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_detail_rec ) );
1296: FND_MSG_PUB.add;
1297: END IF;
1298: END IF;
1299: RETURN;
1300: END IF;

Line 1307: FND_MSG_PUB.add;

1303: -- Check if the Exclude Flag does not contain a null value.
1304: IF ( p_effectivity_detail_rec.exclude_flag = FND_API.G_MISS_CHAR ) THEN
1305: FND_MESSAGE.set_name( 'AHL','AHL_FMP_EX_FLAG_NULL' );
1306: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_detail_rec ) );
1307: FND_MSG_PUB.add;
1308: ELSIF ( p_effectivity_detail_rec.exclude_flag IS NOT NULL ) THEN
1309: -- Check if the Exclude Flag does not contain an invalid value.
1310: IF ( p_effectivity_detail_rec.exclude_flag <> 'Y' AND
1311: p_effectivity_detail_rec.exclude_flag <> 'N' ) THEN

Line 1315: FND_MSG_PUB.add;

1311: p_effectivity_detail_rec.exclude_flag <> 'N' ) THEN
1312: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_EX_FLAG' );
1313: FND_MESSAGE.set_token( 'FIELD', p_effectivity_detail_rec.exclude_flag );
1314: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_detail_rec ) );
1315: FND_MSG_PUB.add;
1316: END IF;
1317: END IF;
1318: END IF;
1319:

Line 1325: FND_MSG_PUB.add;

1321: IF ( p_effectivity_detail_rec.mr_effectivity_detail_id IS NULL OR
1322: p_effectivity_detail_rec.mr_effectivity_detail_id = FND_API.G_MISS_NUM ) THEN
1323: FND_MESSAGE.set_name( 'AHL','AHL_FMP_MR_EFF_DTL_ID_NULL' );
1324: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_detail_rec ) );
1325: FND_MSG_PUB.add;
1326: END IF;
1327:
1328: -- Check if the mandatory Object Version Number column contains a null value.
1329: IF ( p_effectivity_detail_rec.object_version_number IS NULL OR

Line 1333: FND_MSG_PUB.add;

1329: IF ( p_effectivity_detail_rec.object_version_number IS NULL OR
1330: p_effectivity_detail_rec.object_version_number = FND_API.G_MISS_NUM ) THEN
1331: FND_MESSAGE.set_name( 'AHL','AHL_FMP_MED_OBJ_VERSION_NULL' );
1332: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_detail_rec ) );
1333: FND_MSG_PUB.add;
1334: END IF;
1335:
1336: END validate_attributes;
1337:

Line 1355: FND_MSG_PUB.add;

1351: IF ( p_effty_ext_detail_rec.exclude_flag IS NULL OR
1352: p_effty_ext_detail_rec.exclude_flag = FND_API.G_MISS_CHAR ) THEN
1353: FND_MESSAGE.set_name( 'AHL','AHL_FMP_EX_FLAG_NULL' );
1354: FND_MESSAGE.set_token( 'RECORD', get_ext_record_identifier( p_effty_ext_detail_rec ) );
1355: FND_MSG_PUB.add;
1356: ELSE
1357: -- Check if the Exclude Flag does not contain an invalid value.
1358: IF ( p_effty_ext_detail_rec.exclude_flag <> 'Y' AND
1359: p_effty_ext_detail_rec.exclude_flag <> 'N' ) THEN

Line 1363: FND_MSG_PUB.add;

1359: p_effty_ext_detail_rec.exclude_flag <> 'N' ) THEN
1360: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_EX_FLAG' );
1361: FND_MESSAGE.set_token( 'FIELD', p_effty_ext_detail_rec.exclude_flag );
1362: FND_MESSAGE.set_token( 'RECORD', get_ext_record_identifier( p_effty_ext_detail_rec ) );
1363: FND_MSG_PUB.add;
1364: END IF;
1365: END IF;
1366: RETURN;
1367: END IF;

Line 1374: FND_MSG_PUB.add;

1370: -- Check if the Exclude Flag does not contain a null value.
1371: IF ( p_effty_ext_detail_rec.exclude_flag = FND_API.G_MISS_CHAR ) THEN
1372: FND_MESSAGE.set_name( 'AHL','AHL_FMP_EX_FLAG_NULL' );
1373: FND_MESSAGE.set_token( 'RECORD', get_ext_record_identifier( p_effty_ext_detail_rec ) );
1374: FND_MSG_PUB.add;
1375: ELSIF ( p_effty_ext_detail_rec.exclude_flag IS NOT NULL ) THEN
1376: -- Check if the Exclude Flag does not contain an invalid value.
1377: IF ( p_effty_ext_detail_rec.exclude_flag <> 'Y' AND
1378: p_effty_ext_detail_rec.exclude_flag <> 'N' ) THEN

Line 1382: FND_MSG_PUB.add;

1378: p_effty_ext_detail_rec.exclude_flag <> 'N' ) THEN
1379: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_EX_FLAG' );
1380: FND_MESSAGE.set_token( 'FIELD', p_effty_ext_detail_rec.exclude_flag );
1381: FND_MESSAGE.set_token( 'RECORD', get_ext_record_identifier( p_effty_ext_detail_rec ) );
1382: FND_MSG_PUB.add;
1383: END IF;
1384: END IF;
1385: END IF;
1386:

Line 1392: FND_MSG_PUB.add;

1388: IF ( p_effty_ext_detail_rec.MR_EFFECTIVITY_EXT_DTL_ID IS NULL OR
1389: p_effty_ext_detail_rec.MR_EFFECTIVITY_EXT_DTL_ID = FND_API.G_MISS_NUM ) THEN
1390: FND_MESSAGE.set_name( 'AHL','AHL_FMP_MR_EFF_EXT_DTL_ID_NULL' );
1391: FND_MESSAGE.set_token( 'RECORD', get_ext_record_identifier( p_effty_ext_detail_rec ) );
1392: FND_MSG_PUB.add;
1393: END IF;
1394:
1395: -- Check if the mandatory Object Version Number column contains a null value.
1396: IF ( p_effty_ext_detail_rec.object_version_number IS NULL OR

Line 1400: FND_MSG_PUB.add;

1396: IF ( p_effty_ext_detail_rec.object_version_number IS NULL OR
1397: p_effty_ext_detail_rec.object_version_number = FND_API.G_MISS_NUM ) THEN
1398: FND_MESSAGE.set_name( 'AHL','AHL_FMP_MED_EXT_OBJ_VER_NULL' );
1399: FND_MESSAGE.set_token( 'RECORD', get_ext_record_identifier( p_effty_ext_detail_rec ) );
1400: FND_MSG_PUB.add;
1401: END IF;
1402:
1403: END validate_ext_attributes;
1404:

Line 1436: FND_MSG_PUB.add;

1432: FND_MESSAGE.set_name( 'AHL', l_msg_data );
1433: FND_MESSAGE.set_token( 'FIELD1', p_effectivity_detail_rec.serial_number_from );
1434: FND_MESSAGE.set_token( 'FIELD2', p_effectivity_detail_rec.serial_number_to );
1435: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_detail_rec ) );
1436: FND_MSG_PUB.add;
1437: END IF;
1438: END IF;
1439:
1440: -- Check if Manufacture date range is valid

Line 1449: FND_MSG_PUB.add;

1445: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_MFG_DT_RANGE' );
1446: FND_MESSAGE.set_token( 'FIELD1', p_effectivity_detail_rec.manufacture_date_from );
1447: FND_MESSAGE.set_token( 'FIELD2', p_effectivity_detail_rec.manufacture_date_to );
1448: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_effectivity_detail_rec ) );
1449: FND_MSG_PUB.add;
1450: END IF;
1451: END IF;
1452:
1453: -- Check if atleast one value is passed in the record

Line 1463: FND_MSG_PUB.add;

1459: p_effectivity_detail_rec.manufacture_date_to IS NULL AND
1460: p_effectivity_detail_rec.country IS NULL AND
1461: p_effectivity_detail_rec.country_code IS NULL ) THEN
1462: FND_MESSAGE.set_name( 'AHL','AHL_FMP_ONE_VALUE_REQD' );
1463: FND_MSG_PUB.add;
1464: END IF;
1465:
1466: END validate_record;
1467:

Line 1486: FND_MSG_PUB.add;

1482: IF ( p_effty_ext_detail_rec.EFFECT_EXT_DTL_REC_TYPE = 'OWNER' )THEN
1483: IF ( (p_effty_ext_detail_rec.owner IS NULL OR p_effty_ext_detail_rec.owner = FND_API.G_MISS_CHAR) AND
1484: (p_effty_ext_detail_rec.owner_id IS NULL OR p_effty_ext_detail_rec.owner_id = FND_API.G_MISS_NUM )) THEN
1485: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_OWNER_NLL' );
1486: FND_MSG_PUB.add;
1487: ELSIF((p_effty_ext_detail_rec.location IS NOT NULL OR p_effty_ext_detail_rec.location <> FND_API.G_MISS_CHAR) AND
1488: (p_effty_ext_detail_rec.location_type_code IS NOT NULL OR p_effty_ext_detail_rec.location_type_code <> FND_API.G_MISS_CHAR )) THEN
1489: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_OWNER_REC' );
1490: FND_MSG_PUB.add;

Line 1490: FND_MSG_PUB.add;

1486: FND_MSG_PUB.add;
1487: ELSIF((p_effty_ext_detail_rec.location IS NOT NULL OR p_effty_ext_detail_rec.location <> FND_API.G_MISS_CHAR) AND
1488: (p_effty_ext_detail_rec.location_type_code IS NOT NULL OR p_effty_ext_detail_rec.location_type_code <> FND_API.G_MISS_CHAR )) THEN
1489: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_OWNER_REC' );
1490: FND_MSG_PUB.add;
1491: ELSIF((p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_NAME IS NOT NULL OR p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_NAME <> FND_API.G_MISS_CHAR) AND
1492: (p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_CODE IS NOT NULL OR p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_CODE <> FND_API.G_MISS_CHAR ))THEN
1493: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_OWNER_REC' );
1494: FND_MSG_PUB.add;

Line 1494: FND_MSG_PUB.add;

1490: FND_MSG_PUB.add;
1491: ELSIF((p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_NAME IS NOT NULL OR p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_NAME <> FND_API.G_MISS_CHAR) AND
1492: (p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_CODE IS NOT NULL OR p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_CODE <> FND_API.G_MISS_CHAR ))THEN
1493: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_OWNER_REC' );
1494: FND_MSG_PUB.add;
1495: END IF;
1496: ELSIF( p_effty_ext_detail_rec.EFFECT_EXT_DTL_REC_TYPE = 'LOCATION' ) THEN
1497: IF((p_effty_ext_detail_rec.location IS NULL OR p_effty_ext_detail_rec.location = FND_API.G_MISS_CHAR) AND
1498: (p_effty_ext_detail_rec.location_type_code IS NULL OR p_effty_ext_detail_rec.location_type_code = FND_API.G_MISS_CHAR )) THEN

Line 1500: FND_MSG_PUB.add;

1496: ELSIF( p_effty_ext_detail_rec.EFFECT_EXT_DTL_REC_TYPE = 'LOCATION' ) THEN
1497: IF((p_effty_ext_detail_rec.location IS NULL OR p_effty_ext_detail_rec.location = FND_API.G_MISS_CHAR) AND
1498: (p_effty_ext_detail_rec.location_type_code IS NULL OR p_effty_ext_detail_rec.location_type_code = FND_API.G_MISS_CHAR )) THEN
1499: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_LOC_NLL' );
1500: FND_MSG_PUB.add;
1501: ELSIF ( (p_effty_ext_detail_rec.owner IS NOT NULL OR p_effty_ext_detail_rec.owner <> FND_API.G_MISS_CHAR) AND
1502: (p_effty_ext_detail_rec.owner_id IS NOT NULL OR p_effty_ext_detail_rec.owner_id <> FND_API.G_MISS_NUM )) THEN
1503: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_LOC_REC' );
1504: FND_MSG_PUB.add;

Line 1504: FND_MSG_PUB.add;

1500: FND_MSG_PUB.add;
1501: ELSIF ( (p_effty_ext_detail_rec.owner IS NOT NULL OR p_effty_ext_detail_rec.owner <> FND_API.G_MISS_CHAR) AND
1502: (p_effty_ext_detail_rec.owner_id IS NOT NULL OR p_effty_ext_detail_rec.owner_id <> FND_API.G_MISS_NUM )) THEN
1503: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_LOC_REC' );
1504: FND_MSG_PUB.add;
1505: ELSIF((p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_NAME IS NOT NULL OR p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_NAME <> FND_API.G_MISS_CHAR) AND
1506: (p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_CODE IS NOT NULL OR p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_CODE <> FND_API.G_MISS_CHAR ))THEN
1507: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_LOC_REC' );
1508: FND_MSG_PUB.add;

Line 1508: FND_MSG_PUB.add;

1504: FND_MSG_PUB.add;
1505: ELSIF((p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_NAME IS NOT NULL OR p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_NAME <> FND_API.G_MISS_CHAR) AND
1506: (p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_CODE IS NOT NULL OR p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_CODE <> FND_API.G_MISS_CHAR ))THEN
1507: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_LOC_REC' );
1508: FND_MSG_PUB.add;
1509: END IF;
1510: ELSIF( p_effty_ext_detail_rec.EFFECT_EXT_DTL_REC_TYPE = 'CSIEXTATTR' ) THEN
1511: IF((p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_NAME IS NULL OR p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_NAME = FND_API.G_MISS_CHAR) AND
1512: (p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_CODE IS NULL OR p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_CODE = FND_API.G_MISS_CHAR ))THEN

Line 1514: FND_MSG_PUB.add;

1510: ELSIF( p_effty_ext_detail_rec.EFFECT_EXT_DTL_REC_TYPE = 'CSIEXTATTR' ) THEN
1511: IF((p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_NAME IS NULL OR p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_NAME = FND_API.G_MISS_CHAR) AND
1512: (p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_CODE IS NULL OR p_effty_ext_detail_rec.CSI_EXT_ATTRIBUTE_CODE = FND_API.G_MISS_CHAR ))THEN
1513: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_CSIATTR_NLL' );
1514: FND_MSG_PUB.add;
1515: ELSIF ( (p_effty_ext_detail_rec.owner IS NOT NULL OR p_effty_ext_detail_rec.owner <> FND_API.G_MISS_CHAR) AND
1516: (p_effty_ext_detail_rec.owner_id IS NOT NULL OR p_effty_ext_detail_rec.owner_id <> FND_API.G_MISS_NUM )) THEN
1517: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_CSIATTR_REC' );
1518: FND_MSG_PUB.add;

Line 1518: FND_MSG_PUB.add;

1514: FND_MSG_PUB.add;
1515: ELSIF ( (p_effty_ext_detail_rec.owner IS NOT NULL OR p_effty_ext_detail_rec.owner <> FND_API.G_MISS_CHAR) AND
1516: (p_effty_ext_detail_rec.owner_id IS NOT NULL OR p_effty_ext_detail_rec.owner_id <> FND_API.G_MISS_NUM )) THEN
1517: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_CSIATTR_REC' );
1518: FND_MSG_PUB.add;
1519: ELSIF((p_effty_ext_detail_rec.location IS NOT NULL OR p_effty_ext_detail_rec.location <> FND_API.G_MISS_CHAR) AND
1520: (p_effty_ext_detail_rec.location_type_code IS NOT NULL OR p_effty_ext_detail_rec.location_type_code <> FND_API.G_MISS_CHAR )) THEN
1521: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_CSIATTR_REC' );
1522: FND_MSG_PUB.add;

Line 1522: FND_MSG_PUB.add;

1518: FND_MSG_PUB.add;
1519: ELSIF((p_effty_ext_detail_rec.location IS NOT NULL OR p_effty_ext_detail_rec.location <> FND_API.G_MISS_CHAR) AND
1520: (p_effty_ext_detail_rec.location_type_code IS NOT NULL OR p_effty_ext_detail_rec.location_type_code <> FND_API.G_MISS_CHAR )) THEN
1521: FND_MESSAGE.set_name( 'AHL','AHL_FMP_INVALID_CSIATTR_REC' );
1522: FND_MSG_PUB.add;
1523: END IF;
1524: END IF;
1525:
1526:

Line 1622: FND_MSG_PUB.add;

1618: EXIT WHEN get_dup_rec%NOTFOUND;
1619:
1620: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_DUPLICATE_MED_REC' );
1621: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( l_effectivity_detail_rec ) );
1622: FND_MSG_PUB.add;
1623: END LOOP;
1624:
1625: IF ( get_dup_rec%ROWCOUNT > 0 ) THEN
1626: CLOSE get_dup_rec;

Line 1646: FND_MSG_PUB.add;

1642: EXIT WHEN get_dup_owner_rec%NOTFOUND;
1643:
1644: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_DUP_MED_OWNER_REC' );
1645: FND_MESSAGE.set_token( 'RECORD', get_ext_record_identifier( l_effty_ext_detail_rec ) );
1646: FND_MSG_PUB.add;
1647: END LOOP;
1648:
1649: IF ( get_dup_owner_rec%ROWCOUNT > 0 ) THEN
1650: CLOSE get_dup_owner_rec;

Line 1670: FND_MSG_PUB.add;

1666: EXIT WHEN get_dup_location_rec%NOTFOUND;
1667:
1668: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_DUP_MED_LOC_REC' );
1669: FND_MESSAGE.set_token( 'RECORD', get_ext_record_identifier( l_effty_ext_detail_rec ) );
1670: FND_MSG_PUB.add;
1671: END LOOP;
1672:
1673: IF ( get_dup_location_rec%ROWCOUNT > 0 ) THEN
1674: CLOSE get_dup_location_rec;

Line 1695: FND_MSG_PUB.add;

1691: EXIT WHEN get_dup_csi_attrib_rec%NOTFOUND;
1692:
1693: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_DUP_MED_ATTRIB_REC' );
1694: FND_MESSAGE.set_token( 'RECORD', get_ext_record_identifier( l_effty_ext_detail_rec ) );
1695: FND_MSG_PUB.add;
1696: END LOOP;
1697:
1698: IF ( get_dup_csi_attrib_rec%ROWCOUNT > 0 ) THEN
1699: CLOSE get_dup_csi_attrib_rec;

Line 1795: FND_MSG_PUB.initialize;

1791: END IF;
1792:
1793: -- Initialize message list if p_init_msg_list is set to TRUE.
1794: IF FND_API.to_boolean( p_init_msg_list ) THEN
1795: FND_MSG_PUB.initialize;
1796: END IF;
1797:
1798: -- Enable Debug (optional)
1799: IF ( G_DEBUG = 'Y' ) THEN

Line 2028: l_msg_count := FND_MSG_PUB.count_msg;

2024: AHL_DEBUG_PUB.debug( G_PKG_NAME || '.' || G_API_NAME || ' : after validate_record' );
2025: END IF;
2026:
2027: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception
2028: l_msg_count := FND_MSG_PUB.count_msg;
2029: IF l_msg_count > 0 THEN
2030: x_msg_count := l_msg_count;
2031: RAISE FND_API.G_EXC_ERROR;
2032: END IF;

Line 2148: FND_MSG_PUB.add;

2144: -- If the record does not exist, then, abort API.
2145: IF ( SQL%ROWCOUNT = 0 ) THEN
2146: FND_MESSAGE.set_name('AHL','AHL_FMP_RECORD_CHANGED');
2147: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_x_effectivity_detail_tbl(i) ) );
2148: FND_MSG_PUB.add;
2149: RAISE FND_API.G_EXC_ERROR;
2150: END IF;
2151:
2152: -- Set OUT values

Line 2166: FND_MSG_PUB.add;

2162: -- If the record does not exist, then, abort API.
2163: IF ( SQL%ROWCOUNT = 0 ) THEN
2164: FND_MESSAGE.set_name('AHL','AHL_FMP_RECORD_CHANGED');
2165: FND_MESSAGE.set_token( 'RECORD', TO_CHAR( i ) );
2166: FND_MSG_PUB.add;
2167: RAISE FND_API.G_EXC_ERROR;
2168: END IF;
2169: END IF;
2170:

Line 2228: FND_MSG_PUB.add;

2224: )
2225: THEN
2226: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_OVERLAP_MED_REC' );
2227: FND_MESSAGE.set_token( 'RECORD', get_record_identifier( p_x_effectivity_detail_tbl(i) ) );
2228: FND_MSG_PUB.add;
2229: RAISE FND_API.G_EXC_ERROR;
2230: END IF;
2231:
2232: END IF;

Line 2353: FND_MSG_PUB.add;

2349: -- If the record does not exist, then, abort API.
2350: IF ( SQL%ROWCOUNT = 0 ) THEN
2351: FND_MESSAGE.set_name('AHL','AHL_FMP_RECORD_CHANGED');
2352: FND_MESSAGE.set_token( 'RECORD', get_ext_record_identifier( p_x_effty_ext_detail_tbl(i) ) );
2353: FND_MSG_PUB.add;
2354: RAISE FND_API.G_EXC_ERROR;
2355: END IF;
2356:
2357: -- Set OUT values

Line 2371: FND_MSG_PUB.add;

2367: -- If the record does not exist, then, abort API.
2368: IF ( SQL%ROWCOUNT = 0 ) THEN
2369: FND_MESSAGE.set_name('AHL','AHL_FMP_RECORD_CHANGED');
2370: FND_MESSAGE.set_token( 'RECORD', TO_CHAR( i ) );
2371: FND_MSG_PUB.add;
2372: RAISE FND_API.G_EXC_ERROR;
2373: END IF;
2374: END IF;
2375:

Line 2404: FND_MSG_PUB.count_and_get

2400: COMMIT WORK;
2401: END IF;
2402:
2403: -- Count and Get messages (optional)
2404: FND_MSG_PUB.count_and_get
2405: (
2406: p_encoded => FND_API.G_FALSE,
2407: p_count => x_msg_count,
2408: p_data => x_msg_data

Line 2421: FND_MSG_PUB.count_and_get

2417:
2418: WHEN FND_API.G_EXC_ERROR THEN
2419: ROLLBACK TO process_effectivity_detail_PVT;
2420: x_return_status := FND_API.G_RET_STS_ERROR ;
2421: FND_MSG_PUB.count_and_get
2422: (
2423: p_encoded => FND_API.G_FALSE,
2424: p_count => x_msg_count,
2425: p_data => x_msg_data

Line 2436: FND_MSG_PUB.count_and_get

2432:
2433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2434: ROLLBACK TO process_effectivity_detail_PVT;
2435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2436: FND_MSG_PUB.count_and_get
2437: (
2438: p_encoded => FND_API.G_FALSE,
2439: p_count => x_msg_count,
2440: p_data => x_msg_data

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

2447:
2448: WHEN OTHERS THEN
2449: ROLLBACK TO process_effectivity_detail_PVT;
2450: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2451: IF FND_MSG_PUB.check_msg_level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2452: THEN
2453: FND_MSG_PUB.add_exc_msg
2454: (
2455: p_pkg_name => G_PKG_NAME,

Line 2453: FND_MSG_PUB.add_exc_msg

2449: ROLLBACK TO process_effectivity_detail_PVT;
2450: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2451: IF FND_MSG_PUB.check_msg_level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2452: THEN
2453: FND_MSG_PUB.add_exc_msg
2454: (
2455: p_pkg_name => G_PKG_NAME,
2456: p_procedure_name => G_API_NAME,
2457: p_error_text => SUBSTRB(SQLERRM,1,240)

Line 2460: FND_MSG_PUB.count_and_get

2456: p_procedure_name => G_API_NAME,
2457: p_error_text => SUBSTRB(SQLERRM,1,240)
2458: );
2459: END IF;
2460: FND_MSG_PUB.count_and_get
2461: (
2462: p_encoded => FND_API.G_FALSE,
2463: p_count => x_msg_count,
2464: p_data => x_msg_data