[Home] [Help]
90: | PROCEDURE Get_Position_Information |
91: +===========================================================================*/
92: PROCEDURE Get_Position_Information
93: ( p_api_version IN NUMBER,
94: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
95: p_commit IN VARCHAR2 := FND_API.G_FALSE,
96: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
97: p_return_status OUT NOCOPY VARCHAR2,
98: p_msg_count OUT NOCOPY NUMBER,
91: +===========================================================================*/
92: PROCEDURE Get_Position_Information
93: ( p_api_version IN NUMBER,
94: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
95: p_commit IN VARCHAR2 := FND_API.G_FALSE,
96: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
97: p_return_status OUT NOCOPY VARCHAR2,
98: p_msg_count OUT NOCOPY NUMBER,
99: p_msg_data OUT NOCOPY VARCHAR2,
92: PROCEDURE Get_Position_Information
93: ( p_api_version IN NUMBER,
94: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
95: p_commit IN VARCHAR2 := FND_API.G_FALSE,
96: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
97: p_return_status OUT NOCOPY VARCHAR2,
98: p_msg_count OUT NOCOPY NUMBER,
99: p_msg_data OUT NOCOPY VARCHAR2,
100: p_data_extract_id IN NUMBER,
408: Savepoint Get_Position;
409:
410: -- Standard call to check for call compatibility.
411:
412: if not FND_API.Compatible_API_Call (l_api_version,
413: p_api_version,
414: l_api_name,
415: G_PKG_NAME)
416: then
413: p_api_version,
414: l_api_name,
415: G_PKG_NAME)
416: then
417: raise FND_API.G_EXC_UNEXPECTED_ERROR;
418: end if;
419:
420: -- Initialize message list if p_init_msg_list is set to TRUE.
421:
418: end if;
419:
420: -- Initialize message list if p_init_msg_list is set to TRUE.
421:
422: if FND_API.to_Boolean (p_init_msg_list) then
423: FND_MSG_PUB.initialize;
424: end if;
425:
426: p_return_status := FND_API.G_RET_STS_SUCCESS;
422: if FND_API.to_Boolean (p_init_msg_list) then
423: FND_MSG_PUB.initialize;
424: end if;
425:
426: p_return_status := FND_API.G_RET_STS_SUCCESS;
427:
428: -- API body
429:
430: l_last_update_date := sysdate;
444: p_status => l_status,
445: p_restart_id => l_restart_position_id
446: );
447:
448: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
449: raise FND_API.G_EXC_ERROR;
450: end if;
451:
452:
445: p_restart_id => l_restart_position_id
446: );
447:
448: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
449: raise FND_API.G_EXC_ERROR;
450: end if;
451:
452:
453: if (l_status <> 'C') then
879: p_process => 'Positions Interface',
880: p_restart_id => position_rec.position_id
881: );
882:
883: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
884: raise FND_API.G_EXC_ERROR;
885: end if;
886: commit work;
887: l_position_ctr := 0;
880: p_restart_id => position_rec.position_id
881: );
882:
883: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
884: raise FND_API.G_EXC_ERROR;
885: end if;
886: commit work;
887: l_position_ctr := 0;
888: Savepoint Get_Position;
904: p_process => 'Positions Interface',
905: p_restart_id => l_fin_position_id
906: );
907:
908: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
909: raise FND_API.G_EXC_ERROR;
910: end if;
911:
912: Reentrant_Process
905: p_restart_id => l_fin_position_id
906: );
907:
908: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
909: raise FND_API.G_EXC_ERROR;
910: end if;
911:
912: Reentrant_Process
913: ( p_api_version => 1.0 ,
918: p_extract_method => p_extract_method,
919: p_process => 'Positions Interface'
920: );
921:
922: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
923: raise FND_API.G_EXC_ERROR;
924: end if;
925:
926: commit work;
919: p_process => 'Positions Interface'
920: );
921:
922: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
923: raise FND_API.G_EXC_ERROR;
924: end if;
925:
926: commit work;
927:
930: -- End of API body.
931:
932: EXCEPTION
933:
934: when FND_API.G_EXC_ERROR then
935: rollback to Get_Position;
936: p_return_status := FND_API.G_RET_STS_ERROR;
937: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
938: p_data => p_msg_data);
932: EXCEPTION
933:
934: when FND_API.G_EXC_ERROR then
935: rollback to Get_Position;
936: p_return_status := FND_API.G_RET_STS_ERROR;
937: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
938: p_data => p_msg_data);
939: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
940: p_data => p_msg_data);
941: message_token('POSITION_NAME',l_position_name );
942: message_token('EMPLOYEE_NAME',l_employee_name );
943: add_message('PSB', 'PSB_POSITION_DETAILS');
944:
945: when FND_API.G_EXC_UNEXPECTED_ERROR then
946: rollback to Get_Position;
947: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
948: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
949: p_data => p_msg_data);
943: add_message('PSB', 'PSB_POSITION_DETAILS');
944:
945: when FND_API.G_EXC_UNEXPECTED_ERROR then
946: rollback to Get_Position;
947: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
948: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
949: p_data => p_msg_data);
950: message_token('POSITION_NAME',l_position_name );
951: message_token('EMPLOYEE_NAME',l_employee_name );
953:
954: WHEN OTHERS THEN
955: --
956: ROLLBACK TO Get_Position ;
957: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
958: --
959: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
960: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
961: l_api_name);
978: | PROCEDURE Get_Salary_Information |
979: +===========================================================================*/
980: PROCEDURE Get_Salary_Information
981: ( p_api_version IN NUMBER,
982: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
983: p_commit IN VARCHAR2 := FND_API.G_FALSE,
984: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
985: p_return_status OUT NOCOPY VARCHAR2,
986: p_msg_count OUT NOCOPY NUMBER,
979: +===========================================================================*/
980: PROCEDURE Get_Salary_Information
981: ( p_api_version IN NUMBER,
982: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
983: p_commit IN VARCHAR2 := FND_API.G_FALSE,
984: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
985: p_return_status OUT NOCOPY VARCHAR2,
986: p_msg_count OUT NOCOPY NUMBER,
987: p_msg_data OUT NOCOPY VARCHAR2,
980: PROCEDURE Get_Salary_Information
981: ( p_api_version IN NUMBER,
982: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
983: p_commit IN VARCHAR2 := FND_API.G_FALSE,
984: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
985: p_return_status OUT NOCOPY VARCHAR2,
986: p_msg_count OUT NOCOPY NUMBER,
987: p_msg_data OUT NOCOPY VARCHAR2,
988: p_data_extract_id IN NUMBER,
1129: -- Standard Start of API savepoint
1130: Savepoint Get_Salary;
1131:
1132: -- Standard call to check for call compatibility.
1133: if not FND_API.Compatible_API_Call (l_api_version,
1134: p_api_version,
1135: l_api_name,
1136: G_PKG_NAME)
1137: then
1134: p_api_version,
1135: l_api_name,
1136: G_PKG_NAME)
1137: then
1138: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1139: end if;
1140:
1141: -- Initialize message list if p_init_msg_list is set to TRUE.
1142: if FND_API.to_Boolean (p_init_msg_list) then
1138: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1139: end if;
1140:
1141: -- Initialize message list if p_init_msg_list is set to TRUE.
1142: if FND_API.to_Boolean (p_init_msg_list) then
1143: FND_MSG_PUB.initialize;
1144: end if;
1145: p_return_status := FND_API.G_RET_STS_SUCCESS;
1146:
1141: -- Initialize message list if p_init_msg_list is set to TRUE.
1142: if FND_API.to_Boolean (p_init_msg_list) then
1143: FND_MSG_PUB.initialize;
1144: end if;
1145: p_return_status := FND_API.G_RET_STS_SUCCESS;
1146:
1147: l_last_update_date := sysdate;
1148: l_last_updated_by := FND_GLOBAL.USER_ID;
1149: l_last_update_login := FND_GLOBAL.LOGIN_ID;
1160: p_status => l_status,
1161: p_restart_id => l_restart_grade_rule_id
1162: );
1163:
1164: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1165: raise FND_API.G_EXC_ERROR;
1166: end if;
1167:
1168: -- Start bug no 3902996
1161: p_restart_id => l_restart_grade_rule_id
1162: );
1163:
1164: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1165: raise FND_API.G_EXC_ERROR;
1166: end if;
1167:
1168: -- Start bug no 3902996
1169: /*l_rate_cnt_flag := 'N';
1491: p_process => 'Salary Interface',
1492: p_restart_id => salary_rec.grade_rule_id
1493: );
1494:
1495: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1496: raise FND_API.G_EXC_ERROR;
1497: end if;
1498: commit work;
1499: l_salary_ctr := 0;
1492: p_restart_id => salary_rec.grade_rule_id
1493: );
1494:
1495: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1496: raise FND_API.G_EXC_ERROR;
1497: end if;
1498: commit work;
1499: l_salary_ctr := 0;
1500: Savepoint Get_Salary;
1512: p_process => 'Salary Interface',
1513: p_restart_id => l_fin_graderule_id
1514: );
1515:
1516: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1517: raise FND_API.G_EXC_ERROR;
1518: end if;
1519:
1520: Reentrant_Process
1513: p_restart_id => l_fin_graderule_id
1514: );
1515:
1516: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1517: raise FND_API.G_EXC_ERROR;
1518: end if;
1519:
1520: Reentrant_Process
1521: ( p_api_version => 1.0 ,
1526: p_extract_method => p_extract_method,
1527: p_process => 'Salary Interface'
1528: );
1529:
1530: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1531: raise FND_API.G_EXC_ERROR;
1532: end if;
1533:
1534: commit work;
1527: p_process => 'Salary Interface'
1528: );
1529:
1530: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1531: raise FND_API.G_EXC_ERROR;
1532: end if;
1533:
1534: commit work;
1535: end if;
1537: -- End of API body.
1538:
1539: EXCEPTION
1540:
1541: when FND_API.G_EXC_ERROR then
1542:
1543: rollback to Get_Salary;
1544: p_return_status := FND_API.G_RET_STS_ERROR;
1545: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1540:
1541: when FND_API.G_EXC_ERROR then
1542:
1543: rollback to Get_Salary;
1544: p_return_status := FND_API.G_RET_STS_ERROR;
1545: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1546: p_data => p_msg_data);
1547: message_token('SALARY_TYPE',l_salary_type );
1548: message_token('RATE_OR_PAYSCALE_NAME',l_rate_or_payscale_name );
1550: message_token('GRADE_STEP',l_grade_step );
1551: message_token('GRADE_SEQUENCE',l_sequence);
1552: add_message('PSB', 'PSB_SALARY_DETAILS');
1553:
1554: when FND_API.G_EXC_UNEXPECTED_ERROR then
1555:
1556: rollback to Get_Salary;
1557: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1558: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1553:
1554: when FND_API.G_EXC_UNEXPECTED_ERROR then
1555:
1556: rollback to Get_Salary;
1557: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1558: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1559: p_data => p_msg_data);
1560: message_token('SALARY_TYPE',l_salary_type );
1561: message_token('RATE_OR_PAYSCALE_NAME',l_rate_or_payscale_name );
1566:
1567: when OTHERS then
1568:
1569: rollback to Get_Salary;
1570: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1571: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
1572: p_data => p_msg_data);
1573:
1574: message_token('SALARY_TYPE',l_salary_type );
1589: END Get_Salary_Information;
1590:
1591: PROCEDURE Get_Employee_Information
1592: ( p_api_version IN NUMBER,
1593: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1594: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1595: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1596: p_return_status OUT NOCOPY VARCHAR2,
1597: p_msg_count OUT NOCOPY NUMBER,
1590:
1591: PROCEDURE Get_Employee_Information
1592: ( p_api_version IN NUMBER,
1593: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1594: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1595: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1596: p_return_status OUT NOCOPY VARCHAR2,
1597: p_msg_count OUT NOCOPY NUMBER,
1598: p_msg_data OUT NOCOPY VARCHAR2,
1591: PROCEDURE Get_Employee_Information
1592: ( p_api_version IN NUMBER,
1593: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1594: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1595: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1596: p_return_status OUT NOCOPY VARCHAR2,
1597: p_msg_count OUT NOCOPY NUMBER,
1598: p_msg_data OUT NOCOPY VARCHAR2,
1599: p_data_extract_id IN NUMBER,
1845: Savepoint Get_Employee;
1846:
1847: -- Standard call to check for call compatibility.
1848:
1849: if not FND_API.Compatible_API_Call (l_api_version,
1850: p_api_version,
1851: l_api_name,
1852: G_PKG_NAME)
1853: then
1850: p_api_version,
1851: l_api_name,
1852: G_PKG_NAME)
1853: then
1854: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1855: end if;
1856:
1857: -- Initialize message list if p_init_msg_list is set to TRUE.
1858:
1855: end if;
1856:
1857: -- Initialize message list if p_init_msg_list is set to TRUE.
1858:
1859: if FND_API.to_Boolean (p_init_msg_list) then
1860: FND_MSG_PUB.initialize;
1861: end if;
1862:
1863: p_return_status := FND_API.G_RET_STS_SUCCESS;
1859: if FND_API.to_Boolean (p_init_msg_list) then
1860: FND_MSG_PUB.initialize;
1861: end if;
1862:
1863: p_return_status := FND_API.G_RET_STS_SUCCESS;
1864:
1865: -- API body
1866:
1867: l_last_update_date := sysdate;
1880: p_status => l_status,
1881: p_restart_id => l_restart_assignment_id
1882: );
1883:
1884: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1885: raise FND_API.G_EXC_ERROR;
1886: end if;
1887:
1888: if (l_status <> 'C') then
1881: p_restart_id => l_restart_assignment_id
1882: );
1883:
1884: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1885: raise FND_API.G_EXC_ERROR;
1886: end if;
1887:
1888: if (l_status <> 'C') then
1889:
2150: p_process => 'Employees Interface',
2151: p_restart_id => employee_rec.assignment_id
2152: );
2153:
2154: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2155: raise FND_API.G_EXC_ERROR;
2156: end if;
2157:
2158: commit work;
2151: p_restart_id => employee_rec.assignment_id
2152: );
2153:
2154: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2155: raise FND_API.G_EXC_ERROR;
2156: end if;
2157:
2158: commit work;
2159: l_assign_ctr := 0;
2174: p_process => 'Employees Interface',
2175: p_restart_id => l_assignment_id
2176: );
2177:
2178: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2179: raise FND_API.G_EXC_ERROR;
2180: end if;
2181:
2182: Reentrant_Process
2175: p_restart_id => l_assignment_id
2176: );
2177:
2178: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2179: raise FND_API.G_EXC_ERROR;
2180: end if;
2181:
2182: Reentrant_Process
2183: ( p_api_version => 1.0 ,
2188: p_extract_method => p_extract_method,
2189: p_process => 'Employees Interface'
2190: );
2191:
2192: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2193: raise FND_API.G_EXC_ERROR;
2194: end if;
2195:
2196: commit work;
2189: p_process => 'Employees Interface'
2190: );
2191:
2192: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2193: raise FND_API.G_EXC_ERROR;
2194: end if;
2195:
2196: commit work;
2197: end if;
2197: end if;
2198:
2199: EXCEPTION
2200:
2201: when FND_API.G_EXC_ERROR then
2202: rollback to Get_Employee;
2203: p_return_status := FND_API.G_RET_STS_ERROR;
2204: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
2205: p_data => p_msg_data);
2199: EXCEPTION
2200:
2201: when FND_API.G_EXC_ERROR then
2202: rollback to Get_Employee;
2203: p_return_status := FND_API.G_RET_STS_ERROR;
2204: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
2205: p_data => p_msg_data);
2206: message_token('POSITION_NAME',l_position_name );
2207: message_token('EMPLOYEE_NAME',l_employee_name );
2206: message_token('POSITION_NAME',l_position_name );
2207: message_token('EMPLOYEE_NAME',l_employee_name );
2208: add_message('PSB', 'PSB_POSITION_DETAILS');
2209:
2210: when FND_API.G_EXC_UNEXPECTED_ERROR then
2211: rollback to Get_Employee;
2212: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2213: message_token('POSITION_NAME',l_position_name );
2214: message_token('EMPLOYEE_NAME',l_employee_name );
2208: add_message('PSB', 'PSB_POSITION_DETAILS');
2209:
2210: when FND_API.G_EXC_UNEXPECTED_ERROR then
2211: rollback to Get_Employee;
2212: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2213: message_token('POSITION_NAME',l_position_name );
2214: message_token('EMPLOYEE_NAME',l_employee_name );
2215: add_message('PSB', 'PSB_POSITION_DETAILS');
2216: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
2218:
2219:
2220: when OTHERS then
2221: rollback to Get_Employee;
2222: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2223: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
2224: p_data => p_msg_data);
2225: message_token('POSITION_NAME',l_position_name );
2226: message_token('EMPLOYEE_NAME',l_employee_name );
2238:
2239:
2240: PROCEDURE Get_Costing_Information
2241: ( p_api_version IN NUMBER,
2242: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2243: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2244: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2245: p_return_status OUT NOCOPY VARCHAR2,
2246: p_msg_count OUT NOCOPY NUMBER,
2239:
2240: PROCEDURE Get_Costing_Information
2241: ( p_api_version IN NUMBER,
2242: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2243: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2244: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2245: p_return_status OUT NOCOPY VARCHAR2,
2246: p_msg_count OUT NOCOPY NUMBER,
2247: p_msg_data OUT NOCOPY VARCHAR2,
2240: PROCEDURE Get_Costing_Information
2241: ( p_api_version IN NUMBER,
2242: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2243: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2244: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2245: p_return_status OUT NOCOPY VARCHAR2,
2246: p_msg_count OUT NOCOPY NUMBER,
2247: p_msg_data OUT NOCOPY VARCHAR2,
2248: p_data_extract_id IN NUMBER,
2475: Savepoint Get_Costing;
2476:
2477: -- Standard call to check for call compatibility.
2478:
2479: if not FND_API.Compatible_API_Call (l_api_version,
2480: p_api_version,
2481: l_api_name,
2482: G_PKG_NAME)
2483: then
2480: p_api_version,
2481: l_api_name,
2482: G_PKG_NAME)
2483: then
2484: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2485: end if;
2486:
2487: -- Initialize message list if p_init_msg_list is set to TRUE.
2488:
2485: end if;
2486:
2487: -- Initialize message list if p_init_msg_list is set to TRUE.
2488:
2489: if FND_API.to_Boolean (p_init_msg_list) then
2490: FND_MSG_PUB.initialize;
2491: end if;
2492:
2493: p_return_status := FND_API.G_RET_STS_SUCCESS;
2489: if FND_API.to_Boolean (p_init_msg_list) then
2490: FND_MSG_PUB.initialize;
2491: end if;
2492:
2493: p_return_status := FND_API.G_RET_STS_SUCCESS;
2494:
2495: -- API body
2496:
2497: /* Start bug #4924031 */
2516: p_status => l_status,
2517: p_restart_id => l_restart_payroll_id
2518: );
2519:
2520: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2521: raise FND_API.G_EXC_ERROR;
2522: end if;
2523:
2524: if (l_status <> 'C') then
2517: p_restart_id => l_restart_payroll_id
2518: );
2519:
2520: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2521: raise FND_API.G_EXC_ERROR;
2522: end if;
2523:
2524: if (l_status <> 'C') then
2525:
2572: p_process => 'Costing Interface',
2573: p_restart_id => prev_payroll_id
2574: );
2575:
2576: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2577: raise FND_API.G_EXC_ERROR;
2578: end if;
2579: commit work;
2580: Savepoint Get_Costing;
2573: p_restart_id => prev_payroll_id
2574: );
2575:
2576: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2577: raise FND_API.G_EXC_ERROR;
2578: end if;
2579: commit work;
2580: Savepoint Get_Costing;
2581:
2578: end if;
2579: commit work;
2580: Savepoint Get_Costing;
2581:
2582: l_psp_flag := FND_API.G_FALSE;
2583: l_payroll_start_date := '';
2584:
2585: For C_psp_rec in C_psp
2586: Loop
2583: l_payroll_start_date := '';
2584:
2585: For C_psp_rec in C_psp
2586: Loop
2587: l_psp_flag := FND_API.G_TRUE;
2588: l_payroll_start_date := C_psp_rec.effective_start_date;
2589: End Loop;
2590: end if;
2591:
2593: Loop
2594: le_element_type_id := C_pay_rec.element_type_id;
2595: End Loop;
2596:
2597: if not (FND_API.TO_BOOLEAN(l_psp_flag)) then
2598: If (cost_rec.payroll_id <> prev_payroll_id) then
2599: loop_ctr := 0;
2600: l_index := 0;
2601: l_payroll_id := cost_rec.payroll_id;
2685: else
2686:
2687: Get_LD_Schedule
2688: ( p_api_version => 1.0,
2689: p_init_msg_list => FND_API.G_FALSE,
2690: p_commit => FND_API.G_FALSE,
2691: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2692: p_return_status => l_return_status,
2693: p_msg_count => l_msg_count,
2686:
2687: Get_LD_Schedule
2688: ( p_api_version => 1.0,
2689: p_init_msg_list => FND_API.G_FALSE,
2690: p_commit => FND_API.G_FALSE,
2691: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2692: p_return_status => l_return_status,
2693: p_msg_count => l_msg_count,
2694: p_msg_data => l_msg_data,
2687: Get_LD_Schedule
2688: ( p_api_version => 1.0,
2689: p_init_msg_list => FND_API.G_FALSE,
2690: p_commit => FND_API.G_FALSE,
2691: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2692: p_return_status => l_return_status,
2693: p_msg_count => l_msg_count,
2694: p_msg_data => l_msg_data,
2695: p_assignment_id => cost_rec.assignment_id,
2701: p_business_group_id => p_business_group_id,
2702: p_set_of_books_id => p_set_of_books_id,
2703: p_mode => 'D');
2704:
2705: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2706: raise FND_API.G_EXC_ERROR;
2707: end if;
2708:
2709: end if;
2702: p_set_of_books_id => p_set_of_books_id,
2703: p_mode => 'D');
2704:
2705: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2706: raise FND_API.G_EXC_ERROR;
2707: end if;
2708:
2709: end if;
2710:
2723: p_process => 'Costing Interface',
2724: p_restart_id => prev_payroll_id
2725: );
2726:
2727: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2728: raise FND_API.G_EXC_ERROR;
2729: end if;
2730:
2731: Reentrant_Process
2724: p_restart_id => prev_payroll_id
2725: );
2726:
2727: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2728: raise FND_API.G_EXC_ERROR;
2729: end if;
2730:
2731: Reentrant_Process
2732: ( p_api_version => 1.0 ,
2737: p_extract_method => p_extract_method,
2738: p_process => 'Costing Interface'
2739: );
2740:
2741: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2742: raise FND_API.G_EXC_ERROR;
2743: end if;
2744:
2745: commit work;
2738: p_process => 'Costing Interface'
2739: );
2740:
2741: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2742: raise FND_API.G_EXC_ERROR;
2743: end if;
2744:
2745: commit work;
2746: end if;
2748: -- End of API body.
2749:
2750: EXCEPTION
2751: /* Bug 3677529 commenting out the following exception clauses
2752: when FND_API.G_EXC_ERROR then
2753: rollback to Get_Costing;
2754: p_return_status := FND_API.G_RET_STS_ERROR;
2755: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
2756: p_data => p_msg_data);
2750: EXCEPTION
2751: /* Bug 3677529 commenting out the following exception clauses
2752: when FND_API.G_EXC_ERROR then
2753: rollback to Get_Costing;
2754: p_return_status := FND_API.G_RET_STS_ERROR;
2755: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
2756: p_data => p_msg_data);
2757: message_token('POSITION_NAME',l_position_name );
2758: message_token('EMPLOYEE_NAME',l_employee_name );
2757: message_token('POSITION_NAME',l_position_name );
2758: message_token('EMPLOYEE_NAME',l_employee_name );
2759: add_message('PSB', 'PSB_POSITION_DETAILS');
2760:
2761: when FND_API.G_EXC_UNEXPECTED_ERROR then
2762: rollback to Get_Costing;
2763: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2764: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
2765: p_data => p_msg_data);
2759: add_message('PSB', 'PSB_POSITION_DETAILS');
2760:
2761: when FND_API.G_EXC_UNEXPECTED_ERROR then
2762: rollback to Get_Costing;
2763: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2764: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
2765: p_data => p_msg_data);
2766: message_token('POSITION_NAME',l_position_name );
2767: message_token('EMPLOYEE_NAME',l_employee_name );
2768: add_message('PSB', 'PSB_POSITION_DETAILS'); */
2769:
2770: when OTHERS then
2771: rollback to Get_Costing;
2772: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2773: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
2774: p_data => p_msg_data);
2775: message_token('POSITION_NAME',l_position_name );
2776: message_token('EMPLOYEE_NAME',l_employee_name );
2787: END Get_Costing_Information;
2788:
2789: PROCEDURE Get_LD_Schedule
2790: ( p_api_version IN NUMBER,
2791: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2792: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2793: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2794: p_return_status OUT NOCOPY VARCHAR2,
2795: p_msg_count OUT NOCOPY NUMBER,
2788:
2789: PROCEDURE Get_LD_Schedule
2790: ( p_api_version IN NUMBER,
2791: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2792: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2793: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2794: p_return_status OUT NOCOPY VARCHAR2,
2795: p_msg_count OUT NOCOPY NUMBER,
2796: p_msg_data OUT NOCOPY VARCHAR2,
2789: PROCEDURE Get_LD_Schedule
2790: ( p_api_version IN NUMBER,
2791: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2792: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2793: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2794: p_return_status OUT NOCOPY VARCHAR2,
2795: p_msg_count OUT NOCOPY NUMBER,
2796: p_msg_data OUT NOCOPY VARCHAR2,
2797: p_assignment_id IN NUMBER,
2871: Savepoint Get_LD_Schedule;
2872:
2873: -- Standard call to check for call compatibility.
2874:
2875: if not FND_API.Compatible_API_Call (l_api_version,
2876: p_api_version,
2877: l_api_name,
2878: G_PKG_NAME)
2879: then
2876: p_api_version,
2877: l_api_name,
2878: G_PKG_NAME)
2879: then
2880: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2881: end if;
2882:
2883: -- Initialize message list if p_init_msg_list is set to TRUE.
2884:
2881: end if;
2882:
2883: -- Initialize message list if p_init_msg_list is set to TRUE.
2884:
2885: if FND_API.to_Boolean (p_init_msg_list) then
2886: FND_MSG_PUB.initialize;
2887: end if;
2888:
2889: p_return_status := FND_API.G_RET_STS_SUCCESS;
2885: if FND_API.to_Boolean (p_init_msg_list) then
2886: FND_MSG_PUB.initialize;
2887: end if;
2888:
2889: p_return_status := FND_API.G_RET_STS_SUCCESS;
2890:
2891: -- API body
2892: l_last_update_date := sysdate;
2893: l_last_updated_by := FND_GLOBAL.USER_ID;
2918: p_business_group_id => p_business_group_id,
2919: p_set_of_books_id => p_set_of_books_id,
2920: p_return_status => l_return_status);
2921:
2922: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2923: raise FND_API.G_EXC_ERROR;
2924: end if;
2925:
2926: For i in 1..PSP_LABOR_DIST.g_num_dist
2919: p_set_of_books_id => p_set_of_books_id,
2920: p_return_status => l_return_status);
2921:
2922: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2923: raise FND_API.G_EXC_ERROR;
2924: end if;
2925:
2926: For i in 1..PSP_LABOR_DIST.g_num_dist
2927: Loop
3168:
3169:
3170: EXCEPTION
3171: /* Bug 3677529 commented out the following exception clauses
3172: when FND_API.G_EXC_ERROR then
3173: rollback to Get_LD_Schedule;
3174: p_return_status := FND_API.G_RET_STS_ERROR;
3175: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
3176: p_data => p_msg_data);
3170: EXCEPTION
3171: /* Bug 3677529 commented out the following exception clauses
3172: when FND_API.G_EXC_ERROR then
3173: rollback to Get_LD_Schedule;
3174: p_return_status := FND_API.G_RET_STS_ERROR;
3175: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
3176: p_data => p_msg_data);
3177:
3178: when FND_API.G_EXC_UNEXPECTED_ERROR then
3174: p_return_status := FND_API.G_RET_STS_ERROR;
3175: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
3176: p_data => p_msg_data);
3177:
3178: when FND_API.G_EXC_UNEXPECTED_ERROR then
3179: rollback to Get_LD_Schedule;
3180: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3181: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
3182: p_data => p_msg_data);
3176: p_data => p_msg_data);
3177:
3178: when FND_API.G_EXC_UNEXPECTED_ERROR then
3179: rollback to Get_LD_Schedule;
3180: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3181: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
3182: p_data => p_msg_data);
3183: */
3184:
3183: */
3184:
3185: when OTHERS then
3186: rollback to Get_LD_Schedule;
3187: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3188: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
3189: p_data => p_msg_data);
3190: /* Bug 3677529 Start */
3191: IF FND_MSG_PUB.Check_Msg_Level
3452: end;
3453:
3454: PROCEDURE Get_Attributes
3455: ( p_api_version IN NUMBER,
3456: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3457: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3458: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3459: p_return_status OUT NOCOPY VARCHAR2,
3460: p_msg_count OUT NOCOPY NUMBER,
3453:
3454: PROCEDURE Get_Attributes
3455: ( p_api_version IN NUMBER,
3456: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3457: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3458: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3459: p_return_status OUT NOCOPY VARCHAR2,
3460: p_msg_count OUT NOCOPY NUMBER,
3461: p_msg_data OUT NOCOPY VARCHAR2,
3454: PROCEDURE Get_Attributes
3455: ( p_api_version IN NUMBER,
3456: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3457: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3458: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3459: p_return_status OUT NOCOPY VARCHAR2,
3460: p_msg_count OUT NOCOPY NUMBER,
3461: p_msg_data OUT NOCOPY VARCHAR2,
3462: p_data_extract_id IN NUMBER,
3652: Savepoint Get_Attributes;
3653:
3654: -- Standard call to check for call compatibility.
3655:
3656: if not FND_API.Compatible_API_Call (l_api_version,
3657: p_api_version,
3658: l_api_name,
3659: G_PKG_NAME)
3660: then
3657: p_api_version,
3658: l_api_name,
3659: G_PKG_NAME)
3660: then
3661: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3662: end if;
3663:
3664: -- Initialize message list if p_init_msg_list is set to TRUE.
3665:
3662: end if;
3663:
3664: -- Initialize message list if p_init_msg_list is set to TRUE.
3665:
3666: if FND_API.to_Boolean (p_init_msg_list) then
3667: FND_MSG_PUB.initialize;
3668: end if;
3669:
3670: p_return_status := FND_API.G_RET_STS_SUCCESS;
3666: if FND_API.to_Boolean (p_init_msg_list) then
3667: FND_MSG_PUB.initialize;
3668: end if;
3669:
3670: p_return_status := FND_API.G_RET_STS_SUCCESS;
3671:
3672: -- API body
3673:
3674: l_last_update_date := sysdate;
3687: p_status => l_status,
3688: p_restart_id => l_restart_attribute_id
3689: );
3690:
3691: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3692: raise FND_API.G_EXC_ERROR;
3693: end if;
3694:
3695: if (l_status <> 'C') then
3688: p_restart_id => l_restart_attribute_id
3689: );
3690:
3691: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3692: raise FND_API.G_EXC_ERROR;
3693: end if;
3694:
3695: if (l_status <> 'C') then
3696: For attribute_rec in C5 LOOP
3721: p_process => 'Attribute Values Interface',
3722: p_restart_id => prev_attribute_id
3723: );
3724:
3725: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3726: raise FND_API.G_EXC_ERROR;
3727: end if;
3728: commit work;
3729: Savepoint Get_Attributes;
3722: p_restart_id => prev_attribute_id
3723: );
3724:
3725: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3726: raise FND_API.G_EXC_ERROR;
3727: end if;
3728: commit work;
3729: Savepoint Get_Attributes;
3730: end if;
4240: p_process => 'Attribute Values Interface',
4241: p_restart_id => l_fin_attribute_id
4242: );
4243:
4244: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4245: raise FND_API.G_EXC_ERROR;
4246: end if;
4247:
4248: Reentrant_Process
4241: p_restart_id => l_fin_attribute_id
4242: );
4243:
4244: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4245: raise FND_API.G_EXC_ERROR;
4246: end if;
4247:
4248: Reentrant_Process
4249: ( p_api_version => 1.0 ,
4254: p_extract_method => p_extract_method,
4255: p_process => 'Attribute Values Interface'
4256: );
4257:
4258: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4259: raise FND_API.G_EXC_ERROR;
4260: end if;
4261:
4262: commit work;
4255: p_process => 'Attribute Values Interface'
4256: );
4257:
4258: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4259: raise FND_API.G_EXC_ERROR;
4260: end if;
4261:
4262: commit work;
4263:
4266: -- End of API body.
4267:
4268: EXCEPTION
4269:
4270: when FND_API.G_EXC_ERROR then
4271: /* Bug 4075170 Start */
4272: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Last Status::'||l_debug_info);
4273: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Parameter Info::'||l_param_info);
4274: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error Type:: FND_API.G_EXC_EXC_ERROR');
4270: when FND_API.G_EXC_ERROR then
4271: /* Bug 4075170 Start */
4272: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Last Status::'||l_debug_info);
4273: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Parameter Info::'||l_param_info);
4274: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error Type:: FND_API.G_EXC_EXC_ERROR');
4275: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Get_Attributes API '
4276: ||'failed due to the following error');
4277: FND_FILE.PUT_LINE(FND_FILE.LOG, sqlerrm);
4278: /* Bug 4075170 End */
4285: dbms_sql.close_cursor(v_cursorid);
4286: end if;
4287:
4288: rollback to Get_Attributes;
4289: p_return_status := FND_API.G_RET_STS_ERROR;
4290: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
4291: p_data => p_msg_data);
4292: message_token('ATTRIBUTE_NAME',l_attribute_name );
4293: message_token('DEFINITION_TYPE',l_definition_type );
4295: message_token('DEFINITION_TABLE',l_definition_table);
4296: message_token('DEFINITION_COLUMN',l_definition_column);
4297: add_message('PSB', 'PSB_ATTRIBUTE_DETAILS');
4298:
4299: when FND_API.G_EXC_UNEXPECTED_ERROR then
4300: /* Bug 4075170 Start */
4301: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Last Status::'||l_debug_info);
4302: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Parameter Info::'||l_param_info);
4303: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error Type:: FND_API.G_EXC_UNEXPECTED_ERROR');
4299: when FND_API.G_EXC_UNEXPECTED_ERROR then
4300: /* Bug 4075170 Start */
4301: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Last Status::'||l_debug_info);
4302: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Parameter Info::'||l_param_info);
4303: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error Type:: FND_API.G_EXC_UNEXPECTED_ERROR');
4304: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Get_Attributes API '
4305: ||'failed due to the following error');
4306: FND_FILE.PUT_LINE(FND_FILE.LOG, sqlerrm);
4307: /* Bug 4075170 End */
4314: dbms_sql.close_cursor(v_cursorid);
4315: end if;
4316:
4317: rollback to Get_Attributes;
4318: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4319: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
4320: p_data => p_msg_data);
4321: message_token('ATTRIBUTE_NAME',l_attribute_name );
4322: message_token('DEFINITION_TYPE',l_definition_type );
4343: dbms_sql.close_cursor(v_cursorid);
4344: end if;
4345:
4346: rollback to Get_Attributes;
4347: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4348: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
4349: p_data => p_msg_data);
4350: message_token('ATTRIBUTE_NAME',l_attribute_name );
4351: message_token('DEFINITION_TYPE',l_definition_type );
4366: /* ----------------------------------------------------------------------- */
4367:
4368: PROCEDURE Get_Employee_Attributes
4369: ( p_api_version IN NUMBER,
4370: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
4371: p_commit IN VARCHAR2 := FND_API.G_FALSE,
4372: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4373: p_return_status OUT NOCOPY VARCHAR2,
4374: p_msg_count OUT NOCOPY NUMBER,
4367:
4368: PROCEDURE Get_Employee_Attributes
4369: ( p_api_version IN NUMBER,
4370: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
4371: p_commit IN VARCHAR2 := FND_API.G_FALSE,
4372: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4373: p_return_status OUT NOCOPY VARCHAR2,
4374: p_msg_count OUT NOCOPY NUMBER,
4375: p_msg_data OUT NOCOPY VARCHAR2,
4368: PROCEDURE Get_Employee_Attributes
4369: ( p_api_version IN NUMBER,
4370: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
4371: p_commit IN VARCHAR2 := FND_API.G_FALSE,
4372: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4373: p_return_status OUT NOCOPY VARCHAR2,
4374: p_msg_count OUT NOCOPY NUMBER,
4375: p_msg_data OUT NOCOPY VARCHAR2,
4376: p_data_extract_id IN NUMBER,
4723: Savepoint Get_Employee_Attributes;
4724:
4725: -- Standard call to check for call compatibility.
4726:
4727: if not FND_API.Compatible_API_Call (l_api_version,
4728: p_api_version,
4729: l_api_name,
4730: G_PKG_NAME)
4731: then
4728: p_api_version,
4729: l_api_name,
4730: G_PKG_NAME)
4731: then
4732: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4733: end if;
4734:
4735: -- Initialize message list if p_init_msg_list is set to TRUE.
4736:
4733: end if;
4734:
4735: -- Initialize message list if p_init_msg_list is set to TRUE.
4736:
4737: if FND_API.to_Boolean (p_init_msg_list) then
4738: FND_MSG_PUB.initialize;
4739: end if;
4740:
4741: p_return_status := FND_API.G_RET_STS_SUCCESS;
4737: if FND_API.to_Boolean (p_init_msg_list) then
4738: FND_MSG_PUB.initialize;
4739: end if;
4740:
4741: p_return_status := FND_API.G_RET_STS_SUCCESS;
4742:
4743: -- API body
4744:
4745: l_last_update_date := sysdate;
4758: p_status => l_status,
4759: p_restart_id => l_restart_attribute_id
4760: );
4761:
4762: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4763: raise FND_API.G_EXC_ERROR;
4764: end if;
4765:
4766: if (l_status <> 'C') then
4759: p_restart_id => l_restart_attribute_id
4760: );
4761:
4762: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4763: raise FND_API.G_EXC_ERROR;
4764: end if;
4765:
4766: if (l_status <> 'C') then
4767: For Emp_attribute_rec in C_Emp_Attributes Loop
4788: p_process => 'Position Assignments Interface',
4789: p_restart_id => prev_attribute_id
4790: );
4791:
4792: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4793: raise FND_API.G_EXC_ERROR;
4794: end if;
4795: commit work;
4796: Savepoint Get_Employee_Attributes;
4789: p_restart_id => prev_attribute_id
4790: );
4791:
4792: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4793: raise FND_API.G_EXC_ERROR;
4794: end if;
4795: commit work;
4796: Savepoint Get_Employee_Attributes;
4797: end if;
5204: FND_MESSAGE.SET_NAME('PSB','PSB_ATTR_MAPPING_NOT_FOUND');
5205: FND_MESSAGE.SET_TOKEN('ATTRIBUTE_NAME', l_attribute_name);
5206: l_message_text := FND_MESSAGE.GET;
5207: FND_FILE.PUT_LINE(FND_FILE.LOG, l_message_text);
5208: RAISE FND_API.G_EXC_ERROR;
5209: END IF;
5210: /* End bug #4302946 */
5211:
5212: end if;
5347: FND_MESSAGE.SET_NAME('PSB','PSB_ATTR_MAPPING_NOT_FOUND');
5348: FND_MESSAGE.SET_TOKEN('ATTRIBUTE_NAME', l_attribute_name);
5349: l_message_text := FND_MESSAGE.GET;
5350: FND_FILE.PUT_LINE(FND_FILE.LOG, l_message_text);
5351: RAISE FND_API.G_EXC_ERROR;
5352: END IF;
5353: /* End bug #4302946 */
5354:
5355: end if;
5513: FND_MESSAGE.SET_NAME('PSB','PSB_ATTR_MAPPING_NOT_FOUND');
5514: FND_MESSAGE.SET_TOKEN('ATTRIBUTE_NAME', l_attribute_name);
5515: l_message_text := FND_MESSAGE.GET;
5516: FND_FILE.PUT_LINE(FND_FILE.LOG, l_message_text);
5517: RAISE FND_API.G_EXC_ERROR;
5518: END IF;
5519: /* End bug #4302946 */
5520:
5521: end if;
6157: p_process => 'Position Assignments Interface',
6158: p_restart_id => prev_attribute_id
6159: );
6160:
6161: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6162: raise FND_API.G_EXC_ERROR;
6163: end if;
6164:
6165: Reentrant_Process
6158: p_restart_id => prev_attribute_id
6159: );
6160:
6161: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6162: raise FND_API.G_EXC_ERROR;
6163: end if;
6164:
6165: Reentrant_Process
6166: ( p_api_version => 1.0 ,
6171: p_extract_method => p_extract_method,
6172: p_process => 'Position Assignments Interface'
6173: );
6174:
6175: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6176: raise FND_API.G_EXC_ERROR;
6177: end if;
6178:
6179: end if;
6172: p_process => 'Position Assignments Interface'
6173: );
6174:
6175: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6176: raise FND_API.G_EXC_ERROR;
6177: end if;
6178:
6179: end if;
6180:
6179: end if;
6180:
6181: EXCEPTION
6182:
6183: when FND_API.G_EXC_ERROR then
6184: /* Bug 4075170 Start */
6185: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Last Status::>'||l_debug_info);
6186: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Parameter Info::'||l_param_info);
6187: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error Type:: FND_API.G_EXC_ERROR');
6183: when FND_API.G_EXC_ERROR then
6184: /* Bug 4075170 Start */
6185: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Last Status::>'||l_debug_info);
6186: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Parameter Info::'||l_param_info);
6187: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error Type:: FND_API.G_EXC_ERROR');
6188: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Get_Employee_Attributes API '
6189: ||'failed due to the following error');
6190: FND_FILE.PUT_LINE(FND_FILE.LOG, sqlerrm);
6191: /* Bug 4075170 End */
6210: dbms_sql.close_cursor(v_jcursorid);
6211: end if;
6212:
6213: rollback to Get_Employee_Attributes;
6214: p_return_status := FND_API.G_RET_STS_ERROR;
6215: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
6216: p_data => p_msg_data);
6217: message_token('POSITION_NAME',l_position_name );
6218: message_token('EMPLOYEE_NAME',l_employee_name );
6224: message_token('DEFINITION_TABLE',l_definition_table);
6225: message_token('DEFINITION_COLUMN',l_definition_column);
6226: add_message('PSB', 'PSB_ATTRIBUTE_DETAILS');
6227:
6228: when FND_API.G_EXC_UNEXPECTED_ERROR then
6229: /* Bug 4075170 Start */
6230: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Last Status::>'||l_debug_info);
6231: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Parameter Info::'||l_param_info);
6232: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error Type:: FND_API.G_EXC_UNEXPECTED_ERROR');
6228: when FND_API.G_EXC_UNEXPECTED_ERROR then
6229: /* Bug 4075170 Start */
6230: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Last Status::>'||l_debug_info);
6231: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Parameter Info::'||l_param_info);
6232: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error Type:: FND_API.G_EXC_UNEXPECTED_ERROR');
6233: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Get_Employee_Attributes API '
6234: ||'failed due to the following error');
6235: FND_FILE.PUT_LINE(FND_FILE.LOG, sqlerrm);
6236: /* Bug 4075170 End */
6255: dbms_sql.close_cursor(v_jcursorid);
6256: end if;
6257:
6258: rollback to Get_Employee_Attributes;
6259: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6260: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
6261: p_data => p_msg_data);
6262: message_token('POSITION_NAME',l_position_name );
6263: message_token('EMPLOYEE_NAME',l_employee_name );
6299: if (dbms_sql.is_open(v_jcursorid)) then
6300: dbms_sql.close_cursor(v_jcursorid);
6301: end if;
6302: rollback to Get_Employee_Attributes;
6303: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6304: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
6305: p_data => p_msg_data);
6306:
6307: message_token('POSITION_NAME',l_position_name );
6431: Begin
6432:
6433: -- Standard call to check for call compatibility.
6434:
6435: if not FND_API.Compatible_API_Call (l_api_version,
6436: p_api_version,
6437: l_api_name,
6438: G_PKG_NAME)
6439: then
6436: p_api_version,
6437: l_api_name,
6438: G_PKG_NAME)
6439: then
6440: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6441: end if;
6442:
6443: p_return_status := FND_API.G_RET_STS_SUCCESS;
6444:
6439: then
6440: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6441: end if;
6442:
6443: p_return_status := FND_API.G_RET_STS_SUCCESS;
6444:
6445: -- API body
6446:
6447: Open C_Reentrant;
6584: Close C_Reentrant;
6585:
6586: EXCEPTION
6587:
6588: when FND_API.G_EXC_ERROR then
6589: p_return_status := FND_API.G_RET_STS_ERROR;
6590:
6591: when FND_API.G_EXC_UNEXPECTED_ERROR then
6592: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6585:
6586: EXCEPTION
6587:
6588: when FND_API.G_EXC_ERROR then
6589: p_return_status := FND_API.G_RET_STS_ERROR;
6590:
6591: when FND_API.G_EXC_UNEXPECTED_ERROR then
6592: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6593:
6587:
6588: when FND_API.G_EXC_ERROR then
6589: p_return_status := FND_API.G_RET_STS_ERROR;
6590:
6591: when FND_API.G_EXC_UNEXPECTED_ERROR then
6592: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6593:
6594: when OTHERS then
6595: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6588: when FND_API.G_EXC_ERROR then
6589: p_return_status := FND_API.G_RET_STS_ERROR;
6590:
6591: when FND_API.G_EXC_UNEXPECTED_ERROR then
6592: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6593:
6594: when OTHERS then
6595: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6596:
6591: when FND_API.G_EXC_UNEXPECTED_ERROR then
6592: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6593:
6594: when OTHERS then
6595: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6596:
6597: if FND_MSG_PUB.Check_Msg_Level
6598: (p_message_level => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6599: then
6661: BEGIN
6662:
6663: -- Standard call to check for call compatibility.
6664:
6665: if not FND_API.Compatible_API_Call (l_api_version,
6666: p_api_version,
6667: l_api_name,
6668: G_PKG_NAME)
6669: then
6666: p_api_version,
6667: l_api_name,
6668: G_PKG_NAME)
6669: then
6670: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6671: end if;
6672:
6673: p_return_status := FND_API.G_RET_STS_SUCCESS;
6674:
6669: then
6670: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6671: end if;
6672:
6673: p_return_status := FND_API.G_RET_STS_SUCCESS;
6674:
6675: l_last_update_date := sysdate;
6676: l_last_updated_by := FND_GLOBAL.USER_ID;
6677: l_last_update_login := FND_GLOBAL.LOGIN_ID;
6796: Close C_Reenter_Upd;
6797:
6798: EXCEPTION
6799:
6800: when FND_API.G_EXC_ERROR then
6801: if C_Reenter_Upd%isopen then
6802: Close C_Reenter_Upd;
6803: end if;
6804: p_return_status := FND_API.G_RET_STS_ERROR;
6800: when FND_API.G_EXC_ERROR then
6801: if C_Reenter_Upd%isopen then
6802: Close C_Reenter_Upd;
6803: end if;
6804: p_return_status := FND_API.G_RET_STS_ERROR;
6805:
6806: when FND_API.G_EXC_UNEXPECTED_ERROR then
6807: if C_Reenter_Upd%isopen then
6808: Close C_Reenter_Upd;
6802: Close C_Reenter_Upd;
6803: end if;
6804: p_return_status := FND_API.G_RET_STS_ERROR;
6805:
6806: when FND_API.G_EXC_UNEXPECTED_ERROR then
6807: if C_Reenter_Upd%isopen then
6808: Close C_Reenter_Upd;
6809: end if;
6810: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6806: when FND_API.G_EXC_UNEXPECTED_ERROR then
6807: if C_Reenter_Upd%isopen then
6808: Close C_Reenter_Upd;
6809: end if;
6810: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6811:
6812: when OTHERS then
6813: if C_Reenter_Upd%isopen then
6814: Close C_Reenter_Upd;
6812: when OTHERS then
6813: if C_Reenter_Upd%isopen then
6814: Close C_Reenter_Upd;
6815: end if;
6816: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6817:
6818: if FND_MSG_PUB.Check_Msg_Level
6819: (p_message_level => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6820: then
6903: Begin
6904:
6905: -- Standard call to check for call compatibility.
6906:
6907: if not FND_API.Compatible_API_Call (l_api_version,
6908: p_api_version,
6909: l_api_name,
6910: G_PKG_NAME)
6911: then
6908: p_api_version,
6909: l_api_name,
6910: G_PKG_NAME)
6911: then
6912: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6913: end if;
6914:
6915:
6916: p_return_status := FND_API.G_RET_STS_SUCCESS;
6912: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6913: end if;
6914:
6915:
6916: p_return_status := FND_API.G_RET_STS_SUCCESS;
6917:
6918: l_last_update_date := sysdate;
6919: l_last_updated_by := FND_GLOBAL.USER_ID;
6920: l_last_update_login := FND_GLOBAL.LOGIN_ID;
7078: -- End of API body.
7079:
7080: EXCEPTION
7081:
7082: when FND_API.G_EXC_ERROR then
7083: if C_Reentrant%isopen then
7084: Close C_Reentrant;
7085: end if;
7086:
7083: if C_Reentrant%isopen then
7084: Close C_Reentrant;
7085: end if;
7086:
7087: p_return_status := FND_API.G_RET_STS_ERROR;
7088:
7089: when FND_API.G_EXC_UNEXPECTED_ERROR then
7090: if C_Reentrant%isopen then
7091: Close C_Reentrant;
7085: end if;
7086:
7087: p_return_status := FND_API.G_RET_STS_ERROR;
7088:
7089: when FND_API.G_EXC_UNEXPECTED_ERROR then
7090: if C_Reentrant%isopen then
7091: Close C_Reentrant;
7092: end if;
7093:
7090: if C_Reentrant%isopen then
7091: Close C_Reentrant;
7092: end if;
7093:
7094: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7095:
7096: when OTHERS then
7097: if C_Reentrant%isopen then
7098: Close C_Reentrant;
7097: if C_Reentrant%isopen then
7098: Close C_Reentrant;
7099: end if;
7100:
7101: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7102:
7103: if FND_MSG_PUB.Check_Msg_Level
7104: (p_message_level => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7105: then
7112:
7113:
7114: PROCEDURE Validate_Attribute_Mapping
7115: ( p_api_version IN NUMBER,
7116: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
7117: p_commit IN VARCHAR2 := FND_API.G_FALSE,
7118: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
7119: p_return_status OUT NOCOPY VARCHAR2,
7120: p_msg_count OUT NOCOPY NUMBER,
7113:
7114: PROCEDURE Validate_Attribute_Mapping
7115: ( p_api_version IN NUMBER,
7116: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
7117: p_commit IN VARCHAR2 := FND_API.G_FALSE,
7118: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
7119: p_return_status OUT NOCOPY VARCHAR2,
7120: p_msg_count OUT NOCOPY NUMBER,
7121: p_msg_data OUT NOCOPY VARCHAR2,
7114: PROCEDURE Validate_Attribute_Mapping
7115: ( p_api_version IN NUMBER,
7116: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
7117: p_commit IN VARCHAR2 := FND_API.G_FALSE,
7118: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
7119: p_return_status OUT NOCOPY VARCHAR2,
7120: p_msg_count OUT NOCOPY NUMBER,
7121: p_msg_data OUT NOCOPY VARCHAR2,
7122: p_business_group_id IN NUMBER,
7192:
7193: -- Standard call to check for call compatibility.
7194:
7195:
7196: if not FND_API.Compatible_API_Call (l_api_version,
7197: p_api_version,
7198: l_api_name,
7199: G_PKG_NAME)
7200: then
7197: p_api_version,
7198: l_api_name,
7199: G_PKG_NAME)
7200: then
7201: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7202: end if;
7203:
7204: -- Initialize message list if p_init_msg_list is set to TRUE.
7205:
7202: end if;
7203:
7204: -- Initialize message list if p_init_msg_list is set to TRUE.
7205:
7206: if FND_API.to_Boolean (p_init_msg_list) then
7207: FND_MSG_PUB.initialize;
7208: end if;
7209:
7210:
7207: FND_MSG_PUB.initialize;
7208: end if;
7209:
7210:
7211: p_return_status := FND_API.G_RET_STS_SUCCESS;
7212:
7213: -- API body
7214:
7215: For C_Attribute_Types_Rec in C_Attribute_Types
7326: -- End of API body.
7327:
7328: EXCEPTION
7329:
7330: when FND_API.G_EXC_ERROR then
7331:
7332: rollback to Validate_Attribute_Mapping;
7333: p_return_status := FND_API.G_RET_STS_ERROR;
7334: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
7329:
7330: when FND_API.G_EXC_ERROR then
7331:
7332: rollback to Validate_Attribute_Mapping;
7333: p_return_status := FND_API.G_RET_STS_ERROR;
7334: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
7335: p_data => p_msg_data);
7336: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
7337: p_data => p_msg_data);
7335: p_data => p_msg_data);
7336: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
7337: p_data => p_msg_data);
7338:
7339: when FND_API.G_EXC_UNEXPECTED_ERROR then
7340: rollback to Validate_Attribute_Mapping;
7341: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7342: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
7343: p_data => p_msg_data);
7337: p_data => p_msg_data);
7338:
7339: when FND_API.G_EXC_UNEXPECTED_ERROR then
7340: rollback to Validate_Attribute_Mapping;
7341: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7342: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
7343: p_data => p_msg_data);
7344:
7345: WHEN OTHERS THEN
7344:
7345: WHEN OTHERS THEN
7346: --
7347: ROLLBACK TO Validate_Attribute_Mapping ;
7348: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7349: --
7350: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
7351: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
7352: l_api_name);
7476: l_plsql_block := 'BEGIN :ld_enabled := PSP_GENERAL.IS_LD_Enabled(:business_group_id); END;';
7477:
7478: EXECUTE IMMEDIATE l_plsql_block USING OUT l_ld_enabled, IN p_business_group_id;
7479:
7480: if FND_API.to_Boolean(l_ld_enabled) then
7481: return TRUE;
7482: else
7483: return FALSE;
7484: end if;