303:
304: -- validate NOT NULL column
305: IF (p_APPLICATION_SHORT_NAME is NULL OR p_APPLICATION_SHORT_NAME = FND_API.G_MISS_CHAR)
306: THEN
307: FND_MESSAGE.Set_Name('FND', 'OATM_REQUIRED_ENTRY');
308: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
309: FND_MESSAGE.Set_Token('FIELD', 'Application Short Name');
310: FND_MSG_PUB.Add;
311: x_return_status := FND_API.G_RET_STS_ERROR;
304: -- validate NOT NULL column
305: IF (p_APPLICATION_SHORT_NAME is NULL OR p_APPLICATION_SHORT_NAME = FND_API.G_MISS_CHAR)
306: THEN
307: FND_MESSAGE.Set_Name('FND', 'OATM_REQUIRED_ENTRY');
308: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
309: FND_MESSAGE.Set_Token('FIELD', 'Application Short Name');
310: FND_MSG_PUB.Add;
311: x_return_status := FND_API.G_RET_STS_ERROR;
312: END IF;
305: IF (p_APPLICATION_SHORT_NAME is NULL OR p_APPLICATION_SHORT_NAME = FND_API.G_MISS_CHAR)
306: THEN
307: FND_MESSAGE.Set_Name('FND', 'OATM_REQUIRED_ENTRY');
308: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
309: FND_MESSAGE.Set_Token('FIELD', 'Application Short Name');
310: FND_MSG_PUB.Add;
311: x_return_status := FND_API.G_RET_STS_ERROR;
312: END IF;
313:
313:
314: -- validate NOT NULL column
315: IF (p_OBJECT_NAME is NULL OR p_OBJECT_NAME = FND_API.G_MISS_CHAR)
316: THEN
317: FND_MESSAGE.Set_Name('FND', 'OATM_REQUIRED_ENTRY');
318: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
319: FND_MESSAGE.Set_Token('FIELD', 'Object Name');
320: FND_MSG_PUB.Add;
321: x_return_status := FND_API.G_RET_STS_ERROR;
314: -- validate NOT NULL column
315: IF (p_OBJECT_NAME is NULL OR p_OBJECT_NAME = FND_API.G_MISS_CHAR)
316: THEN
317: FND_MESSAGE.Set_Name('FND', 'OATM_REQUIRED_ENTRY');
318: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
319: FND_MESSAGE.Set_Token('FIELD', 'Object Name');
320: FND_MSG_PUB.Add;
321: x_return_status := FND_API.G_RET_STS_ERROR;
322: END IF;
315: IF (p_OBJECT_NAME is NULL OR p_OBJECT_NAME = FND_API.G_MISS_CHAR)
316: THEN
317: FND_MESSAGE.Set_Name('FND', 'OATM_REQUIRED_ENTRY');
318: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
319: FND_MESSAGE.Set_Token('FIELD', 'Object Name');
320: FND_MSG_PUB.Add;
321: x_return_status := FND_API.G_RET_STS_ERROR;
322: END IF;
323:
323:
324: -- validate NOT NULL column
325: IF (p_TABLESPACE_TYPE is NULL OR p_TABLESPACE_TYPE = FND_API.G_MISS_CHAR)
326: THEN
327: FND_MESSAGE.Set_Name('FND', 'OATM_REQUIRED_ENTRY');
328: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
329: FND_MESSAGE.Set_Token('FIELD', 'Tablespace Type');
330: FND_MSG_PUB.Add;
331: x_return_status := FND_API.G_RET_STS_ERROR;
324: -- validate NOT NULL column
325: IF (p_TABLESPACE_TYPE is NULL OR p_TABLESPACE_TYPE = FND_API.G_MISS_CHAR)
326: THEN
327: FND_MESSAGE.Set_Name('FND', 'OATM_REQUIRED_ENTRY');
328: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
329: FND_MESSAGE.Set_Token('FIELD', 'Tablespace Type');
330: FND_MSG_PUB.Add;
331: x_return_status := FND_API.G_RET_STS_ERROR;
332: END IF;
325: IF (p_TABLESPACE_TYPE is NULL OR p_TABLESPACE_TYPE = FND_API.G_MISS_CHAR)
326: THEN
327: FND_MESSAGE.Set_Name('FND', 'OATM_REQUIRED_ENTRY');
328: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
329: FND_MESSAGE.Set_Token('FIELD', 'Tablespace Type');
330: FND_MSG_PUB.Add;
331: x_return_status := FND_API.G_RET_STS_ERROR;
332: END IF;
333:
332: END IF;
333:
334: IF (p_OBJECT_TYPE is NULL OR p_OBJECT_TYPE = FND_API.G_MISS_CHAR)
335: THEN
336: FND_MESSAGE.Set_Name('FND', 'OATM_REQUIRED_ENTRY');
337: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
338: FND_MESSAGE.Set_Token('FIELD', 'Object Type');
339: FND_MSG_PUB.Add;
340: x_return_status := FND_API.G_RET_STS_ERROR;
333:
334: IF (p_OBJECT_TYPE is NULL OR p_OBJECT_TYPE = FND_API.G_MISS_CHAR)
335: THEN
336: FND_MESSAGE.Set_Name('FND', 'OATM_REQUIRED_ENTRY');
337: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
338: FND_MESSAGE.Set_Token('FIELD', 'Object Type');
339: FND_MSG_PUB.Add;
340: x_return_status := FND_API.G_RET_STS_ERROR;
341: END IF;
334: IF (p_OBJECT_TYPE is NULL OR p_OBJECT_TYPE = FND_API.G_MISS_CHAR)
335: THEN
336: FND_MESSAGE.Set_Name('FND', 'OATM_REQUIRED_ENTRY');
337: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
338: FND_MESSAGE.Set_Token('FIELD', 'Object Type');
339: FND_MSG_PUB.Add;
340: x_return_status := FND_API.G_RET_STS_ERROR;
341: END IF;
342:
344: THEN
345: OPEN c2;
346: FETCH c2 INTO l_application_id;
347: if c2%NOTFOUND then
348: FND_MESSAGE.Set_Name('FND', 'OATM_INVALID_ENTRY');
349: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
350: FND_MESSAGE.Set_Token('FIELD_NAME', 'Application Short Name');
351: FND_MESSAGE.Set_Token('FIELD_VALUE', p_APPLICATION_SHORT_NAME);
352: FND_MSG_PUB.Add;
345: OPEN c2;
346: FETCH c2 INTO l_application_id;
347: if c2%NOTFOUND then
348: FND_MESSAGE.Set_Name('FND', 'OATM_INVALID_ENTRY');
349: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
350: FND_MESSAGE.Set_Token('FIELD_NAME', 'Application Short Name');
351: FND_MESSAGE.Set_Token('FIELD_VALUE', p_APPLICATION_SHORT_NAME);
352: FND_MSG_PUB.Add;
353: x_return_status := FND_API.G_RET_STS_ERROR;
346: FETCH c2 INTO l_application_id;
347: if c2%NOTFOUND then
348: FND_MESSAGE.Set_Name('FND', 'OATM_INVALID_ENTRY');
349: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
350: FND_MESSAGE.Set_Token('FIELD_NAME', 'Application Short Name');
351: FND_MESSAGE.Set_Token('FIELD_VALUE', p_APPLICATION_SHORT_NAME);
352: FND_MSG_PUB.Add;
353: x_return_status := FND_API.G_RET_STS_ERROR;
354: end if;
347: if c2%NOTFOUND then
348: FND_MESSAGE.Set_Name('FND', 'OATM_INVALID_ENTRY');
349: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
350: FND_MESSAGE.Set_Token('FIELD_NAME', 'Application Short Name');
351: FND_MESSAGE.Set_Token('FIELD_VALUE', p_APPLICATION_SHORT_NAME);
352: FND_MSG_PUB.Add;
353: x_return_status := FND_API.G_RET_STS_ERROR;
354: end if;
355: CLOSE c2;
357:
358: IF (p_OBJECT_TYPE is NOT NULL OR p_OBJECT_TYPE <> FND_API.G_MISS_CHAR)
359: THEN
360: if p_OBJECT_TYPE <> 'TABLE' then
361: FND_MESSAGE.Set_Name('FND', 'OATM_INVALID_ENTRY');
362: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
363: FND_MESSAGE.Set_Token('FIELD_NAME', 'Object Type');
364: FND_MESSAGE.Set_Token('FIELD_VALUE', p_OBJECT_TYPE);
365: FND_MSG_PUB.Add;
358: IF (p_OBJECT_TYPE is NOT NULL OR p_OBJECT_TYPE <> FND_API.G_MISS_CHAR)
359: THEN
360: if p_OBJECT_TYPE <> 'TABLE' then
361: FND_MESSAGE.Set_Name('FND', 'OATM_INVALID_ENTRY');
362: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
363: FND_MESSAGE.Set_Token('FIELD_NAME', 'Object Type');
364: FND_MESSAGE.Set_Token('FIELD_VALUE', p_OBJECT_TYPE);
365: FND_MSG_PUB.Add;
366: x_return_status := FND_API.G_RET_STS_ERROR;
359: THEN
360: if p_OBJECT_TYPE <> 'TABLE' then
361: FND_MESSAGE.Set_Name('FND', 'OATM_INVALID_ENTRY');
362: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
363: FND_MESSAGE.Set_Token('FIELD_NAME', 'Object Type');
364: FND_MESSAGE.Set_Token('FIELD_VALUE', p_OBJECT_TYPE);
365: FND_MSG_PUB.Add;
366: x_return_status := FND_API.G_RET_STS_ERROR;
367: end if;
360: if p_OBJECT_TYPE <> 'TABLE' then
361: FND_MESSAGE.Set_Name('FND', 'OATM_INVALID_ENTRY');
362: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
363: FND_MESSAGE.Set_Token('FIELD_NAME', 'Object Type');
364: FND_MESSAGE.Set_Token('FIELD_VALUE', p_OBJECT_TYPE);
365: FND_MSG_PUB.Add;
366: x_return_status := FND_API.G_RET_STS_ERROR;
367: end if;
368: END IF;
377:
378: OPEN c5(l_application_id);
379: FETCH c5 INTO l_dummy;
380: if c5%FOUND then
381: FND_MESSAGE.Set_Name('FND', 'OATM_NO_INSERT');
382: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
383: FND_MESSAGE.Set_Token('FIELD_NAME', 'Object Name');
384: FND_MESSAGE.Set_Token('FIELD_VALUE', p_OBJECT_NAME);
385: FND_MESSAGE.Set_Token('TABLE_NAME', 'FND_OBJECT_TABLESPACES');
378: OPEN c5(l_application_id);
379: FETCH c5 INTO l_dummy;
380: if c5%FOUND then
381: FND_MESSAGE.Set_Name('FND', 'OATM_NO_INSERT');
382: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
383: FND_MESSAGE.Set_Token('FIELD_NAME', 'Object Name');
384: FND_MESSAGE.Set_Token('FIELD_VALUE', p_OBJECT_NAME);
385: FND_MESSAGE.Set_Token('TABLE_NAME', 'FND_OBJECT_TABLESPACES');
386: FND_MSG_PUB.Add;
379: FETCH c5 INTO l_dummy;
380: if c5%FOUND then
381: FND_MESSAGE.Set_Name('FND', 'OATM_NO_INSERT');
382: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
383: FND_MESSAGE.Set_Token('FIELD_NAME', 'Object Name');
384: FND_MESSAGE.Set_Token('FIELD_VALUE', p_OBJECT_NAME);
385: FND_MESSAGE.Set_Token('TABLE_NAME', 'FND_OBJECT_TABLESPACES');
386: FND_MSG_PUB.Add;
387: x_return_status := FND_API.G_RET_STS_ERROR;
380: if c5%FOUND then
381: FND_MESSAGE.Set_Name('FND', 'OATM_NO_INSERT');
382: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
383: FND_MESSAGE.Set_Token('FIELD_NAME', 'Object Name');
384: FND_MESSAGE.Set_Token('FIELD_VALUE', p_OBJECT_NAME);
385: FND_MESSAGE.Set_Token('TABLE_NAME', 'FND_OBJECT_TABLESPACES');
386: FND_MSG_PUB.Add;
387: x_return_status := FND_API.G_RET_STS_ERROR;
388: end if;
381: FND_MESSAGE.Set_Name('FND', 'OATM_NO_INSERT');
382: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
383: FND_MESSAGE.Set_Token('FIELD_NAME', 'Object Name');
384: FND_MESSAGE.Set_Token('FIELD_VALUE', p_OBJECT_NAME);
385: FND_MESSAGE.Set_Token('TABLE_NAME', 'FND_OBJECT_TABLESPACES');
386: FND_MSG_PUB.Add;
387: x_return_status := FND_API.G_RET_STS_ERROR;
388: end if;
389: CLOSE c5;
390:
391: OPEN c3(l_oracle_username);
392: FETCH c3 INTO l_dummy;
393: if c3%NOTFOUND then
394: FND_MESSAGE.Set_Name('FND', 'OATM_INVALID_ENTRY');
395: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
396: FND_MESSAGE.Set_Token('FIELD_NAME', 'Object Name');
397: FND_MESSAGE.Set_Token('FIELD_VALUE', p_OBJECT_NAME);
398: FND_MSG_PUB.Add;
391: OPEN c3(l_oracle_username);
392: FETCH c3 INTO l_dummy;
393: if c3%NOTFOUND then
394: FND_MESSAGE.Set_Name('FND', 'OATM_INVALID_ENTRY');
395: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
396: FND_MESSAGE.Set_Token('FIELD_NAME', 'Object Name');
397: FND_MESSAGE.Set_Token('FIELD_VALUE', p_OBJECT_NAME);
398: FND_MSG_PUB.Add;
399: x_return_status := FND_API.G_RET_STS_ERROR;
392: FETCH c3 INTO l_dummy;
393: if c3%NOTFOUND then
394: FND_MESSAGE.Set_Name('FND', 'OATM_INVALID_ENTRY');
395: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
396: FND_MESSAGE.Set_Token('FIELD_NAME', 'Object Name');
397: FND_MESSAGE.Set_Token('FIELD_VALUE', p_OBJECT_NAME);
398: FND_MSG_PUB.Add;
399: x_return_status := FND_API.G_RET_STS_ERROR;
400: end if;
393: if c3%NOTFOUND then
394: FND_MESSAGE.Set_Name('FND', 'OATM_INVALID_ENTRY');
395: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
396: FND_MESSAGE.Set_Token('FIELD_NAME', 'Object Name');
397: FND_MESSAGE.Set_Token('FIELD_VALUE', p_OBJECT_NAME);
398: FND_MSG_PUB.Add;
399: x_return_status := FND_API.G_RET_STS_ERROR;
400: end if;
401: CLOSE c3;
410:
411: OPEN c3(l_oracle_username);
412: FETCH c3 INTO l_dummy;
413: if c3%NOTFOUND then
414: FND_MESSAGE.Set_Name('FND', 'OATM_NO_UPDATE');
415: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
416: FND_MESSAGE.Set_Token('FIELD_NAME', 'Object Name');
417: FND_MESSAGE.Set_Token('FIELD_VALUE', p_OBJECT_NAME);
418: FND_MESSAGE.Set_Token('TABLE_NAME', 'FND_OBJECT_TABLESPACES');
411: OPEN c3(l_oracle_username);
412: FETCH c3 INTO l_dummy;
413: if c3%NOTFOUND then
414: FND_MESSAGE.Set_Name('FND', 'OATM_NO_UPDATE');
415: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
416: FND_MESSAGE.Set_Token('FIELD_NAME', 'Object Name');
417: FND_MESSAGE.Set_Token('FIELD_VALUE', p_OBJECT_NAME);
418: FND_MESSAGE.Set_Token('TABLE_NAME', 'FND_OBJECT_TABLESPACES');
419: FND_MSG_PUB.Add;
412: FETCH c3 INTO l_dummy;
413: if c3%NOTFOUND then
414: FND_MESSAGE.Set_Name('FND', 'OATM_NO_UPDATE');
415: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
416: FND_MESSAGE.Set_Token('FIELD_NAME', 'Object Name');
417: FND_MESSAGE.Set_Token('FIELD_VALUE', p_OBJECT_NAME);
418: FND_MESSAGE.Set_Token('TABLE_NAME', 'FND_OBJECT_TABLESPACES');
419: FND_MSG_PUB.Add;
420: x_return_status := FND_API.G_RET_STS_ERROR;
413: if c3%NOTFOUND then
414: FND_MESSAGE.Set_Name('FND', 'OATM_NO_UPDATE');
415: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
416: FND_MESSAGE.Set_Token('FIELD_NAME', 'Object Name');
417: FND_MESSAGE.Set_Token('FIELD_VALUE', p_OBJECT_NAME);
418: FND_MESSAGE.Set_Token('TABLE_NAME', 'FND_OBJECT_TABLESPACES');
419: FND_MSG_PUB.Add;
420: x_return_status := FND_API.G_RET_STS_ERROR;
421: end if;
414: FND_MESSAGE.Set_Name('FND', 'OATM_NO_UPDATE');
415: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
416: FND_MESSAGE.Set_Token('FIELD_NAME', 'Object Name');
417: FND_MESSAGE.Set_Token('FIELD_VALUE', p_OBJECT_NAME);
418: FND_MESSAGE.Set_Token('TABLE_NAME', 'FND_OBJECT_TABLESPACES');
419: FND_MSG_PUB.Add;
420: x_return_status := FND_API.G_RET_STS_ERROR;
421: end if;
422: CLOSE c3;
427: THEN
428: OPEN c1;
429: FETCH c1 INTO l_dummy;
430: if c1%NOTFOUND then
431: FND_MESSAGE.Set_Name('FND', 'OATM_NO_UPDATE');
432: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
433: FND_MESSAGE.Set_Token('FIELD_NAME', 'Tablespace Type');
434: FND_MESSAGE.Set_Token('FIELD_VALUE', p_TABLESPACE_TYPE);
435: FND_MESSAGE.Set_Token('TABLE_NAME', 'FND_TABLESPACES');
428: OPEN c1;
429: FETCH c1 INTO l_dummy;
430: if c1%NOTFOUND then
431: FND_MESSAGE.Set_Name('FND', 'OATM_NO_UPDATE');
432: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
433: FND_MESSAGE.Set_Token('FIELD_NAME', 'Tablespace Type');
434: FND_MESSAGE.Set_Token('FIELD_VALUE', p_TABLESPACE_TYPE);
435: FND_MESSAGE.Set_Token('TABLE_NAME', 'FND_TABLESPACES');
436: FND_MSG_PUB.Add;
429: FETCH c1 INTO l_dummy;
430: if c1%NOTFOUND then
431: FND_MESSAGE.Set_Name('FND', 'OATM_NO_UPDATE');
432: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
433: FND_MESSAGE.Set_Token('FIELD_NAME', 'Tablespace Type');
434: FND_MESSAGE.Set_Token('FIELD_VALUE', p_TABLESPACE_TYPE);
435: FND_MESSAGE.Set_Token('TABLE_NAME', 'FND_TABLESPACES');
436: FND_MSG_PUB.Add;
437: x_return_status := FND_API.G_RET_STS_ERROR;
430: if c1%NOTFOUND then
431: FND_MESSAGE.Set_Name('FND', 'OATM_NO_UPDATE');
432: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
433: FND_MESSAGE.Set_Token('FIELD_NAME', 'Tablespace Type');
434: FND_MESSAGE.Set_Token('FIELD_VALUE', p_TABLESPACE_TYPE);
435: FND_MESSAGE.Set_Token('TABLE_NAME', 'FND_TABLESPACES');
436: FND_MSG_PUB.Add;
437: x_return_status := FND_API.G_RET_STS_ERROR;
438: end if;
431: FND_MESSAGE.Set_Name('FND', 'OATM_NO_UPDATE');
432: FND_MESSAGE.Set_Token('ROUTINE', 'FND_OBJECT_TABLESPACES_PUB');
433: FND_MESSAGE.Set_Token('FIELD_NAME', 'Tablespace Type');
434: FND_MESSAGE.Set_Token('FIELD_VALUE', p_TABLESPACE_TYPE);
435: FND_MESSAGE.Set_Token('TABLE_NAME', 'FND_TABLESPACES');
436: FND_MSG_PUB.Add;
437: x_return_status := FND_API.G_RET_STS_ERROR;
438: end if;
439: CLOSE c1;