eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.MTL_CROSS_REFERENCES_PVT dependencies on MTL_CROSS_REFERENCES

Line 1: PACKAGE BODY mtl_cross_references_pvt AS

1: PACKAGE BODY mtl_cross_references_pvt AS
2: /* $Header: INVVXRFB.pls 120.16.12020000.2 2012/10/03 11:44:28 ccsingh ship $ */
3:
4: -------------------------------------------------------------------------
5: -- Debug Profile option used to write Error_Handler.Write_Debug --

Line 41: ,p_XRef_Tbl IN OUT NOCOPY MTL_CROSS_REFERENCES_PUB.XRef_Tbl_Type

37:
38: PROCEDURE Process_XRef(
39: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
40: ,p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
41: ,p_XRef_Tbl IN OUT NOCOPY MTL_CROSS_REFERENCES_PUB.XRef_Tbl_Type
42: ,x_return_status OUT NOCOPY VARCHAR2
43: ,x_msg_count OUT NOCOPY NUMBER
44: ,x_message_list OUT NOCOPY Error_Handler.Error_Tbl_Type) IS
45:

Line 58: l_XRef_Rec MTL_CROSS_REFERENCES_PUB.XRef_Rec_Type; -- Declaring the record type object

54:
55: l_uom_code_valid VARCHAR(1); /*bug 14138918*/
56: l_rev_id_invalid VARCHAR(1); /*bug 14138918*/
57:
58: l_XRef_Rec MTL_CROSS_REFERENCES_PUB.XRef_Rec_Type; -- Declaring the record type object
59: l_XRef_Tbl MTL_CROSS_REFERENCES_PUB.XRef_Tbl_Type; -- Declaring local table object
60: l_Token_Tbl Error_Handler.Token_Tbl_Type; -- For passing token in error msgs
61: l_msg_count NUMBER:=0;
62: returned_cross_ref_id NUMBER;

Line 59: l_XRef_Tbl MTL_CROSS_REFERENCES_PUB.XRef_Tbl_Type; -- Declaring local table object

55: l_uom_code_valid VARCHAR(1); /*bug 14138918*/
56: l_rev_id_invalid VARCHAR(1); /*bug 14138918*/
57:
58: l_XRef_Rec MTL_CROSS_REFERENCES_PUB.XRef_Rec_Type; -- Declaring the record type object
59: l_XRef_Tbl MTL_CROSS_REFERENCES_PUB.XRef_Tbl_Type; -- Declaring local table object
60: l_Token_Tbl Error_Handler.Token_Tbl_Type; -- For passing token in error msgs
61: l_msg_count NUMBER:=0;
62: returned_cross_ref_id NUMBER;
63: returned_object_version_number NUMBER;

Line 71: FROM mtl_cross_references

67:
68: -- Cursor for fetching the current values from the table.
69: CURSOR mtl_xref_cur(c_cross_reference_id NUMBER) IS
70: SELECT *
71: FROM mtl_cross_references
72: WHERE CROSS_REFERENCE_ID=c_cross_reference_id;
73:
74: l_mtl_XRef_rec MTL_CROSS_REFERENCES%ROWTYPE; -- For fetching the data of above cursor
75:

Line 74: l_mtl_XRef_rec MTL_CROSS_REFERENCES%ROWTYPE; -- For fetching the data of above cursor

70: SELECT *
71: FROM mtl_cross_references
72: WHERE CROSS_REFERENCE_ID=c_cross_reference_id;
73:
74: l_mtl_XRef_rec MTL_CROSS_REFERENCES%ROWTYPE; -- For fetching the data of above cursor
75:
76: VALIDATION_ERROR EXCEPTION;
77: UNEXP_VALIDATION_ERROR EXCEPTION;
78: l_has_privilege VARCHAR2(1);

Line 112: FROM MTL_CROSS_REFERENCES_B

108: ,ATTRIBUTE13
109: ,ATTRIBUTE14
110: ,ATTRIBUTE15
111: ,ATTRIBUTE_CATEGORY
112: FROM MTL_CROSS_REFERENCES_B
113: WHERE CROSS_REFERENCE_ID=c_cross_reference_id
114: FOR UPDATE OF INVENTORY_ITEM_ID NOWAIT;
115:
116:

Line 121: FROM MTL_CROSS_REFERENCES_TL

117: CURSOR mtl_xref_lock_tl(c_cross_reference_id NUMBER) IS
118: SELECT
119: DESCRIPTION
120: ,DECODE(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
121: FROM MTL_CROSS_REFERENCES_TL
122: WHERE CROSS_REFERENCE_ID = c_cross_reference_id
123: AND USERENV('LANG') IN (LANGUAGE, SOURCE_LANG)
124: FOR UPDATE OF CROSS_REFERENCE_ID NOWAIT;
125:

Line 136: SAVEPOINT MTL_CROSS_REFERENCES_PVT;

132: PRAGMA EXCEPTION_INIT (resource_busy, -54);
133:
134: BEGIN
135:
136: SAVEPOINT MTL_CROSS_REFERENCES_PVT;
137: X_return_status:= FND_API.G_RET_STS_SUCCESS ;
138:
139: l_gtin_msg_count := 0;
140:

Line 223: ,p_table_name => 'MTL_CROSS_REFERENCES'

219: ,p_application_id => 'INV'
220: ,p_message_type => 'E'
221: ,p_entity_code => G_Entity_Code
222: ,p_entity_index => l_Xref_Indx
223: ,p_table_name => 'MTL_CROSS_REFERENCES'
224: );
225: RAISE VALIDATION_ERROR;
226: END IF;
227: END IF;

Line 515: FROM mtl_cross_references

511: -- checking for duplicate record
512: BEGIN
513:
514: SELECT 'x' INTO l_XRef_exists
515: FROM mtl_cross_references
516: WHERE Cross_Reference_Type = l_XRef_Rec.Cross_Reference_Type
517: AND Inventory_Item_Id = l_XRef_Rec.Inventory_Item_Id
518: AND Cross_Reference =l_XRef_Rec.Cross_Reference
519: AND Decode(Organization_Id,NULL,Org_Independent_Flag,Organization_Id) =

Line 618: MTL_CROSS_REFERENCES_PKG.INSERT_ROW(

614: l_XRef_Rec.Attribute11,l_XRef_Rec.Attribute12,l_XRef_Rec.Attribute13,l_XRef_Rec.Attribute14,l_XRef_Rec.Attribute15,
615: l_XRef_Rec.Attribute_category,l_XRef_Rec.Uom_Code,l_XRef_Rec.Revision_Id, l_XRef_Rec.Epc_Gtin_Serial
616: FROM dual;
617:
618: MTL_CROSS_REFERENCES_PKG.INSERT_ROW(
619: P_UOM_CODE => l_XRef_Rec.Uom_Code /*bug 14138918 */
620: ,P_REVISION_ID => l_Xref_Rec.Revision_Id /*bug 14138918 */
621: ,P_INVENTORY_ITEM_ID => l_XRef_Rec.Inventory_Item_Id
622: ,P_ORGANIZATION_ID => l_XRef_Rec.Organization_Id

Line 977: FROM mtl_cross_references

973: OR l_mtl_XRef_Rec.Org_Independent_Flag <> l_XRef_Rec.Org_Independent_Flag THEN
974:
975: BEGIN
976: SELECT 'x' INTO l_XRef_exists
977: FROM mtl_cross_references
978: WHERE Cross_Reference_Type = l_XRef_Rec.Cross_Reference_Type
979: AND Inventory_Item_Id = l_XRef_Rec.Inventory_Item_Id
980: AND Cross_Reference = l_XRef_Rec.Cross_Reference
981: AND Decode(Organization_Id,NULL,Org_Independent_Flag,Organization_Id) =

Line 1026: MTL_CROSS_REFERENCES_PKG.UPDATE_ROW(

1022: FETCH mtl_xref_lock_tl INTO l_lock_tl_recinfo ;
1023: CLOSE mtl_xref_lock_tl;
1024:
1025: -- calling update
1026: MTL_CROSS_REFERENCES_PKG.UPDATE_ROW(
1027: P_INVENTORY_ITEM_ID => l_XRef_Rec.Inventory_Item_Id
1028: ,P_ORGANIZATION_ID => l_XRef_Rec.Organization_Id
1029: ,P_CROSS_REFERENCE_TYPE => l_XRef_Rec.Cross_Reference_Type
1030: ,P_CROSS_REFERENCE => l_XRef_Rec.Cross_Reference

Line 1126: MTL_CROSS_REFERENCES_PKG.DELETE_ROW(

1122: CLOSE mtl_xref_lock_tl;
1123:
1124: Write_Debug('Deleting cross reference...');
1125: -- calling delete
1126: MTL_CROSS_REFERENCES_PKG.DELETE_ROW(
1127: P_CROSS_REFERENCE_ID => l_XRef_Rec.CROSS_REFERENCE_ID );
1128:
1129: --Bug 9749717 : Raise Business Event
1130: BEGIN

Line 1151: ROLLBACK TO MTL_CROSS_REFERENCES_PVT; -- rolling back to savepoint

1147: WHEN VALIDATION_ERROR THEN
1148: X_return_status:= FND_API.g_RET_STS_ERROR;
1149: l_msg_count := l_msg_count +1;
1150: Error_Handler.Get_Entity_Message(G_Entity_Code, x_message_list);
1151: ROLLBACK TO MTL_CROSS_REFERENCES_PVT; -- rolling back to savepoint
1152:
1153: WHEN UNEXP_VALIDATION_ERROR THEN
1154: X_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1155: l_msg_count := l_msg_count +1;

Line 1157: ROLLBACK TO MTL_CROSS_REFERENCES_PVT; -- rolling back to savepoint

1153: WHEN UNEXP_VALIDATION_ERROR THEN
1154: X_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1155: l_msg_count := l_msg_count +1;
1156: Error_Handler.Get_Entity_Message(G_Entity_Code, x_message_list);
1157: ROLLBACK TO MTL_CROSS_REFERENCES_PVT; -- rolling back to savepoint
1158:
1159: WHEN resource_busy THEN
1160: Error_Handler.Add_Error_Message
1161: (

Line 1200: ROLLBACK TO MTL_CROSS_REFERENCES_PVT; -- rolling back to savepoint

1196: l_XRef_Rec.x_return_status:=FND_API.g_RET_STS_ERROR;
1197: X_return_status:= FND_API.g_RET_STS_ERROR;
1198: l_msg_count := l_msg_count +1;
1199: Error_Handler.Get_Entity_Message(G_Entity_Code, x_message_list);
1200: ROLLBACK TO MTL_CROSS_REFERENCES_PVT; -- rolling back to savepoint
1201:
1202: END; -- internal begin
1203: END LOOP; -- p_XRef_Tbl
1204:

Line 1224: ,p_GTIN_XRef_Rec IN OUT NOCOPY MTL_CROSS_REFERENCES_PUB.XRef_Rec_Type

1220:
1221: PROCEDURE Validate_GTIN_Rec(
1222: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
1223: ,p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
1224: ,p_GTIN_XRef_Rec IN OUT NOCOPY MTL_CROSS_REFERENCES_PUB.XRef_Rec_Type
1225: ,x_return_status OUT NOCOPY VARCHAR2
1226: ,x_msg_count OUT NOCOPY NUMBER) IS
1227:
1228: -- Local variable declarations

Line 1229: l_GTIN_XRef_Rec MTL_CROSS_REFERENCES_PUB.XRef_Rec_Type; -- Declaring the record type object

1225: ,x_return_status OUT NOCOPY VARCHAR2
1226: ,x_msg_count OUT NOCOPY NUMBER) IS
1227:
1228: -- Local variable declarations
1229: l_GTIN_XRef_Rec MTL_CROSS_REFERENCES_PUB.XRef_Rec_Type; -- Declaring the record type object
1230: l_gtin_xref_exists VARCHAR(1);
1231: l_item_revision_exists VARCHAR(1);
1232: l_uom_exists VARCHAR(1);
1233: l_gtin_packitem_exists VARCHAR(1);

Line 1322: FROM mtl_cross_references

1318: --
1319: BEGIN
1320: SELECT 'x'
1321: INTO l_gtin_xref_exists
1322: FROM mtl_cross_references
1323: WHERE CROSS_REFERENCE_TYPE = l_GTIN_XRef_Rec.CROSS_REFERENCE_TYPE
1324: AND INVENTORY_ITEM_ID = l_GTIN_XRef_Rec.INVENTORY_ITEM_ID
1325: AND UOM_CODE = l_GTIN_XRef_Rec.UOM_CODE
1326: AND NOT CROSS_REFERENCE_ID = l_GTIN_XRef_Rec.CROSS_REFERENCE_ID;

Line 1368: FROM mtl_cross_references

1364:
1365: -- GTIN can be duplicate for different items, but cannot have same UOM
1366: BEGIN
1367: SELECT 'x' INTO l_gtin_packitem_exists
1368: FROM mtl_cross_references
1369: WHERE CROSS_REFERENCE_TYPE = l_GTIN_XRef_Rec.CROSS_REFERENCE_TYPE
1370: AND NOT INVENTORY_ITEM_ID = l_GTIN_XRef_Rec.INVENTORY_ITEM_ID
1371: AND CROSS_REFERENCE = l_GTIN_XRef_Rec.CROSS_REFERENCE
1372: AND UOM_CODE = l_GTIN_XRef_Rec.UOM_CODE;

Line 1681: -- MTL_CROSS_REFERENCES_INTERFACE for processing.

1677: -- -----------------------------------------------------------------------------
1678: -- Procedure Name: Process_XRef_Intf_Rows
1679: --
1680: -- Description : Concurrent program to pull rows from
1681: -- MTL_CROSS_REFERENCES_INTERFACE for processing.
1682: -- -----------------------------------------------------------------------------
1683: PROCEDURE Process_XRef_Intf_Rows(
1684: ERRBUF OUT NOCOPY VARCHAR2,
1685: RETCODE OUT NOCOPY VARCHAR2,

Line 1692: l_XRef_Tbl MTL_CROSS_REFERENCES_PUB.XRef_Tbl_Type;

1688:
1689: l_return_status VARCHAR2(1);
1690: l_msg_list Error_Handler.Error_Tbl_Type;
1691: l_msg Error_Handler.Error_Rec_Type;
1692: l_XRef_Tbl MTL_CROSS_REFERENCES_PUB.XRef_Tbl_Type;
1693: l_XRef_Rec MTL_CROSS_REFERENCES_PUB.XRef_Rec_Type;
1694: L_MSG_COUNT number;
1695: l_uom_code VARCHAR2(3);
1696: l_dummyInt INTEGER;

Line 1693: l_XRef_Rec MTL_CROSS_REFERENCES_PUB.XRef_Rec_Type;

1689: l_return_status VARCHAR2(1);
1690: l_msg_list Error_Handler.Error_Tbl_Type;
1691: l_msg Error_Handler.Error_Rec_Type;
1692: l_XRef_Tbl MTL_CROSS_REFERENCES_PUB.XRef_Tbl_Type;
1693: l_XRef_Rec MTL_CROSS_REFERENCES_PUB.XRef_Rec_Type;
1694: L_MSG_COUNT number;
1695: l_uom_code VARCHAR2(3);
1696: l_dummyInt INTEGER;
1697: ret_code NUMBER;

Line 1714: FROM MTL_CROSS_REFERENCES_INTERFACE A

1710: -- or all records if parameter is NULL
1711: -- and process flag is 1
1712: CURSOR C_INTF_ROWS(C_DATA_SET_ID NUMBER) IS
1713: SELECT A.ROWID, A.*
1714: FROM MTL_CROSS_REFERENCES_INTERFACE A
1715: WHERE DECODE(C_DATA_SET_ID, NULL, -1, A.SET_PROCESS_ID) = NVL(C_DATA_SET_ID, -1)
1716: AND A.PROCESS_FLAG = 1;
1717:
1718: BEGIN

Line 1727: UPDATE MTL_CROSS_REFERENCES_INTERFACE

1723: RETCODE := 0; -- assumes successful completion
1724:
1725: FOR l_mtl_xref_rec IN c_intf_rows(p_data_set_id) LOOP
1726:
1727: UPDATE MTL_CROSS_REFERENCES_INTERFACE
1728: SET Transaction_Id = MTL_CROSS_REF_INTERFACE_S.NEXTVAL,
1729: Request_Id = FND_GLOBAL.CONC_REQUEST_ID
1730: WHERE ROWID = l_mtl_xref_rec.ROWID;
1731: end loop;

Line 1780: ,p_table_name => 'MTL_CROSS_REFERENCES_INTERFACE'

1776: ,p_application_id => 'EGO'
1777: ,p_message_type => 'E'
1778: ,p_entity_code => G_Entity_Code
1779: ,p_entity_index => 1
1780: ,p_table_name => 'MTL_CROSS_REFERENCES_INTERFACE'
1781: );
1782:
1783: l_msg_count := 1;
1784: Error_Handler.Get_Entity_Message(G_Entity_Code, l_msg_list);

Line 1803: ,p_table_name => 'MTL_CROSS_REFERENCES_INTERFACE'

1799: ,p_application_id => 'EGO'
1800: ,p_message_type => 'E'
1801: ,p_entity_code => G_Entity_Code
1802: ,p_entity_index => 1
1803: ,p_table_name => 'MTL_CROSS_REFERENCES_INTERFACE'
1804: );
1805:
1806: l_msg_count := 1;
1807: Error_Handler.Get_Entity_Message(G_Entity_Code, l_msg_list);

Line 1837: ,p_table_name => 'MTL_CROSS_REFERENCES_INTERFACE'

1833: ,p_application_id => 'EGO'
1834: ,p_message_type => 'E'
1835: ,p_entity_code => G_Entity_Code
1836: ,p_entity_index => 1
1837: ,p_table_name => 'MTL_CROSS_REFERENCES_INTERFACE'
1838: );
1839:
1840: l_msg_count := 1;
1841: Error_Handler.Get_Entity_Message(G_Entity_Code, l_msg_list);

Line 1859: ,p_table_name => 'MTL_CROSS_REFERENCES_INTERFACE'

1855: ,p_application_id => 'EGO'
1856: ,p_message_type => 'E'
1857: ,p_entity_code => G_Entity_Code
1858: ,p_entity_index => 1
1859: ,p_table_name => 'MTL_CROSS_REFERENCES_INTERFACE'
1860: );
1861: l_msg_count := 1;
1862: Error_Handler.Get_Entity_Message(G_Entity_Code, l_msg_list);
1863:

Line 1895: ,p_table_name => 'MTL_CROSS_REFERENCES_INTERFACE'

1891: ,p_application_id => 'INV'
1892: ,p_message_type => 'E'
1893: ,p_entity_code => G_Entity_Code
1894: ,p_entity_index => 1
1895: ,p_table_name => 'MTL_CROSS_REFERENCES_INTERFACE'
1896: );
1897:
1898: l_msg_count := 1;
1899: Error_Handler.Get_Entity_Message(G_Entity_Code, l_msg_list);

Line 1916: ,p_table_name => 'MTL_CROSS_REFERENCES_INTERFACE'

1912: ,p_application_id => 'INV'
1913: ,p_message_type => 'E'
1914: ,p_entity_code => G_Entity_Code
1915: ,p_entity_index => 1
1916: ,p_table_name => 'MTL_CROSS_REFERENCES_INTERFACE'
1917: );
1918: l_msg_count := 1;
1919: Error_Handler.Get_Entity_Message(G_Entity_Code, l_msg_list);
1920:

Line 1966: Write_Debug('Calling MTL_CROSS_REFERENCES_PVT.Process_Xref for Transaction ' ||To_Char(l_mtl_xref_rec.Transaction_Id));

1962: l_XRef_Rec.LAST_UPDATE_LOGIN := l_mtl_xref_rec.LAST_UPDATE_LOGIN;
1963:
1964: l_XRef_Tbl(1) := l_XRef_Rec;
1965:
1966: Write_Debug('Calling MTL_CROSS_REFERENCES_PVT.Process_Xref for Transaction ' ||To_Char(l_mtl_xref_rec.Transaction_Id));
1967:
1968: MTL_CROSS_REFERENCES_PVT.Process_Xref
1969: (p_init_msg_list => FND_API.G_TRUE
1970: ,p_commit => FND_API.G_TRUE

Line 1968: MTL_CROSS_REFERENCES_PVT.Process_Xref

1964: l_XRef_Tbl(1) := l_XRef_Rec;
1965:
1966: Write_Debug('Calling MTL_CROSS_REFERENCES_PVT.Process_Xref for Transaction ' ||To_Char(l_mtl_xref_rec.Transaction_Id));
1967:
1968: MTL_CROSS_REFERENCES_PVT.Process_Xref
1969: (p_init_msg_list => FND_API.G_TRUE
1970: ,p_commit => FND_API.G_TRUE
1971: ,p_XRef_Tbl => l_XRef_Tbl
1972: ,x_return_status => l_return_status

Line 1979: UPDATE MTL_CROSS_REFERENCES_INTERFACE

1975: );
1976: END IF;
1977:
1978: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1979: UPDATE MTL_CROSS_REFERENCES_INTERFACE
1980: SET process_flag = 3
1981: WHERE Transaction_Id = l_mtl_xref_rec.Transaction_Id;
1982:
1983:

Line 2000: ,tbl_name => 'MTL_CROSS_REFERENCES_INTERFACE'

1996: ,req_id => fnd_global.conc_request_id
1997: ,trans_id => l_mtl_xref_rec.Transaction_Id
1998: ,error_text => l_msg.message_text
1999: ,p_column_name => null
2000: ,tbl_name => 'MTL_CROSS_REFERENCES_INTERFACE'
2001: ,msg_name => l_msg.message_name
2002: ,err_text => l_err_text -- error text out
2003: );
2004: END LOOP;

Line 2010: UPDATE MTL_CROSS_REFERENCES_INTERFACE

2006: Write_Debug('Transaction ' ||To_Char(l_mtl_xref_rec.Transaction_Id)|| ' has failed.');
2007: l_err_count := 1;
2008: ELSE
2009: Write_Debug('Transaction ' ||To_Char(l_mtl_xref_rec.Transaction_Id)|| ' has completed successfully.');
2010: UPDATE MTL_CROSS_REFERENCES_INTERFACE
2011: SET process_flag = 7
2012: WHERE Transaction_Id = l_mtl_xref_rec.Transaction_Id;
2013: END IF;
2014:

Line 2065: INVPUTLI.info('mtl_cross_references_pvt.LOG_ERROR: msg_name = '||msg_name);

2061:
2062: BEGIN
2063:
2064: IF l_inv_debug_level IN(101, 102) THEN
2065: INVPUTLI.info('mtl_cross_references_pvt.LOG_ERROR: msg_name = '||msg_name);
2066: END IF;
2067:
2068:
2069: INSERT INTO mtl_interface_errors

Line 2133: err_text := SUBSTRB('mtl_cross_references_pvt.LOG_ERROR: ' || SQLERRM, 1,240);

2129:
2130: EXCEPTION
2131:
2132: WHEN others THEN
2133: err_text := SUBSTRB('mtl_cross_references_pvt.LOG_ERROR: ' || SQLERRM, 1,240);
2134: RETURN (SQLCODE);
2135:
2136: END LOG_ERROR;
2137:

Line 2160: DELETE FROM MTL_CROSS_REFERENCES_INTERFACE

2156:
2157: BEGIN
2158:
2159: LOOP
2160: DELETE FROM MTL_CROSS_REFERENCES_INTERFACE
2161: WHERE process_flag = l_process_flag_7
2162: AND set_process_id=p_data_set_id
2163: AND rownum < l_rownum;
2164:

Line 2177: err_text := SUBSTR('MTL_CROSS_REFERENCES_PVT.Del_Processed_Recs' || SQLERRM, 1,240);

2173:
2174: EXCEPTION
2175:
2176: WHEN OTHERS THEN
2177: err_text := SUBSTR('MTL_CROSS_REFERENCES_PVT.Del_Processed_Recs' || SQLERRM, 1,240);
2178: RETURN (SQLCODE);
2179:
2180: END Del_Processed_Recs;
2181:

Line 2182: END MTL_CROSS_REFERENCES_PVT;

2178: RETURN (SQLCODE);
2179:
2180: END Del_Processed_Recs;
2181:
2182: END MTL_CROSS_REFERENCES_PVT;