DBA Data[Home] [Help]

APPS.PA_FORECASTITEM_PVT dependencies on FND_API

Line 94: lv_return_status := FND_API.G_RET_STS_SUCCESS;

90:
91: BEGIN
92:
93: TmpErrHdrTab.Delete;
94: lv_return_status := FND_API.G_RET_STS_SUCCESS;
95: PA_DEBUG.Init_err_stack(
96: 'PA_FORECASTITEM_PVT.Create_Forecast_Item');
97:
98:

Line 107: IF (lv_return_status = FND_API.G_RET_STS_SUCCESS) THEN

103: x_return_status => lv_return_status,
104: x_msg_count => x_msg_count,
105: x_msg_data => x_msg_data );
106:
107: IF (lv_return_status = FND_API.G_RET_STS_SUCCESS) THEN
108:
109: IF p_process_mode = 'ERROR' THEN
110:
111: Print_message(

Line 153: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

149: x_return_status => lv_return_status,
150: x_msg_count => x_msg_count,
151: x_msg_data => x_msg_data );
152:
153: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
154:
155: IF (p_process_mode <> 'ERROR' ) THEN
156:
157: Print_message(

Line 174: IF (lv_return_status = FND_API.G_RET_STS_SUCCESS) THEN

170: END IF;
171:
172: -- Generate Resource FI if the end_date of the current unassigned
173: -- FI is less than sysdate + availability_duration.
174: IF (lv_return_status = FND_API.G_RET_STS_SUCCESS) THEN
175:
176: TmpErrHdrTab.DELETE;
177: OPEN c1;
178: FETCH c1 INTO v_c1;

Line 229: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

225: FND_MSG_PUB.add_exc_msg
226: (p_pkg_name =>
227: 'PA_FORECASTITEM_PVT.Create_Forecast_Item',
228: p_procedure_name => PA_DEBUG.G_Err_Stack);
229: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
230:
231: If x_msg_count = 1 THEN
232: pa_interface_utils_pub.get_messages
233: (p_encoded => FND_API.G_TRUE,

Line 233: (p_encoded => FND_API.G_TRUE,

229: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
230:
231: If x_msg_count = 1 THEN
232: pa_interface_utils_pub.get_messages
233: (p_encoded => FND_API.G_TRUE,
234: p_msg_index => 1,
235: p_msg_count => x_msg_count,
236: p_msg_data => x_msg_data,
237: p_data => l_data, -- 4537865

Line 285: lv_return_status := FND_API.G_RET_STS_SUCCESS;

281:
282: l_data VARCHAR2(2000); -- 4537865
283: BEGIN
284:
285: lv_return_status := FND_API.G_RET_STS_SUCCESS;
286:
287: TmpErrTab.Delete;
288:
289: PA_DEBUG.Init_err_stack(

Line 322: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

318: print_message('SQLCODE'||sqlcode||sqlerrm);
319:
320: x_msg_count := 1;
321: x_msg_data := sqlerrm;
322: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
323: FND_MSG_PUB.add_exc_msg
324: (p_pkg_name =>
325: 'PA_FORECASTITEM_PVT.Create_Forecast_Item',
326: p_procedure_name => PA_DEBUG.G_Err_Stack);

Line 330: (p_encoded => FND_API.G_TRUE,

326: p_procedure_name => PA_DEBUG.G_Err_Stack);
327:
328: If x_msg_count = 1 THEN
329: pa_interface_utils_pub.get_messages
330: (p_encoded => FND_API.G_TRUE,
331: p_msg_index => 1,
332: p_msg_count => x_msg_count,
333: p_msg_data => x_msg_data,
334: p_data => l_data, -- 4537865

Line 438: lv_return_status := FND_API.G_RET_STS_SUCCESS;

434:
435:
436: BEGIN
437:
438: lv_return_status := FND_API.G_RET_STS_SUCCESS;
439:
440: PA_DEBUG.Init_err_stack(
441: 'PA_FORECASTITEM_PVT.Create_Forecast_Item');
442:

Line 537: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

533:
534: Print_message(
535: 'Calling Generate_Assignment_FI');
536:
537: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
538:
539: Generate_Assignment_FI(
540: p_AsgnDtlRec => TmpAsgnDtlRec,
541: p_process_mode => lv_process_mode,

Line 576: lv_return_status = FND_API.G_RET_STS_SUCCESS) THEN

572:
573: -- 2275838: Do not generate unassigned time if GENERATE_ASGMT
574: -- passed.
575: IF (p_process_mode <> 'GENERATE_ASGMT' AND
576: lv_return_status = FND_API.G_RET_STS_SUCCESS) THEN
577:
578: Print_message(
579: 'Calling Regenerate_Res_Unassigned_FI');
580:

Line 605: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

601: print_message('SQLCODE'||sqlcode||sqlerrm);
602:
603: x_msg_count := 1;
604: x_msg_data := sqlerrm;
605: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
606: FND_MSG_PUB.add_exc_msg
607: (p_pkg_name =>
608: 'PA_FORECASTITEM_PVT.Create_Forecast_Item',
609: p_procedure_name => PA_DEBUG.G_Err_Stack);

Line 645: lv_return_status := FND_API.G_RET_STS_SUCCESS;

641:
642: l_data VARCHAR2(2000); -- 4537865
643: BEGIN
644:
645: lv_return_status := FND_API.G_RET_STS_SUCCESS;
646:
647: PA_DEBUG.Init_err_stack(
648: 'PA_FORECASTITEM_PVT.Create_Forecast_Item');
649:

Line 672: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

668: print_message('SQLCODE'||sqlcode||sqlerrm);
669:
670: x_msg_count := 1;
671: x_msg_data := sqlerrm;
672: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
673: FND_MSG_PUB.add_exc_msg
674: (p_pkg_name =>
675: 'PA_FORECASTITEM_PVT.Create_Forecast_Item',
676: p_procedure_name => PA_DEBUG.G_Err_Stack);

Line 679: (p_encoded => FND_API.G_TRUE,

675: 'PA_FORECASTITEM_PVT.Create_Forecast_Item',
676: p_procedure_name => PA_DEBUG.G_Err_Stack);
677: If x_msg_count = 1 THEN
678: pa_interface_utils_pub.get_messages
679: (p_encoded => FND_API.G_TRUE,
680: p_msg_index => 1,
681: p_msg_count => x_msg_count,
682: p_msg_data => x_msg_data,
683: p_data => l_data, -- 4537865

Line 722: lv_return_status := FND_API.G_RET_STS_SUCCESS;

718:
719: l_data varchar2(2000); -- 4537865
720: BEGIN
721:
722: lv_return_status := FND_API.G_RET_STS_SUCCESS;
723:
724: PA_DEBUG.Init_err_stack(
725: 'PA_FORECASTITEM_PVT.Delete_Forecast_Item');
726:

Line 749: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

745: Delete_FI( p_assignment_id=>p_assignment_id,
746: x_return_status=>lv_return_status,
747: x_msg_count=>x_msg_count,
748: x_msg_data=> x_msg_data );
749: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
750:
751: IF p_resource_id IS NOT NULL THEN
752:
753: Print_message(

Line 790: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

786: print_message('SQLCODE'||sqlcode||sqlerrm);
787:
788: x_msg_count := 1;
789: x_msg_data := sqlerrm;
790: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
791: FND_MSG_PUB.add_exc_msg
792: (p_pkg_name =>
793: 'PA_FORECASTITEM_PVT.Delete_Forecast_Item',
794: p_procedure_name => PA_DEBUG.G_Err_Stack);

Line 798: (p_encoded => FND_API.G_TRUE,

794: p_procedure_name => PA_DEBUG.G_Err_Stack);
795:
796: If x_msg_count = 1 THEN
797: pa_interface_utils_pub.get_messages
798: (p_encoded => FND_API.G_TRUE,
799: p_msg_index => 1,
800: p_msg_count => x_msg_count,
801: p_msg_data => x_msg_data,
802: p_data => l_data, -- 4537865

Line 834: lv_return_status := FND_API.G_RET_STS_SUCCESS;

830:
831: l_data VARCHAR2(2000); -- 4537865
832: BEGIN
833:
834: lv_return_status := FND_API.G_RET_STS_SUCCESS;
835:
836: PA_DEBUG.Init_err_stack(
837: 'PA_FORECASTITEM_PVT.Get_Assignment_Dtls');
838:

Line 909: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

905: print_message('SQLCODE'||sqlcode||sqlerrm);
906:
907: x_msg_count := 1;
908: x_msg_data := sqlerrm;
909: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
910: FND_MSG_PUB.add_exc_msg
911: (p_pkg_name =>
912: 'PA_FORECASTITEM_PVT.Get_Assignment_Dtls',
913: p_procedure_name => PA_DEBUG.G_Err_Stack);

Line 917: (p_encoded => FND_API.G_TRUE,

913: p_procedure_name => PA_DEBUG.G_Err_Stack);
914:
915: If x_msg_count = 1 THEN
916: pa_interface_utils_pub.get_messages
917: (p_encoded => FND_API.G_TRUE,
918: p_msg_index => 1,
919: p_msg_count => x_msg_count,
920: p_msg_data => x_msg_data,
921: p_data => l_data, -- 4537865

Line 961: lv_return_status := FND_API.G_RET_STS_SUCCESS;

957:
958: l_data VARCHAR2(2000);
959: BEGIN
960:
961: lv_return_status := FND_API.G_RET_STS_SUCCESS;
962:
963: PA_DEBUG.Init_err_stack(
964: 'PA_FORECASTITEM_PVT.Get_Project_Dtls');
965:

Line 1008: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1004: Print_message('Sqlerr '||sqlcode||sqlerrm);
1005:
1006: x_msg_count := 1;
1007: x_msg_data := sqlerrm;
1008: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1009:
1010: -- 4537865
1011: x_project_org_id := NULL ;
1012: x_project_orgn_id := NULL ;

Line 1023: (p_encoded => FND_API.G_TRUE,

1019: 'PA_FORECASTITEM_PVT.Get_Project_Dtls',
1020: p_procedure_name => PA_DEBUG.G_Err_Stack);
1021: If x_msg_count = 1 THEN
1022: pa_interface_utils_pub.get_messages
1023: (p_encoded => FND_API.G_TRUE,
1024: p_msg_index => 1,
1025: p_msg_count => x_msg_count,
1026: p_msg_data => x_msg_data,
1027: p_data => l_data, -- 4537865

Line 1106: lv_return_status := FND_API.G_RET_STS_SUCCESS;

1102: lv_return_status VARCHAR2(30);
1103:
1104: BEGIN
1105:
1106: lv_return_status := FND_API.G_RET_STS_SUCCESS;
1107:
1108: PA_DEBUG.Init_err_stack( 'PA_FORECASTITEM_PVT.Generate_Requirement_FI');
1109:
1110: TmpDbFIDtlTab.Delete;

Line 1175: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

1171: -- which do not fall BETWEEN startdate AND END DATE
1172:
1173: Print_message( 'Req - Calling Reverse_FI_Hdr');
1174:
1175: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
1176:
1177: Reverse_FI_Hdr(p_AsgnDtlRec.assignment_id,
1178: lv_start_date, lv_end_date,
1179: lv_old_start_date, lv_old_end_date,

Line 1189: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

1185:
1186: END IF;
1187:
1188:
1189: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
1190:
1191: -- Get schedule data AND build day fI Records
1192: Print_message( 'Req - Calling Get_Assignment_Schedule');
1193:

Line 1210: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

1206:
1207: END IF;
1208:
1209:
1210: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
1211:
1212: Print_message( 'Req - Calling Initialize_Day_FI');
1213:
1214: Initialize_Day_FI( TmpScheduleTab,

Line 1223: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

1219: lv_return_status , x_msg_count ,
1220: x_msg_data );
1221: END IF;
1222:
1223: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
1224:
1225: Print_message( 'Req - Calling Build_Day_FI');
1226:
1227: Build_Day_FI ( TmpScheduleTab,

Line 1255: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

1251: -- which fall BETWEEN startdate AND END DATE
1252:
1253: IF (p_process_mode <> 'ERROR') THEN
1254:
1255: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
1256:
1257: Print_message( 'Req - Calling Fetch_FI_Hdr');
1258:
1259: Fetch_FI_Hdr (p_AsgnDtlRec.assignment_id,

Line 1276: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

1272:
1273: -- Get existing forecast items detail FOR this
1274: -- assignment which fall BETWEEN startdate AND END DATE
1275:
1276: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
1277:
1278: Print_message( 'Req - Calling Fetch_FI_Dtl');
1279:
1280: Fetch_FI_Dtl ( p_AsgnDtlRec.assignment_id,

Line 1291: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

1287:
1288: END IF;
1289:
1290:
1291: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
1292:
1293: -- Build Forecast Item Header
1294:
1295: Print_message( 'Calling Build_FI_Hdr_Req');

Line 1326: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

1322: -- Create new detail record with forecast_item_id
1323: -- (generated by header record, saved IN TmpFIDayTab)
1324: -- AND line_NUMBER = 1;
1325:
1326: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
1327:
1328: Print_message( 'Calling Build_FI_Dtl_Req');
1329:
1330: Build_FI_Dtl_Req(p_AsgnDtlRec, TmpDBFIDtlTab,

Line 1337: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

1333: lv_return_status,
1334: x_msg_count, x_msg_data);
1335: END IF;
1336:
1337: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
1338:
1339: IF NVL(TmpFIHdrInsTab.COUNT,0) > 0 THEN
1340:
1341: Print_message( 'Calling PA_FORECAST_HDR_PKG.Insert_Rows');

Line 1352: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

1348: END IF;
1349:
1350: END IF;
1351:
1352: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
1353:
1354: IF NVL(TmpFIHdrUpdTab.COUNT,0) > 0 THEN
1355:
1356: Print_message( 'Calling PA_FORECAST_HDR_PKG.Update_Rows');

Line 1367: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

1363: END IF;
1364:
1365: END IF;
1366:
1367: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
1368:
1369: IF NVL(TmpFIDtlInsTab.COUNT,0) > 0 THEN
1370:
1371: Print_message( 'Calling PA_FORECAST_DTLS_PKG.Insert_Rows');

Line 1382: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

1378: END IF;
1379:
1380: END IF;
1381:
1382: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
1383:
1384: IF NVL(TmpFIDtlUpdTab.COUNT,0) > 0 THEN
1385:
1386: Print_message( 'Calling PA_FORECAST_DTLS_PKG.Update_Rows');

Line 1395: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

1391: END IF;
1392:
1393: END IF;
1394:
1395: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
1396:
1397: IF (p_process_mode = 'GENERATE') THEN
1398:
1399: Print_message(

Line 1428: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1424: IF lv_err_msg = 'No_Schedule_Records - Req' THEN
1425:
1426: x_msg_count := 1;
1427: x_msg_data := 'No Schedule Records for Req ';
1428: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1429: FND_MSG_PUB.add_exc_msg
1430: (p_pkg_name =>
1431: 'PA_FORECASTITEM_PVT.Generate_Requirement_FI',
1432: p_procedure_name => PA_DEBUG.G_Err_Stack);

Line 1436: (p_encoded => FND_API.G_TRUE,

1432: p_procedure_name => PA_DEBUG.G_Err_Stack);
1433:
1434: If x_msg_count = 1 THEN
1435: pa_interface_utils_pub.get_messages
1436: (p_encoded => FND_API.G_TRUE,
1437: p_msg_index => 1,
1438: p_msg_count => x_msg_count,
1439: p_msg_data => x_msg_data,
1440: p_data => l_data,

Line 1453: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1449: ELSE
1450:
1451: x_msg_count := 1;
1452: x_msg_data := sqlerrm;
1453: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1454:
1455: FND_MSG_PUB.add_exc_msg
1456: (p_pkg_name =>
1457: 'PA_FORECASTITEM_PVT.Generate_Requirement_FI',

Line 1462: (p_encoded => FND_API.G_TRUE,

1458: p_procedure_name => PA_DEBUG.G_Err_Stack);
1459:
1460: If x_msg_count = 1 THEN
1461: pa_interface_utils_pub.get_messages
1462: (p_encoded => FND_API.G_TRUE,
1463: p_msg_index => 1,
1464: p_msg_count => x_msg_count,
1465: p_msg_data => x_msg_data,
1466: p_data => l_data, -- 4537865

Line 1483: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1479: WHEN OTHERS THEN
1480:
1481: x_msg_count := 1;
1482: x_msg_data := sqlerrm;
1483: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1484:
1485: FND_MSG_PUB.add_exc_msg
1486: (p_pkg_name =>
1487: 'PA_FORECASTITEM_PVT.Generate_Requirement_FI',

Line 1492: (p_encoded => FND_API.G_TRUE,

1488: p_procedure_name => PA_DEBUG.G_Err_Stack);
1489:
1490: If x_msg_count = 1 THEN
1491: pa_interface_utils_pub.get_messages
1492: (p_encoded => FND_API.G_TRUE,
1493: p_msg_index => 1,
1494: p_msg_count => x_msg_count,
1495: p_msg_data => x_msg_data,
1496: p_data => l_data , -- 4537865

Line 1595: lv_return_status := FND_API.G_RET_STS_SUCCESS;

1591: lv_proc_flag VARCHAR2(1);
1592:
1593: BEGIN
1594:
1595: lv_return_status := FND_API.G_RET_STS_SUCCESS;
1596:
1597: PA_DEBUG.Init_err_stack(
1598: 'PA_FORECASTITEM_PVT.Initialize_Day_FI');
1599: TmpFIDayTab.Delete;

Line 1740: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1736: print_message('SQLCODE'||sqlcode||sqlerrm);
1737:
1738: x_msg_count := 1;
1739: x_msg_data := sqlerrm;
1740: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1741:
1742: If x_msg_count = 1 THEN
1743: pa_interface_utils_pub.get_messages
1744: (p_encoded => FND_API.G_TRUE,

Line 1744: (p_encoded => FND_API.G_TRUE,

1740: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1741:
1742: If x_msg_count = 1 THEN
1743: pa_interface_utils_pub.get_messages
1744: (p_encoded => FND_API.G_TRUE,
1745: p_msg_index => 1,
1746: p_msg_count => x_msg_count,
1747: p_msg_data => x_msg_data,
1748: p_data => l_data , -- 4537865

Line 1816: lv_return_status := FND_API.G_RET_STS_SUCCESS;

1812: li_cur_item_quantity NUMBER;
1813: BEGIN
1814:
1815:
1816: lv_return_status := FND_API.G_RET_STS_SUCCESS;
1817: Print_message('Entering Build_Day_FI');
1818:
1819: PA_DEBUG.Init_err_stack( 'PA_FORECASTITEM_PVT.Build_Day_FI');
1820:

Line 2055: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2051: print_message('Failed in Build_Day_FI api');
2052: print_message('SQLCODE'||sqlcode||sqlerrm);
2053: x_msg_count := 1;
2054: x_msg_data := sqlerrm;
2055: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2056:
2057: FND_MSG_PUB.add_exc_msg
2058: (p_pkg_name =>
2059: 'PA_FORECASTITEM_PVT.Build_Day_FI',

Line 2064: (p_encoded => FND_API.G_TRUE,

2060: p_procedure_name => PA_DEBUG.G_Err_Stack);
2061:
2062: If x_msg_count = 1 THEN
2063: pa_interface_utils_pub.get_messages
2064: (p_encoded => FND_API.G_TRUE,
2065: p_msg_index => 1,
2066: p_msg_count => x_msg_count,
2067: p_msg_data => x_msg_data,
2068: p_data => l_data , -- 4537865

Line 2157: lv_return_status := FND_API.G_RET_STS_SUCCESS;

2153: lv_return_status VARCHAR2(30);
2154:
2155: BEGIN
2156:
2157: lv_return_status := FND_API.G_RET_STS_SUCCESS;
2158:
2159: Print_message('Entering Reverse_FI_Hdr');
2160:
2161: PA_DEBUG.Init_err_stack(

Line 2364: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2360: print_message('SQLCODE'||sqlcode||sqlerrm);
2361:
2362: x_msg_count := 1;
2363: x_msg_data := sqlerrm;
2364: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2365:
2366: -- 4537865
2367: x_old_start_date := NULL ;
2368: x_old_end_date := NULL ;

Line 2377: (p_encoded => FND_API.G_TRUE,

2373: p_procedure_name => PA_DEBUG.G_Err_Stack);
2374:
2375: If x_msg_count = 1 THEN
2376: pa_interface_utils_pub.get_messages
2377: (p_encoded => FND_API.G_TRUE,
2378: p_msg_index => 1,
2379: p_msg_count => x_msg_count,
2380: p_msg_data => x_msg_data,
2381: p_data => l_data, -- 4537865

Line 2465: lv_return_status := FND_API.G_RET_STS_SUCCESS;

2461: lv_return_status VARCHAR2(30);
2462:
2463: BEGIN
2464:
2465: lv_return_status := FND_API.G_RET_STS_SUCCESS;
2466:
2467: Print_message('Entering Reverse_FI_Dtl');
2468:
2469: PA_DEBUG.Init_err_stack(

Line 2786: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

2782: x_msg_data);
2783:
2784: END IF;
2785:
2786: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
2787:
2788: IF nvl(TmpUpdTab.COUNT,0) > 0 THEN
2789:
2790: Print_message(

Line 2816: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2812: print_message('SQLCODE'||sqlcode||sqlerrm);
2813:
2814: x_msg_count := 1;
2815: x_msg_data := sqlerrm;
2816: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2817:
2818: FND_MSG_PUB.add_exc_msg
2819: (p_pkg_name =>
2820: 'PA_FORECASTITEM_PVT.Reverse_FI_Dtl',

Line 2825: (p_encoded => FND_API.G_TRUE,

2821: p_procedure_name => PA_DEBUG.G_Err_Stack);
2822:
2823: If x_msg_count = 1 THEN
2824: pa_interface_utils_pub.get_messages
2825: (p_encoded => FND_API.G_TRUE,
2826: p_msg_index => 1,
2827: p_msg_count => x_msg_count,
2828: p_msg_data => x_msg_data,
2829: p_data => l_data, -- 4537865

Line 2923: lv_return_status := FND_API.G_RET_STS_SUCCESS;

2919: lv_return_status VARCHAR2(30);
2920:
2921: BEGIN
2922:
2923: lv_return_status := FND_API.G_RET_STS_SUCCESS;
2924:
2925: Print_message('Entering Fetch_FI_Hdr');
2926:
2927: PA_DEBUG.Init_err_stack(

Line 3115: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3111: print_message('SQLCODE'||sqlcode||sqlerrm);
3112:
3113: x_msg_count := 1;
3114: x_msg_data := sqlerrm;
3115: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3116:
3117: FND_MSG_PUB.add_exc_msg
3118: (p_pkg_name =>
3119: 'PA_FORECASTITEM_PVT.Fetch_FI_Hdr',

Line 3124: (p_encoded => FND_API.G_TRUE,

3120: p_procedure_name => PA_DEBUG.G_Err_Stack);
3121:
3122: If x_msg_count = 1 THEN
3123: pa_interface_utils_pub.get_messages
3124: (p_encoded => FND_API.G_TRUE,
3125: p_msg_index => 1,
3126: p_msg_count => x_msg_count,
3127: p_msg_data => x_msg_data,
3128: p_data => l_data , -- 4537865

Line 3219: lv_return_status := FND_API.G_RET_STS_SUCCESS;

3215: lv_return_status VARCHAR2(30);
3216:
3217: BEGIN
3218:
3219: lv_return_status := FND_API.G_RET_STS_SUCCESS;
3220:
3221: Print_message('Entering Fetch_FI_Dtl');
3222:
3223: PA_DEBUG.Init_err_stack(

Line 3420: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3416: print_message('SQLCODE'||sqlcode||sqlerrm);
3417:
3418: x_msg_count := 1;
3419: x_msg_data := sqlerrm;
3420: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3421:
3422: FND_MSG_PUB.add_exc_msg
3423: (p_pkg_name =>
3424: 'PA_FORECASTITEM_PVT.Fetch_FI_Dtl',

Line 3429: (p_encoded => FND_API.G_TRUE,

3425: p_procedure_name => PA_DEBUG.G_Err_Stack);
3426:
3427: If x_msg_count = 1 THEN
3428: pa_interface_utils_pub.get_messages
3429: (p_encoded => FND_API.G_TRUE,
3430: p_msg_index => 1,
3431: p_msg_count => x_msg_count,
3432: p_msg_data => x_msg_data,
3433: p_data => l_data , -- 4537865

Line 3559: lv_return_status := FND_API.G_RET_STS_SUCCESS;

3555: tmp_status_code VARCHAR2(30);
3556:
3557: BEGIN
3558:
3559: lv_return_status := FND_API.G_RET_STS_SUCCESS;
3560:
3561: Print_message('Entering Build_FI_Hdr_Req');
3562:
3563: PA_DEBUG.Init_err_stack(

Line 3609: IF lv_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3605: lv_project_orgn_id, lv_work_type_id,
3606: lv_project_type_class, lv_project_status_code,
3607: lv_return_status, x_msg_count, x_msg_data);
3608:
3609: IF lv_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3610:
3611: lv_err_msg := 'No_Project_Record - Req';
3612: RAISE NO_DATA_FOUND;
3613:

Line 4405: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4401: print_message('SQLCODE'||sqlcode||sqlerrm);
4402:
4403: x_msg_count := 1;
4404: x_msg_data := sqlerrm ;
4405: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4406:
4407: FND_MSG_PUB.add_exc_msg
4408: (p_pkg_name =>
4409: 'PA_FORECASTITEM_PVT.Build_FI_Hdr_Req',

Line 4414: (p_encoded => FND_API.G_TRUE,

4410: p_procedure_name => PA_DEBUG.G_Err_Stack);
4411:
4412: If x_msg_count = 1 THEN
4413: pa_interface_utils_pub.get_messages
4414: (p_encoded => FND_API.G_TRUE,
4415: p_msg_index => 1,
4416: p_msg_count => x_msg_count,
4417: p_msg_data => x_msg_data,
4418: p_data => l_data , -- 4537865

Line 4432: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4428: WHEN OTHERS THEN
4429:
4430: x_msg_count := 1;
4431: x_msg_data := sqlerrm;
4432: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4433:
4434: FND_MSG_PUB.add_exc_msg
4435: (p_pkg_name =>
4436: 'PA_FORECASTITEM_PVT.Build_FI_Hdr_Req',

Line 4441: (p_encoded => FND_API.G_TRUE,

4437: p_procedure_name => PA_DEBUG.G_Err_Stack);
4438:
4439: If x_msg_count = 1 THEN
4440: pa_interface_utils_pub.get_messages
4441: (p_encoded => FND_API.G_TRUE,
4442: p_msg_index => 1,
4443: p_msg_count => x_msg_count,
4444: p_msg_data => x_msg_data,
4445: p_data => l_data,

Line 4535: lv_return_status := FND_API.G_RET_STS_SUCCESS;

4531: lv_return_status VARCHAR2(30);
4532:
4533:
4534: BEGIN
4535: lv_return_status := FND_API.G_RET_STS_SUCCESS;
4536:
4537: PA_DEBUG.Init_err_stack(
4538: 'PA_FORECASTITEM_PVT.Build_FI_Dtl_Req');
4539:

Line 5095: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5091: print_message('SQLCODE'||sqlcode||sqlerrm);
5092:
5093: x_msg_count := 1;
5094: x_msg_data := sqlerrm;
5095: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5096:
5097: FND_MSG_PUB.add_exc_msg
5098: (p_pkg_name =>
5099: 'PA_FORECASTITEM_PVT.Build_FI_Dtl_Req',

Line 5104: (p_encoded => FND_API.G_TRUE,

5100: p_procedure_name => PA_DEBUG.G_Err_Stack);
5101:
5102: If x_msg_count = 1 THEN
5103: pa_interface_utils_pub.get_messages
5104: (p_encoded => FND_API.G_TRUE,
5105: p_msg_index => 1,
5106: p_msg_count => x_msg_count,
5107: p_msg_data => x_msg_data,
5108: p_data => l_data , -- 4537865

Line 5202: lv_return_status := FND_API.G_RET_STS_SUCCESS;

5198: ld_res_asgn_end_date DATE;
5199: l_no_fis_to_create EXCEPTION;
5200: BEGIN
5201:
5202: lv_return_status := FND_API.G_RET_STS_SUCCESS;
5203:
5204: Print_message( 'Entering Generate_Assignment_FI');
5205:
5206: TmpDBFIDtlTab.delete;

Line 5347: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

5343:
5344: -- Reverse forecast items Header FOR this assignment
5345: -- which do not fall BETWEEN startdate AND END DATE
5346:
5347: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
5348:
5349: Print_message( 'Asg - Calling Reverse_FI_Hdr');
5350:
5351: Reverse_FI_Hdr(p_AsgnDtlRec.assignment_id,

Line 5388: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

5384:
5385: -- Get schedule data AND build day fI Records
5386:
5387:
5388: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
5389:
5390: Print_message(
5391: 'Asg - Calling Get_Assignment_Schedule');
5392:

Line 5412: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

5408:
5409: END IF;
5410:
5411:
5412: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
5413:
5414: Print_message( 'Asg - Calling Initialize_Day_FI');
5415:
5416: Initialize_Day_FI ( TmpScheduleTab,

Line 5424: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

5420: TmpFIDayTab ,
5421: lv_return_status , x_msg_count , x_msg_data );
5422: END IF;
5423:
5424: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
5425:
5426: Print_message('Asg - Calling Build_Day_FI');
5427:
5428: Print_message('p_AsgnDtlRec: ' || p_AsgnDtlRec.resource_id || ' ' || p_AsgnDtlRec.assignment_id);

Line 5446: lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

5442:
5443: END IF;
5444:
5445: IF lv_asgn_exist_flag = 'Y' AND -- Added and condition for bug 4320465
5446: lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
5447:
5448: lv_start_date := TmpFIDayTab(TmpFIDayTab.FIRST).item_date;
5449: lv_end_date := TmpFIDayTab(TmpFIDayTab.LAST).item_date;
5450:

Line 5456: -- IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN -- Moved above for Bug 4320465

5452: -- which fall BETWEEN startdate AND END DATE
5453:
5454: IF (p_process_mode <> 'ERROR') THEN
5455:
5456: -- IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN -- Moved above for Bug 4320465
5457:
5458: Print_message( 'Asg - Calling Fetch_FI_Hdr');
5459:
5460: Fetch_FI_Hdr ( p_AsgnDtlRec.assignment_id,

Line 5473: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

5469: TmpDBFIHdrTab := p_ErrHdrTab;
5470:
5471: END IF;
5472:
5473: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
5474:
5475: -- Get existing forecast items detail FOR this assignment
5476: -- which fall BETWEEN startdate AND END DATE
5477:

Line 5516: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

5512: -- ELSE (item_date does not exist)
5513: -- Create new forecast_item
5514: -- Mark action_flag = 'N';
5515:
5516: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
5517:
5518: Print_message('Calling Build_FI_Hdr_Asg');
5519:
5520: Build_FI_Hdr_Asg(p_AsgnDtlRec, TmpDBFIHdrTab, TmpFIDayTab,

Line 5549: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

5545: -- Create new detail record with forecast_item_id
5546: -- (generated by header record, saved IN TmpFIDayTab)
5547: -- AND line_NUMBER = 1;
5548:
5549: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
5550:
5551: Print_message('Calling Build_FI_Dtl_Asg');
5552:
5553: Build_FI_Dtl_Asg(p_AsgnDtlRec, TmpDBFIDtlTab, TmpFIDayTab,

Line 5559: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

5555: lv_return_status, x_msg_count, x_msg_data);
5556: END IF;
5557:
5558:
5559: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
5560:
5561: IF TmpFIHdrInsTab.COUNT > 0 THEN
5562:
5563: Print_message( 'Calling PA_FORECAST_HDR_PKG.Insert_Rows');

Line 5574: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

5570:
5571: END IF;
5572:
5573: Print_message('lv_return_status: ' || lv_return_status);
5574: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
5575: Print_message('TmpFIHdrUpdTab.COUNT: ' || TmpFIHdrUpdTab.COUNT);
5576:
5577: IF TmpFIHdrUpdTab.COUNT > 0 THEN
5578:

Line 5589: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

5585: END IF;
5586:
5587: END IF;
5588:
5589: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
5590:
5591: IF TmpFIDtlInsTab.COUNT > 0 THEN
5592:
5593: Print_message( 'Calling PA_FORECAST_DTLS_PKG.Insert_Rows');

Line 5603: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

5599: END IF;
5600:
5601: END IF;
5602:
5603: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
5604:
5605: IF TmpFIDtlUpdTab.COUNT > 0 THEN
5606:
5607: Print_message( 'Calling PA_FORECAST_DTLS_PKG.Update_Rows');

Line 5617: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

5613: END IF;
5614:
5615: END IF;
5616:
5617: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
5618:
5619: IF (p_process_mode = 'GENERATE') THEN
5620:
5621: Print_message(

Line 5658: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5654: 'Unable to set lock for ' || p_AsgnDtlRec.resource_id);
5655:
5656: x_msg_count := 1;
5657: x_msg_data := 'Resource ID Lock Failure';
5658: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5659:
5660: -- 4537865
5661: x_res_start_date := NULL ;
5662: x_res_end_date := NULL ;

Line 5671: (p_encoded => FND_API.G_TRUE,

5667: p_procedure_name => PA_DEBUG.G_Err_Stack);
5668:
5669: If x_msg_count = 1 THEN
5670: pa_interface_utils_pub.get_messages
5671: (p_encoded => FND_API.G_TRUE,
5672: p_msg_index => 1,
5673: p_msg_count => x_msg_count,
5674: p_msg_data => x_msg_data,
5675: p_data => l_data , -- 4537865

Line 5688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5684: IF lv_err_msg = 'No_Schedule_Records - Asg' THEN
5685:
5686: x_msg_count := 1;
5687: x_msg_data := 'No Schedule Records for Asg ';
5688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5689:
5690: -- 4537865
5691: x_res_start_date := NULL ;
5692: x_res_end_date := NULL ;

Line 5701: (p_encoded => FND_API.G_TRUE,

5697: p_procedure_name => PA_DEBUG.G_Err_Stack);
5698:
5699: If x_msg_count = 1 THEN
5700: pa_interface_utils_pub.get_messages
5701: (p_encoded => FND_API.G_TRUE,
5702: p_msg_index => 1,
5703: p_msg_count => x_msg_count,
5704: p_msg_data => x_msg_data,
5705: p_data => l_data , -- 4537865

Line 5717: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5713: ELSE
5714:
5715: x_msg_count := 1;
5716: x_msg_data := sqlerrm;
5717: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5718:
5719: -- 4537865
5720: x_res_start_date := NULL ;
5721: x_res_end_date := NULL ;

Line 5730: (p_encoded => FND_API.G_TRUE,

5726: p_procedure_name => PA_DEBUG.G_Err_Stack);
5727:
5728: If x_msg_count = 1 THEN
5729: pa_interface_utils_pub.get_messages
5730: (p_encoded => FND_API.G_TRUE,
5731: p_msg_index => 1,
5732: p_msg_count => x_msg_count,
5733: p_msg_data => x_msg_data,
5734: p_data => l_data , -- 4537865

Line 5754: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5750: print_message('SQLCODE'||sqlcode||sqlerrm);
5751:
5752: x_msg_count := 1;
5753: x_msg_data := sqlerrm;
5754: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5755:
5756: -- 4537865
5757: x_res_start_date := NULL ;
5758: x_res_end_date := NULL ;

Line 5767: (p_encoded => FND_API.G_TRUE,

5763: p_procedure_name => PA_DEBUG.G_Err_Stack);
5764:
5765: If x_msg_count = 1 THEN
5766: pa_interface_utils_pub.get_messages
5767: (p_encoded => FND_API.G_TRUE,
5768: p_msg_index => 1,
5769: p_msg_count => x_msg_count,
5770: p_msg_data => x_msg_data,
5771: p_data => l_data , -- 4537865

Line 5847: lv_return_status := FND_API.G_RET_STS_SUCCESS;

5843: l_msg_index_out NUMBER;
5844:
5845: BEGIN
5846:
5847: lv_return_status := FND_API.G_RET_STS_SUCCESS;
5848:
5849: Print_message( 'Entering Delete_FI');
5850:
5851: PA_DEBUG.Init_err_stack( 'PA_FORECASTITEM_PVT.Delete_FI');

Line 5858: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

5854: x_return_status=>lv_return_status,
5855: x_msg_count=>x_msg_count,
5856: x_msg_data=> x_msg_data );
5857:
5858: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
5859:
5860: Delete_FI_Hdr( p_assignment_id=>p_assignment_id,
5861: x_return_status=>lv_return_status,
5862: x_msg_count=>x_msg_count,

Line 5881: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5877: print_message('SQLCODE'||sqlcode||sqlerrm);
5878:
5879: x_msg_count := 1;
5880: x_msg_data := sqlerrm;
5881: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5882:
5883: FND_MSG_PUB.add_exc_msg
5884: (p_pkg_name =>
5885: 'PA_FORECASTITEM_PVT.Delete_FI',

Line 5890: (p_encoded => FND_API.G_TRUE,

5886: p_procedure_name => PA_DEBUG.G_Err_Stack);
5887:
5888: If x_msg_count = 1 THEN
5889: pa_interface_utils_pub.get_messages
5890: (p_encoded => FND_API.G_TRUE,
5891: p_msg_index => 1,
5892: p_msg_count => x_msg_count,
5893: p_msg_data => x_msg_data,
5894: p_data => l_data , -- 4537865

Line 5973: lv_return_status := FND_API.G_RET_STS_SUCCESS;

5969: lv_return_status VARCHAR2(30);
5970:
5971: BEGIN
5972:
5973: lv_return_status := FND_API.G_RET_STS_SUCCESS;
5974:
5975: Print_message( 'Entering Delete_FI_Hdr');
5976:
5977: TmpUpdTab.delete;

Line 6185: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6181: print_message('SQLCODE'||sqlcode||sqlerrm);
6182:
6183: x_msg_count := 1;
6184: x_msg_data := sqlerrm;
6185: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6186:
6187: FND_MSG_PUB.add_exc_msg
6188: (p_pkg_name =>
6189: 'PA_FORECASTITEM_PVT.Delete_FI_Hdr',

Line 6194: (p_encoded => FND_API.G_TRUE,

6190: p_procedure_name => PA_DEBUG.G_Err_Stack);
6191:
6192: If x_msg_count = 1 THEN
6193: pa_interface_utils_pub.get_messages
6194: (p_encoded => FND_API.G_TRUE,
6195: p_msg_index => 1,
6196: p_msg_count => x_msg_count,
6197: p_msg_data => x_msg_data,
6198: p_data => l_data , -- 4537865

Line 6277: lv_return_status := FND_API.G_RET_STS_SUCCESS;

6273: lv_return_status VARCHAR2(30);
6274:
6275: BEGIN
6276:
6277: lv_return_status := FND_API.G_RET_STS_SUCCESS;
6278:
6279: Print_message( 'Entering Delete_FI_Dtl');
6280:
6281: PA_DEBUG.Init_err_stack( 'PA_FORECASTITEM_PVT.Delete_FI_Dtl');

Line 6595: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

6591: x_msg_data);
6592:
6593: END IF;
6594:
6595: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
6596:
6597: IF TmpUpdTab.COUNT > 0 THEN
6598:
6599: Print_message(

Line 6625: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6621: print_message('SQLCODE'||sqlcode||sqlerrm);
6622:
6623: x_msg_count := 1;
6624: x_msg_data := sqlerrm;
6625: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6626:
6627: FND_MSG_PUB.add_exc_msg
6628: (p_pkg_name =>
6629: 'PA_FORECASTITEM_PVT.Delete_FI_Dtl',

Line 6634: (p_encoded => FND_API.G_TRUE,

6630: p_procedure_name => PA_DEBUG.G_Err_Stack);
6631:
6632: If x_msg_count = 1 THEN
6633: pa_interface_utils_pub.get_messages
6634: (p_encoded => FND_API.G_TRUE,
6635: p_msg_index => 1,
6636: p_msg_count => x_msg_count,
6637: p_msg_data => x_msg_data,
6638: p_data => l_data , -- 4537865

Line 6666: lv_return_status := FND_API.G_RET_STS_SUCCESS;

6662: lv_return_status VARCHAR2(30);
6663:
6664: BEGIN
6665:
6666: lv_return_status := FND_API.G_RET_STS_SUCCESS;
6667:
6668: Print_message( 'Entering Delete_FI');
6669:
6670: PA_DEBUG.Init_err_stack( 'PA_FORECASTITEM_PVT.Delete_FI');

Line 6678: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

6674: x_return_status => lv_return_status,
6675: x_msg_count => x_msg_count,
6676: x_msg_data => x_msg_data);
6677:
6678: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
6679:
6680: Delete_FI_Hdr(
6681: p_resource_id => p_resource_id,
6682: x_return_status => lv_return_status,

Line 6703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6699: print_message('SQLCODE'||sqlcode||sqlerrm);
6700:
6701: x_msg_count := 1;
6702: x_msg_data := sqlerrm;
6703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6704:
6705: FND_MSG_PUB.add_exc_msg
6706: (p_pkg_name =>
6707: 'PA_FORECASTITEM_PVT.Delete_FI',

Line 6770: lv_return_status := FND_API.G_RET_STS_SUCCESS;

6766: lv_return_status VARCHAR2(30);
6767:
6768: BEGIN
6769:
6770: lv_return_status := FND_API.G_RET_STS_SUCCESS;
6771:
6772: Print_message( 'Entering Delete_FI_Hdr');
6773:
6774: TmpUpdTab.delete;

Line 6947: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6943: print_message('SQLCODE'||sqlcode||sqlerrm);
6944:
6945: x_msg_count := 1;
6946: x_msg_data := sqlerrm;
6947: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6948:
6949: FND_MSG_PUB.add_exc_msg
6950: (p_pkg_name =>
6951: 'PA_FORECASTITEM_PVT.Delete_FI_Hdr',

Line 7029: lv_return_status := FND_API.G_RET_STS_SUCCESS;

7025: lv_return_status VARCHAR2(30);
7026:
7027: BEGIN
7028:
7029: lv_return_status := FND_API.G_RET_STS_SUCCESS;
7030:
7031: Print_message( 'Entering Delete_FI_Dtl');
7032:
7033: PA_DEBUG.Init_err_stack( 'PA_FORECASTITEM_PVT.Delete_FI_Dtl');

Line 7350: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

7346: x_msg_data);
7347:
7348: END IF;
7349:
7350: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
7351:
7352: IF TmpUpdTab.COUNT > 0 THEN
7353:
7354: Print_message(

Line 7386: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7382: print_message('SQLCODE'||sqlcode||sqlerrm);
7383:
7384: x_msg_count := 1;
7385: x_msg_data := sqlerrm;
7386: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7387:
7388: FND_MSG_PUB.add_exc_msg
7389: (p_pkg_name =>
7390: 'PA_FORECASTITEM_PVT.Delete_FI_Dtl',

Line 7555: lv_return_status := FND_API.G_RET_STS_SUCCESS;

7551: lv_end_date DATE;
7552:
7553: BEGIN
7554:
7555: lv_return_status := FND_API.G_RET_STS_SUCCESS;
7556:
7557: Print_message('Entering Build_FI_Hdr_Asg: ' || p_AsgnDtlRec.resource_id || ' ' || p_AsgnDtlRec.assignment_id);
7558:
7559: PA_DEBUG.Init_err_stack(

Line 7645: IF lv_return_status <> FND_API.G_RET_STS_SUCCESS THEN

7641: lv_project_orgn_id, lv_work_type_id,
7642: lv_project_type_class, lv_project_status_code,
7643: lv_return_status, x_msg_count, x_msg_data);
7644:
7645: IF lv_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7646:
7647: lv_err_msg := 'No_Project_Record - Asg';
7648: RAISE NO_DATA_FOUND;
7649:

Line 8622: x_return_status := FND_API.G_RET_STS_SUCCESS;

8618: x_FIHdrInsTab := TmpInsTab;
8619: x_FIHdrUpdTab := TmpUpdTab;
8620: p_FIDayTab := TmpDayTab;
8621:
8622: x_return_status := FND_API.G_RET_STS_SUCCESS;
8623:
8624: Print_message(
8625: 'Leaving Build_FI_Hdr_Asg');
8626:

Line 8639: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8635: if lv_err_msg = 'ResOU_Not_Found' then
8636:
8637: x_msg_count := 1;
8638: x_msg_data := 'ResOU not found';
8639: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8640:
8641: FND_MSG_PUB.add_exc_msg
8642: (p_pkg_name =>
8643: 'PA_FORECASTITEM_PVT.Build_FI_Hdr_Asg',

Line 8648: (p_encoded => FND_API.G_TRUE,

8644: p_procedure_name => PA_DEBUG.G_Err_Stack);
8645:
8646: If x_msg_count = 1 THEN
8647: pa_interface_utils_pub.get_messages
8648: (p_encoded => FND_API.G_TRUE,
8649: p_msg_index => 1,
8650: p_msg_count => x_msg_count,
8651: p_msg_data => x_msg_data,
8652: p_data => l_data , -- 4537865

Line 8664: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8660:
8661: elsif lv_err_msg = 'Resorgn_Not_Found' then
8662: x_msg_count := 1;
8663: x_msg_data := 'ResOrgn not found';
8664: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8665:
8666: FND_MSG_PUB.add_exc_msg
8667: (p_pkg_name =>
8668: 'PA_FORECASTITEM_PVT.Build_FI_Hdr_Asg',

Line 8673: (p_encoded => FND_API.G_TRUE,

8669: p_procedure_name => PA_DEBUG.G_Err_Stack);
8670:
8671: If x_msg_count = 1 THEN
8672: pa_interface_utils_pub.get_messages
8673: (p_encoded => FND_API.G_TRUE,
8674: p_msg_index => 1,
8675: p_msg_count => x_msg_count,
8676: p_msg_data => x_msg_data,
8677: p_data => l_data , -- 4537865

Line 8690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8686: else
8687:
8688: x_msg_count := 1;
8689: x_msg_data := sqlerrm ;
8690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8691:
8692: FND_MSG_PUB.add_exc_msg
8693: (p_pkg_name =>
8694: 'PA_FORECASTITEM_PVT.Build_FI_Hdr_Asg',

Line 8699: (p_encoded => FND_API.G_TRUE,

8695: p_procedure_name => PA_DEBUG.G_Err_Stack);
8696:
8697: If x_msg_count = 1 THEN
8698: pa_interface_utils_pub.get_messages
8699: (p_encoded => FND_API.G_TRUE,
8700: p_msg_index => 1,
8701: p_msg_count => x_msg_count,
8702: p_msg_data => x_msg_data,
8703: p_data => l_data , -- 4537865

Line 8721: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8717: print_message('SQLCODE'||sqlcode||sqlerrm);
8718:
8719: x_msg_count := 1;
8720: x_msg_data := sqlerrm;
8721: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8722:
8723: FND_MSG_PUB.add_exc_msg
8724: (p_pkg_name =>
8725: 'PA_FORECASTITEM_PVT.Build_FI_Hdr_Asg',

Line 8730: (p_encoded => FND_API.G_TRUE,

8726: p_procedure_name => PA_DEBUG.G_Err_Stack);
8727:
8728: If x_msg_count = 1 THEN
8729: pa_interface_utils_pub.get_messages
8730: (p_encoded => FND_API.G_TRUE,
8731: p_msg_index => 1,
8732: p_msg_count => x_msg_count,
8733: p_msg_data => x_msg_data,
8734: p_data => l_data , -- 4537865

Line 8831: lv_return_status := FND_API.G_RET_STS_SUCCESS;

8827: lv_end_date DATE;
8828:
8829: BEGIN
8830:
8831: lv_return_status := FND_API.G_RET_STS_SUCCESS;
8832:
8833: PA_DEBUG.Init_err_stack(
8834: 'PA_FORECASTITEM_PVT.Build_FI_Dtl_Asg');
8835:

Line 9430: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

9426: print_message('SQLCODE'||sqlcode||sqlerrm);
9427:
9428: x_msg_count := 1;
9429: x_msg_data := sqlerrm;
9430: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9431:
9432: FND_MSG_PUB.add_exc_msg
9433: (p_pkg_name =>
9434: 'PA_FORECASTITEM_PVT.Build_FI_Dtl_Asg',

Line 9439: (p_encoded => FND_API.G_TRUE,

9435: p_procedure_name => PA_DEBUG.G_Err_Stack);
9436:
9437: If x_msg_count = 1 THEN
9438: pa_interface_utils_pub.get_messages
9439: (p_encoded => FND_API.G_TRUE,
9440: p_msg_index => 1,
9441: p_msg_count => x_msg_count,
9442: p_msg_data => x_msg_data,
9443: p_data => l_data, -- 4537865

Line 9611: lv_return_status := FND_API.G_RET_STS_SUCCESS;

9607: l_no_fis_to_create EXCEPTION;
9608:
9609: BEGIN
9610:
9611: lv_return_status := FND_API.G_RET_STS_SUCCESS;
9612:
9613: IF (PA_INSTALL.is_prm_licensed = 'Y' OR
9614: PA_INSTALL.is_utilization_implemented = 'Y') THEN
9615:

Line 9953: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

9949: TmpResScheduleTab(i).system_status_code := NULL;
9950: end if;
9951: END LOOP;
9952:
9953: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
9954:
9955: Print_message( 'Res Avl - Calling Initialize_Day_FI');
9956:
9957: Initialize_Day_FI ( TmpResScheduleTab,

Line 9968: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

9964: print_message('5 p_end_date: ' || p_end_date);
9965:
9966: END IF;
9967:
9968: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
9969:
9970: -- Build Day FI
9971:
9972: Print_message( 'Res Avl - Calling Build_Day_FI');

Line 9980: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

9976: print_message('6 p_start_date: ' || p_start_date);
9977: print_message('6 p_end_date: ' || p_end_date);
9978: END IF;
9979:
9980: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
9981:
9982: Print_message( 'Calling Get_Resource_Asgn_Schedule');
9983:
9984: PA_FORECAST_ITEMS_UTILS.Get_Resource_Asgn_Schedules (

Line 10034: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

10030:
10031: /** end of bug fix 1993136 **/
10032:
10033:
10034: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
10035:
10036: IF TmpAsgnScheduleTab.Count > 0 THEN
10037:
10038: Print_message(

Line 10052: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

10048: END IF;
10049:
10050: END IF;
10051:
10052: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
10053:
10054: Print_message( 'Res Asg - Calling Build_Day_FI');
10055:
10056: IF TmpAsgnScheduleTab.Count > 0 THEN

Line 10079: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

10075: -- TmpResFIDayTab(TmpAsgnFIDayTab.FIRST).item_date);
10076: -- dbms_output.put_line ('Asgn : ' ||
10077: -- TmpResFIDayTab(TmpAsgnFIDayTab.LAST).item_date);
10078:
10079: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
10080:
10081: li_no_of_days := trunc(p_end_date) - trunc(p_start_date) +1;
10082:
10083: if (TmpResFIDayTab.count <> 0) then

Line 10186: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

10182:
10183:
10184: IF p_process_mode <> 'ERROR' THEN
10185:
10186: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
10187:
10188: Print_message( 'Calling Fetch_FI_Hdr_Res');
10189:
10190: Fetch_FI_Hdr_Res (p_resource_id,

Line 10204: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

10200: END IF;
10201:
10202: END IF;
10203:
10204: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
10205:
10206: Print_message( 'Calling Fetch_FI_Dtl_Res');
10207:
10208: /** Bug fix : 1913377 call changed to positional notation

Line 10254: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

10250: -- ELSE (item_date does not exist)
10251: -- Create new forecast_item
10252: -- Mark action_flag = 'N';
10253:
10254: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
10255:
10256: Print_message( 'Calling Build_FI_Hdr_Res');
10257:
10258: Build_FI_Hdr_Res(p_resource_id, p_start_date, p_end_date,

Line 10288: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

10284: -- IF action_flag = 'N'
10285: -- Create new detail record with forecast_item_id
10286: -- (generated by header record, saved IN TmpFIDayTab)
10287: -- AND line_NUMBER = 1;
10288: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
10289:
10290: Print_message( 'Calling Build_FI_Dtl_Res');
10291:
10292: Build_FI_Dtl_Res(p_resource_id, TmpDBFIDtlTab, TmpAvlFIDayTab,

Line 10298: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

10294: lv_return_status, x_msg_count, x_msg_data);
10295:
10296: END IF;
10297:
10298: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
10299:
10300: IF TmpFIHdrInsTab.COUNT > 0 THEN
10301:
10302: Print_message( 'Calling PA_FORECAST_HDR_PKG.Insert_Rows');

Line 10312: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

10308: END IF;
10309:
10310: END IF;
10311:
10312: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
10313:
10314: IF TmpFIHdrUpdTab.COUNT > 0 THEN
10315:
10316: Print_message( 'Calling PA_FORECAST_HDR_PKG.Update_Rows');

Line 10327: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

10323:
10324: END IF;
10325:
10326: PRINT_MESSAGE(x_return_status || ' ' || lv_return_status);
10327: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
10328:
10329: IF TmpFIDtlInsTab.COUNT > 0 THEN
10330:
10331: Print_message( 'Calling PA_FORECAST_DTLS_PKG.Insert_Rows');

Line 10343: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

10339:
10340: END IF;
10341:
10342: PRINT_MESSAGE(x_return_status || ' ' || lv_return_status);
10343: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
10344:
10345: IF TmpFIDtlUpdTab.COUNT > 0 THEN
10346:
10347: Print_message( 'Calling PA_FORECAST_DTLS_PKG.Update_Rows');

Line 10361: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

10357:
10358: ----------------------------------------------------------------------------
10359: ----------------BEGIN AVAILABILITY SUMMARY TABLE POPULATION-----------------
10360:
10361: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
10362:
10363: Print_message( 'Calling PA_RESOURCE_PVT.update_res_availability');
10364:
10365: PA_RESOURCE_PVT.update_res_availability (

Line 10412: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10408: 'NO schedule records');
10409:
10410: x_msg_count := 1;
10411: x_msg_data := 'No Schedule Records for Res ';
10412: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10413:
10414: -- 4537865
10415: p_start_date := NULL ;
10416: p_end_date := NULL ;

Line 10425: (p_encoded => FND_API.G_TRUE,

10421: p_procedure_name => PA_DEBUG.G_Err_Stack);
10422:
10423: If x_msg_count = 1 THEN
10424: pa_interface_utils_pub.get_messages
10425: (p_encoded => FND_API.G_TRUE,
10426: p_msg_index => 1,
10427: p_msg_count => x_msg_count,
10428: p_msg_data => x_msg_data,
10429: p_data => l_data , -- 4537865

Line 10441: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10437: ELSE
10438:
10439: x_msg_count := 1;
10440: x_msg_data := sqlerrm;
10441: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10442:
10443: -- 4537865
10444: p_start_date := NULL ;
10445: p_end_date := NULL ;

Line 10454: (p_encoded => FND_API.G_TRUE,

10450: p_procedure_name => PA_DEBUG.G_Err_Stack);
10451:
10452: If x_msg_count = 1 THEN
10453: pa_interface_utils_pub.get_messages
10454: (p_encoded => FND_API.G_TRUE,
10455: p_msg_index => 1,
10456: p_msg_count => x_msg_count,
10457: p_msg_data => x_msg_data,
10458: p_data => l_data , -- 4537865

Line 10478: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10474: 'Unable to set lock for ' || to_char(p_resource_id));
10475:
10476: x_msg_count := 1;
10477: x_msg_data := 'Resource ID Lock Failure';
10478: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10479:
10480: -- 4537865
10481: p_start_date := NULL ;
10482: p_end_date := NULL ;

Line 10491: (p_encoded => FND_API.G_TRUE,

10487: p_procedure_name => PA_DEBUG.G_Err_Stack);
10488:
10489: If x_msg_count = 1 THEN
10490: pa_interface_utils_pub.get_messages
10491: (p_encoded => FND_API.G_TRUE,
10492: p_msg_index => 1,
10493: p_msg_count => x_msg_count,
10494: p_msg_data => x_msg_data,
10495: p_data => l_data, -- 4537865

Line 10508: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10504: WHEN OTHERS THEN
10505:
10506: x_msg_count := 1;
10507: x_msg_data := sqlerrm;
10508: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10509: /** release the lock if the process fails **/
10510: li_lock_status := PA_FORECAST_ITEMS_UTILS.Release_User_lock(p_resource_id, 'RES');
10511: Print_message('Resource lock released ');
10512:

Line 10519: (p_encoded => FND_API.G_TRUE,

10515: p_end_date := NULL ;
10516:
10517: If x_msg_count = 1 THEN
10518: pa_interface_utils_pub.get_messages
10519: (p_encoded => FND_API.G_TRUE,
10520: p_msg_index => 1,
10521: p_msg_count => x_msg_count,
10522: p_msg_data => x_msg_data,
10523: p_data => l_data, -- 4537865

Line 10614: lv_return_status := FND_API.G_RET_STS_SUCCESS;

10610: lv_return_status VARCHAR2(30);
10611:
10612: BEGIN
10613:
10614: lv_return_status := FND_API.G_RET_STS_SUCCESS;
10615:
10616: Print_message('Entering Fetch_FI_Hdr_Res');
10617:
10618: PA_DEBUG.Init_err_stack( 'PA_FORECASTITEM_PVT.Fetch_FI_Hdr_Res');

Line 10811: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10807: print_message('SQLCODE'||sqlcode||sqlerrm);
10808:
10809: x_msg_count := 1;
10810: x_msg_data := sqlerrm;
10811: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10812:
10813: FND_MSG_PUB.add_exc_msg
10814: (p_pkg_name =>
10815: 'PA_FORECASTITEM_PVT.Fetch_FI_Hdr_Res',

Line 10820: (p_encoded => FND_API.G_TRUE,

10816: p_procedure_name => PA_DEBUG.G_Err_Stack);
10817:
10818: If x_msg_count = 1 THEN
10819: pa_interface_utils_pub.get_messages
10820: (p_encoded => FND_API.G_TRUE,
10821: p_msg_index => 1,
10822: p_msg_count => x_msg_count,
10823: p_msg_data => x_msg_data,
10824: p_data => l_data , -- 4537865

Line 10913: lv_return_status := FND_API.G_RET_STS_SUCCESS;

10909: lv_return_status VARCHAR2(30);
10910: g_process_mode VARCHAR2(30);
10911: BEGIN
10912:
10913: lv_return_status := FND_API.G_RET_STS_SUCCESS;
10914:
10915: Print_message('Entering Fetch_FI_Dtl_Res');
10916:
10917: PA_DEBUG.Init_err_stack(

Line 11128: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

11124: print_message('SQLCODE'||sqlcode||sqlerrm);
11125:
11126: x_msg_count := 1;
11127: x_msg_data := sqlerrm;
11128: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11129:
11130: FND_MSG_PUB.add_exc_msg
11131: (p_pkg_name =>
11132: 'PA_FORECASTITEM_PVT.Fetch_FI_Dtl_Res',

Line 11137: (p_encoded => FND_API.G_TRUE,

11133: p_procedure_name => PA_DEBUG.G_Err_Stack);
11134:
11135: If x_msg_count = 1 THEN
11136: pa_interface_utils_pub.get_messages
11137: (p_encoded => FND_API.G_TRUE,
11138: p_msg_index => 1,
11139: p_msg_count => x_msg_count,
11140: p_msg_data => x_msg_data,
11141: p_data => l_data, -- 4537865

Line 11313: lv_return_status := FND_API.G_RET_STS_SUCCESS;

11309:
11310:
11311: BEGIN
11312:
11313: lv_return_status := FND_API.G_RET_STS_SUCCESS;
11314:
11315: Print_message('Entering Build_FI_Hdr_Res');
11316:
11317: PA_DEBUG.Init_err_stack(

Line 11586: IF lv_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11582: lv_default_tp_amount_type,
11583: lv_return_status, x_msg_count, x_msg_data);
11584:
11585: /* Added the code for bug 3011242*/
11586: IF lv_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11587: x_return_status := lv_return_status;
11588: return;
11589: END IF;
11590: /* Code addition for the bug 3011242 ends*/

Line 11636: IF lv_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11632: lv_project_orgn_id, lv_work_type_id,
11633: lv_project_type_class,lv_project_status_code,
11634: lv_return_status, x_msg_count, x_msg_data);
11635:
11636: IF lv_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11637: lv_err_msg := 'No_Project_Record - Res';
11638: RAISE NO_DATA_FOUND;
11639:
11640: END IF;

Line 12520: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

12516: if lv_err_msg = 'ResOU_Not_Found' then
12517:
12518: x_msg_count := 1;
12519: x_msg_data := 'ResOU not found';
12520: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12521:
12522: FND_MSG_PUB.add_exc_msg
12523: (p_pkg_name =>
12524: 'PA_FORECASTITEM_PVT.Build_FI_Hdr_Res',

Line 12529: (p_encoded => FND_API.G_TRUE,

12525: p_procedure_name => PA_DEBUG.G_Err_Stack);
12526:
12527: If x_msg_count = 1 THEN
12528: pa_interface_utils_pub.get_messages
12529: (p_encoded => FND_API.G_TRUE,
12530: p_msg_index => 1,
12531: p_msg_count => x_msg_count,
12532: p_msg_data => x_msg_data,
12533: p_data => l_data , -- 4537865

Line 12545: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

12541:
12542: elsif lv_err_msg = 'Resorgn_Not_Found' then
12543: x_msg_count := 1;
12544: x_msg_data := 'ResOrgn not found';
12545: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12546:
12547: FND_MSG_PUB.add_exc_msg
12548: (p_pkg_name =>
12549: 'PA_FORECASTITEM_PVT.Build_FI_Hdr_Res',

Line 12554: (p_encoded => FND_API.G_TRUE,

12550: p_procedure_name => PA_DEBUG.G_Err_Stack);
12551:
12552: If x_msg_count = 1 THEN
12553: pa_interface_utils_pub.get_messages
12554: (p_encoded => FND_API.G_TRUE,
12555: p_msg_index => 1,
12556: p_msg_count => x_msg_count,
12557: p_msg_data => x_msg_data,
12558: p_data => l_data, -- 4537865

Line 12571: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

12567: else
12568:
12569: x_msg_count := 1;
12570: x_msg_data := sqlerrm ;
12571: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12572:
12573: FND_MSG_PUB.add_exc_msg
12574: (p_pkg_name =>
12575: 'PA_FORECASTITEM_PVT.Build_FI_Hdr_Res',

Line 12580: (p_encoded => FND_API.G_TRUE,

12576: p_procedure_name => PA_DEBUG.G_Err_Stack);
12577:
12578: If x_msg_count = 1 THEN
12579: pa_interface_utils_pub.get_messages
12580: (p_encoded => FND_API.G_TRUE,
12581: p_msg_index => 1,
12582: p_msg_count => x_msg_count,
12583: p_msg_data => x_msg_data,
12584: p_data => l_data, -- 4537865

Line 12601: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

12597: print_message('SQLCODE'||sqlcode||sqlerrm);
12598:
12599: x_msg_count := 1;
12600: x_msg_data := sqlerrm;
12601: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12602:
12603: FND_MSG_PUB.add_exc_msg
12604: (p_pkg_name =>
12605: 'PA_FORECASTITEM_PVT.Build_FI_Hdr_Res',

Line 12610: (p_encoded => FND_API.G_TRUE,

12606: p_procedure_name => PA_DEBUG.G_Err_Stack);
12607:
12608: If x_msg_count = 1 THEN
12609: pa_interface_utils_pub.get_messages
12610: (p_encoded => FND_API.G_TRUE,
12611: p_msg_index => 1,
12612: p_msg_count => x_msg_count,
12613: p_msg_data => x_msg_data,
12614: p_data => l_data, -- 4537865

Line 12712: lv_return_status := FND_API.G_RET_STS_SUCCESS;

12708: lv_end_date DATE;
12709: l_worktype_cache NUMBER; -- Added for bug 5552078
12710:
12711: BEGIN
12712: lv_return_status := FND_API.G_RET_STS_SUCCESS;
12713:
12714: Print_message('Entering Build_FI_Dtl_Res');
12715:
12716: PA_DEBUG.Init_err_stack(

Line 13313: x_return_status := FND_API.G_RET_STS_SUCCESS;

13309: x_FIDtlUpdTab := TmpUpdTab;
13310:
13311: Print_message('Leaving Build_FI_Dtl_Res');
13312:
13313: x_return_status := FND_API.G_RET_STS_SUCCESS;
13314:
13315: PA_DEBUG.Reset_Err_Stack;
13316:
13317: x_return_status := lv_return_status;

Line 13327: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

13323: Print_message('SQLERR '||sqlcode||sqlerrm);
13324:
13325: x_msg_count := 1;
13326: x_msg_data := sqlerrm;
13327: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13328:
13329: FND_MSG_PUB.add_exc_msg
13330: (p_pkg_name =>
13331: 'PA_FORECASTITEM_PVT.Build_FI_Dtl_Res',

Line 13336: (p_encoded => FND_API.G_TRUE,

13332: p_procedure_name => PA_DEBUG.G_Err_Stack);
13333:
13334: If x_msg_count = 1 THEN
13335: pa_interface_utils_pub.get_messages
13336: (p_encoded => FND_API.G_TRUE,
13337: p_msg_index => 1,
13338: p_msg_count => x_msg_count,
13339: p_msg_data => x_msg_data,
13340: p_data => l_data, -- 4537865

Line 13387: lv_return_status := FND_API.G_RET_STS_SUCCESS;

13383: lv_return_status VARCHAR2(30);
13384:
13385: BEGIN
13386:
13387: lv_return_status := FND_API.G_RET_STS_SUCCESS;
13388:
13389: Print_message(
13390: 'Entering Resource_Unasg_Error_Process');
13391:

Line 13415: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

13411:
13412: Print_message(
13413: 'Calling Regenerate_Res_Unassigned_FI');
13414:
13415: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
13416:
13417: Regenerate_Res_Unassigned_FI(
13418: p_resource_id => lv_prev_resource_id,
13419: p_start_date => lv_start_date,

Line 13446: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

13442:
13443: -- Do FOR.LAST record.LAST set of records
13444: lv_end_date := p_ErrHdrTab(p_ErrHdrTab.LAST).item_date;
13445:
13446: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
13447:
13448: Print_message( 'Calling Regenerate_Res_Unassigned_FI 2 ');
13449:
13450: Regenerate_Res_Unassigned_FI(

Line 13477: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

13473: Print_message('SQLERR '||sqlcode||sqlerrm);
13474:
13475: x_msg_count := 1;
13476: x_msg_data := sqlerrm;
13477: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13478:
13479: FND_MSG_PUB.add_exc_msg
13480: (p_pkg_name =>
13481: 'PA_FORECASTITEM_PVT.Resource_Unasg_Error_Process',

Line 13486: (p_encoded => FND_API.G_TRUE,

13482: p_procedure_name => PA_DEBUG.G_Err_Stack);
13483:
13484: If x_msg_count = 1 THEN
13485: pa_interface_utils_pub.get_messages
13486: (p_encoded => FND_API.G_TRUE,
13487: p_msg_index => 1,
13488: p_msg_count => x_msg_count,
13489: p_msg_data => x_msg_data,
13490: p_data => l_data, -- 4537865

Line 13586: lv_return_status := FND_API.G_RET_STS_SUCCESS;

13582: lv_return_status VARCHAR2(30);
13583:
13584: BEGIN
13585:
13586: lv_return_status := FND_API.G_RET_STS_SUCCESS;
13587:
13588: Print_message ( 'Entering FI_Error_Process');
13589:
13590: PA_DEBUG.Init_err_stack( 'PA_FORECASTITEM_PVT.FI_Error_Process');

Line 13789: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

13785:
13786: IF p_AsgnDtlRec.assignment_type = 'OPEN_ASGMT' THEN
13787:
13788:
13789: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
13790:
13791: Print_message ( 'Calling Generate_Requirement_FI ');
13792:
13793: Generate_Requirement_FI(

Line 13806: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

13802: END IF;
13803:
13804: ELSE
13805:
13806: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
13807:
13808: Print_message ( 'Calling Generate_Assignment_FI ');
13809:
13810: Generate_Assignment_FI(

Line 13844: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

13840: lv_end_date := TmpErrHdrTab(TmpErrHdrTab.LAST).item_date;
13841:
13842: IF p_AsgnDtlRec.assignment_type = 'OPEN_ASGMT' THEN
13843:
13844: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
13845:
13846: Print_message ( 'Calling Generate_Requirement_FI ');
13847:
13848: Generate_Requirement_FI(

Line 13861: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN

13857: END IF;
13858:
13859: ELSE
13860:
13861: IF lv_return_status = FND_API.G_RET_STS_SUCCESS THEN
13862:
13863: Print_message ( 'Calling Generate_Assignment_FI ');
13864:
13865: Generate_Assignment_FI(

Line 13895: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

13891: print_message('Failed in FI_Error_Process api');
13892: print_message('SQLCODE'||sqlcode||sqlerrm);
13893: x_msg_count := 1;
13894: x_msg_data := sqlerrm;
13895: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13896:
13897: FND_MSG_PUB.add_exc_msg
13898: (p_pkg_name =>
13899: 'PA_FORECASTITEM_PVT.FI_Error_Process',

Line 13904: (p_encoded => FND_API.G_TRUE,

13900: p_procedure_name => PA_DEBUG.G_Err_Stack);
13901:
13902: If x_msg_count = 1 THEN
13903: pa_interface_utils_pub.get_messages
13904: (p_encoded => FND_API.G_TRUE,
13905: p_msg_index => 1,
13906: p_msg_count => x_msg_count,
13907: p_msg_data => x_msg_data,
13908: p_data => l_data, -- 4537865

Line 14122: lv_return_status := FND_API.G_RET_STS_SUCCESS;

14118: l_data varchar2(2000); -- 4537865
14119: BEGIN
14120: -- l_process_mode := p_process_mode;
14121:
14122: lv_return_status := FND_API.G_RET_STS_SUCCESS;
14123:
14124: Print_message('Entering Regenrate_Asgn_Req');
14125:
14126: PA_DEBUG.Init_err_stack(

Line 14212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

14208: 'Unable to set lock for ' ||
14209: to_char(l_AssignmentIdTab(i)));
14210: x_msg_count := 1;
14211: x_msg_data := 'Assignment ID Lock Failure';
14212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14213:
14214: FND_MSG_PUB.add_exc_msg
14215: (p_pkg_name =>
14216: 'PA_FORECASTITEM_PVT.Regenrate_Asgn_Req',

Line 14221: (p_encoded => FND_API.G_TRUE,

14217: p_procedure_name => PA_DEBUG.G_Err_Stack);
14218:
14219: If x_msg_count = 1 THEN
14220: pa_interface_utils_pub.get_messages
14221: (p_encoded => FND_API.G_TRUE,
14222: p_msg_index => 1,
14223: p_msg_count => x_msg_count,
14224: p_msg_data => x_msg_data,
14225: p_data => l_data, -- 4537865

Line 14256: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

14252: WHEN OTHERS THEN
14253: print_message('Failed in Regenrate_Asgn_Req api');
14254: print_message('SQLCODE'||sqlcode||sqlerrm);
14255:
14256: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14257: x_msg_count := 1;
14258: x_msg_data := SQLERRM;
14259:
14260: FND_MSG_PUB.add_exc_msg

Line 14266: (p_encoded => FND_API.G_TRUE,

14262: p_procedure_name => PA_DEBUG.G_Err_Stack);
14263:
14264: If x_msg_count = 1 THEN
14265: pa_interface_utils_pub.get_messages
14266: (p_encoded => FND_API.G_TRUE,
14267: p_msg_index => 1,
14268: p_msg_count => x_msg_count,
14269: p_msg_data => x_msg_data,
14270: p_data => l_data, -- 4537865

Line 14497: lv_return_status := FND_API.G_RET_STS_SUCCESS;

14493: lv_return_status VARCHAR2(30);
14494:
14495: BEGIN
14496:
14497: lv_return_status := FND_API.G_RET_STS_SUCCESS;
14498:
14499: -- l_process_mode := p_process_mode;
14500:
14501: PA_DEBUG.Init_err_stack( 'PA_FORECASTITEM_PVT.Regenrate_Unassigned');

Line 14706: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

14702: WHEN OTHERS THEN
14703: print_message('Failed in Regenerate_unassigned api');
14704: print_message('SQLCODE'||sqlcode||sqlerrm);
14705:
14706: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14707: x_msg_count := 1;
14708: x_msg_data := SQLERRM;
14709:
14710: FND_MSG_PUB.add_exc_msg

Line 14717: (p_encoded => FND_API.G_TRUE,

14713: p_procedure_name => PA_DEBUG.G_Err_Stack);
14714:
14715: If x_msg_count = 1 THEN
14716: pa_interface_utils_pub.get_messages
14717: (p_encoded => FND_API.G_TRUE,
14718: p_msg_index => 1,
14719: p_msg_count => x_msg_count,
14720: p_msg_data => x_msg_data,
14721: p_data => l_data, -- 4537865

Line 14767: l_x_return_status := FND_API.G_RET_STS_SUCCESS;

14763: ,x_debug_mode => l_debug_mode
14764: );
14765:
14766:
14767: l_x_return_status := FND_API.G_RET_STS_SUCCESS;
14768: l_orgz_id := p_orgz_id;
14769: l_start_date := p_start_date;
14770: l_end_date := p_end_date;
14771: l_process_mode := p_process_mode;

Line 14813: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

14809: g_process_mode := null;
14810: print_message('Failed in Regenrate_orgz_forecast api');
14811: print_message('SQLCODE'||sqlcode||sqlerrm);
14812:
14813: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14814: x_msg_count := 1;
14815: x_msg_data := SQLERRM;
14816:
14817: FND_MSG_PUB.add_exc_msg

Line 14824: (p_encoded => FND_API.G_TRUE,

14820: p_procedure_name => PA_DEBUG.G_Err_Stack);
14821:
14822: If x_msg_count = 1 THEN
14823: pa_interface_utils_pub.get_messages
14824: (p_encoded => FND_API.G_TRUE,
14825: p_msg_index => 1,
14826: p_msg_count => x_msg_count,
14827: p_msg_data => x_msg_data,
14828: p_data => l_data, -- 4537865

Line 14972: x_return_status :=FND_API.G_RET_STS_SUCCESS;

14968: x_End_Date := l_close_end_date;
14969: x_billable_flag := 'N';
14970: end if;
14971:
14972: x_return_status :=FND_API.G_RET_STS_SUCCESS;
14973:
14974: EXCEPTION
14975:
14976: WHEN OTHERS THEN

Line 14988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

14984:
14985: FND_MSG_PUB.add_exc_msg
14986: (p_pkg_name => 'PA_FORECASTITEM_PVT.Check_Person_Billable',
14987: p_procedure_name => PA_DEBUG.G_Err_Stack);
14988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14989:
14990: If x_msg_count = 1 THEN
14991: pa_interface_utils_pub.get_messages
14992: (p_encoded => FND_API.G_TRUE,

Line 14992: (p_encoded => FND_API.G_TRUE,

14988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14989:
14990: If x_msg_count = 1 THEN
14991: pa_interface_utils_pub.get_messages
14992: (p_encoded => FND_API.G_TRUE,
14993: p_msg_index => 1,
14994: p_msg_count => x_msg_count,
14995: p_msg_data => x_msg_data,
14996: p_data => l_data, -- 4537865

Line 15103: x_return_status :=FND_API.G_RET_STS_SUCCESS;

15099: x_End_Date := l_close_end_date;
15100: x_inc_util_flag := 'N';
15101: end if;
15102:
15103: x_return_status :=FND_API.G_RET_STS_SUCCESS;
15104:
15105: EXCEPTION
15106:
15107: WHEN OTHERS THEN

Line 15113: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

15109: x_msg_data := sqlerrm;
15110: FND_MSG_PUB.add_exc_msg
15111: (p_pkg_name => 'PA_FORECASTITEM_PVT.Is_Include_Utilisation',
15112: p_procedure_name => PA_DEBUG.G_Err_Stack);
15113: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
15114:
15115: -- 4537865
15116: x_start_date := NULL ;
15117: x_end_date := NULL ;

Line 15122: (p_encoded => FND_API.G_TRUE,

15118: x_inc_util_flag := NULL ;
15119:
15120: If x_msg_count = 1 THEN
15121: pa_interface_utils_pub.get_messages
15122: (p_encoded => FND_API.G_TRUE,
15123: p_msg_index => 1,
15124: p_msg_count => x_msg_count,
15125: p_msg_data => x_msg_data,
15126: p_data => l_data , -- 4537865

Line 15170: x_return_status := FND_API.G_RET_STS_SUCCESS ;

15166: print_message('Entering copy_requirement_fi');
15167:
15168: -- 4537865
15169: -- Initialize x_return_status to Success
15170: x_return_status := FND_API.G_RET_STS_SUCCESS ;
15171:
15172: if (p_requirement_id_tbl.count = 0) then
15173: Print_message('Leaving copy_requirement_fi');
15174: RETURN;

Line 15304: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

15300: EXCEPTION
15301: WHEN OTHERS THEN
15302: x_msg_count := 1;
15303: x_msg_data := sqlerrm;
15304: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
15305: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FORECASTITEM_PVT',
15306: p_procedure_name => 'Copy_Requirement_FI');
15307: If x_msg_count = 1 THEN
15308: pa_interface_utils_pub.get_messages

Line 15309: (p_encoded => FND_API.G_TRUE,

15305: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_FORECASTITEM_PVT',
15306: p_procedure_name => 'Copy_Requirement_FI');
15307: If x_msg_count = 1 THEN
15308: pa_interface_utils_pub.get_messages
15309: (p_encoded => FND_API.G_TRUE,
15310: p_msg_index => 1,
15311: p_msg_count => x_msg_count,
15312: p_msg_data => x_msg_data,
15313: p_data => l_data, -- 4537865