DBA Data[Home] [Help]

APPS.CZ_PB_SYNC dependencies on FND_API

Line 1348: x_status := FND_API.G_RET_STS_SUCCESS;

1344:
1345: BEGIN
1346:
1347: ----initialize OUT NOCOPY variables
1348: x_status := FND_API.G_RET_STS_SUCCESS;
1349: m_msg_tbl.DELETE;
1350:
1351: FOR I IN 1..1
1352: LOOP

Line 1360: x_status := FND_API.G_RET_STS_ERROR;

1356:
1357: IF (l_run_id = 0) THEN
1358: m_err_message := CZ_UTILS.GET_TEXT('CZ_PB_SEQ_XFR');
1359: error_msg_populate(m_err_message ,'CZ_PB_SYNC.XFRINFO',21001);
1360: x_status := FND_API.G_RET_STS_ERROR;
1361: EXIT;
1362: END IF;
1363:
1364: ----check if another sync is in progress

Line 1369: x_status := FND_API.G_RET_STS_ERROR;

1365: l_proc_name := cz_pb_sync_util.check_process;
1366: IF l_proc_name IS NOT NULL THEN
1367: m_err_message := CZ_UTILS.GET_TEXT('CZ_PB_SYNC_PROCESS_EXISTS');
1368: error_msg_populate(m_err_message ,'CZ_PB_SYNC.CHKPROCESS',21001);
1369: x_status := FND_API.G_RET_STS_ERROR;
1370: EXIT;
1371: ELSE
1372: ----register application
1373: cz_pb_sync_util.set_dbms_info('CZ_PB_SYNC');

Line 1378: x_status := FND_API.G_RET_STS_ERROR;

1374: END IF;
1375:
1376: ----validate input parameters
1377: IF (NOT verify_input_parameters(p_target_instance) ) THEN
1378: x_status := FND_API.G_RET_STS_ERROR;
1379: EXIT;
1380: END IF;
1381:
1382: ---verify schema versions on the source and target instances

Line 1390: x_status := FND_API.G_RET_STS_ERROR;

1386: l_link_name := cz_pb_sync_util.retrieve_link_name(l_target_server_id);
1387: IF ( NOT cz_pb_sync_util.check_db_link(l_link_name) ) THEN
1388: m_err_message := CZ_UTILS.GET_TEXT('CZ_PB_SYNC_NO_LINK_EXISTS','LINKNAME',l_link_name);
1389: error_msg_populate(m_err_message ,'CHECKDBLINK',21025);
1390: x_status := FND_API.G_RET_STS_ERROR;
1391: EXIT;
1392: END IF;
1393:
1394: ---verify that the above proc is called from the source

Line 1397: x_status := FND_API.G_RET_STS_ERROR;

1393:
1394: ---verify that the above proc is called from the source
1395: l_src_verification := verify_source_instance(p_target_instance);
1396: IF (NOT l_src_verification) THEN
1397: x_status := FND_API.G_RET_STS_ERROR;
1398: EXIT;
1399: END IF;
1400:
1401: l_validate_flg := cz_pb_sync_util.validate_schema(l_target_server_id);

Line 1405: x_status := FND_API.G_RET_STS_ERROR;

1401: l_validate_flg := cz_pb_sync_util.validate_schema(l_target_server_id);
1402: IF (NOT l_validate_flg ) THEN
1403: m_err_message := CZ_UTILS.GET_TEXT('CZ_PB_SCHEMA_COMPAT_ERR');
1404: error_msg_populate(m_err_message ,'VALIDATESCHEMA',21005);
1405: x_status := FND_API.G_RET_STS_ERROR;
1406: EXIT;
1407: END IF;
1408:
1409: -----verify that the target instance is a clone

Line 1411: x_status := FND_API.G_RET_STS_ERROR;

1407: END IF;
1408:
1409: -----verify that the target instance is a clone
1410: IF (check_target_instance(l_link_name) ) THEN
1411: x_status := FND_API.G_RET_STS_ERROR;
1412: EXIT;
1413: END IF;
1414:
1415:

Line 1419: x_status := FND_API.G_RET_STS_ERROR;

1415:
1416: ----check if the pb data has to be synchronized
1417: l_has_to_be_synced_flg := has_to_be_synced(l_target_server_id);
1418: IF (NOT l_has_to_be_synced_flg) THEN
1419: x_status := FND_API.G_RET_STS_ERROR;
1420: EXIT;
1421: ELSE
1422: ---sync publication data for a single publication
1423: sync_publication_clone(l_target_server_id,l_pb_clone_flg);

Line 1426: x_status := FND_API.G_RET_STS_ERROR;

1422: ---sync publication data for a single publication
1423: sync_publication_clone(l_target_server_id,l_pb_clone_flg);
1424:
1425: IF (NOT l_pb_clone_flg) THEN
1426: x_status := FND_API.G_RET_STS_ERROR;
1427: ROLLBACK;
1428: EXIT;
1429: ELSE
1430: COMMIT;

Line 1436: IF (x_status = FND_API.G_RET_STS_ERROR) THEN

1432: END IF;
1433: END LOOP;
1434:
1435: ---log errors to cz_db_logs
1436: IF (x_status = FND_API.G_RET_STS_ERROR) THEN
1437: m_err_message := CZ_UTILS.GET_TEXT('CZ_PB_SYNC_FAILURE', 'INSTANCENAME',p_target_instance);
1438: error_msg_populate(m_err_message ,'SYNCCLOTGTPBDATA',21014);
1439: END IF;
1440: cz_pb_sync_util.log_pb_sync_errors(m_msg_tbl,l_run_id);

Line 1446: x_status := FND_API.G_RET_STS_UNEXP_ERROR;

1442: -----unregister application
1443: cz_pb_sync_util.reset_dbms_info;
1444: EXCEPTION
1445: WHEN OTHERS THEN
1446: x_status := FND_API.G_RET_STS_UNEXP_ERROR;
1447: END sync_cloned_tgt_pub_data;
1448:
1449: ------------------------------------------------------------
1450: -----concurrent manager program for cloned tgt instance

Line 1465: IF (v_sync_status = FND_API.G_RET_STS_ERROR) THEN

1461: Retcode:=0;
1462: sync_cloned_tgt_pub_data(p_target_instance,v_run_id,v_sync_status);
1463:
1464: Errbuf := NULL;
1465: IF (v_sync_status = FND_API.G_RET_STS_ERROR) THEN
1466: Errbuf := CZ_UTILS.GET_TEXT('CZ_PB_SYNC_FAILURE', 'INSTANCENAME',p_target_instance);
1467: Retcode:= 2;
1468: END IF;
1469:

Line 1556: x_status := FND_API.G_RET_STS_SUCCESS;

1552:
1553: BEGIN
1554:
1555: ----initialize OUT NOCOPY variables
1556: x_status := FND_API.G_RET_STS_SUCCESS;
1557: m_msg_tbl.DELETE;
1558:
1559: FOR I IN 1..1
1560: LOOP

Line 1568: x_status := FND_API.G_RET_STS_ERROR;

1564:
1565: IF (v_run_id = 0) THEN
1566: m_err_message := CZ_UTILS.GET_TEXT('CZ_PB_SEQ_XFR');
1567: error_msg_populate(m_err_message ,'CZ_PB_SYNC.XFRINFO',21001);
1568: x_status := FND_API.G_RET_STS_ERROR;
1569: EXIT;
1570: END IF;
1571:
1572: ----check if another sync is in progress

Line 1577: x_status := FND_API.G_RET_STS_ERROR;

1573: l_proc_name := cz_pb_sync_util.check_process;
1574: IF l_proc_name IS NOT NULL THEN
1575: m_err_message := CZ_UTILS.GET_TEXT('CZ_PB_SYNC_PROCESS_EXISTS');
1576: error_msg_populate(m_err_message ,'CZ_PB_SYNC.CHKPROCESS',21001);
1577: x_status := FND_API.G_RET_STS_ERROR;
1578: EXIT;
1579: ELSE
1580: ----register application
1581: cz_pb_sync_util.set_dbms_info('CZ_PB_SYNC');

Line 1588: x_status := FND_API.G_RET_STS_ERROR;

1584: ----validate input parameter
1585: IF (UPPER(p_decomm_flag) NOT IN ('YES','NO') ) THEN
1586: m_err_message := CZ_UTILS.GET_TEXT('CZ_PB_SYNC_INPUT_FLG_INVALID', 'FLAG', p_decomm_flag);
1587: error_msg_populate(m_err_message ,'CZ_PB_SYNC.DECOMMFLG',21004);
1588: x_status := FND_API.G_RET_STS_ERROR;
1589: EXIT;
1590: END IF;
1591:
1592: -----update local server entry

Line 1624: x_status := FND_API.G_RET_STS_ERROR;

1620: v_link_name := '@'||v_link_name;
1621: IF ( NOT cz_pb_sync_util.check_db_link(v_link_name) ) THEN
1622: m_err_message := CZ_UTILS.GET_TEXT('CZ_PB_SYNC_NO_LINK_EXISTS','LINKNAME',v_link_name);
1623: error_msg_populate(m_err_message ,'CHECKDBLINK',21025);
1624: x_status := FND_API.G_RET_STS_ERROR;
1625: EXIT;
1626: END IF;
1627: END IF;
1628:

Line 1640: IF (x_status = FND_API.G_RET_STS_ERROR) THEN

1636: END IF;
1637: END LOOP;
1638:
1639: ---log errors to cz_db_logs
1640: IF (x_status = FND_API.G_RET_STS_ERROR) THEN
1641: m_err_message := CZ_UTILS.GET_TEXT('CZ_PB_SYNC_FAILURE', 'SRCINSTANCE',l_instance_name);
1642: error_msg_populate(m_err_message ,'SYNCCLOTGTPBDATA',21014);
1643: x_status := FND_API.G_RET_STS_ERROR;
1644: END IF;

Line 1643: x_status := FND_API.G_RET_STS_ERROR;

1639: ---log errors to cz_db_logs
1640: IF (x_status = FND_API.G_RET_STS_ERROR) THEN
1641: m_err_message := CZ_UTILS.GET_TEXT('CZ_PB_SYNC_FAILURE', 'SRCINSTANCE',l_instance_name);
1642: error_msg_populate(m_err_message ,'SYNCCLOTGTPBDATA',21014);
1643: x_status := FND_API.G_RET_STS_ERROR;
1644: END IF;
1645: cz_pb_sync_util.log_pb_sync_errors(m_msg_tbl,v_run_id);
1646:
1647: -----unregister application

Line 1652: x_status := FND_API.G_RET_STS_UNEXP_ERROR;

1648: cz_pb_sync_util.reset_dbms_info;
1649: COMMIT;
1650: EXCEPTION
1651: WHEN OTHERS THEN
1652: x_status := FND_API.G_RET_STS_UNEXP_ERROR;
1653: END sync_cloned_src_pub_data;
1654:
1655: -------------------------------------------------------------------
1656: -----concurrent manager program for cloned src instance

Line 1673: IF (v_sync_status = FND_API.G_RET_STS_ERROR) THEN

1669: Errbuf := NULL;
1670:
1671: SELECT name INTO l_src_instance from v$database;
1672: sync_cloned_src_pub_data(p_decomm_flag,v_run_id,v_sync_status);
1673: IF (v_sync_status = FND_API.G_RET_STS_ERROR) THEN
1674: Errbuf := CZ_UTILS.GET_TEXT('CZ_PB_SYNC_FAILURE', 'INSTANCENAME',l_src_instance );
1675: Retcode:= 2;
1676: END IF;
1677: EXCEPTION