टेक्स्ट की तुलना करें

दो टेक्स्ट फ़ाइलों के बीच अंतर ढूंढें

Real-time diff

Unified diff

Collapse lines

Highlight change

Syntax highlighting

टूल्स

Diffchecker Desktop The most secure way to run Diffchecker. Get the Diffchecker Desktop app: your diffs never leave your computer!Get Desktop

Untitled diff

Created 8 years agoDiff never expires

Lines
Total
Removed

Words
Total
Removed

To continue using this feature, upgrade to Diffchecker Pro View Pricing

578 lines

Lines
Total
Added

Words
Total
Added

To continue using this feature, upgrade to Diffchecker Pro View Pricing

590 lines

create or replace PACKAGE BODY CSE_BULK_IMPORT_PVT

/*$Header: fusionapps/scm/cse/db/plsql/cse_bulk_import_pvt.pkb sikumar_bug-25242966/2 2016/12/15 14:56:41 sikumar Exp $*/

/*$Header: fusionapps/scm/cse/db/plsql/cse_bulk_import_pvt.pkb /st_fusionapps_pt-v2mibscmoal/15 2016/12/29 23:59:25 soumdutt Exp $*/

-- Maximum Partition Size Constants

C_MAX_PARTITION_SIZE CONSTANT NUMBER := 1000;

C_MAX_BUFFER_SIZE CONSTANT NUMBER := 1000;

C_CREATE_ACTION_CODE CONSTANT VARCHAR2(30) := 'ORA_CREATE';

C_UPDATE_ACTION_CODE CONSTANT VARCHAR2(30) := 'ORA_UPDATE';

C_DELETE_ACTION_CODE CONSTANT VARCHAR2(30) := 'ORA_DELETE';

C_ADD_REL_ACTION_CODE CONSTANT VARCHAR2(30) := 'ORA_ADD';

C_REM_REL_ACTION_CODE CONSTANT VARCHAR2(30) := 'ORA_REMOVE';

C_INT_READY CONSTANT VARCHAR2(30) := 'READY';

C_INT_VALID CONSTANT VARCHAR2(30) := 'VALID';

C_INT_ERROR CONSTANT VARCHAR2(30) := 'ERROR';

C_ASSETS_INT_TBL_NAME CONSTANT VARCHAR2(30) := 'CSE_ASSETS_INT';

C_ASSET_CHGS_TBL_NAME CONSTANT VARCHAR2(30) := 'CSE_ASSET_CHARGES_INT';

C_MESSAGE_TOKEN_NAME CONSTANT VARCHAR2(30) := 'ATTRIBUTE_NAME';

C_SEVERITY_ERROR CONSTANT VARCHAR2(1) := 'E';

C_SEVERITY_WARNING CONSTANT VARCHAR2(1) := 'W';

C_NULL_STRING CONSTANT VARCHAR2(5) := '#NULL';

C_NULL_DATE CONSTANT DATE := TO_DATE('5','j');

/*=============================================================================

| PROCEDURE - trigger_customer_asset_events()

| DESCRIPTION

| This procedure is used to analyze when to raise customer asset business events

| PARAMETERS

| p_partition_number - Input parameter patrition number

| p_batch_id - Input parameter of batch id

| p_operation_code - Input parameter of batch operation code

| x_error_message - Out parameter with error message if any

| x_return_status - Out parameter with Success or failure status of proc

*============================================================================*/

PROCEDURE trigger_customer_asset_events(

p_partition_number IN NUMBER,

p_batch_id IN NUMBER,

p_operation_code IN VARCHAR2,

x_error_message OUT NOCOPY VARCHAR2,

x_return_status OUT NOCOPY VARCHAR2);

/*=============================================================================

| PROCEDURE - create_batch()

| DESCRIPTION

| This procedure is used to create a batch and associate assets and partlist

| for which no batch name and code is provided

| PARAMETERS

| p_batch_type - Input parameter identifying ALM product family

| x_batch_id - Output parameter of batch id that is created by default

| x_batch_code - Out parameter of batch code that is created by default

| x_error_message - Out parameter with error message if any

| x_return_status - Out parameter with Success or failure status of proc

*============================================================================*/

PROCEDURE create_batch(

p_batch_type IN VARCHAR2,

x_batch_id OUT NOCOPY NUMBER,

x_batch_code OUT NOCOPY VARCHAR2,

x_error_message OUT NOCOPY VARCHAR2,

x_return_status OUT NOCOPY VARCHAR2)

l_validate_batch_needed VARCHAR2(1):= 'N';

l_current_location_type1 VARCHAR2(30);

l_current_location_type2 VARCHAR2(30);

l_interface_batch_id NUMBER;

l_load_request_id NUMBER;

l_source_system_code VARCHAR2(30);

l_api_name VARCHAR2(300) := 'cse_bulk_import_pvt.create_batch';

BEGIN

x_return_status := fnd_api.g_ret_sts_success;

cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'Entering API'||l_api_name);

IF p_batch_type = 'CA' THEN

l_current_location_type1 := 'ORA_CUSTOMER';

l_current_location_type2 := 'ORA_CUSTOMER';

l_source_system_code := 'CSI';

ELSIF p_batch_type = 'MA' THEN

l_current_location_type1 := 'ORA_WORK_CENTER';

l_current_location_type2 := 'ORA_UNKNOWN';

l_source_system_code := 'MNT';

END IF;

BEGIN

SELECT 'Y'

INTO l_validate_batch_needed

FROM dual

WHERE EXISTS

(SELECT 1

FROM cse_assets_int

WHERE interface_status_code = 'READY'

AND interface_batch_id IS NULL

AND interface_batch_code IS NULL

AND current_location_context IN ( l_current_location_type1,l_current_location_type2)

);

EXCEPTION

WHEN NO_DATA_FOUND THEN

l_validate_batch_needed:=NULL;

END;

IF l_validate_batch_needed = 'Y' THEN

l_interface_batch_id := CSE_INT_S.NEXTVAL;

l_load_request_id := CSE_INT_S.NEXTVAL;

x_batch_id := l_interface_batch_id;

x_batch_code := SUBSTR(p_batch_type||l_interface_batch_id,1,30);

INSERT

INTO cse_int_batches_b

(

interface_batch_id ,

object_version_number ,

interface_batch_code ,

interface_batch_status ,

source_system_type ,

source_system_code ,

internal_batch_type ,

created_by ,

creation_date ,

last_updated_by ,

last_update_date ,

last_update_login ,

load_request_id ,

request_id ,

job_definition_name ,

job_definition_package

)

VALUES

(

l_interface_batch_id ,

1 ,

x_batch_code ,

'READY' ,

'ORA_INTERNAL' ,

l_source_system_code ,

p_batch_type ,

fnd_global.who_user_name ,

sysdate ,

fnd_global.who_user_name ,

sysdate ,

fnd_global.user_guid ,

l_load_request_id ,

fnd_job.REQUEST_ID ,

fnd_job.JOB_DEFINITION_NAME ,

fnd_job.JOB_PACKAGE_NAME

);

INSERT

INTO cse_int_batches_tl

(

interface_batch_id ,

language ,

object_version_number ,

source_lang ,

interface_batch_name ,

interface_batch_description ,

load_request_id ,

created_by ,

creation_date ,

last_updated_by ,

last_update_date ,

last_update_login

)

VALUES

(

l_interface_batch_id ,

USERENV('LANG') ,

1 ,

USERENV('LANG') ,

x_batch_code ,

l_load_request_id ,

fnd_global.who_user_name ,

sysdate ,

fnd_global.who_user_name ,

sysdate ,

fnd_global.user_guid

);

UPDATE cse_assets_int

SET interface_batch_id = l_interface_batch_id ,

interface_batch_code = x_batch_code

WHERE interface_status_code = 'READY'

AND interface_batch_id IS NULL

AND interface_batch_code IS NULL

AND current_location_context IN ( l_current_location_type1,l_current_location_type2);

END IF;

EXCEPTION

WHEN OTHERS THEN

x_return_status := fnd_api.g_ret_sts_unexp_error;

x_error_message := sqlerrm;

cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);

END create_batch;

/*=============================================================================

| PROCEDURE - partition_batch()

| DESCRIPTION

| This procedure is used to partition a batch into similar bucket size

| for better performance.

| PARAMETERS

| p_batch_id - Input parameter of batch id that need to be processed

| x_partition_numbers - Out parameter with table of partitions assigned

| to a batch

| x_error_message - Out parameter with error message if any

| x_return_status - Out parameter with Success or failure status of proc

*============================================================================*/

PROCEDURE partition_batch(

px_batch_id IN OUT NOCOPY NUMBER,

p_batch_code IN VARCHAR2,

x_partition_numbers OUT NOCOPY FND_TABLE_OF_NUMBER,

x_record_count OUT NOCOPY NUMBER,

x_error_message OUT NOCOPY VARCHAR2,

x_return_status OUT NOCOPY VARCHAR2)

CURSOR c_update_partList( cp_partition_number NUMBER , cp_batch_id NUMBER , cp_batch_code VARCHAR2 )

SELECT cseai.partition_number ,

cseai.asset_number ,

cseai.interface_record_number ,

cseai.interface_batch_id ,

cseai.item_organization_code

FROM cse_assets_int cseai

WHERE cseai.partition_number = cp_partition_number

AND cseai.interface_status_code = 'READY'

AND (cseai.interface_batch_id = cp_batch_id

OR cseai.interface_batch_code = cp_batch_code);

CURSOR c_update_actv_asset_partList( cp_partition_number NUMBER , cp_batch_id NUMBER , cp_batch_code VARCHAR2 )

SELECT cseai.partition_number ,

cseai.interface_record_number ,

cseai.interface_batch_id ,

cseai.asset_number ,

cseai.item_organization_code ,

(SELECT cseb.item_organization_id

FROM cse_assets_b cseb

WHERE cseb.asset_number=cseai.asset_number

) AS asset_org_id ,

(SELECT iorgp.organization_id

FROM inv_org_parameters iorgp

WHERE cseai.item_organization_code=iorgp.organization_code

) AS organization_id

FROM cse_assets_int cseai

WHERE cseai.interface_status_code = 'READY'

AND cseai.partition_number = cp_partition_number

AND (cseai.interface_batch_id = cp_batch_id

OR cseai.interface_batch_code = cp_batch_code);

CURSOR c_get_int_batch_type( cp_batch_id NUMBER ,cp_batch_code VARCHAR2)

SELECT INTERNAL_BATCH_TYPE

FROM CSE_INT_BATCHES_B cseIntBatch

WHERE (cseIntBatch.interface_batch_id = cp_batch_id

OR cseIntBatch.interface_batch_code = cp_batch_code);

/*Cursor to get the records trying perforn more than one operation on the same asset in the same batch*/

CURSOR c_get_records_dup_asset

SELECT interface_record_number

FROM cse_assets_int

WHERE (interface_batch_code = p_batch_code

OR interface_batch_id = px_batch_id)

AND interface_status_code = 'READY'

AND NVL(RELATIONSHIP_ACTION_CODE,C_REM_REL_ACTION_CODE) = C_ADD_REL_ACTION_CODE

AND ACTION_CODE = C_UPDATE_ACTION_CODE

AND asset_number IN

(SELECT asset_number

FROM cse_assets_int

WHERE interface_status_code = 'READY'

AND (interface_batch_code =p_batch_code

OR interface_batch_id =px_batch_id)

GROUP BY asset_number

HAVING COUNT(*) >1

);

TYPE l_update_partList_tbl_type

TABLE OF c_update_partList%ROWTYPE;

TYPE l_updt_actv_partList_tbl_type

TABLE OF c_update_actv_asset_partList%ROWTYPE;

l_update_partList_tbl l_update_partList_tbl_type;

l_update_actv_partList_tbl l_updt_actv_partList_tbl_type;

l_api_name VARCHAR2(300) := 'cse_bulk_import_pvt.partition_batch';

l_Count_records NUMBER;

l_Number_of_Batches NUMBER;

l_batch_code cse_int_batches_b.interface_batch_code%TYPE := p_batch_code;

l_int_batch_type cse_int_batches_b.internal_batch_type%TYPE;

l_batch_id NUMBER := px_batch_id;

l_partition_num NUMBER;

TYPE l_dup_asset_tbl_type

TABLE OF c_get_records_dup_asset%ROWTYPE;

l_dup_asset_tbl l_dup_asset_tbl_type;

BEGIN

cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');

x_return_status := fnd_api.g_ret_sts_success;

IF px_batch_id IS NOT NULL AND p_batch_code IS NULL THEN

BEGIN

SELECT DISTINCT cseib.interface_batch_code

INTO l_batch_code

FROM cse_int_batches_b cseib

WHERE cseib.interface_batch_id = px_batch_id;

END;

ELSIF px_batch_id IS NULL AND p_batch_code IS NOT NULL THEN

BEGIN

SELECT DISTINCT cseib.interface_batch_id

INTO l_batch_id

FROM cse_int_batches_b cseib

WHERE cseib.interface_batch_code = p_batch_code;

END;

END IF;

px_batch_id := l_batch_id ;

SELECT COUNT(1)

INTO l_Count_records

FROM cse_assets_int csei

WHERE (csei.interface_batch_id = l_batch_id

OR csei.interface_batch_code = l_batch_code)

AND csei.interface_status_code = 'READY';

x_record_count :=l_Count_records;

IF l_Count_records > 0 THEN

l_Number_of_Batches := CEIL(l_Count_records/c_max_partition_size);

x_partition_numbers := FND_TABLE_OF_NUMBER();

FOR i IN 1..l_Number_of_Batches

LOOP

l_partition_num := cse_int_s.nextval;

x_partition_numbers.extend;

x_partition_numbers(i) := l_partition_num;

UPDATE cse_assets_int cseai

SET partition_number = l_partition_num,

asset_number = DECODE(asset_number,NULL, DECODE(action_code,C_CREATE_ACTION_CODE,TO_CHAR(cse_asset_numbers_s.nextval),asset_number),asset_number),

last_updated_by = fnd_global.who_user_name,

last_update_date = sysdate,

last_update_login = fnd_global.user_guid,

job_definition_name = fnd_job.job_definition_name,

job_definition_package = fnd_job.job_package_name,

interface_batch_id = l_batch_id

WHERE ROWNUM BETWEEN 1 AND c_max_partition_size

AND cseai.partition_number IS NULL

AND cseai.interface_status_code = 'READY'

AND (cseai.interface_batch_id = l_batch_id

OR cseai.interface_batch_code = l_batch_code);

/*Creating a new partition for records trying to perform more than one operation on the same asset

OPEN c_get_records_dup_asset;

LOOP

FETCH c_get_records_dup_asset BULK COLLECT

INTO l_dup_asset_tbl LIMIT c_max_buffer_size ;

EXIT

WHEN l_dup_asset_tbl.count = 0;

l_partition_num := cse_int_s.nextval;

x_partition_numbers.extend;

x_partition_numbers(i+1) := l_partition_num;

FORALL j IN l_dup_asset_tbl.FIRST..l_dup_asset_tbl.LAST

FORALL i IN l_dup_asset_tbl.FIRST..l_dup_asset_tbl.LAST

UPDATE cse_assets_int cseai

SET partition_number = l_partition_num,

asset_number = DECODE(asset_number,NULL, DECODE(action_code,C_CREATE_ACTION_CODE,TO_CHAR(cse_asset_numbers_s.nextval),asset_number),asset_number),

last_updated_by = fnd_global.who_user_name,

last_update_date = sysdate,

last_update_login = fnd_global.user_guid,

job_definition_name = fnd_job.job_definition_name,

job_definition_package = fnd_job.job_package_name,

interface_batch_id = l_batch_id

WHERE interface_record_number = l_dup_asset_tbl(j).interface_record_number;

WHERE interface_record_number = l_dup_asset_tbl(i).interface_record_number;

END LOOP;

CLOSE c_get_records_dup_asset;

-- bachandr: Check if the asset is Maintenance Asset or Customer Asset and update corresponding table.

OPEN c_get_int_batch_type(l_batch_id,l_batch_code);

FETCH c_get_int_batch_type INTO l_int_batch_type;

CLOSE c_get_int_batch_type;

FOR j IN x_partition_numbers.FIRST..x_partition_numbers.LAST

LOOP

IF l_int_batch_type IS NOT NULL AND l_int_batch_type = 'MA' THEN

OPEN c_update_actv_asset_partList(x_partition_numbers(j),l_batch_id,l_batch_code);

FETCH c_update_actv_asset_partList BULK COLLECT

INTO l_update_actv_partList_tbl;

CLOSE c_update_actv_asset_partList;

FORALL i IN l_update_actv_partList_tbl.FIRST..l_update_actv_partList_tbl.LAST

UPDATE cse_parts_list_components_int cseparti

SET partition_number = l_update_actv_partList_tbl(i).partition_number,

item_organization_code = l_update_actv_partList_tbl(i).item_organization_code,

asset_number = l_update_actv_partList_tbl(i).asset_number,

interface_batch_id = l_update_actv_partList_tbl(i).interface_batch_id,

item_organization_id = NVL(l_update_actv_partList_tbl(i).asset_org_id,l_update_actv_partList_tbl(i).organization_id)

WHERE cseparti.interface_record_number = l_update_actv_partList_tbl(i).interface_record_number

AND cseparti.interface_status_code = 'READY'

AND (cseparti.interface_batch_id = l_batch_id

OR cseparti.interface_batch_code = l_batch_code);

ELSIF l_int_batch_type IS NOT NULL AND l_int_batch_type = 'CA' THEN

OPEN c_update_partList(x_partition_numbers(j),l_batch_id,l_batch_code);

FETCH c_update_partList BULK COLLECT INTO l_update_partList_tbl;

CLOSE c_update_partList;

FORALL i IN l_update_partList_tbl.FIRST..l_update_partList_tbl.LAST

UPDATE CSE_ASSET_CHARGES_INT cseAssetCharges

SET partition_number = l_update_partList_tbl(i).partition_number,

interface_batch_id = l_update_partList_tbl(i).interface_batch_id

WHERE cseAssetCharges.interface_record_number = l_update_partList_tbl(i).interface_record_number

AND cseAssetCharges.interface_status_code = 'READY'

AND (cseAssetCharges.interface_batch_id = l_batch_id

OR cseAssetCharges.interface_batch_code = l_batch_code);

END IF;

END LOOP;

END IF;

cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');

EXCEPTION

WHEN OTHERS THEN

x_return_status := fnd_api.g_ret_sts_unexp_error;

x_error_message := sqlerrm;

IF c_get_int_batch_type%ISOPEN THEN

CLOSE c_update_partList;

END IF;

cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);

END partition_batch;

/*=============================================================================

| Local procedure for logging validation errors related to

| Customer Asset Interface records.

=============================================================================*/

PROCEDURE log_validation_error(

p_interface_rowid_tbl IN cse_int_utils_pvt.interface_row_id_type,

p_batch_id IN NUMBER,

p_partition_number IN NUMBER,

p_table_name IN VARCHAR2,

p_column_name IN VARCHAR2,

p_program_name IN VARCHAR2,

p_message_severity IN VARCHAR2,

p_message_name IN VARCHAR2,

p_message_token_names IN VARCHAR2,

p_message_token_values IN VARCHAR2,

x_error_message OUT NOCOPY VARCHAR2,

x_return_status OUT NOCOPY VARCHAR2 )

CURSOR c_get_asset_int_dtls( c_interface_row_id NUMBER)

SELECT request_id,

job_definition_name,

job_definition_package

FROM CSE_ASSETS_INT

WHERE interface_row_id = c_interface_row_id;

CURSOR c_get_asset_chg_int_dtls( c_interface_row_id NUMBER)

SELECT request_id,

job_definition_name,

job_definition_package

FROM CSE_ASSET_CHARGES_INT

WHERE interface_row_id = c_interface_row_id;

l_int_errors_tbl cse_int_utils_pvt.int_errors_tbl_type;

l_row_count NUMBER := 0;

l_request_id NUMBER;

l_job_definition_name VARCHAR2(100);

l_job_defintion_package VARCHAR2(900);

l_api_name VARCHAR2(300) := 'cse_bulk_import_pvt.log_validation_error';

l_message_text VARCHAR2(2000);

BEGIN

FOR i IN 1 .. p_interface_rowid_tbl.COUNT

LOOP

l_message_text := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(p_message_name,1,3), p_msg_name => p_message_name, p_token_name => p_message_token_names, p_token_value => p_message_token_values );

--Collect interface row details required for logging the error.

IF p_table_name = C_ASSETS_INT_TBL_NAME THEN

OPEN c_get_asset_int_dtls(p_interface_rowid_tbl(i));

FETCH c_get_asset_int_dtls

INTO l_request_id,

l_job_definition_name,

l_job_defintion_package;

CLOSE c_get_asset_int_dtls;

ELSIF p_table_name = C_ASSET_CHGS_TBL_NAME THEN

OPEN c_get_asset_chg_int_dtls(p_interface_rowid_tbl(i));

FETCH c_get_asset_chg_int_dtls

INTO l_request_id,

l_job_definition_name,

l_job_defintion_package;

CLOSE c_get_asset_chg_int_dtls;

END IF;

CSE_INT_UTILS_PVT.log_messages( fnd_log.level_severe, l_api_name, 'Interface_row_id= '||p_interface_rowid_tbl(i)||' - '||l_message_text );

l_row_count := l_row_count + 1;

l_int_errors_tbl(l_row_count).interface_error_id := cse_int_s.NEXTVAL;

l_int_errors_tbl(l_row_count).object_version_number := 1;

l_int_errors_tbl(l_row_count).interface_row_id := p_interface_rowid_tbl(i);

l_int_errors_tbl(l_row_count).interface_batch_id := p_batch_id;

l_int_errors_tbl(l_row_count).error_text := l_message_text;

l_int_errors_tbl(l_row_count).error_language := userenv('LANG');

l_int_errors_tbl(l_row_count).table_name := p_table_name;

l_int_errors_tbl(l_row_count).column_name := p_column_name;

l_int_errors_tbl(l_row_count).message_name := p_message_name;

l_int_errors_tbl(l_row_count).message_token_names := p_message_token_names;

l_int_errors_tbl(l_row_count).message_token_values := p_message_token_values;

l_int_errors_tbl(l_row_count).program_name := p_program_name;

l_int_errors_tbl(l_row_count).message_severity := C_SEVERITY_ERROR;

l_int_errors_tbl(l_row_count).created_by := fnd_global.who_user_name;

l_int_errors_tbl(l_row_count).creation_date := sysdate;

l_int_errors_tbl(l_row_count).last_updated_by := fnd_global.who_user_name;

l_int_errors_tbl(l_row_count).last_update_date := sysdate;

l_int_errors_tbl(l_row_count).last_update_login := fnd_global.user_guid;

l_int_errors_tbl(l_row_count).request_id := l_request_id;

l_int_errors_tbl(l_row_count).job_definition_name := l_job_definition_name;

l_int_errors_tbl(l_row_count).job_definition_package:= l_job_defintion_package;

END LOOP;

CSE_INT_UTILS_PVT.log_errors( p_int_errors_tbl => l_int_errors_tbl, x_return_status => x_return_status , x_error_msg => x_error_message );

-- update the interface table and set the record status to error

IF p_table_name = C_ASSETS_INT_TBL_NAME THEN

FORALL i IN 1 .. p_interface_rowid_tbl.COUNT

UPDATE cse_assets_int assetInt

SET assetInt.interface_status_code = C_INT_ERROR

WHERE assetInt.interface_batch_id = p_batch_id

AND assetInt.partition_number = p_partition_number

AND assetInt.interface_row_id = p_interface_rowid_tbl(i);

ELSIF p_table_name = C_ASSET_CHGS_TBL_NAME THEN

FORALL i IN 1 .. p_interface_rowid_tbl.COUNT

UPDATE cse_asset_charges_int assetChgInt

SET assetChgInt.interface_status_code = C_INT_ERROR

WHERE assetChgInt.interface_batch_id = p_batch_id

AND assetChgInt.partition_number = p_partition_number

AND assetChgInt.interface_row_id = p_interface_rowid_tbl(i);

END IF;

-- A validation error has occured. Set return status to error.

x_return_status := fnd_api.g_ret_sts_error;

EXCEPTION

WHEN OTHERS THEN

x_return_status := fnd_api.g_ret_sts_unexp_error;

x_error_message := sqlerrm;

cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);

END log_validation_error;

/*=============================================================================

| PROCEDURE - get_batch_codes

| DESCRIPTION

| Collects the batch ids to be processed if batch code is passed as null

| PARAMETERS

| x_batch_id - Batch Code Collection output to be processed

| p_batch_code- Input Batch Code

/*=============================================================================*/

PROCEDURE get_batch_codes(

p_batch_code IN VARCHAR2,

x_batch_codes OUT NOCOPY FND_TABLE_OF_VARCHAR2_120)

BEGIN

IF p_batch_code IS NULL THEN

SELECT DISTINCT interface_batch_code BULK COLLECT

INTO x_batch_codes

FROM cse_int_batches_b

WHERE interface_batch_status='READY';

ELSE

x_batch_codes:=FND_TABLE_OF_VARCHAR2_120();

x_batch_codes.EXTEND;

x_batch_codes(x_batch_codes.COUNT):= p_batch_code;

END IF;

END get_batch_codes;

/*=============================================================================

| PROCEDURE - validate_custAsset_mand_attr

| DESCRIPTION

| Validates the mandatory customer attributes

| PARAMETERS

| p_batch_id - Input parameter of batch id that need to be processed

| x_partition_numbers - Out parameter with table of partitions assigned

| to a batch

| x_error_message - Out parameter with error message if any

| x_return_status - Out parameter with Success or failure status of proc

*============================================================================*/

PROCEDURE validate_custAsset_mand_attr(

p_batch_id IN NUMBER,

p_partition_number IN NUMBER,

x_error_message OUT NOCOPY VARCHAR2,

x_return_status OUT NOCOPY VARCHAR2)

/********************************************

-- Define mandatory validation cursors

*********************************************/

-- Cursor for validating Asset Organization

CURSOR c_org_mandatory_cur

SELECT assetInt.i

SELECT assetInt

सेव किए गए Diffs

ऑरिजनल टेक्स्ट

फ़ाइल खोलें

create or replace PACKAGE BODY CSE_BULK_IMPORT_PVT
AS
  /*$Header: fusionapps/scm/cse/db/plsql/cse_bulk_import_pvt.pkb sikumar_bug-25242966/2 2016/12/15 14:56:41 sikumar Exp $*/
  -- Maximum Partition Size Constants
  C_MAX_PARTITION_SIZE  CONSTANT NUMBER       := 1000;
  C_MAX_BUFFER_SIZE     CONSTANT NUMBER       := 1000;
  C_CREATE_ACTION_CODE  CONSTANT VARCHAR2(30) := 'ORA_CREATE';
  C_UPDATE_ACTION_CODE  CONSTANT VARCHAR2(30) := 'ORA_UPDATE';
  C_DELETE_ACTION_CODE  CONSTANT VARCHAR2(30) := 'ORA_DELETE';
  C_ADD_REL_ACTION_CODE CONSTANT VARCHAR2(30) := 'ORA_ADD';
  C_REM_REL_ACTION_CODE CONSTANT VARCHAR2(30) := 'ORA_REMOVE';
  C_INT_READY           CONSTANT VARCHAR2(30) := 'READY';
  C_INT_VALID           CONSTANT VARCHAR2(30) := 'VALID';
  C_INT_ERROR           CONSTANT VARCHAR2(30) := 'ERROR';
  C_ASSETS_INT_TBL_NAME CONSTANT VARCHAR2(30) := 'CSE_ASSETS_INT';
  C_ASSET_CHGS_TBL_NAME CONSTANT VARCHAR2(30) := 'CSE_ASSET_CHARGES_INT';
  C_MESSAGE_TOKEN_NAME  CONSTANT VARCHAR2(30) := 'ATTRIBUTE_NAME';
  C_SEVERITY_ERROR      CONSTANT VARCHAR2(1)  := 'E';
  C_SEVERITY_WARNING    CONSTANT VARCHAR2(1)  := 'W';
  C_NULL_STRING         CONSTANT VARCHAR2(5)  := '#NULL';
  C_NULL_DATE           CONSTANT DATE         := TO_DATE('5','j');

/*=============================================================================
  |  PROCEDURE - trigger_customer_asset_events()
  |
  |  DESCRIPTION
  |    This procedure is used to analyze when to raise customer asset business events
  |  PARAMETERS
  |      p_partition_number - Input parameter patrition number
  |      p_batch_id   - Input parameter of batch id
  |      p_operation_code - Input parameter of batch operation code
  |      x_error_message - Out parameter with error message if any
  |      x_return_status - Out parameter with Success or failure status of proc
  *============================================================================*/

/*=============================================================================
  |  PROCEDURE - create_batch()
  |
  |  DESCRIPTION
  |    This procedure is used to create a batch and associate assets and partlist
  |    for which no batch name and code is provided
  |  PARAMETERS
  |      p_batch_type - Input parameter identifying ALM product family
  |      x_batch_id   - Output parameter of batch id that is created by default
  |      x_batch_code - Out parameter of batch code that is created by default
  |      x_error_message - Out parameter with error message if any
  |      x_return_status - Out parameter with Success or failure status of proc
  |
  |
  *============================================================================*/

PROCEDURE create_batch(
    p_batch_type IN VARCHAR2,
    x_batch_id OUT NOCOPY      NUMBER,
    x_batch_code OUT NOCOPY    VARCHAR2,
    x_error_message OUT NOCOPY VARCHAR2,
    x_return_status OUT NOCOPY VARCHAR2)
IS
  l_validate_batch_needed  VARCHAR2(1):= 'N';
  l_current_location_type1 VARCHAR2(30);
  l_current_location_type2 VARCHAR2(30);
  l_interface_batch_id     NUMBER;
  l_load_request_id        NUMBER;
  l_source_system_code     VARCHAR2(30);
  l_api_name               VARCHAR2(300) := 'cse_bulk_import_pvt.create_batch';
BEGIN
  x_return_status := fnd_api.g_ret_sts_success;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'Entering API'||l_api_name);
  IF p_batch_type             = 'CA' THEN
    l_current_location_type1 := 'ORA_CUSTOMER';
    l_current_location_type2 := 'ORA_CUSTOMER';
    l_source_system_code     := 'CSI';
  ELSIF p_batch_type          = 'MA' THEN
    l_current_location_type1 := 'ORA_WORK_CENTER';
    l_current_location_type2 := 'ORA_UNKNOWN';
    l_source_system_code     := 'MNT';
  END IF;
  BEGIN
    SELECT 'Y'
    INTO l_validate_batch_needed
    FROM dual
    WHERE EXISTS
      (SELECT 1
      FROM cse_assets_int
      WHERE interface_status_code   = 'READY'
      AND interface_batch_id       IS NULL
      AND interface_batch_code     IS NULL
      AND current_location_context IN ( l_current_location_type1,l_current_location_type2)
      );
  EXCEPTION
  WHEN NO_DATA_FOUND THEN
    l_validate_batch_needed:=NULL;
  END;
  IF l_validate_batch_needed = 'Y' THEN
    l_interface_batch_id    := CSE_INT_S.NEXTVAL;
    l_load_request_id       := CSE_INT_S.NEXTVAL;
    x_batch_id              := l_interface_batch_id;
    x_batch_code            := SUBSTR(p_batch_type||l_interface_batch_id,1,30);
    INSERT
    INTO cse_int_batches_b
      (
        interface_batch_id ,
        object_version_number ,
        interface_batch_code ,
        interface_batch_status ,
        source_system_type ,
        source_system_code ,
        internal_batch_type ,
        created_by ,
        creation_date ,
        last_updated_by ,
        last_update_date ,
        last_update_login ,
        load_request_id ,
        request_id ,
        job_definition_name ,
        job_definition_package
      )
      VALUES
      (
        l_interface_batch_id ,
        1 ,
        x_batch_code ,
        'READY' ,
        'ORA_INTERNAL' ,
        l_source_system_code ,
        p_batch_type ,
        fnd_global.who_user_name ,
        sysdate ,
        fnd_global.who_user_name ,
        sysdate ,
        fnd_global.user_guid ,
        l_load_request_id ,
        fnd_job.REQUEST_ID ,
        fnd_job.JOB_DEFINITION_NAME ,
        fnd_job.JOB_PACKAGE_NAME
      );
    INSERT
    INTO cse_int_batches_tl
      (
        interface_batch_id ,
        language ,
        object_version_number ,
        source_lang ,
        interface_batch_name ,
        interface_batch_description ,
        load_request_id ,
        created_by ,
        creation_date ,
        last_updated_by ,
        last_update_date ,
        last_update_login
      )
      VALUES
      (
        l_interface_batch_id ,
        USERENV('LANG') ,
        1 ,
        USERENV('LANG') ,
        x_batch_code ,
        x_batch_code ,
        l_load_request_id ,
        fnd_global.who_user_name ,
        sysdate ,
        fnd_global.who_user_name ,
        sysdate ,
        fnd_global.user_guid
      );
    UPDATE cse_assets_int
    SET interface_batch_id        = l_interface_batch_id ,
      interface_batch_code        = x_batch_code
    WHERE interface_status_code   = 'READY'
    AND interface_batch_id       IS NULL
    AND interface_batch_code     IS NULL
    AND current_location_context IN ( l_current_location_type1,l_current_location_type2);
  END IF;
EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END create_batch;

/*=============================================================================
|  PROCEDURE - partition_batch()
|
|  DESCRIPTION
|      This procedure is used to partition a batch into similar bucket size
|      for better performance.
|
|  PARAMETERS
|      p_batch_id - Input parameter of batch id that need to be processed
|      x_partition_numbers - Out parameter with table of partitions assigned
|                            to a batch
|      x_error_message - Out parameter with error message if any
|      x_return_status - Out parameter with Success or failure status of proc
|
|
*============================================================================*/

PROCEDURE partition_batch(
    px_batch_id  IN OUT NOCOPY NUMBER,
    p_batch_code IN VARCHAR2,
    x_partition_numbers OUT NOCOPY FND_TABLE_OF_NUMBER,
    x_record_count OUT NOCOPY  NUMBER,
    x_error_message OUT NOCOPY VARCHAR2,
    x_return_status OUT NOCOPY VARCHAR2)
IS
  CURSOR c_update_partList( cp_partition_number NUMBER , cp_batch_id NUMBER , cp_batch_code VARCHAR2 )
  IS
    SELECT cseai.partition_number ,
      cseai.asset_number ,
      cseai.interface_record_number ,
      cseai.interface_batch_id ,
      cseai.item_organization_code
    FROM cse_assets_int cseai
    WHERE cseai.partition_number    = cp_partition_number
    AND cseai.interface_status_code = 'READY'
    AND (cseai.interface_batch_id   = cp_batch_id
    OR cseai.interface_batch_code   = cp_batch_code);
  CURSOR c_update_actv_asset_partList( cp_partition_number NUMBER , cp_batch_id NUMBER , cp_batch_code VARCHAR2 )
  IS
    SELECT cseai.partition_number ,
      cseai.interface_record_number ,
      cseai.interface_batch_id ,
      cseai.asset_number ,
      cseai.item_organization_code ,
      (SELECT cseb.item_organization_id
      FROM cse_assets_b cseb
      WHERE cseb.asset_number=cseai.asset_number
      ) AS asset_org_id ,
    (SELECT iorgp.organization_id
    FROM inv_org_parameters iorgp
    WHERE cseai.item_organization_code=iorgp.organization_code
    ) AS organization_id
  FROM cse_assets_int cseai
  WHERE cseai.interface_status_code = 'READY'
  AND cseai.partition_number        = cp_partition_number
  AND (cseai.interface_batch_id     = cp_batch_id
  OR cseai.interface_batch_code     = cp_batch_code);
  CURSOR c_get_int_batch_type( cp_batch_id NUMBER ,cp_batch_code VARCHAR2)
  IS
    SELECT INTERNAL_BATCH_TYPE
    FROM CSE_INT_BATCHES_B cseIntBatch
    WHERE (cseIntBatch.interface_batch_id = cp_batch_id
    OR cseIntBatch.interface_batch_code   = cp_batch_code);
  /*Cursor to get the records trying perforn more than one operation on the same asset in the same batch*/
  CURSOR c_get_records_dup_asset
  IS
    SELECT interface_record_number
    FROM cse_assets_int
    WHERE (interface_batch_code                   = p_batch_code
    OR interface_batch_id                         = px_batch_id)
    AND interface_status_code                     = 'READY'
    AND NVL(RELATIONSHIP_ACTION_CODE,C_REM_REL_ACTION_CODE) = C_ADD_REL_ACTION_CODE
    AND ACTION_CODE                               = C_UPDATE_ACTION_CODE
    AND asset_number                             IN
      (SELECT asset_number
      FROM cse_assets_int
      WHERE interface_status_code = 'READY'
      AND (interface_batch_code   =p_batch_code
      OR interface_batch_id       =px_batch_id)
      GROUP BY asset_number
      HAVING COUNT(*) >1
      );
TYPE l_update_partList_tbl_type
IS
  TABLE OF c_update_partList%ROWTYPE;
TYPE l_updt_actv_partList_tbl_type
IS
  TABLE OF c_update_actv_asset_partList%ROWTYPE;
  l_update_partList_tbl l_update_partList_tbl_type;
  l_update_actv_partList_tbl l_updt_actv_partList_tbl_type;
  l_api_name          VARCHAR2(300) := 'cse_bulk_import_pvt.partition_batch';
  l_Count_records     NUMBER;
  l_Number_of_Batches NUMBER;
  l_batch_code cse_int_batches_b.interface_batch_code%TYPE := p_batch_code;
  l_int_batch_type cse_int_batches_b.internal_batch_type%TYPE;
  l_batch_id      NUMBER := px_batch_id;
  l_partition_num NUMBER;
TYPE l_dup_asset_tbl_type
IS
  TABLE OF c_get_records_dup_asset%ROWTYPE;
  l_dup_asset_tbl l_dup_asset_tbl_type;
BEGIN
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
  x_return_status := fnd_api.g_ret_sts_success;
  IF px_batch_id  IS NOT NULL AND p_batch_code IS NULL THEN
    BEGIN
      SELECT DISTINCT cseib.interface_batch_code
      INTO l_batch_code
      FROM cse_int_batches_b cseib
      WHERE cseib.interface_batch_id = px_batch_id;
    END;
  ELSIF px_batch_id IS NULL AND p_batch_code IS NOT NULL THEN
    BEGIN
      SELECT DISTINCT cseib.interface_batch_id
      INTO l_batch_id
      FROM cse_int_batches_b cseib
      WHERE cseib.interface_batch_code = p_batch_code;
    END;
  END IF;
  px_batch_id := l_batch_id ;
  SELECT COUNT(1)
  INTO l_Count_records
  FROM cse_assets_int csei
  WHERE (csei.interface_batch_id = l_batch_id
  OR csei.interface_batch_code   = l_batch_code)
  AND csei.interface_status_code = 'READY';
  x_record_count                :=l_Count_records;
  IF l_Count_records             > 0 THEN
    l_Number_of_Batches         := CEIL(l_Count_records/c_max_partition_size);
    x_partition_numbers         := FND_TABLE_OF_NUMBER();
    FOR i IN 1..l_Number_of_Batches
    LOOP
      l_partition_num := cse_int_s.nextval;
      x_partition_numbers.extend;
      x_partition_numbers(i) := l_partition_num;
      UPDATE cse_assets_int cseai
      SET partition_number     = l_partition_num,
        asset_number           = DECODE(asset_number,NULL, DECODE(action_code,C_CREATE_ACTION_CODE,TO_CHAR(cse_asset_numbers_s.nextval),asset_number),asset_number),
        last_updated_by        = fnd_global.who_user_name,
        last_update_date       = sysdate,
        last_update_login      = fnd_global.user_guid,
        job_definition_name    = fnd_job.job_definition_name,
        job_definition_package = fnd_job.job_package_name,
        interface_batch_id     = l_batch_id
      WHERE ROWNUM BETWEEN 1 AND c_max_partition_size
      AND cseai.partition_number     IS NULL
      AND cseai.interface_status_code = 'READY'
      AND (cseai.interface_batch_id   = l_batch_id
      OR cseai.interface_batch_code   = l_batch_code);
      /*Creating a new partition for records trying to perform more than one operation on the same asset
      */
      OPEN c_get_records_dup_asset;
      LOOP
        FETCH c_get_records_dup_asset BULK COLLECT
        INTO l_dup_asset_tbl LIMIT c_max_buffer_size ;
        EXIT
      WHEN l_dup_asset_tbl.count = 0;
        l_partition_num         := cse_int_s.nextval;
        x_partition_numbers.extend;
        x_partition_numbers(i+1) := l_partition_num;
        FORALL j IN l_dup_asset_tbl.FIRST..l_dup_asset_tbl.LAST
        UPDATE cse_assets_int cseai
        SET partition_number          = l_partition_num,
          asset_number                = DECODE(asset_number,NULL, DECODE(action_code,C_CREATE_ACTION_CODE,TO_CHAR(cse_asset_numbers_s.nextval),asset_number),asset_number),
          last_updated_by             = fnd_global.who_user_name,
          last_update_date            = sysdate,
          last_update_login           = fnd_global.user_guid,
          job_definition_name         = fnd_job.job_definition_name,
          job_definition_package      = fnd_job.job_package_name,
          interface_batch_id          = l_batch_id
        WHERE interface_record_number = l_dup_asset_tbl(j).interface_record_number;
      END LOOP;
      CLOSE c_get_records_dup_asset;
      -- bachandr: Check if the asset is Maintenance Asset or Customer Asset and update corresponding table.
      OPEN c_get_int_batch_type(l_batch_id,l_batch_code);
      FETCH c_get_int_batch_type INTO l_int_batch_type;
      CLOSE c_get_int_batch_type;
      FOR j IN x_partition_numbers.FIRST..x_partition_numbers.LAST
      LOOP
        IF l_int_batch_type IS NOT NULL AND l_int_batch_type = 'MA' THEN
          OPEN c_update_actv_asset_partList(x_partition_numbers(j),l_batch_id,l_batch_code);
          FETCH c_update_actv_asset_partList BULK COLLECT
          INTO l_update_actv_partList_tbl;
          CLOSE c_update_actv_asset_partList;
          FORALL i IN l_update_actv_partList_tbl.FIRST..l_update_actv_partList_tbl.LAST
          UPDATE cse_parts_list_components_int cseparti
          SET partition_number                   = l_update_actv_partList_tbl(i).partition_number,
            item_organization_code               = l_update_actv_partList_tbl(i).item_organization_code,
            asset_number                         = l_update_actv_partList_tbl(i).asset_number,
            interface_batch_id                   = l_update_actv_partList_tbl(i).interface_batch_id,
            item_organization_id                 = NVL(l_update_actv_partList_tbl(i).asset_org_id,l_update_actv_partList_tbl(i).organization_id)
          WHERE cseparti.interface_record_number = l_update_actv_partList_tbl(i).interface_record_number
          AND cseparti.interface_status_code     = 'READY'
          AND (cseparti.interface_batch_id       = l_batch_id
          OR cseparti.interface_batch_code       = l_batch_code);
        ELSIF l_int_batch_type                  IS NOT NULL AND l_int_batch_type = 'CA' THEN
          OPEN c_update_partList(x_partition_numbers(j),l_batch_id,l_batch_code);
          FETCH c_update_partList BULK COLLECT INTO l_update_partList_tbl;
          CLOSE c_update_partList;
          FORALL i IN l_update_partList_tbl.FIRST..l_update_partList_tbl.LAST
          UPDATE CSE_ASSET_CHARGES_INT cseAssetCharges
          SET partition_number                          = l_update_partList_tbl(i).partition_number,
            interface_batch_id                          = l_update_partList_tbl(i).interface_batch_id
          WHERE cseAssetCharges.interface_record_number = l_update_partList_tbl(i).interface_record_number
          AND cseAssetCharges.interface_status_code     = 'READY'
          AND (cseAssetCharges.interface_batch_id       = l_batch_id
          OR cseAssetCharges.interface_batch_code       = l_batch_code);
        END IF;
      END LOOP;
    END LOOP;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');
EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  IF c_get_int_batch_type%ISOPEN THEN
    CLOSE c_update_partList;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END partition_batch;

/*=============================================================================
|  Local procedure for logging validation errors related to
|  Customer Asset Interface records.
=============================================================================*/

PROCEDURE log_validation_error(
    p_interface_rowid_tbl  IN cse_int_utils_pvt.interface_row_id_type,
    p_batch_id             IN NUMBER,
    p_partition_number     IN NUMBER,
    p_table_name           IN VARCHAR2,
    p_column_name          IN VARCHAR2,
    p_program_name         IN VARCHAR2,
    p_message_severity     IN VARCHAR2,
    p_message_name         IN VARCHAR2,
    p_message_token_names  IN VARCHAR2,
    p_message_token_values IN VARCHAR2,
    x_error_message OUT NOCOPY VARCHAR2,
    x_return_status OUT NOCOPY VARCHAR2 )
IS
  CURSOR c_get_asset_int_dtls( c_interface_row_id NUMBER)
  IS
    SELECT request_id,
      job_definition_name,
      job_definition_package
    FROM CSE_ASSETS_INT
    WHERE interface_row_id = c_interface_row_id;
  CURSOR c_get_asset_chg_int_dtls( c_interface_row_id NUMBER)
  IS
    SELECT request_id,
      job_definition_name,
      job_definition_package
    FROM CSE_ASSET_CHARGES_INT
    WHERE interface_row_id = c_interface_row_id;
  l_int_errors_tbl cse_int_utils_pvt.int_errors_tbl_type;
  l_row_count             NUMBER := 0;
  l_request_id            NUMBER;
  l_job_definition_name   VARCHAR2(100);
  l_job_defintion_package VARCHAR2(900);
  l_api_name              VARCHAR2(300) := 'cse_bulk_import_pvt.log_validation_error';
  l_message_text          VARCHAR2(2000);
BEGIN
  FOR i IN 1 .. p_interface_rowid_tbl.COUNT
  LOOP
    l_message_text := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(p_message_name,1,3), p_msg_name => p_message_name, p_token_name => p_message_token_names, p_token_value => p_message_token_values );
    --Collect interface row details required for logging the error.
    IF p_table_name = C_ASSETS_INT_TBL_NAME THEN
      OPEN c_get_asset_int_dtls(p_interface_rowid_tbl(i));
      FETCH c_get_asset_int_dtls
      INTO l_request_id,
        l_job_definition_name,
        l_job_defintion_package;
      CLOSE c_get_asset_int_dtls;
    ELSIF p_table_name = C_ASSET_CHGS_TBL_NAME THEN
      OPEN c_get_asset_chg_int_dtls(p_interface_rowid_tbl(i));
      FETCH c_get_asset_chg_int_dtls
      INTO l_request_id,
        l_job_definition_name,
        l_job_defintion_package;
      CLOSE c_get_asset_chg_int_dtls;
    END IF;
    CSE_INT_UTILS_PVT.log_messages( fnd_log.level_severe, l_api_name, 'Interface_row_id= '||p_interface_rowid_tbl(i)||' - '||l_message_text );
    l_row_count                                         := l_row_count + 1;
    l_int_errors_tbl(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
    l_int_errors_tbl(l_row_count).object_version_number := 1;
    l_int_errors_tbl(l_row_count).interface_row_id      := p_interface_rowid_tbl(i);
    l_int_errors_tbl(l_row_count).interface_batch_id    := p_batch_id;
    l_int_errors_tbl(l_row_count).error_text            := l_message_text;
    l_int_errors_tbl(l_row_count).error_language        := userenv('LANG');
    l_int_errors_tbl(l_row_count).table_name            := p_table_name;
    l_int_errors_tbl(l_row_count).column_name           := p_column_name;
    l_int_errors_tbl(l_row_count).message_name          := p_message_name;
    l_int_errors_tbl(l_row_count).message_token_names   := p_message_token_names;
    l_int_errors_tbl(l_row_count).message_token_values  := p_message_token_values;
    l_int_errors_tbl(l_row_count).program_name          := p_program_name;
    l_int_errors_tbl(l_row_count).message_severity      := C_SEVERITY_ERROR;
    l_int_errors_tbl(l_row_count).created_by            := fnd_global.who_user_name;
    l_int_errors_tbl(l_row_count).creation_date         := sysdate;
    l_int_errors_tbl(l_row_count).last_updated_by       := fnd_global.who_user_name;
    l_int_errors_tbl(l_row_count).last_update_date      := sysdate;
    l_int_errors_tbl(l_row_count).last_update_login     := fnd_global.user_guid;
    l_int_errors_tbl(l_row_count).request_id            := l_request_id;
    l_int_errors_tbl(l_row_count).job_definition_name   := l_job_definition_name;
    l_int_errors_tbl(l_row_count).job_definition_package:= l_job_defintion_package;
  END LOOP;
  CSE_INT_UTILS_PVT.log_errors( p_int_errors_tbl => l_int_errors_tbl, x_return_status => x_return_status , x_error_msg => x_error_message );
  -- update the interface table and set the record status to error
  IF p_table_name = C_ASSETS_INT_TBL_NAME THEN
    FORALL i IN 1 .. p_interface_rowid_tbl.COUNT
    UPDATE cse_assets_int assetInt
    SET assetInt.interface_status_code = C_INT_ERROR
    WHERE assetInt.interface_batch_id  = p_batch_id
    AND assetInt.partition_number      = p_partition_number
    AND assetInt.interface_row_id      = p_interface_rowid_tbl(i);
  ELSIF p_table_name                   = C_ASSET_CHGS_TBL_NAME THEN
    FORALL i IN 1 .. p_interface_rowid_tbl.COUNT
    UPDATE cse_asset_charges_int assetChgInt
    SET assetChgInt.interface_status_code = C_INT_ERROR
    WHERE assetChgInt.interface_batch_id  = p_batch_id
    AND assetChgInt.partition_number      = p_partition_number
    AND assetChgInt.interface_row_id      = p_interface_rowid_tbl(i);
  END IF;
  -- A validation error has occured. Set return status to error.
  x_return_status := fnd_api.g_ret_sts_error;
EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END log_validation_error;

/*=============================================================================
|  PROCEDURE - get_batch_codes
|
|  DESCRIPTION
|       Collects the batch ids to be processed if batch code is passed as null
|
|  PARAMETERS
|       x_batch_id - Batch Code Collection output to be processed
|       p_batch_code- Input Batch Code
/*=============================================================================*/

PROCEDURE get_batch_codes(
    p_batch_code IN VARCHAR2,
    x_batch_codes OUT NOCOPY FND_TABLE_OF_VARCHAR2_120)
IS
BEGIN
  IF p_batch_code IS NULL THEN
    SELECT DISTINCT interface_batch_code BULK COLLECT
    INTO x_batch_codes
    FROM cse_int_batches_b
    WHERE interface_batch_status='READY';
  ELSE
    x_batch_codes:=FND_TABLE_OF_VARCHAR2_120();
    x_batch_codes.EXTEND;
    x_batch_codes(x_batch_codes.COUNT):= p_batch_code;
  END IF;
END get_batch_codes;

/*=============================================================================
|  PROCEDURE - validate_custAsset_mand_attr
|
|  DESCRIPTION
|      Validates the mandatory customer attributes
|
|  PARAMETERS
|      p_batch_id - Input parameter of batch id that need to be processed
|      x_partition_numbers - Out parameter with table of partitions assigned
|                            to a batch
|      x_error_message - Out parameter with error message if any
|      x_return_status - Out parameter with Success or failure status of proc
|
*============================================================================*/

PROCEDURE validate_custAsset_mand_attr(
    p_batch_id         IN NUMBER,
    p_partition_number IN NUMBER,
    x_error_message OUT NOCOPY VARCHAR2,
    x_return_status OUT NOCOPY VARCHAR2)
IS
  /********************************************
  -- Define mandatory validation cursors
  *********************************************/
  -- Cursor for validating Asset Organization
  CURSOR c_org_mandatory_cur
  IS
    SELECT assetInt.interface_row_id
    FROM CSE_ASSETS_INT assetInt
    WHERE assetInt.partition_number       = p_partition_number
    AND assetInt.interface_batch_id       = p_batch_id
    AND assetInt.interface_status_code    = C_INT_READY
    AND assetInt.action_code              = C_CREATE_ACTION_CODE
    AND (assetInt.item_organization_code IS NULL
    OR assetInt.item_organization_code    = FND_API.G_NULL_CHAR);
  -- Cursor for validating Asset item
  CURSOR c_asset_item_mand_cur
  IS
    SELECT assetInt.interface_row_id
    FROM CSE_ASSETS_INT assetInt
    WHERE assetInt.partition_number    = p_partition_number
    AND assetInt.interface_batch_id    = p_batch_id
    AND assetInt.interface_status_code = C_INT_READY
    AND assetInt.action_code           = C_CREATE_ACTION_CODE
    AND (assetInt.item_number         IS NULL
    OR assetInt.item_number            = FND_API.G_NULL_CHAR);
  -- Cursor for mandatory customer attribute check
  CURSOR c_customer_mand_cur
  IS
    SELECT assetInt.interface_row_id
    FROM CSE_ASSETS_INT assetInt
    WHERE assetInt.partition_number    = p_partition_number
    AND assetInt.interface_batch_id    = p_batch_id
    AND assetInt.interface_status_code = C_INT_READY
    AND assetInt.action_code           = (C_CREATE_ACTION_CODE)
    AND (assetInt.customer_number     IS NULL
    OR assetInt.customer_number        = FND_API.G_NULL_CHAR)
    AND (assetInt.customer_name       IS NULL
    OR assetInt.customer_name          = FND_API.G_NULL_CHAR);
  -- Cursor for mandatory interface_record_number check
  CURSOR c_import_mand_cur
  IS
    SELECT assetInt.interface_row_id
    FROM CSE_ASSETS_INT assetInt
    WHERE assetInt.partition_number        = p_partition_number
    AND assetInt.interface_batch_id        = p_batch_id
    AND assetInt.interface_status_code     = C_INT_READY
    AND assetInt.action_code              IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
    AND (assetInt.interface_record_number IS NULL
    OR assetInt.interface_record_number    = FND_API.G_NULL_CHAR);
  ---Cursor for mandatory UOM_CODE check
  CURSOR c_uom_mand_cur
  IS
    SELECT assetInt.interface_row_id
    FROM CSE_ASSETS_INT assetInt
    WHERE assetInt.partition_number    = p_partition_number
    AND assetInt.interface_batch_id    = p_batch_id
    AND assetInt.interface_status_code = C_INT_READY
    AND assetInt.action_code           = C_CREATE_ACTION_CODE
    AND (assetInt.uom_code            IS NULL
    OR assetInt.uom_code               = FND_API.G_NULL_CHAR);
  --- Cursor for identifying missing asset_number for update cases
  CURSOR c_missing_asset_num_cur
  IS
    SELECT assetInt.interface_row_id
    FROM CSE_ASSETS_INT assetInt
    WHERE assetInt.partition_number    = p_partition_number
    AND assetInt.interface_batch_id    = p_batch_id
    AND assetInt.interface_status_code = C_INT_READY
    AND assetInt.action_code           = C_UPDATE_ACTION_CODE
    AND (assetInt.asset_number        IS NULL
    OR assetInt.asset_number           = FND_API.G_NULL_CHAR);
  --- Cursor for identifying invalid asset_number for update cases
  CURSOR c_invalid_asset_num_cur
  IS
    SELECT assetInt.interface_row_id
    FROM CSE_ASSETS_INT assetInt
    WHERE assetInt.partition_number    = p_partition_number
    AND assetInt.interface_batch_id    = p_batch_id
    AND assetInt.interface_status_code = C_INT_READY
    AND assetInt.action_code           = C_UPDATE_ACTION_CODE
    AND assetInt.asset_number         IS NOT NULL
    AND assetInt.asset_number         <> FND_API.G_NULL_CHAR
    AND NOT EXISTS
      (SELECT 1
      FROM CSE_ASSETS_B assetB
      WHERE assetB.asset_number = assetInt.asset_number
      );
  l_interfaceTbl cse_int_utils_pvt.interface_row_id_type;
  l_api_name VARCHAR2(300) := 'cse_bulk_import_pvt.validate_custAsset_mand_attr';
BEGIN
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
  -- Cursor to check mandatory Asset organization attribute
  OPEN c_org_mandatory_cur;
  LOOP
    FETCH c_org_mandatory_cur BULK COLLECT
    INTO l_interfaceTbl LIMIT c_max_partition_size;
    EXIT
  WHEN l_interfaceTbl.COUNT = 0;
    log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ITEM_ORGANIZATION_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_NO_ORG', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'ITEM_ORGANIZATION_CODE', x_error_message => x_error_message, x_return_status => x_return_status );
  END LOOP;
  l_interfaceTbl.DELETE;
  CLOSE c_org_mandatory_cur;
  -- Cursor to validate mandatory Asset Item attribute
  OPEN c_asset_item_mand_cur;
  LOOP
    FETCH c_asset_item_mand_cur BULK COLLECT
    INTO l_interfaceTbl LIMIT c_max_partition_size;
    EXIT
  WHEN l_interfaceTbl.COUNT = 0;
    log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ITEM_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_NO_PRODUCT', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'ITEM_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
  END LOOP;
  l_interfaceTbl.DELETE;
  CLOSE c_asset_item_mand_cur;
  -- Cuser to check mandatory customer attribute.
  OPEN c_customer_mand_cur;
  LOOP
    FETCH c_customer_mand_cur BULK COLLECT
    INTO l_interfaceTbl LIMIT c_max_partition_size;
    EXIT
  WHEN l_interfaceTbl.COUNT = 0;
    log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'CUSTOMER_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_REQ_ATTRIB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CUSTOMER_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
  END LOOP;
  l_interfaceTbl.DELETE;
  CLOSE c_customer_mand_cur;
  -- Cuser to check mandatory customer attribute.
  OPEN c_import_mand_cur;
  LOOP
    FETCH c_import_mand_cur BULK COLLECT
    INTO l_interfaceTbl LIMIT c_max_partition_size;
    EXIT
  WHEN l_interfaceTbl.COUNT = 0;
    log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'INTERFACE_RECORD_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_REQ_ATTRIB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'INTERFACE_RECORD_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
  END LOOP;
  l_interfaceTbl.DELETE;
  CLOSE c_import_mand_cur;
  -- Cursor to check missing asset_number for update case
  OPEN c_missing_asset_num_cur;
  LOOP
    FETCH c_missing_asset_num_cur BULK COLLECT
    INTO l_interfaceTbl LIMIT c_max_partition_size;
    EXIT
  WHEN l_interfaceTbl.COUNT = 0;
    log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ASSET_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_REQ_ATTRIB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'ASSET_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
  END LOOP;
  l_interfaceTbl.DELETE;
  CLOSE c_missing_asset_num_cur;
  -- Cursor to check invalid asset_number for update case
  OPEN c_invalid_asset_num_cur;
  LOOP
    FETCH c_invalid_asset_num_cur BULK COLLECT
    INTO l_interfaceTbl LIMIT c_max_partition_size;
    EXIT
  WHEN l_interfaceTbl.COUNT = 0;
    log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ASSET_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'ASSET_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
  END LOOP;
  l_interfaceTbl.DELETE;
  CLOSE c_invalid_asset_num_cur;
  --Cursor to check mandatory UOM_CODE attribute
  OPEN c_uom_mand_cur;
  LOOP
    FETCH c_uom_mand_cur BULK COLLECT
    INTO l_interfaceTbl LIMIT c_max_partition_size;
    EXIT
  WHEN l_interfaceTbl.COUNT = 0;
    log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'UOM_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_REQ_ATTRIB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'UOM_CODE', x_error_message => x_error_message, x_return_status => x_return_status );
  END LOOP;
  l_interfaceTbl.DELETE;
  CLOSE c_uom_mand_cur;
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');
EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  IF (c_org_mandatory_cur%isopen) THEN
    CLOSE c_org_mandatory_cur;
  END IF;
  IF (c_asset_item_mand_cur%isopen) THEN
    CLOSE c_asset_item_mand_cur;
  END IF;
  IF (c_customer_mand_cur%isopen) THEN
    CLOSE c_customer_mand_cur;
  END IF;
  IF (c_import_mand_cur%isopen) THEN
    CLOSE c_import_mand_cur;
  END IF;
  IF (c_uom_mand_cur%isopen) THEN
    CLOSE c_uom_mand_cur;
  END IF;
  IF (c_missing_asset_num_cur%isopen) THEN
    CLOSE c_missing_asset_num_cur;
  END IF;
  IF (c_invalid_asset_num_cur%isopen) THEN
    CLOSE c_invalid_asset_num_cur;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END validate_custAsset_mand_attr;

/*=============================================================================
|
|  DESCRIPTION
|      Convert customer asset record value attributes to equivalent ids
|
|  PARAMETERS
|      Returns x_errbuf and Status code x_retcode back to calling API
|
*===========================================================================*/

PROCEDURE convert_custAsset_value_to_id(
    p_batch_id         IN NUMBER,
    p_partition_number IN NUMBER,
    x_error_message OUT NOCOPY VARCHAR2,
    x_return_status OUT NOCOPY VARCHAR2 )
IS
  -- Retrieve all asset interface records that are in READY status to be processed
  CURSOR c_get_asset_int_rec
  IS
    SELECT assetInt.INTERFACE_ROW_ID,
      assetInt.INTERFACE_STATUS_CODE,
      DECODE(assetInt.ACTION_CODE,C_UPDATE_ACTION_CODE,
      (SELECT assetb.asset_id
      FROM cse_assets_b assetb
      WHERE assetb.asset_number = assetInt.asset_number
      AND ROWNUM                = 1
      ),assetInt.asset_id) asset_id,
      (SELECT assetB.asset_id
      FROM CSE_ASSETS_B assetB
      WHERE assetB.asset_number = assetInt.parent_asset_number
      AND ROWNUM                = 1
      ) parent_asset_id,
      (SELECT assetInt2.interface_row_id
      FROM CSE_ASSETS_INT assetInt2
      WHERE assetInt2.interface_record_number = assetInt.parent_int_record_number
      AND assetInt2.interface_batch_id        = p_batch_id
      AND ROWNUM                              = 1
      ) parent_int_record_id,
      assetInt.ITEM_ID,
      assetInt.ITEM_NUMBER ,
      assetInt.SERIAL_NUMBER ,
      assetInt.LOT_NUMBER,
      assetInt.QUANTITY,
      assetInt.ITEM_ORGANIZATION_ID ,
      assetInt.ITEM_ORGANIZATION_CODE ,
      assetInt.CURRENT_LOCATION_CONTEXT ,
      assetInt.CURRENT_LOCATION_ID ,
      assetInt.SALES_ORDER_ID ,
      assetInt.SALES_ORDER_NUMBER ,
      assetInt.SALES_ORDER_LINE_ID ,
      assetInt.SALES_ORDER_LINE_NUMBER ,
      assetInt.CUSTOMER_ID ,
      assetInt.CUSTOMER_SITE_ID ,
      assetInt.NEW_WO_ALLOWED_FLAG ,
      assetInt.active_end_date,
      DECODE(assetInt.ACTION_CODE,C_UPDATE_ACTION_CODE,
      (SELECT assetb.GEN_OBJECT_ID
      FROM cse_assets_b assetb
      WHERE assetb.asset_number = assetInt.asset_number
      AND ROWNUM                = 1
      ),assetInt.GEN_OBJECT_ID) GEN_OBJECT_ID,
      assetInt.SALES_ORDER_SOURCE_SYSTEM_TYPE ,
      assetInt.SALES_ORDER_SOURCE_SYSTEM ,
      assetInt.CUSTOMER_NUMBER ,
      assetInt.CUSTOMER_NAME ,
      assetInt.CUSTOMER_SITE_PARTY_NUMBER ,
      assetInt.CUSTOMER_SITE_PARTY_NAME ,
      assetInt.CUSTOMER_SITE_PARTY_ID ,
      assetInt.CUSTOMER_SITE_NUMBER ,
      assetInt.CUSTOMER_SITE_NAME ,
      assetInt.CUSTOMER_ACCOUNT_NUMBER ,
      assetInt.CUSTOMER_ACCOUNT_NAME ,
      assetInt.CUSTOMER_ACCOUNT_ID ,
      assetInt.CUSTOMER_ACCOUNT_SITE_NUMBER ,
      assetInt.CUSTOMER_ACCOUNT_SITE_NAME ,
      assetInt.CUSTOMER_ACCOUNT_SITE_ID ,
      assetInt.CUSTOMER_ACCOUNT_SITE_USE_CODE ,
      assetInt.CUSTOMER_ACCOUNT_SITE_USE_ID,
      assetInt.SOLD_BY_BUSINESS_UNIT_NAME,
      assetInt.SOLD_BY_BUSINESS_UNIT_ID
    FROM cse_assets_int assetInt
    WHERE assetInt.partition_number   = p_partition_number
    AND assetInt.interface_batch_id   = p_batch_id
    AND assetInt.interface_status_code= C_INT_READY;
    -- Convert organization code into organization id
    CURSOR c_convert_org_code(c_org_code VARCHAR2)
    IS
      SELECT orgs.organization_id
      FROM inv_org_parameters orgs
      WHERE orgs.organization_code = c_org_code;
    -- Convert item number
    CURSOR c_convert_item_number(c_item_number VARCHAR2, c_item_organization_id NUMBER)
    IS
      SELECT esib.inventory_item_id
      FROM EGP_SYSTEM_ITEMS_B esib
      WHERE esib.item_number   = c_item_number
      AND esib.organization_id = c_item_organization_id;
    -- Convert customer name
    CURSOR c_convert_customer(c_customer_number VARCHAR2, c_customer_name VARCHAR2)
    IS
      SELECT cust.party_id
      FROM hz_parties cust
      WHERE (cust.party_number = c_customer_number
      OR cust.party_name       = c_customer_name);
    -- Convert customer site party
    CURSOR c_convert_custSiteParty(c_customer_site_party_number VARCHAR2, c_customer_site_party_name VARCHAR2)
    IS
      SELECT custSiteParty.party_id
      FROM hz_parties custSiteParty
      WHERE (custSiteParty.party_number = c_customer_site_party_number
      OR custSiteParty.party_name       = c_customer_site_party_name);
    -- Convert customer site
    CURSOR c_convert_customerSite(c_customer_site_number VARCHAR2, c_customer_site_name VARCHAR2)
    IS
      SELECT custSite.party_site_id
      FROM hz_party_sites custSite
      WHERE (custSite.party_site_number = c_customer_site_number
      OR custSite.party_site_name       = c_customer_site_name);
    -- Convert customer Account
    CURSOR c_convert_custAccount(c_customer_account_number VARCHAR2, c_customer_account_name VARCHAR2)
    IS
      SELECT custAcc.cust_account_id
      FROM hz_cust_accounts custAcc
      WHERE (custAcc.account_number = c_customer_account_number
      OR custAcc.account_name       = c_customer_account_name);
    -- Convert customer Account Site
    CURSOR c_convert_CustAccSite(c_customer_account_id NUMBER, c_customer_account_site_number VARCHAR2, c_customer_account_site_name VARCHAR2)
    IS
      SELECT cust_acct_site_id
      FROM hz_cust_acct_sites_all hcas,
        hz_party_sites hps
      WHERE (hps.party_site_number = c_customer_account_site_number
      OR hps.party_site_name       = c_customer_account_site_name)
      AND hcas.party_site_id       = hps.party_site_id
      AND hcas.cust_account_id     = c_customer_account_id;
    -- Convert customer Account Site Use Code.
    CURSOR c_convert_custSiteUseId(c_cust_acct_site_id NUMBER, c_cust_acc_site_use_code VARCHAR2)
    IS
      SELECT custSite.site_use_id customer_account_site_use_id
      FROM hz_cust_site_uses_all custSite
      WHERE custSite.cust_acct_site_id = c_cust_acct_site_id
      AND custSite.site_use_code       = c_cust_acc_site_use_code;
    --Convert Sold By Business Unit Name ---
    CURSOR c_convert_sold_by_bu_name(c_sold_by_bu VARCHAR2)
    IS
      SELECT bu_id
      FROM fun_all_business_units_v fabu
      WHERE fabu.bu_name=c_sold_by_bu;
    -- Get serial control code of the item
    CURSOR c_get_serial_control_code(c_item_id NUMBER, c_org_id NUMBER)
    IS
      SELECT serial_number_control_code
      FROM EGP_SYSTEM_ITEMS_B esib
      WHERE esib.inventory_item_id = c_item_id
      AND esib.organization_id     = c_org_id;
    ------Get Asset Tracked flag of the item -------
    CURSOR c_get_asset_tracked_flag(c_item_id NUMBER,c_org_id VARCHAR2)
    IS
      (SELECT ASSET_TRACKED_FLAG
      FROM EGP_SYSTEM_ITEMS_B esib
      WHERE esib.inventory_item_id = c_item_id
      AND esib.organization_id     = c_org_id
      ) ;
    ------Get Item Tracked flag of the item -------
    CURSOR c_get_inv_item_flag(c_item_id NUMBER,c_org_id VARCHAR2)
    IS
      (SELECT INVENTORY_ITEM_FLAG
      FROM EGP_SYSTEM_ITEMS_B esib
      WHERE esib.inventory_item_id = c_item_id
      AND esib.organization_id     = c_org_id
      ) ;
    /* Cursor to get the item structure type of an  item*/
    CURSOR c_get_item_structure_type(c_item_id NUMBER,c_org_id VARCHAR2)
    IS
      (SELECT BOM_ITEM_TYPE
      FROM EGP_SYSTEM_ITEMS_B esib
      WHERE esib.inventory_item_id = c_item_id
      AND esib.organization_id     = c_org_id
      ) ;
    --declare all local variables here.
    l_serial_control_code VARCHAR2(30);
    l_issue_receipt       VARCHAR2(1);
    l_ret_msg             VARCHAR2(30);
    l_qty                 NUMBER := 1;
    l_end_serial          VARCHAR2(30);
    l_asset_tracked_flag  VARCHAR2(1 CHAR);
    l_inv_item_flg        VARCHAR2(1 CHAR);
    l_item_struc_type     NUMBER;
  TYPE l_assets_int_tbl_type
IS
  TABLE OF c_get_asset_int_rec%ROWTYPE;
  l_assets_int_tbl l_assets_int_tbl_type;
  l_api_name VARCHAR2(300) := 'cse_bulk_import_pvt.convert_custAsset_value_to_id';
BEGIN
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
  OPEN c_get_asset_int_rec;
  FETCH c_get_asset_int_rec BULK COLLECT INTO l_assets_int_tbl;
  CLOSE c_get_asset_int_rec;
  FOR i IN l_assets_int_tbl.FIRST..l_assets_int_tbl.LAST
  LOOP
    IF (l_assets_int_tbl(i).ITEM_ORGANIZATION_CODE IS NOT NULL) THEN
      OPEN c_convert_org_code(l_assets_int_tbl(i).ITEM_ORGANIZATION_CODE);
      FETCH c_convert_org_code INTO l_assets_int_tbl(i).ITEM_ORGANIZATION_ID;
      CLOSE c_convert_org_code;
    ELSE
      /* This is used to fetch the item_org_id for the assets being updated where this value is not passed by the user while upadte*/
      SELECT item_organization_id
      INTO l_assets_int_tbl(i).ITEM_ORGANIZATION_ID
      FROM cse_assets_b
      WHERE asset_id=l_assets_int_tbl(i).asset_id;
    END IF;
    IF (l_assets_int_tbl(i).ITEM_NUMBER IS NOT NULL) THEN
      OPEN c_convert_item_number(l_assets_int_tbl(i).ITEM_NUMBER, l_assets_int_tbl(i).ITEM_ORGANIZATION_ID);
      FETCH c_convert_item_number INTO l_assets_int_tbl(i).ITEM_ID;
      CLOSE c_convert_item_number;
    ELSE
      /* This is used to fetch the item_id for the assets being updated where this value is not passed by the user while update*/
      SELECT item_id
      INTO l_assets_int_tbl(i).ITEM_ID
      FROM cse_assets_b
      WHERE asset_id=l_assets_int_tbl(i).asset_id;
    END IF;
    -- Check serial control code and generate serial number accordingly
    IF( l_assets_int_tbl(i).ITEM_ID IS NOT NULL AND l_assets_int_tbl(i).ITEM_ORGANIZATION_ID IS NOT NULL) THEN
      OPEN c_get_serial_control_code(l_assets_int_tbl(i).item_id, l_assets_int_tbl(i).item_organization_id);
      FETCH c_get_serial_control_code INTO l_serial_control_code;
      CLOSE c_get_serial_control_code;
      IF (l_serial_control_code      = 5 OR l_serial_control_code = 6) THEN
        IF (l_serial_control_code    = 5) THEN
          l_issue_receipt           := 'R';
        ELSIF (l_serial_control_code = 6) THEN
          l_issue_receipt           := 'I';
        END IF;
        /*
        l_inv_return = inv_tm_ser_mgr.validate_serial_numbers(
        p_org_id             => l_assets_int_tbl(i).item_organization_id ,
        p_item_id            => l_assets_int_tbl(i).item_id ,
        p_qty                => l_qty ,
        p_revision           => NULL ,
        p_lotnum             => NULL ,
        p_start_ser          => l_assets_int_tbl(i).serial_number ,
        p_trx_src_type_id    => NULL ,
        p_trx_action_id      => NULL ,
        p_sub_inventory      => NULL ,
        p_loc_id             => NULL ,
        p_wip_entity_id      => NULL ,
        p_group_mark_id      => NULL ,
        p_line_mark_id       => NULL ,
        p_issue_receipt      => l_assets_int_tbl(i).serial_number ,
        p_end_ser            => l_end_serial ,
        p_msg                => l_ret_msg ,
        p_check_grp_mark_id  => 'Y' ,
        p_rcv_validate       => NULL ,
        p_rcv_source_line_id => NULL ,
        p_xfr_org_id         => NULL ,
        p_insert_YN          => 'Y'
        );
        IF(l_inv_return != 0)
        --LOG error here.
        END IF;*/
      END IF;
    END IF;
    ---Check asset_tracked_flag of the item----
    IF(l_assets_int_tbl(i).ITEM_ID IS NOT NULL AND l_assets_int_tbl(i).ITEM_ORGANIZATION_ID IS NOT NULL) THEN
      OPEN c_get_asset_tracked_flag(l_assets_int_tbl(i).item_id, l_assets_int_tbl(i).item_organization_id);
      FETCH c_get_asset_tracked_flag INTO l_asset_tracked_flag;
      CLOSE c_get_asset_tracked_flag;
    END IF;
    IF (l_assets_int_tbl(i).CUSTOMER_NUMBER IS NOT NULL OR l_assets_int_tbl(i).CUSTOMER_NAME IS NOT NULL) THEN
      OPEN c_convert_customer(l_assets_int_tbl(i).CUSTOMER_NUMBER, l_assets_int_tbl(i).CUSTOMER_NAME);
      FETCH c_convert_customer INTO l_assets_int_tbl(i).CUSTOMER_ID;
      CLOSE c_convert_customer;
    END IF;
    IF (l_assets_int_tbl(i).CUSTOMER_SITE_PARTY_NUMBER IS NOT NULL OR l_assets_int_tbl(i).CUSTOMER_SITE_PARTY_NAME IS NOT NULL) THEN
      OPEN c_convert_custSiteParty(l_assets_int_tbl(i).CUSTOMER_SITE_PARTY_NUMBER, l_assets_int_tbl(i).CUSTOMER_SITE_PARTY_NAME);
      FETCH c_convert_custSiteParty INTO l_assets_int_tbl(i).customer_site_party_id;
      CLOSE c_convert_custSiteParty;
    END IF;
    IF (l_assets_int_tbl(i).CUSTOMER_SITE_NUMBER IS NOT NULL OR l_assets_int_tbl(i).CUSTOMER_SITE_NAME IS NOT NULL) THEN
      OPEN c_convert_customerSite(l_assets_int_tbl(i).CUSTOMER_SITE_NUMBER, l_assets_int_tbl(i).CUSTOMER_SITE_NAME);
      FETCH c_convert_customerSite INTO l_assets_int_tbl(i).customer_site_id;
      CLOSE c_convert_customerSite;
    END IF;
    IF (l_assets_int_tbl(i).CUSTOMER_ACCOUNT_NUMBER IS NOT NULL OR l_assets_int_tbl(i).CUSTOMER_ACCOUNT_NAME IS NOT NULL) THEN
      OPEN c_convert_custAccount(l_assets_int_tbl(i).CUSTOMER_ACCOUNT_NUMBER, l_assets_int_tbl(i).CUSTOMER_ACCOUNT_NAME);
      FETCH c_convert_custAccount INTO l_assets_int_tbl(i).customer_account_id;
      CLOSE c_convert_custAccount;
    END IF;
    IF (l_assets_int_tbl(i).CUSTOMER_ACCOUNT_SITE_NUMBER IS NOT NULL OR l_assets_int_tbl(i).CUSTOMER_ACCOUNT_SITE_NAME IS NOT NULL) THEN
      OPEN c_convert_CustAccSite(l_assets_int_tbl(i).customer_account_id, l_assets_int_tbl(i).CUSTOMER_ACCOUNT_SITE_NUMBER, l_assets_int_tbl(i).CUSTOMER_ACCOUNT_SITE_NAME);
      FETCH c_convert_CustAccSite INTO l_assets_int_tbl(i).customer_account_site_id;
      CLOSE c_convert_CustAccSite;
    END IF;
    IF (l_assets_int_tbl(i).CUSTOMER_ACCOUNT_SITE_USE_CODE IS NOT NULL) THEN
      OPEN c_convert_custSiteUseId(l_assets_int_tbl(i).customer_account_site_id, l_assets_int_tbl(i).CUSTOMER_ACCOUNT_SITE_USE_CODE);
      FETCH c_convert_custSiteUseId
      INTO l_assets_int_tbl(i).customer_account_site_use_id;
      CLOSE c_convert_custSiteUseId;
    END IF;
    IF (l_assets_int_tbl(i).SOLD_BY_BUSINESS_UNIT_NAME IS NOT NULL) THEN
      IF(l_assets_int_tbl(i).SOLD_BY_BUSINESS_UNIT_NAME ='#NULL') THEN
        l_assets_int_tbl(i).SOLD_BY_BUSINESS_UNIT_ID   :=NULL;
      ELSE
        OPEN c_convert_sold_by_bu_name(l_assets_int_tbl(i).SOLD_BY_BUSINESS_UNIT_NAME);
        FETCH c_convert_sold_by_bu_name
        INTO l_assets_int_tbl(i).SOLD_BY_BUSINESS_UNIT_ID;
        CLOSE c_convert_sold_by_bu_name;
      END IF;
    END IF;
    --Default the quantity of serilaized asset to 1---
    IF( l_assets_int_tbl(i).quantity IS NULL ) THEN
      OPEN c_get_serial_control_code(l_assets_int_tbl(i).item_id, l_assets_int_tbl(i).item_organization_id);
      FETCH c_get_serial_control_code INTO l_serial_control_code;
      CLOSE c_get_serial_control_code;
      OPEN c_get_inv_item_flag(l_assets_int_tbl(i).item_id, l_assets_int_tbl(i).item_organization_id);
      FETCH c_get_inv_item_flag INTO l_inv_item_flg;
      CLOSE c_get_inv_item_flag;
      IF (l_serial_control_code IN (2,5,6)) AND NVL(l_inv_item_flg,'N') <>'N' THEN
        l_assets_int_tbl(i).quantity                                    :=1;
      END IF;
    END IF;
    --Code to ignore the serial or lot number entered for intangible assets and Logical assets----
    IF(l_assets_int_tbl(i).serial_number IS NOT NULL OR l_assets_int_tbl(i).lot_number IS NOT NULL) THEN
      OPEN c_get_inv_item_flag(l_assets_int_tbl(i).item_id, l_assets_int_tbl(i).item_organization_id);
      FETCH c_get_inv_item_flag INTO l_inv_item_flg;
      CLOSE c_get_inv_item_flag;
      OPEN c_get_item_structure_type(l_assets_int_tbl(i).item_id, l_assets_int_tbl(i).item_organization_id);
      FETCH c_get_item_structure_type INTO l_item_struc_type;
      CLOSE c_get_item_structure_type;
      IF (l_inv_item_flg                   ='N' OR NVL(l_item_struc_type,0) IN(1,2)) THEN
        l_assets_int_tbl(i).serial_number := NULL;
        l_assets_int_tbl(i).lot_number    :=NULL;
      END IF;
    END IF;
    UPDATE cse_assets_int assetInt
    SET assetInt.item_organization_id      = l_assets_int_tbl(i).item_organization_id ,
      assetInt.item_id                     = l_assets_int_tbl(i).item_id ,
      assetInt.quantity                    =l_assets_int_tbl(i).quantity,
      assetInt.serial_number               =l_assets_int_tbl(i).serial_number,
      assetInt.lot_number                  =l_assets_int_tbl(i).lot_number,
      assetInt.customer_id                 = l_assets_int_tbl(i).customer_id ,
      assetInt.customer_site_party_id      = l_assets_int_tbl(i).customer_site_party_id ,
      assetInt.customer_site_id            = l_assets_int_tbl(i).customer_site_id ,
      assetInt.customer_account_id         = l_assets_int_tbl(i).customer_account_id ,
      assetInt.customer_account_site_id    = l_assets_int_tbl(i).customer_account_site_id ,
      assetInt.customer_account_site_use_id= l_assets_int_tbl(i).customer_account_site_use_id ,
      assetInt.sold_by_business_unit_id    = l_assets_int_tbl(i).sold_by_business_unit_id,
      assetInt.active_end_date             = DECODE(assetInt.action_code,C_UPDATE_ACTION_CODE,DECODE(l_assets_int_tbl(i).quantity,0,sysdate,l_assets_int_tbl(i).active_end_date),l_assets_int_tbl(i).active_end_date),
      assetInt.asset_id                    = to_number(DECODE(assetInt.action_code,C_CREATE_ACTION_CODE,DECODE(l_assets_int_tbl(i).asset_id,NULL,cse_asset_numbers_s.NEXTVAL,l_assets_int_tbl(i).asset_id) ,l_assets_int_tbl(i).asset_id)) ,
      assetInt.parent_asset_id             = to_number(l_assets_int_tbl(i).parent_asset_id),
      assetInt.parent_int_record_id        = to_number(l_assets_int_tbl(i).parent_int_record_id),
      assetInt.gen_object_id               = to_number(DECODE(assetInt.action_code,C_CREATE_ACTION_CODE,DECODE(l_assets_int_tbl(i).asset_id,NULL,cse_int_s.NEXTVAL,l_assets_int_tbl(i).gen_object_id) ,l_assets_int_tbl(i).gen_object_id)),
      assetInt.new_wo_allowed_flag         = DECODE(assetInt.action_code,C_CREATE_ACTION_CODE,'N',l_assets_int_tbl(i).new_wo_allowed_flag)
    WHERE assetInt.interface_row_id        = to_number(l_assets_int_tbl(i).interface_row_id );
  END LOOP;
  --Populate the parent_asset_id for records where parent is being created inflight
  UPDATE cse_assets_int assetInt
  SET assetInt.parent_asset_id = NVL(assetInt.parent_asset_id,
    (SELECT assetInt2.asset_id
    FROM CSE_ASSETS_INT assetInt2
    WHERE assetInt2.interface_row_id = assetInt.parent_int_record_id
    AND assetInt2.interface_batch_id = p_batch_id
    AND ROWNUM                       = 1
    ))
  WHERE assetInt.parent_asset_id        IS NULL
  AND assetInt.parent_int_record_id     IS NOT NULL
  AND assetInt.relationship_action_code IS NOT NULL
  AND assetInt.interface_batch_id        = p_batch_id;
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');
EXCEPTION
WHEN no_data_found THEN
  x_error_message := 'FND_CMN_INVALID_ATTRB_API_SERV';
  x_return_status := fnd_api.g_ret_sts_error;
  IF c_get_asset_int_rec%ISOPEN THEN
    CLOSE c_get_asset_int_rec;
  END IF;
  IF c_convert_org_code%ISOPEN THEN
    CLOSE c_convert_org_code;
  END IF;
  IF c_convert_item_number%ISOPEN THEN
    CLOSE c_convert_item_number;
  END IF;
  IF c_convert_customer%ISOPEN THEN
    CLOSE c_convert_customer;
  END IF;
  IF c_convert_custSiteParty%ISOPEN THEN
    CLOSE c_convert_custSiteParty;
  END IF;
  IF c_convert_customerSite%ISOPEN THEN
    CLOSE c_convert_customerSite;
  END IF;
  IF c_convert_custAccount%ISOPEN THEN
    CLOSE c_convert_custAccount;
  END IF;
  IF c_convert_CustAccSite%ISOPEN THEN
    CLOSE c_convert_CustAccSite;
  END IF;
  IF c_convert_custSiteUseId%ISOPEN THEN
    CLOSE c_convert_custSiteUseId;
  END IF;
  IF c_convert_sold_by_bu_name%ISOPEN THEN
    CLOSE c_convert_sold_by_bu_name;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, x_error_message);
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  IF c_get_asset_int_rec%ISOPEN THEN
    CLOSE c_get_asset_int_rec;
  END IF;
  IF c_convert_org_code%ISOPEN THEN
    CLOSE c_convert_org_code;
  END IF;
  IF c_convert_item_number%ISOPEN THEN
    CLOSE c_convert_item_number;
  END IF;
  IF c_convert_customer%ISOPEN THEN
    CLOSE c_convert_customer;
  END IF;
  IF c_convert_custSiteParty%ISOPEN THEN
    CLOSE c_convert_custSiteParty;
  END IF;
  IF c_convert_customerSite%ISOPEN THEN
    CLOSE c_convert_customerSite;
  END IF;
  IF c_convert_custAccount%ISOPEN THEN
    CLOSE c_convert_custAccount;
  END IF;
  IF c_convert_CustAccSite%ISOPEN THEN
    CLOSE c_convert_CustAccSite;
  END IF;
  IF c_convert_custSiteUseId%ISOPEN THEN
    CLOSE c_convert_custSiteUseId;
  END IF;
  IF c_convert_sold_by_bu_name%ISOPEN THEN
    CLOSE c_convert_sold_by_bu_name;
  END IF;
  IF c_get_inv_item_flag%ISOPEN THEN
    CLOSE c_get_inv_item_flag;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END convert_custAsset_value_to_id;

/*=============================================================================
|
|  DESCRIPTION
|      Procedure to perform validations common to Customer and Maintenance
|  Asset
|
|  PARAMETERS
|      Returns x_errbuf and Status code x_retcode back to calling API
|
*===========================================================================*/
PROCEDURE bulk_validate_asset(
    p_batch_id         IN NUMBER,
    p_partition_number IN NUMBER,
    x_error_message OUT NOCOPY VARCHAR2,
    x_return_status OUT NOCOPY VARCHAR2 )
IS
  -- Cursor for validating Asset item
  CURSOR c_asset_item_invalid_cur
  IS
    SELECT assetInt.interface_row_id,
      assetInt.item_number
    FROM CSE_ASSETS_INT assetInt
    WHERE assetInt.partition_number    = p_partition_number
    AND assetInt.interface_batch_id    = p_batch_id
    AND assetInt.interface_status_code = C_INT_READY
    AND assetInt.action_code           = C_CREATE_ACTION_CODE
    AND (assetInt.item_id             IS NULL
    OR (assetInt.item_id              IS NOT NULL
    AND NOT EXISTS
      (SELECT 'x'
      FROM EGP_SYSTEM_ITEMS_B esib
      WHERE esib.inventory_item_id = assetInt.item_id
      AND esib.organization_id     = assetInt.item_organization_id
      AND esib.asset_tracked_flag IN ('C','Y')
      ) ) );
    --Cursor for validating if Item is updated
    CURSOR c_asset_item_update_cur
    IS
      SELECT assetInt.interface_row_id,
        assetInt.item_number
      FROM CSE_ASSETS_INT assetInt,
        CSE_ASSETS_B cseb
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code           = C_UPDATE_ACTION_CODE
      AND (assetInt.item_id             IS NULL
        /* Item_id is checked against NULL cause the item_id is converted in convert_custasset_value method where it is decoded with the help of item_number and Org_code passed,In case only one of them is provided or if the wrong combination is provided for update, item_id will be decoded as NULL  */
      OR( assetInt.asset_id =cseb.asset_id
      AND assetInt.item_id <>cseb.item_id));
    --Cursor for validation Organization code update
    CURSOR c_asset_org_update_cur
    IS
      SELECT assetInt.interface_row_id,
        assetInt.item_organization_code
      FROM CSE_ASSETS_INT assetInt,
        CSE_ASSETS_B cseb
      WHERE assetInt.partition_number     = p_partition_number
      AND assetInt.interface_batch_id     = p_batch_id
      AND assetInt.interface_status_code  = C_INT_READY
      AND assetInt.action_code            = C_UPDATE_ACTION_CODE
      AND (assetInt.item_organization_id IS NULL
      OR(assetInt.asset_id                =cseb.asset_id
      AND assetInt.item_organization_id  <> cseb.item_organization_id));
    -- Cursor for validating UOM
    CURSOR c_uom_invalid_cur
    IS
      SELECT assetInt.interface_row_id,
        assetInt.uom_code
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code           =C_CREATE_ACTION_CODE
      AND assetInt.uom_code             IS NOT NULL
      AND NOT EXISTS
        (SELECT 'x'
        FROM INV_ITEM_UOMS_V ivom,
          INV_UOM_CLASSES_VL iuom
        WHERE ivom.UOM_CLASS        = iuom.UOM_CLASS
        AND (ivom.INVENTORY_ITEM_ID = assetInt.item_id
        AND ivom.ORGANIZATION_ID    = assetInt.item_organization_id
        AND ivom.UOM_CODE           = assetInt.uom_code)
        );
    --Cursor to validate UOM_CODE UPDATE
    CURSOR c_asset_uom_update_cur
    IS
      SELECT assetInt.interface_row_id,
        assetInt.item_organization_code
      FROM CSE_ASSETS_INT assetInt,
        CSE_ASSETS_B cseb
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code           = C_UPDATE_ACTION_CODE
      AND (assetInt.uom_code            IS NOT NULL
      AND assetInt.asset_id              =cseb.asset_id
      AND assetInt.uom_code             <>cseb.uom_code);
    -- Cursor for validating Asset no unique
    CURSOR c_asset_not_unique_cur
    IS
      SELECT assetInt.interface_row_id,
        assetInt.asset_number
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code          IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
      AND EXISTS
        (SELECT 'x'
        FROM CSE_ASSETS_B assetb
        WHERE assetb.asset_number = DECODE(assetInt.action_code, C_CREATE_ACTION_CODE, assetInt.asset_number, C_UPDATE_ACTION_CODE, assetInt.new_asset_number)
        );
    -- Cursor for validating Asset item serial no unique for create asset
    CURSOR c_itser_exists_create_cur
    IS
      SELECT assetInt.interface_row_id,
        assetInt.item_number,
        assetInt.serial_number
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code           = C_CREATE_ACTION_CODE
      AND EXISTS
        (SELECT 'x'
        FROM CSE_ASSETS_B assetb
        WHERE assetb.item_id            = assetInt.item_id
        AND assetb.item_organization_id = assetInt.item_organization_id
        AND (assetInt.serial_number    IS NOT NULL
        AND assetb.serial_number        = assetInt.serial_number)
        );
    -- Cursor for validating Asset item serial no unique for update asset
    CURSOR c_itser_exists_update_cur
    IS
      SELECT assetInt.interface_row_id,
        assetInt.item_number,
        assetInt.serial_number
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code           = C_UPDATE_ACTION_CODE
      AND EXISTS
        (SELECT 'x'
        FROM CSE_ASSETS_B assetb
        WHERE assetb.item_id            = assetInt.item_id
        AND assetb.item_organization_id = assetInt.item_organization_id
        AND (assetInt.serial_number    IS NOT NULL
        AND assetb.serial_number        = assetInt.serial_number)
        AND assetb.asset_number        <> assetInt.asset_number
        );
    -- Cursor for checking if asset is end dated and if update is being made.
    CURSOR c_is_asset_end_dated
    IS
      SELECT assetInt.interface_row_id
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code           = C_UPDATE_ACTION_CODE
      AND EXISTS
        (SELECT 'x'
        FROM CSE_ASSETS_B assetb
        WHERE assetb.asset_number                                    = assetInt.asset_number
        AND assetb.active_end_date                                  IS NOT NULL
        AND TRUNC(assetb.active_end_date)                           < TRUNC(sysdate)
        AND NVL(TRUNC(assetInt.active_end_date),TRUNC(C_NULL_DATE)) <> TRUNC(FND_API.G_NULL_DATE)
        );
    /*checks if active_end_date is passed null/not updated then it replaces it with C_NULL_DATE(05-jan-12)and then compares with the Reinstate date
    else null comparison always makes the condition false */
    -- Cursor for checking if asset is end dated and if the end_date set is valid
    CURSOR c_invalid_end_date
    IS
      SELECT assetInt.interface_row_id
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number      = p_partition_number
      AND assetInt.interface_batch_id      = p_batch_id
      AND assetInt.interface_status_code   = C_INT_READY
      AND assetInt.action_code            IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
      AND (TRUNC(assetInt.active_end_date) < TRUNC(sysdate)
      AND TRUNC(assetInt.active_end_date) <>TRUNC(FND_API.G_NULL_DATE));
    -- Cursor for checking if item is not serial controlled but serial is entered
    CURSOR c_asset_no_serial_control
    IS
      SELECT assetInt.interface_row_id
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code          IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
      AND assetInt.item_id              IS NOT NULL
      AND EXISTS
        (SELECT 'x'
        FROM EGP_SYSTEM_ITEMS_B esib
        WHERE esib.inventory_item_id             = assetInt.item_id
        AND esib.organization_id                 = assetInt.item_organization_id
        AND (assetInt.serial_number             IS NOT NULL
        AND esib.SERIAL_NUMBER_CONTROL_CODE NOT IN (2,5,6))
        );
    -- Cursor for checking if item is not lot controlled but lot is entered
    CURSOR c_asset_no_lot_control
    IS
      SELECT assetInt.interface_row_id
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code          IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
      AND assetInt.item_id              IS NOT NULL
      AND EXISTS
        (SELECT 'x'
        FROM EGP_SYSTEM_ITEMS_B esib
        WHERE esib.inventory_item_id = assetInt.item_id
        AND esib.organization_id     = assetInt.item_organization_id
        AND (assetInt.lot_number    IS NOT NULL
        AND esib.LOT_CONTROL_CODE   IS NULL)
        );
    -- Cursor for checking if the Quanity is not 1 when the item is serial controlled
    CURSOR c_serial_asset_wrong_quantity
    IS
      SELECT assetInt.interface_row_id
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code          IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
      AND assetInt.quantity             IS NOT NULL
      AND EXISTS
        (SELECT 'x'
        FROM EGP_SYSTEM_ITEMS_B esib
        WHERE esib.inventory_item_id           = assetInt.item_id
        AND esib.organization_id               = assetInt.item_organization_id
        AND (assetInt.quantity                <> 1
        AND (esib.SERIAL_NUMBER_CONTROL_CODE  IN (2,5,6)
        AND NVL(esib.INVENTORY_ITEM_FLAG,'N') <> 'N'))
        );
    --- Cursor for checking if the Quantity is less than 0 when item is not serial controlled for update---
    CURSOR c_nonserial_asset_invalid_upd
    IS
      SELECT assetInt.interface_row_id
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code           = C_UPDATE_ACTION_CODE
      AND assetInt.quantity             IS NOT NULL
      AND EXISTS
        (SELECT 'x'
        FROM EGP_SYSTEM_ITEMS_B esib
        WHERE esib.inventory_item_id               = assetInt.item_id
        AND esib.organization_id                   = assetInt.item_organization_id
        AND assetInt.quantity                      < 0
        AND (NVL(esib.SERIAL_NUMBER_CONTROL_CODE,1)=1
        OR NVL(esib.INVENTORY_ITEM_FLAG,'N')       ='N')
        );
    -------Cursor to check if quantity is less than or equal to zero for non serial assets while creation.
    CURSOR c_nonserial_asset_wrong_qty
    IS
      SELECT assetInt.interface_row_id
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code           = C_CREATE_ACTION_CODE
      AND EXISTS
        (SELECT 'x'
        FROM EGP_SYSTEM_ITEMS_B esib
        WHERE esib.inventory_item_id               = assetInt.item_id
        AND esib.organization_id                   = assetInt.item_organization_id
        AND (NVL(esib.SERIAL_NUMBER_CONTROL_CODE,1)=1
        OR NVL(esib.INVENTORY_ITEM_FLAG,'N')       ='N')
        )
    AND (( assetInt.quantity IS NOT NULL
    AND assetInt.quantity    <=0)
    OR assetInt.quantity     IS NULL);
    -- Cursor for identifying Invalid Relationship action code
    CURSOR c_invalid_structure_act_code
    IS
      SELECT assetInt.interface_row_id
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number            = p_partition_number
      AND assetInt.interface_batch_id            = p_batch_id
      AND assetInt.interface_status_code         = C_INT_READY
      AND assetInt.action_code                  IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
      AND assetInt.relationship_action_code     IS NOT NULL
      AND assetInt.relationship_action_code NOT IN (C_ADD_REL_ACTION_CODE,C_REM_REL_ACTION_CODE);
    l_interfaceTbl cse_int_utils_pvt.interface_row_id_type;
    l_api_name VARCHAR2(300) := 'cse_bulk_import_pvt.bulk_validate_asset';
  BEGIN
    cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
    -- Validate Asset Item
    FOR asset_item_rec IN c_asset_item_invalid_cur
    LOOP
      l_interfaceTbl(1) := asset_item_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ITEM_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_INVALID_ITEM', p_message_token_names => 'ITEM_NUM', p_message_token_values => asset_item_rec.item_number, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Validate UOM attribute
    FOR asset_uom_rec IN c_uom_invalid_cur
    LOOP
      l_interfaceTbl(1) := asset_uom_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'UOM_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_INVAL_UOM_CODE', p_message_token_names => 'UOM_CODE', p_message_token_values => asset_uom_rec.uom_code, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Validate if Asset no is unique
    FOR asset_unique_rec IN c_asset_not_unique_cur
    LOOP
      l_interfaceTbl(1) := asset_unique_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ASSET_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_DUPLICATE_ASSET_NUM', p_message_token_names => 'ASSET_NUM', p_message_token_values => asset_unique_rec.asset_number, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    --Cursor for chceking if item is updated
    FOR asset_item_update_rec IN c_asset_item_update_cur
    LOOP
      l_interfaceTbl(1) := asset_item_update_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ITEM_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AINTG_INVAL_ATTR_UPD', p_message_token_names => C_MESSAGE_TOKEN_NAME, p_message_token_values => 'ITEM_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    --Cursor for validating organization code updated
    FOR asset_org_update_rec IN c_asset_org_update_cur
    LOOP
      l_interfaceTbl(1) := asset_org_update_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ITEM_ORGANIZATION_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AINTG_INVAL_ATTR_UPD', p_message_token_names => C_MESSAGE_TOKEN_NAME, p_message_token_values => 'ITEM_ORGANIZATION_CODE', x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    --Cursor for validating Uom_code update
    FOR asset_org_update_rec IN c_asset_uom_update_cur
    LOOP
      l_interfaceTbl(1) := asset_org_update_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'UOM_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AINTG_INVAL_ATTR_UPD', p_message_token_names => C_MESSAGE_TOKEN_NAME, p_message_token_values => 'UOM_CODE', x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Validate if Asset Item, serial number is unique
    FOR asset_itser_rec IN c_itser_exists_create_cur
    LOOP
      l_interfaceTbl(1) := asset_itser_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ITEM_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_DUPLICATE_SER_NUM', p_message_token_names => 'ITEM_NUM$SER_NUM', p_message_token_values => asset_itser_rec.item_number || '$' || asset_itser_rec.serial_number, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Validate if Asset Item, serial number is unique
    FOR asset_itser_rec IN c_itser_exists_update_cur
    LOOP
      l_interfaceTbl(1) := asset_itser_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ITEM_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_DUPLICATE_SER_NUM', p_message_token_names => 'ITEM_NUM$SER_NUM', p_message_token_values => asset_itser_rec.item_number || '$' || asset_itser_rec.serial_number, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Validate if updates are made on an end dated asset
    FOR asset_end_date_rec IN c_is_asset_end_dated
    LOOP
      l_interfaceTbl(1) := asset_end_date_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ACTIVE_END_DATE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_END_DATE_UPD1', p_message_token_names => NULL, p_message_token_values => NULL, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Validate if the end date provided is valid one
    FOR inv_end_date_rec IN c_invalid_end_date
    LOOP
      l_interfaceTbl(1) := inv_end_date_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ACTIVE_END_DATE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_END_DTE_ERLY_EQ_TDAY', p_message_token_names => 'TODAY_DATE', p_message_token_values => TRUNC(sysdate), x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Validate if serial number is provided but item is not serial controlled
    FOR asset_serial_rec IN c_asset_no_serial_control
    LOOP
      l_interfaceTbl(1) := asset_serial_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'SERIAL_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_SERNUM_NOT_ALLOWED', p_message_token_names => NULL, p_message_token_values => NULL, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Validate if lot is provided but item is not lot controlled
    FOR asset_lot_rec IN c_asset_no_lot_control
    LOOP
      l_interfaceTbl(1) := asset_lot_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'LOT_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_LOT_NOT_ALLOWED', p_message_token_names => NULL, p_message_token_values => NULL, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Cursor for checking if the Quanity is not 1 when the item is serial controlled
    FOR asset_qty_rec IN c_serial_asset_wrong_quantity
    LOOP
      l_interfaceTbl(1) := asset_qty_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'SERIAL_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_SER_QTY', p_message_token_names => NULL, p_message_token_values => NULL, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    --Cursor for checking if the Quantity is negative when item is not serial controlled for Create.--
    FOR asset_wrong_qty_rec IN c_nonserial_asset_wrong_qty
    LOOP
      l_interfaceTbl(1) := asset_wrong_qty_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'QUANTITY', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_NONSERIAL_QTY', p_message_token_names => C_MESSAGE_TOKEN_NAME, p_message_token_values => 'QUANTITY', x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    --Cursor to check if quantity is negative for update of non serial assets---
    FOR asset_invalid_qty IN c_nonserial_asset_invalid_upd
    LOOP
      l_interfaceTbl(1) := asset_invalid_qty.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'QUANTITY', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_NONSERIAL_QTY', p_message_token_names => C_MESSAGE_TOKEN_NAME, p_message_token_values => 'QUANTITY', x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    --Cursor for identifying Invalid Relationship action code
    FOR invalid_relationship_action IN c_invalid_structure_act_code
    LOOP
      l_interfaceTbl(1) := invalid_relationship_action.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'RELATIONSHIP_ACTION_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => C_MESSAGE_TOKEN_NAME, p_message_token_values => 'RELATIONSHIP_ACTION_CODE', x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');
  EXCEPTION
  WHEN OTHERS THEN
    x_return_status := fnd_api.g_ret_sts_unexp_error;
    x_error_message := sqlerrm;
    cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
  END bulk_validate_asset;

PROCEDURE validate_asset_struc_params(
    p_batch_id         IN NUMBER,
    p_partition_number IN NUMBER,
    x_error_message OUT NOCOPY VARCHAR2,
    x_return_status OUT NOCOPY VARCHAR2)
IS
  -- Cursor to pick out the INVALID parent_int_record_number/parent_asset_number
  CURSOR c_get_invalid_parent_asset
  IS
    SELECT assetInt.interface_row_id,
      CASE
        WHEN assetInt.parent_int_record_number IS NOT NULL
        THEN 'PARENT_INT_RECORD_NUMBER'
        WHEN assetInt.parent_asset_number IS NOT NULL
        THEN 'PARENT_ASSET_NUMBER'
        ELSE 'UNKNOWN'
      END AS PARENT_TYPE
    FROM CSE_ASSETS_INT assetInt
    WHERE assetInt.partition_number          = p_partition_number
    AND assetInt.interface_batch_id          = p_batch_id
    AND assetInt.interface_status_code       = C_INT_READY
    AND assetInt.relationship_action_code    = C_ADD_REL_ACTION_CODE
    AND assetInt.action_code                IN (C_CREATE_ACTION_CODE, C_UPDATE_ACTION_CODE)
    AND ((assetInt.parent_int_record_number IS NOT NULL
    AND NOT EXISTS
        (SELECT 1
        FROM CSE_ASSETS_INT assetInt2
        WHERE assetInt2.interface_record_number IS NOT NULL
        AND assetInt2.INTERFACE_STATUS_CODE     <> C_INT_ERROR
        AND assetInt2.ACTION_CODE                = C_CREATE_ACTION_CODE
        AND assetInt2.interface_record_number    = assetInt.parent_int_record_number
        )
        AND assetInt.parent_asset_id IS NULL
        )
    OR (assetInt.parent_asset_number IS NOT NULL 
        AND assetInt.parent_int_record_number IS NULL
        AND (NOT EXISTS
            (SELECT 1
            FROM CSE_ASSETS_B assetB
            WHERE assetB.asset_number IS NOT NULL
            AND (assetB.asset_number    = assetInt.parent_asset_number
            OR assetB.asset_id        = assetInt.parent_asset_id)
            )
            OR EXISTS
            (SELECT 1
            FROM CSE_ASSETS_INT assetInt3
            WHERE assetInt3.asset_number  IS NOT NULL
            AND assetInt3.asset_number     = assetInt.parent_asset_number
            AND assetInt3.action_code     <> C_UPDATE_ACTION_CODE
            AND assetInt.INTERFACE_ROW_ID <> assetInt.interface_row_id
          ) )) );
    -- Cursor to identify whether parent asset provided is a VALID CUSTOMER asset
    CURSOR c_get_non_cust_parent_asset
    IS
      SELECT assetInt.interface_row_id,
        CASE
          WHEN assetInt.parent_int_record_number IS NOT NULL
          THEN 'PARENT_INT_RECORD_NUMBER'
          WHEN assetInt.parent_asset_number IS NOT NULL
          THEN 'PARENT_ASSET_NUMBER'
          ELSE 'UNKNOWN'
        END AS PARENT_TYPE
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number         = p_partition_number
      AND assetInt.interface_batch_id         = p_batch_id
      AND assetInt.interface_status_code      = C_INT_READY
      AND assetInt.relationship_action_code   = C_ADD_REL_ACTION_CODE
      AND assetInt.action_code               IN (C_CREATE_ACTION_CODE, C_UPDATE_ACTION_CODE)
      AND (assetInt.parent_int_record_number IS NOT NULL
      AND NOT EXISTS
        (SELECT 1
        FROM CSE_ASSETS_INT assetInt2
        WHERE assetInt2.interface_record_number IS NOT NULL
        AND assetInt2.INTERFACE_STATUS_CODE     <> C_INT_ERROR
        AND assetInt2.interface_record_number    = assetInt.parent_int_record_number
        )
    OR (assetInt.parent_asset_number IS NOT NULL
    AND EXISTS
      (SELECT 1
      FROM CSE_ASSETS_B assetB
      WHERE assetB.asset_number           IS NOT NULL
      AND assetB.asset_number              = assetInt.parent_asset_number
      AND assetB.CURRENT_LOCATION_CONTEXT <> 'ORA_CUSTOMER'
      )));
      -- Cursor to identify attempts to make an asset component of itself
      CURSOR c_self_componented_asset_cur
      IS
        SELECT assetInt.interface_row_id,
          CASE
            WHEN assetInt.parent_int_record_number IS NOT NULL
            THEN 'PARENT_INT_RECORD_NUMBER'
            WHEN assetInt.parent_asset_number IS NOT NULL
            THEN 'PARENT_ASSET_NUMBER'
            ELSE 'UNKNOWN'
          END AS PARENT_TYPE
        FROM CSE_ASSETS_INT assetInt
        WHERE assetInt.partition_number       = p_partition_number
        AND assetInt.interface_batch_id       = p_batch_id
        AND assetInt.interface_status_code    = C_INT_READY
        AND assetInt.relationship_action_code = C_ADD_REL_ACTION_CODE
        AND assetInt.action_code             IN (C_CREATE_ACTION_CODE, C_UPDATE_ACTION_CODE)
        AND (EXISTS
          (SELECT 1
          FROM CSE_ASSETS_INT assetInt2
          WHERE assetInt.interface_row_id          = assetInt2.interface_row_id
          AND ((assetInt.parent_int_record_number IS NOT NULL
          AND (assetInt.parent_int_record_number   = assetInt2.interface_record_number
          OR assetInt.parent_int_record_id         = assetInt2.interface_row_id))
          OR (assetInt.parent_asset_number        IS NOT NULL
          AND(assetInt.parent_asset_number         = assetInt2.asset_number
          OR assetInt.parent_asset_id              = assetInt2.asset_id)))
          )
      OR assetInt.asset_id IN
        (SELECT object_id
        FROM cse_asset_relationships Rel
        WHERE Rel.active_end_date   IS NULL
          START WITH subject_id      = assetInt.parent_asset_id
          CONNECT BY PRIOR object_id = subject_id
        ));
        --Cursor to identify attempt to assign an asset to a different structure or twice to the same , including duplicate requests to add in same batch/call
        CURSOR c_get_asset_struct_repetition
        IS
          SELECT assetInt.interface_row_id,
            CASE
              WHEN assetInt.parent_int_record_number IS NOT NULL
              THEN 'PARENT_INT_RECORD_NUMBER'
              WHEN assetInt.parent_asset_number IS NOT NULL
              THEN 'PARENT_ASSET_NUMBER'
              ELSE 'UNKNOWN'
            END AS PARENT_TYPE
          FROM CSE_ASSETS_INT assetInt
          WHERE assetInt.partition_number       = p_partition_number
          AND assetInt.interface_batch_id       = p_batch_id
          AND assetInt.interface_status_code    = C_INT_READY
          AND assetInt.relationship_action_code = C_ADD_REL_ACTION_CODE
          AND assetInt.action_code              = C_UPDATE_ACTION_CODE
          AND (assetInt.asset_number           IS NOT NULL
          AND EXISTS
            (SELECT 1
            FROM CSE_ASSET_RELATIONSHIPS assetRel,
              CSE_ASSETS_B assetB
            WHERE assetInt.asset_number   = assetB.asset_number
            AND assetRel.subject_Id       = assetB.asset_id
            AND assetRel.subject_type     = 'A'
            AND assetRel.active_end_date IS NULL
            )
            AND NOT EXISTS
            (SELECT 1 
            FROM CSE_ASSETS_INT assetInt2
            WHERE assetInt2.interface_batch_id      = p_batch_id
            --AND assetInt2.interface_status_code     = C_INT_VALID
            AND assetInt2.interface_row_id          < assetInt.interface_row_id
            AND assetInt2.asset_number              = assetInt.asset_number
            AND assetInt2.action_code               = C_UPDATE_ACTION_CODE
            AND assetInt2.relationship_action_code  = C_REM_REL_ACTION_CODE
            ));
          --Cursor to identify records with Inactive child and active parent
          CURSOR c_get_inac_child_cur
          IS
            SELECT assetInt.interface_row_id
            FROM CSE_ASSETS_INT assetInt
            WHERE assetInt.partition_number       = p_partition_number
            AND assetInt.interface_batch_id       = p_batch_id
            AND assetInt.interface_status_code    = C_INT_READY
            AND assetInt.relationship_action_code = C_ADD_REL_ACTION_CODE
            AND assetInt.action_code              = C_UPDATE_ACTION_CODE
            AND EXISTS
              (SELECT 1
              FROM CSE_ASSETS_B assetB
              WHERE (assetInt.asset_number       = assetB.asset_number
              OR assetInt.asset_id               = assetB.asset_id)
              AND (TRUNC(assetB.active_end_date) < TRUNC(sysdate)
              AND TRUNC(assetB.active_end_date) <>TRUNC(FND_API.G_NULL_DATE))
              )
          AND NOT EXISTS
            (SELECT 1
            FROM CSE_ASSETS_B assetB
            WHERE (assetInt.parent_asset_number = assetB.asset_number
            OR assetInt.parent_asset_id         = assetB.asset_id)
            AND (TRUNC(assetB.active_end_date)  < TRUNC(sysdate)
            AND TRUNC(assetB.active_end_date)  <>TRUNC(FND_API.G_NULL_DATE))
            );
          --Cursor to identify records with active child and inactive parent
          CURSOR c_get_inac_parent_cur
          IS
            SELECT assetInt.interface_row_id
            FROM CSE_ASSETS_INT assetInt
            WHERE assetInt.partition_number       = p_partition_number
            AND assetInt.interface_batch_id       = p_batch_id
            AND assetInt.interface_status_code    = C_INT_READY
            AND assetInt.relationship_action_code = C_ADD_REL_ACTION_CODE
            AND assetInt.action_code             IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
            AND NOT EXISTS
              (SELECT 1
              FROM CSE_ASSETS_B assetB
              WHERE (assetInt.asset_number       = assetB.asset_number
              OR assetInt.asset_id               = assetB.asset_id)
              AND (TRUNC(assetB.active_end_date) < TRUNC(sysdate)
              AND TRUNC(assetB.active_end_date) <>TRUNC(FND_API.G_NULL_DATE))
              )
          AND EXISTS
            (SELECT 1
            FROM CSE_ASSETS_B assetB
            WHERE (assetInt.parent_asset_number = assetB.asset_number
            OR assetInt.parent_asset_id         = assetB.asset_id)
            AND (TRUNC(assetB.active_end_date)  < TRUNC(sysdate)
            AND TRUNC(assetB.active_end_date)  <>TRUNC(FND_API.G_NULL_DATE))
            );
          -- Cursor to pick records where attempt is made to remove a component not being part of any
          CURSOR c_struct_not_exist_assets_cur
          IS
            SELECT assetInt.interface_row_id
            FROM CSE_ASSETS_INT assetInt
            WHERE assetInt.partition_number       = p_partition_number
            AND assetInt.interface_batch_id       = p_batch_id
            AND assetInt.interface_status_code    = C_INT_READY
            AND assetInt.relationship_action_code = C_REM_REL_ACTION_CODE
            AND assetInt.action_code              = C_UPDATE_ACTION_CODE
            AND NOT EXISTS
              (SELECT 1
              FROM CSE_ASSET_RELATIONSHIPS assetRel
              WHERE assetRel.subject_id           = assetInt.asset_id
              AND assetRel.relationship_type_code = 'ORA_COMPONENT'
              AND assetrel.subject_type           = 'A'
              AND assetRel.active_end_date       IS NULL
              );
              
              /*Cursor to identify assets created and added to a structure with customer/location info different from the parent asset*/           
     CURSOR c_get_invld_child_asset
    IS
    SELECT interface_row_id,
            asset_number
    FROM CSE_ASSETS_int assetInt
    WHERE
			assetInt.partition_number       	  = p_partition_number
            AND assetInt.interface_batch_id       = p_batch_id
            AND assetInt.interface_status_code    = C_INT_READY
			AND assetInt.action_code 			  = C_CREATE_ACTION_CODE
			AND assetInt.relationship_action_code = C_ADD_REL_ACTION_CODE
			AND ( assetInt.parent_int_record_number IS NOT NULL 
				AND EXISTS
				(SELECT 'X'
				FROM CSE_ASSETS_INT cseaint
				WHERE cseaint.interface_record_number IS NOT NULL
        AND cseaint.action_code = C_CREATE_ACTION_CODE
        AND cseaint.interface_status_code <> C_INT_ERROR
        AND cseaint.interface_record_number = assetInt.parent_int_record_number
				AND (cseaint.customer_id <> assetInt.customer_id
				OR cseaint.CUSTOMER_ACCOUNT_ID <> assetInt.CUSTOMER_ACCOUNT_ID
				OR cseaint.CUSTOMER_ACCOUNT_SITE_ID <> assetInt.CUSTOMER_ACCOUNT_SITE_ID
				OR cseaint.CUSTOMER_SITE_PARTY_ID <> assetInt.CUSTOMER_SITE_PARTY_ID
				OR cseaint.CUSTOMER_SITE_ID <> assetInt.CUSTOMER_SITE_ID )
				)
			OR (assetInt.parent_asset_number IS NOT NULL
				AND EXISTS
				(SELECT 'X' 
				FROM CSE_ASSETS_B cseb
				WHERE cseb.asset_id = assetInt.parent_asset_id
				AND (cseb.customer_id <> assetInt.customer_id
				OR cseb.CUSTOMER_ACCOUNT_ID <> assetInt.CUSTOMER_ACCOUNT_ID
				OR cseb.CUSTOMER_ACCOUNT_SITE_ID <> assetInt.CUSTOMER_ACCOUNT_SITE_ID
				OR cseb.CUSTOMER_SITE_PARTY_ID <> assetInt.CUSTOMER_SITE_PARTY_ID
				OR cseb.CUSTOMER_SITE_ID <> assetInt.CUSTOMER_SITE_ID)
				)));

/*Cursor to get the assets being updated with different customre/location info than the parent asset*/
    
    CURSOR c_get_invld_chld_asset_update
	IS 
	SELECT assetInt.interface_row_id,assetInt.asset_number
	FROM CSE_ASSETS_INT assetInt
	where assetInt.partition_number       = p_partition_number
            AND assetInt.interface_batch_id       = p_batch_id
            AND assetInt.interface_status_code    = C_INT_READY
			AND assetInt.action_code 			= C_UPDATE_ACTION_CODE
			AND (
			assetInt.customer_id IS NOT NULL
			OR CUSTOMER_ACCOUNT_ID IS NOT NULL
			OR CUSTOMER_ACCOUNT_SITE_ID IS NOT NULL
			OR CUSTOMER_ACCOUNT_SITE_USE_ID IS NOT NULL
			OR CUSTOMER_SITE_PARTY_ID IS NOT NULL
			OR CUSTOMER_SITE_ID IS NOT NULL
				)
			AND EXISTS
			(SELECT 'X' FROM 
			CSE_ASSET_RELATIONSHIPS assetRel
			WHERE subject_id = assetInt.asset_id
			AND( assetRel.active_end_date IS NULL
      OR assetRel.active_end_date >= sysdate));

l_interfaceTbl cse_int_utils_pvt.interface_row_id_type;
          l_api_name VARCHAR2(300) := 'cse_bulk_import_pvt.validate_asset_struc_params';
        BEGIN
          cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
          FOR invalid_parent_asset_rec IN c_get_invalid_parent_asset
          LOOP--
            l_interfaceTbl(1) := invalid_parent_asset_rec.interface_row_id;
            log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => invalid_parent_asset_rec.parent_type, p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => invalid_parent_asset_rec.parent_type, x_error_message => x_error_message, x_return_status => x_return_status );
            l_interfaceTbl.DELETE;
          END LOOP;
          FOR non_cust_parent_asset_rec IN c_get_non_cust_parent_asset
          LOOP--
            l_interfaceTbl(1) := non_cust_parent_asset_rec.interface_row_id;
            log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => non_cust_parent_asset_rec.parent_type, p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_INVAL_CUST_ASSET', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => non_cust_parent_asset_rec.parent_type, x_error_message => x_error_message, x_return_status => x_return_status );
            l_interfaceTbl.DELETE;
          END LOOP;
          FOR self_componented_asset_rec IN c_self_componented_asset_cur
          LOOP--
            l_interfaceTbl(1) := self_componented_asset_rec.interface_row_id;
            log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => self_componented_asset_rec.parent_type, p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_CMP_ASSO_NO_CIRC', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => self_componented_asset_rec.parent_type, x_error_message => x_error_message, x_return_status => x_return_status );
            l_interfaceTbl.DELETE;
          END LOOP;
          FOR asset_struct_repetition_rec IN c_get_asset_struct_repetition
          LOOP--
            l_interfaceTbl(1) := asset_struct_repetition_rec.interface_row_id;
            log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => asset_struct_repetition_rec.parent_type, p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_CMP_ASSO_NO_DUP', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => asset_struct_repetition_rec.parent_type, x_error_message => x_error_message, x_return_status => x_return_status );
            l_interfaceTbl.DELETE;
          END LOOP;
          FOR c_get_inac_child_rec IN c_get_inac_child_cur
          LOOP--
            l_interfaceTbl(1) := c_get_inac_child_rec.interface_row_id;
            log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ASSET_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_INAC_CMP_ADD', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'ASSET_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
            l_interfaceTbl.DELETE;
          END LOOP;
          FOR c_get_inac_parent_rec IN c_get_inac_parent_cur
          LOOP--
            l_interfaceTbl(1) := c_get_inac_parent_rec.interface_row_id;
            log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'PARENT_ASSET_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_INAC_PRT_ADD', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'PARENT_ASSET_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
            l_interfaceTbl.DELETE;
          END LOOP;
          FOR c_no_struct_exist_asset_rec IN c_struct_not_exist_assets_cur
          LOOP--
            l_interfaceTbl(1) := c_no_struct_exist_asset_rec.interface_row_id;
            log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ASSET_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_NOT_IN_CFG', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'ASSET_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
            l_interfaceTbl.DELETE;
          END LOOP;
          FOR child_asset_create_rec IN c_get_invld_child_asset
          LOOP--
            l_interfaceTbl(1) := child_asset_create_rec.interface_row_id;
            log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ASSET_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_DIFF_CUST_LOC_CMP', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => child_asset_create_rec.asset_number, x_error_message => x_error_message, x_return_status => x_return_status );
            l_interfaceTbl.DELETE;
          END LOOP;
          FOR child_asset_update_rec IN c_get_invld_chld_asset_update
          LOOP--
            l_interfaceTbl(1) := child_asset_update_rec.interface_row_id;
            log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ASSET_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_CMP_TRS_MOV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => child_asset_update_rec.asset_number, x_error_message => x_error_message, x_return_status => x_return_status );
            l_interfaceTbl.DELETE;
          END LOOP;
          cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');
        EXCEPTION
        WHEN OTHERS THEN
          x_return_status := fnd_api.g_ret_sts_unexp_error;
          x_error_message := sqlerrm;
          IF (c_get_invalid_parent_asset%isopen) THEN
            CLOSE c_get_invalid_parent_asset;
          END IF;
          IF (c_get_non_cust_parent_asset%isopen) THEN
            CLOSE c_get_non_cust_parent_asset;
          END IF;
          IF (c_self_componented_asset_cur%isopen) THEN
            CLOSE c_self_componented_asset_cur;
          END IF;
          IF (c_get_asset_struct_repetition%isopen) THEN
            CLOSE c_self_componented_asset_cur;
          END IF;
          IF (c_get_inac_child_cur%isopen) THEN
            CLOSE c_self_componented_asset_cur;
          END IF;
          IF (c_get_inac_parent_cur%isopen) THEN
            CLOSE c_self_componented_asset_cur;
          END IF;
          IF (c_struct_not_exist_assets_cur%isopen) THEN
            CLOSE c_self_componented_asset_cur;
          END IF;
           IF (c_get_invld_child_asset%isopen) THEN
          CLOSE c_get_invld_child_asset;
          END IF;
          IF (c_get_invld_chld_asset_update%isopen) THEN
          CLOSE c_get_invld_chld_asset_update;
          END IF;
          cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
        END validate_asset_struc_params;
        /*=============================================================================
        |
        |  DESCRIPTION
        |      Validate input customer asset records, log errors
        |      and set the interface record status
        |
        |  PARAMETERS
        |      Returns x_errbuf and Status code x_retcode back to calling API
        |
        *===========================================================================*/
      PROCEDURE bulk_validate_customer_asset(
          p_batch_id         IN NUMBER,
          p_partition_number IN NUMBER,
          x_error_message OUT NOCOPY VARCHAR2,
          x_return_status OUT NOCOPY VARCHAR2)
      IS
        -- Cursor for validating customer
        CURSOR c_customer_invalid_cur
        IS
          SELECT assetInt.interface_row_id
          FROM CSE_ASSETS_INT assetInt
          WHERE assetInt.partition_number    = p_partition_number
          AND assetInt.interface_batch_id    = p_batch_id
          AND assetInt.interface_status_code = C_INT_READY
          AND assetInt.action_code          IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
          AND (assetInt.customer_number     IS NOT NULL
          OR assetInt.customer_name         IS NOT NULL )
          AND NOT EXISTS
            (SELECT cust.party_id
            FROM hz_parties cust
            WHERE (cust.party_number = assetInt.customer_number
            OR cust.party_name       = assetInt.customer_name )
            );
        -- Sold by business Unit
        -- TBD
        -- Sold by business Unit
        -- Cursor for validating location customer
        CURSOR c_loc_cust_invalid_cur
        IS
          SELECT assetInt.interface_row_id
          FROM CSE_ASSETS_INT assetInt
          WHERE assetInt.partition_number           = p_partition_number
          AND assetInt.interface_batch_id           = p_batch_id
          AND assetInt.interface_status_code        = C_INT_READY
          AND assetInt.action_code                 IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
          AND (assetInt.customer_site_party_number IS NOT NULL
          OR assetInt.customer_site_party_name     IS NOT NULL )
          AND NOT EXISTS
            (SELECT custSiteParty.party_id
            FROM hz_parties custSiteParty
            WHERE (custSiteParty.party_number = assetInt.customer_site_party_number
            OR custSiteParty.party_name       = assetInt.customer_site_party_name)
            );
        -- Cursor for validating location
        CURSOR c_location_invalid_cur
        IS
          SELECT assetInt.interface_row_id
          FROM CSE_ASSETS_INT assetInt
          WHERE assetInt.partition_number     = p_partition_number
          AND assetInt.interface_batch_id     = p_batch_id
          AND assetInt.interface_status_code  = C_INT_READY
          AND assetInt.action_code           IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
          AND (assetInt.customer_site_number IS NOT NULL
          OR assetInt.customer_site_name     IS NOT NULL )
          AND NOT EXISTS
            (SELECT custSite.party_site_id
            FROM hz_party_sites custSite
            WHERE (custSite.party_site_number = assetInt.customer_site_number
            OR custSite.party_site_name       = assetInt.customer_site_name)
            );
        -- Cursor for validating Bill-to Customer
        CURSOR c_bill_to_invalid_cur
        IS
          SELECT assetInt.interface_row_id
          FROM CSE_ASSETS_INT assetInt
          WHERE assetInt.partition_number        = p_partition_number
          AND assetInt.interface_batch_id        = p_batch_id
          AND assetInt.interface_status_code     = C_INT_READY
          AND assetInt.action_code              IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
          AND (assetInt.customer_account_number IS NOT NULL
          OR assetInt.customer_account_name     IS NOT NULL )
          AND NOT EXISTS
            (SELECT custAcc.cust_account_id
            FROM hz_cust_accounts custAcc
            WHERE (custAcc.account_number = assetInt.customer_account_number
            OR custAcc.account_name       = assetInt.customer_account_name)
            );
        -- Cursor for validating Bill-to Location.
        CURSOR c_bill_to_loc_invalid_cur
        IS
          SELECT assetInt.interface_row_id
          FROM CSE_ASSETS_INT assetInt
          WHERE assetInt.partition_number             = p_partition_number
          AND assetInt.interface_batch_id             = p_batch_id
          AND assetInt.interface_status_code          = C_INT_READY
          AND assetInt.action_code                   IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
          AND (assetInt.customer_account_site_number IS NOT NULL
          OR assetInt.customer_account_site_name     IS NOT NULL )
          AND NOT EXISTS
            (SELECT cust_acct_site_id
            FROM hz_cust_acct_sites_all hcas,
              hz_party_sites hps
            WHERE (hps.party_site_number = assetInt.customer_account_site_number
            OR hps.party_site_name       = assetInt.customer_account_site_name)
            AND hcas.party_site_id       = hps.party_site_id
            AND hcas.cust_account_id     =
              (SELECT custAcc.cust_account_id
              FROM hz_cust_accounts custAcc
              WHERE (custAcc.account_number = assetInt.customer_account_number
              OR custAcc.account_name       = assetInt.customer_account_name)
              )
            );
          -- Cursor for validating Bill-to Location Site
          CURSOR c_bt_loc_site_invalid_cur
          IS
            SELECT assetInt.interface_row_id
            FROM CSE_ASSETS_INT assetInt
            WHERE assetInt.partition_number              = p_partition_number
            AND assetInt.interface_batch_id              = p_batch_id
            AND assetInt.interface_status_code           = C_INT_READY
            AND assetInt.action_code                    IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
            AND assetInt.customer_account_site_use_code IS NOT NULL
            AND NOT EXISTS
              (SELECT custSite.site_use_id customer_account_site_use_id
              FROM hz_cust_site_uses_all custSite
              WHERE custSite.site_use_code   = assetInt.customer_account_site_use_code
              AND custSite.cust_acct_site_id =
                (SELECT cust_acct_site_id
                FROM hz_cust_acct_sites_all hcas,
                  hz_party_sites hps
                WHERE (hps.party_site_number = assetInt.customer_account_site_number
                OR hps.party_site_name       = assetInt.customer_account_site_name)
                AND hcas.party_site_id       = hps.party_site_id
                AND hcas.cust_account_id     =
                  (SELECT custAcc.cust_account_id
                  FROM hz_cust_accounts custAcc
                  WHERE (custAcc.account_number = assetInt.customer_account_number
                  OR custAcc.account_name       = assetInt.customer_account_name)
                  )
                )
              );
            -----Cursor for validating Sold_By_Business_Unit_Name
            CURSOR c_sold_by_bu_invalid_cur
            IS
              SELECT assetInt.interface_row_id
              FROM CSE_ASSETS_INT assetInt
              WHERE assetInt.partition_number          = p_partition_number
              AND assetInt.interface_batch_id          = p_batch_id
              AND assetInt.interface_status_code       = C_INT_READY
              AND assetInt.action_code                IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
              AND assetInt.sold_by_business_unit_name IS NOT NULL
              AND NOT EXISTS
                (SELECT bu_id
                FROM fun_all_business_units_v fabu
                WHERE fabu.bu_id                      =assetInt.sold_by_business_unit_id
                OR assetInt.sold_by_business_unit_id IS NULL
                );
            --- Cursor to set status of rows to error where parent is invalidated on later stage
            CURSOR c_get_invalid_parented_cur
            IS
              SELECT assetInt.interface_row_id,
                CASE
                  WHEN assetInt.parent_int_record_number IS NOT NULL
                  THEN 'PARENT_INT_RECORD_NUMBER'
                  WHEN assetInt.parent_asset_number IS NOT NULL
                  THEN 'PARENT_ASSET_NUMBER'
                  ELSE 'UNKNOWN'
                END AS PARENT_TYPE
              FROM CSE_ASSETS_INT assetInt
              WHERE assetInt.interface_batch_id      = p_batch_id
              AND assetInt.partition_number          = p_partition_number
              AND assetInt.parent_int_record_number IS NOT NULL
              AND assetInt.relationship_action_code IS NOT NULL
              AND EXISTS
                (SELECT 1
                FROM cse_assets_int assetInt2
                WHERE assetInt2.interface_status_code = C_INT_ERROR
                AND assetInt2.action_code             = C_CREATE_ACTION_CODE
                AND assetInt2.interface_record_number = assetInt.parent_int_record_number
                AND assetInt2.interface_batch_id      = p_batch_id
                );
            l_interfaceTbl cse_int_utils_pvt.interface_row_id_type;
            l_api_name VARCHAR2(300) := 'cse_bulk_import_pvt.bulk_validate_customer_asset';
          BEGIN
            cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
            --Invoke the common asset validation API to perform standard asset validations
            bulk_validate_asset( p_batch_id => p_batch_id, p_partition_number => p_partition_number, x_error_message => x_error_message, x_return_status => x_return_status );
            -- Cursor to validate if customer is valid
            OPEN c_customer_invalid_cur;
            LOOP
              FETCH c_customer_invalid_cur BULK COLLECT
              INTO l_interfaceTbl LIMIT c_max_partition_size;
              EXIT
            WHEN l_interfaceTbl.COUNT = 0;
              log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'CUSTOMER_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CUSTOMER_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
            END LOOP;
            l_interfaceTbl.DELETE;
            CLOSE c_customer_invalid_cur;
            -- Cursor to validate if location customer is valid
            OPEN c_loc_cust_invalid_cur;
            LOOP
              FETCH c_loc_cust_invalid_cur BULK COLLECT
              INTO l_interfaceTbl LIMIT c_max_partition_size;
              EXIT
            WHEN l_interfaceTbl.COUNT = 0;
              log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'CUSTOMER_SITE_PARTY_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CUSTOMER_SITE_PARTY_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
            END LOOP;
            l_interfaceTbl.DELETE;
            CLOSE c_loc_cust_invalid_cur;
            -- Cursor to validate if location is valid
            OPEN c_location_invalid_cur;
            LOOP
              FETCH c_location_invalid_cur BULK COLLECT
              INTO l_interfaceTbl LIMIT c_max_partition_size;
              EXIT
            WHEN l_interfaceTbl.COUNT = 0;
              log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'CUSTOMER_SITE_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CUSTOMER_SITE_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
            END LOOP;
            l_interfaceTbl.DELETE;
            CLOSE c_location_invalid_cur;
            -- Cursor to validate if bill-to customer is valid
            OPEN c_bill_to_invalid_cur;
            LOOP
              FETCH c_bill_to_invalid_cur BULK COLLECT
              INTO l_interfaceTbl LIMIT c_max_partition_size;
              EXIT
            WHEN l_interfaceTbl.COUNT = 0;
              log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'CUSTOMER_ACCOUNT_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CUSTOMER_ACCOUNT_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
            END LOOP;
            l_interfaceTbl.DELETE;
            CLOSE c_bill_to_invalid_cur;
            -- Cursor to validate if bill-to location is valid
            OPEN c_bill_to_loc_invalid_cur;
            LOOP
              FETCH c_bill_to_loc_invalid_cur BULK COLLECT
              INTO l_interfaceTbl LIMIT c_max_partition_size;
              EXIT
            WHEN l_interfaceTbl.COUNT = 0;
              log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'CUSTOMER_ACCOUNT_SITE_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CUSTOMER_ACCOUNT_SITE_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
            END LOOP;
            l_interfaceTbl.DELETE;
            CLOSE c_bill_to_loc_invalid_cur;
            -- Cursor to validate if bill-to location site use code is valid
            OPEN c_bt_loc_site_invalid_cur;
            LOOP
              FETCH c_bt_loc_site_invalid_cur BULK COLLECT
              INTO l_interfaceTbl LIMIT c_max_partition_size;
              EXIT
            WHEN l_interfaceTbl.COUNT = 0;
              log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'CUSTOMER_ACCOUNT_SITE_USE_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CUSTOMER_ACCOUNT_SITE_USE_CODE', x_error_message => x_error_message, x_return_status => x_return_status );
            END LOOP;
            l_interfaceTbl.DELETE;
            CLOSE c_bt_loc_site_invalid_cur;
       ---Cursor to validate if Sold By Business Unit  is valid
      FOR c_get_invld_sold_by_rec IN c_sold_by_bu_invalid_cur
      LOOP--
        l_interfaceTbl(1) := c_get_invld_sold_by_rec.interface_row_id;
    --    log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'SOLD_BY_BUSINESS_UNIT_NAME', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_INVALID_SOLDBY_BU', p_message_token_names => 'SOLDBY_BU', p_message_token_values => c_get_invld_sold_by_rec.sold_by_business_unit_name, x_error_message => x_error_message, x_return_status => x_return_status );
          log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'SOLD_BY_BUSINESS_UNIT_NAME', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_INVALID_SOLDBY_BU', p_message_token_names => 'SOLDBY_BU', p_message_token_values => c_get_invld_sold_by_rec.sold_by_business_unit_name, x_error_message => x_error_message, x_return_status => x_return_status );
     l_interfaceTbl.DELETE;
      END LOOP;
            --Validate asset structure attributes
            validate_asset_struc_params( p_batch_id => p_batch_id, p_partition_number => p_partition_number, x_error_message => x_error_message, x_return_status => x_return_status );
            --Update child records with error status whose parents have status as ERROR
            FOR c_get_invalid_parented_rec IN c_get_invalid_parented_cur
            LOOP--
              l_interfaceTbl(1) := c_get_invalid_parented_rec.interface_row_id;
              log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => c_get_invalid_parented_rec.PARENT_TYPE, p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => c_get_invalid_parented_rec.PARENT_TYPE, x_error_message => x_error_message, x_return_status => x_return_status );
              l_interfaceTbl.DELETE;
            END LOOP;
            -- All validations are over.
            -- Set the status to valid for those records whose status is not yet Error.
            UPDATE cse_assets_int assetInt
            SET assetInt.interface_status_code  = C_INT_VALID
            WHERE assetInt.interface_batch_id   = p_batch_id
            AND assetInt.partition_number       = p_partition_number
            AND assetInt.interface_status_code <> C_INT_ERROR;
            cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');
          EXCEPTION
          WHEN OTHERS THEN
            x_return_status := fnd_api.g_ret_sts_unexp_error;
            x_error_message := sqlerrm;
            IF (c_customer_invalid_cur%isopen) THEN
              CLOSE c_customer_invalid_cur;
            END IF;
            IF (c_loc_cust_invalid_cur%isopen) THEN
              CLOSE c_loc_cust_invalid_cur;
            END IF;
            IF (c_location_invalid_cur%isopen) THEN
              CLOSE c_location_invalid_cur;
            END IF;
            IF (c_bill_to_invalid_cur%isopen) THEN
              CLOSE c_bill_to_invalid_cur;
            END IF;
            IF (c_bill_to_loc_invalid_cur%isopen) THEN
              CLOSE c_bill_to_loc_invalid_cur;
            END IF;
            IF (c_bt_loc_site_invalid_cur%isopen) THEN
              CLOSE c_bt_loc_site_invalid_cur;
            END IF;
            IF (c_sold_by_bu_invalid_cur%isopen) THEN
              CLOSE c_sold_by_bu_invalid_cur;
            END IF;
            cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
          END bulk_validate_customer_asset;
          /*=============================================================================
          |
          |  DESCRIPTION
          |      This Public API does the following actions:
          |        1. Updates invalid from interface tables
          |
          |  PARAMETERS
          |      Returns x_errbuf and Status code x_retcode back to calling API
          |
          *===========================================================================*/
        PROCEDURE validate_item_orgs(
            p_batch_id IN NUMBER,
            x_error_message OUT NOCOPY VARCHAR2,
            x_return_status OUT NOCOPY VARCHAR2)
        IS
          l_int_errors_tbl_type cse_int_utils_pvt.int_errors_tbl_type;
        TYPE l_invalid_items_type
      IS
        TABLE OF cse_assets_int%ROWTYPE INDEX BY PLS_INTEGER;
        l_invalid_items_tbl_type l_invalid_items_type;
        l_row_count    NUMBER;
        l_message_text VARCHAR2(200);
        l_api_name     VARCHAR2(300) := 'cse_bulk_import_pvt.validate_item_orgs';
      BEGIN
        BEGIN
          SELECT casint.* BULK COLLECT
          INTO l_invalid_items_tbl_type
          FROM cse_assets_int casint
          WHERE casint.interface_batch_id =p_batch_id
          AND casint.interface_status_code='READY'
          AND interface_row_id NOT       IN
            (SELECT DISTINCT interface_row_id
            FROM cse_assets_int assetint,
              egp_system_items_vl items,
              inv_org_parameters orgs
            WHERE (items.inventory_item_id  = assetint.item_id
            OR items.item_number            = NVL(assetint.item_number,items.item_number))
            AND (orgs.organization_code     = NVL(assetint.item_organization_code,orgs.organization_code)
            OR orgs.organization_id         = assetint.item_organization_id)
            AND items.organization_id       = orgs.organization_id
            AND assetint.interface_batch_id = p_batch_id
            );
          IF(l_invalid_items_tbl_type.COUNT > 0) THEN
            FORALL i IN l_invalid_items_tbl_type.FIRST .. l_invalid_items_tbl_type.LAST
            UPDATE cse_assets_int casint
            SET casint.interface_status_code = 'ERROR'
            WHERE casint.interface_batch_id  =p_batch_id
            AND interface_row_id             =l_invalid_items_tbl_type(i).interface_row_id;
            FOR i IN l_invalid_items_tbl_type.FIRST..l_invalid_items_tbl_type.LAST
            LOOP
              cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_invalid_items_tbl_type(i).interface_row_id||' Item Organization is not valid');
              l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
              l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
              l_int_errors_tbl_type(l_row_count).object_version_number := 1;
              l_int_errors_tbl_type(l_row_count).interface_row_id      := l_invalid_items_tbl_type(i).interface_row_id;
              l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
              l_int_errors_tbl_type(l_row_count).error_text            := 'MNT_AD_VAL_ITMORG';
              l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
              l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
              l_int_errors_tbl_type(l_row_count).column_name           := 'ITEM_ORGANIZATION_CODE';
              l_int_errors_tbl_type(l_row_count).message_name          := 'MNT_AD_VAL_ITMORG';
              l_int_errors_tbl_type(l_row_count).message_token_names   := 'NUM$ORG_CODE';
              l_int_errors_tbl_type(l_row_count).message_token_values  := l_invalid_items_tbl_type(i).item_number||'$'||l_invalid_items_tbl_type(i).item_organization_code;
              l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
              l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
              l_int_errors_tbl_type(l_row_count).created_by            := l_invalid_items_tbl_type(i).created_by;
              l_int_errors_tbl_type(l_row_count).creation_date         := l_invalid_items_tbl_type(i).creation_date;
              l_int_errors_tbl_type(l_row_count).last_updated_by       := l_invalid_items_tbl_type(i).last_updated_by;
              l_int_errors_tbl_type(l_row_count).last_update_date      := l_invalid_items_tbl_type(i).last_update_date;
              l_int_errors_tbl_type(l_row_count).last_update_login     := l_invalid_items_tbl_type(i).last_update_login;
              l_int_errors_tbl_type(l_row_count).request_id            := l_invalid_items_tbl_type(i).request_id;
              l_int_errors_tbl_type(l_row_count).job_definition_name   := l_invalid_items_tbl_type(i).job_definition_name;
              l_int_errors_tbl_type(l_row_count).job_definition_package:= l_invalid_items_tbl_type(i).job_definition_package;
              l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
              l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
            END LOOP;
            cse_int_utils_pvt.log_errors( l_int_errors_tbl_type, x_return_status , x_error_message );
          END IF;
          COMMIT;
        END;
        x_return_status := fnd_api.g_ret_sts_success;
      EXCEPTION
      WHEN OTHERS THEN
        x_return_status := fnd_api.g_ret_sts_unexp_error;
        x_error_message := sqlerrm;
      END validate_item_orgs;

/*=============================================================================
      |
      |  DESCRIPTION
      |      This Public API does the following actions:
      |        1. Updates duplicate serials from interface tables
      |
      |  PARAMETERS
      |      Returns x_errbuf and Status code x_retcode back to calling API
      |
      *===========================================================================*/

PROCEDURE validate_duplicate_serials(
        p_batch_id        IN NUMBER,
        p_partiton_number IN NUMBER,
        x_error_message OUT NOCOPY VARCHAR2,
        x_return_status OUT NOCOPY VARCHAR2)
    IS
      l_int_errors_tbl_type cse_int_utils_pvt.int_errors_tbl_type;
      l_row_count    NUMBER;
      l_message_text VARCHAR2(200);
      l_api_name     VARCHAR2(300) := 'cse_bulk_import_pvt.validate_duplicate_serials';
    BEGIN
      -- Duplicate Check and Update
      BEGIN
        UPDATE cse_assets_int casint
        SET casint.interface_status_code = 'ERROR_DUP'
        WHERE casint.interface_batch_id  =p_batch_id
        AND casint.interface_status_code ='VALID'
        AND casint.partition_number      =p_partiton_number
        AND casint.rowid                 >
          (SELECT MIN(casintdup.rowid)
          FROM cse_assets_int casintdup
          WHERE casint.serial_number         =casintdup.serial_number
          AND casint.item_number             =casintdup.item_number
          AND casintdup.interface_status_code='VALID'
          AND casintdup.partition_number     =p_partiton_number
          AND casintdup.interface_batch_id   =p_batch_id
          )
        AND casint.serial_number <> C_NULL_STRING;
        UPDATE cse_assets_int casint
        SET casint.interface_status_code = 'ERROR_DUP_ASSET'
        WHERE casint.interface_batch_id  =p_batch_id
        AND casint.interface_status_code ='VALID'
        AND casint.partition_number      =p_partiton_number
        AND casint.rowid                 >
          (SELECT MIN(casintdup.rowid)
          FROM cse_assets_int casintdup
          WHERE casint.asset_number          =casintdup.asset_number
          AND casintdup.interface_status_code='VALID'
          AND casintdup.partition_number     =p_partiton_number
          AND casintdup.interface_batch_id   =p_batch_id
          );
      END;
      FOR i  IN
      (SELECT *
      FROM cse_assets_int
      WHERE interface_status_code = 'ERROR_DUP'
      AND interface_batch_id      =p_batch_id
      )
      LOOP
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||i.interface_row_id||' Serial is duplicate');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := i.interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_RCRD_VAL';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'SERIAL_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_RCRD_VAL';
        l_int_errors_tbl_type(l_row_count).message_token_names   := 'REC_VALUE';
        l_int_errors_tbl_type(l_row_count).message_token_values  := i.serial_number;
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := i.created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := i.creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := i.last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := i.last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := i.last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := i.request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := i.job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= i.job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END LOOP;
      FOR i  IN
      (SELECT *
      FROM cse_assets_int
      WHERE interface_status_code = 'ERROR_DUP_ASSET'
      AND interface_batch_id      =p_batch_id
      )
      LOOP
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||i.interface_row_id||' Asset is duplicate');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := i.interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_RCRD_VAL';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ASSET_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_RCRD_VAL';
        l_int_errors_tbl_type(l_row_count).message_token_names   := 'REC_VALUE';
        l_int_errors_tbl_type(l_row_count).message_token_values  := i.asset_number;
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := i.created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := i.creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := i.last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := i.last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := i.last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := i.request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := i.job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= i.job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END LOOP;
      cse_int_utils_pvt.log_errors( l_int_errors_tbl_type, x_return_status , x_error_message );
      UPDATE cse_assets_int casint
      SET casint.interface_status_code  = 'ERROR'
      WHERE casint.interface_batch_id   =p_batch_id
      AND casint.interface_status_code IN ('ERROR_DUP','ERROR_DUP_ASSET');
      x_return_status                  := fnd_api.g_ret_sts_success;
    EXCEPTION
    WHEN OTHERS THEN
      x_return_status := fnd_api.g_ret_sts_unexp_error;
      x_error_message := sqlerrm;
    END validate_duplicate_serials;

/*=============================================================================
    |
    |  DESCRIPTION
    |      This Private API does the following actions:
    |        1. Updates timezone based on UTC time
    |
    |  PARAMETERS
    |      p_utc_date -> Time entered during import in excel
    |
    *===========================================================================*/

FUNCTION utc_to_usertimezone(
        p_utc_date TIMESTAMP)
      RETURN TIMESTAMP
    IS
      l_offset_hours  NUMBER(3);
      l_offset_mins   NUMBER(3);
      l_timezone_date TIMESTAMP;
    BEGIN
      SELECT EXTRACT(TIMEZONE_HOUR FROM SYSTIMESTAMP),
        EXTRACT(TIMEZONE_MINUTE FROM SYSTIMESTAMP)
      INTO l_offset_hours,
        l_offset_mins
      FROM DUAL;
      SELECT p_utc_date + NUMTODSINTERVAL(l_offset_hours,'HOUR')+ NUMTODSINTERVAL(l_offset_mins,'MINUTE')
      INTO l_timezone_date
      FROM dual;
      RETURN l_timezone_date;
    END;

/*=============================================================================
    |
    |  DESCRIPTION
    |      This Public API does the following actions:
    |        1. Populate Valid Asset Id's to the Interface tables
    |
    |  PARAMETERS
    |      Returns x_errbuf and Status code x_retcode back to calling API
    |
    *===========================================================================*/
  PROCEDURE populate_valid_asset_interface(
      p_batch_id         IN NUMBER,
      p_partition_number IN NUMBER,
      x_error_message OUT NOCOPY VARCHAR2,
      x_return_status OUT NOCOPY VARCHAR2)
  IS
    CURSOR c_valid_assets(c_interface_status_code VARCHAR2)
    IS
      SELECT DISTINCT assetintmain.interface_row_id ,
        asset.asset_id ,
        assetintmain.asset_number ,
        assetintmain.new_asset_number ,
        assetintmain.item_number ,
        assetintmain.serial_number ,
        DECODE(assetintmain.action_code,C_CREATE_ACTION_CODE,DECODE(asset.asset_id,NULL,'T','F') ,'T')        AS create_valid ,
        DECODE(assetintmain.action_code,C_CREATE_ACTION_CODE,DECODE(assetserial.asset_id,NULL,'T','F') ,'T')  AS create_valid_serial ,
        DECODE(assetintmain.action_code,C_CREATE_ACTION_CODE,'T',DECODE(asset.asset_id,NULL,'F','T') )        AS upd_del_valid ,
        DECODE(assetintmain.action_code,C_UPDATE_ACTION_CODE,DECODE(newasset.new_asset_id,NULL,'T','F'),'T' ) AS new_asset_valid ,
        asset.gen_object_id ,
        NVL(item.inventory_item_id,asset.item_id) AS inventory_item_id ,
        item.uom_code ,
        NVL(org.organization_id,asset.item_organization_id) AS organization_id ,
        wcorg.location_organization_id ,
        wc.work_center_id ,
        assetintmain.created_by ,
        assetintmain.creation_date ,
        assetintmain.last_updated_by ,
        assetintmain.last_update_date ,
        assetintmain.last_update_login ,
        assetintmain.request_id ,
        assetintmain.job_definition_name ,
        assetintmain.job_definition_package ,
        assetintmain.load_request_id ,
        assetintmain.interface_record_number ,
        DECODE(assetintmain.work_center_code,NULL,'T',DECODE(wc.work_center_id,NULL,'F','T') )                                                                                                                                                                                                                                  AS wc_valid ,
        DECODE(assetintmain.action_code,C_CREATE_ACTION_CODE,DECODE(item.inventory_item_id,NULL,'F','T' ),'T')                                                                                                                                                                                                                  AS item_valid ,
        DECODE(assetintmain.action_code,C_CREATE_ACTION_CODE,DECODE(org.organization_id,NULL,'F','T' ),'T')                                                                                                                                                                                                                     AS org_valid ,
        DECODE(assetintmain.current_location_context,NULL,'T',DECODE(wc.work_center_id,NULL,'T',DECODE(wcorg.location_organization_id,NULL,'F','T' )))                                                                                                                                                                          AS wcorg_valid ,
        DECODE(assetintmain.action_code,C_CREATE_ACTION_CODE,DECODE(wc.inactive_date,NULL,'T',DECODE(SIGN( CAST(wc.inactive_date AS DATE) - CAST(SYSTIMESTAMP AS DATE)),-1,'F','T')),'T')                                                                                                                                       AS wcactvdate_valid ,
        DECODE(wc.work_center_id,NULL,'ORA_UNKNOWN',DECODE(wcorg.location_organization_id,NULL,'ORA_UNKNOWN','ORA_WORK_CENTER' ))                                                                                                                                                                                               AS current_location_context ,
        DECODE(assetintmain.dflt_wo_sub_type,NULL,'T',DECODE(mntwosubtype.dflt_wo_sub_type,NULL,DECODE(assetintmain.dflt_wo_sub_type,C_NULL_STRING,'T','F'),'T') )                                                                                                                                                              AS wo_sub_type_valid ,
        DECODE(assetintmain.dflt_wo_type,NULL,'T',DECODE(mntwotype.dflt_wo_type,NULL,DECODE(assetintmain.dflt_wo_type,C_NULL_STRING,'T','F'),'T') )                                                                                                                                                                             AS wo_type_valid ,
        DECODE(assetintmain.action_code,C_UPDATE_ACTION_CODE,DECODE(assetintmain.active_end_date,NULL,'T',DECODE(woenddt.work_order_number,NULL,'T','F') ),'T')                                                                                                                                                                 AS woenddt_valid ,
        DECODE(assetintmain.action_code,C_UPDATE_ACTION_CODE,DECODE(assetintmain.active_end_date,NULL,'T',DECODE(assetintmain.active_end_date,FND_API.G_NULL_DATE,'T',DECODE((SIGN( CAST(assetintmain.active_end_date AS DATE) - CAST(NVL(woenddt.work_order_date,assetintmain.active_end_date) AS DATE)) ),-1,'F','T' ))),'T') AS enddt_valid ,
        DECODE(assetintmain.action_code,C_CREATE_ACTION_CODE,DECODE(assetintmain.active_end_date,NULL,'T',DECODE(assetintmain.active_end_date,FND_API.G_NULL_DATE,'T',DECODE(SIGN( TRUNC(assetintmain.active_end_date)         - TRUNC(SYSTIMESTAMP)),-1,'F','T'))),'T')                                                        AS assetenddt_valid
      FROM
        (SELECT orgs.organization_id ,
          assetint.interface_row_id
        FROM inv_org_parameters orgs,
          cse_assets_int assetint
        WHERE ( orgs.organization_code  = assetint.item_organization_code
        OR orgs.organization_id         = assetint.item_organization_id )
        AND assetint.partition_number   = p_partition_number
        AND assetint.interface_batch_id = p_batch_id
        ) org,
      (SELECT orgs.organization_id location_organization_id,
        assetint.interface_row_id
      FROM inv_org_parameters orgs,
        cse_assets_int assetint
      WHERE ( orgs.organization_code  = assetint.location_organization_code
      OR orgs.organization_id         = assetint.location_organization_id )
      AND assetint.partition_number   = p_partition_number
      AND assetint.interface_batch_id = p_batch_id
      ) wcorg,
      (SELECT wcs.work_center_id ,
        wcs.organization_id ,
        assetint.interface_row_id ,
        wcs.inactive_date
      FROM wis_work_centers_vl wcs,
        cse_assets_int assetint
      WHERE (wcs.work_center_code     = assetint.work_center_code
      OR wcs.work_center_id           = assetint.work_center_id )
      AND assetint.partition_number   = p_partition_number
      AND assetint.interface_batch_id = p_batch_id
      ) wc,
      (SELECT items.inventory_item_id ,
        items.organization_id ,
        items.primary_uom_code uom_code ,
        assetint.interface_row_id
      FROM egp_system_items_vl items,
        cse_assets_int assetint
      WHERE (items.inventory_item_id          = assetint.item_id
      OR items.item_number                    = assetint.item_number)
      AND assetint.partition_number           = p_partition_number
      AND assetint.interface_batch_id         = p_batch_id
      AND items.asset_tracked_flag            ='Y'
      AND items.allow_maintenance_asset_flag  ='Y'
      AND ( items.serial_number_control_code IN ( 2,5,6)
      OR items.lot_control_code               =2 )
      )item,
      (SELECT assets.asset_id ,
        assets.asset_number ,
        assets.gen_object_id ,
        assetint.interface_row_id ,
        assets.item_id ,
        assets.item_organization_id ,
        assets.active_end_date
      FROM cse_assets_b assets,
        cse_assets_int assetint
      WHERE assetint.serial_number IS NOT NULL
      AND assets.serial_number      = assetint.serial_number
      AND EXISTS
        (SELECT 1
        FROM egp_system_items egp
        WHERE egp.item_number     = assetint.item_number
        AND egp.organization_id   = assets.item_organization_id
        AND egp.inventory_item_id = assets.item_id
        )
      AND assetint.partition_number   = p_partition_number
      AND assetint.interface_batch_id = p_batch_id
      ) assetserial,
      (SELECT assets.asset_id ,
        assets.asset_number ,
        assets.gen_object_id ,
        assetint.interface_row_id ,
        assets.item_id ,
        assets.item_organization_id ,
        assets.active_end_date
      FROM cse_assets_b assets,
        cse_assets_int assetint
      WHERE assetint.asset_number    IS NOT NULL
      AND assets.asset_number         = assetint.asset_number
      AND assetint.partition_number   = p_partition_number
      AND assetint.interface_batch_id = p_batch_id
      ) asset,
      (SELECT assets.asset_id new_asset_id ,
        assets.asset_number new_asset_number ,
        assetint.interface_row_id
      FROM cse_assets_b assets,
        cse_assets_int assetint
      WHERE assetint.new_asset_number IS NOT NULL
      AND assets.asset_number          = assetint.new_asset_number
      AND assetint.partition_number    = p_partition_number
      AND assetint.interface_batch_id  = p_batch_id
      AND assetint.action_code         = C_UPDATE_ACTION_CODE
      ) newasset,
      (SELECT assetint.interface_row_id ,
        lookups.lookup_code dflt_wo_type
      FROM fnd_lookups lookups,
        cse_assets_int assetint
      WHERE assetint.dflt_wo_type     = lookups.meaning
      AND lookups.lookup_type         = 'ORA_MNT_WO_TYPE'
      AND assetint.partition_number   = p_partition_number
      AND assetint.interface_batch_id = p_batch_id
      ) mntwotype,
      (SELECT assetint.interface_row_id ,
        lookups.lookup_code dflt_wo_sub_type
      FROM fnd_lookups lookups,
        cse_assets_int assetint
      WHERE upper(assetint.dflt_wo_sub_type) = upper(lookups.meaning)
      AND lookups.lookup_type                = 'ORA_MNT_WO_SUB_TYPE'
      AND assetint.partition_number          = p_partition_number
      AND assetint.interface_batch_id        = p_batch_id
      ) mntwosubtype,
      (SELECT assetint.interface_row_id ,
        MAX(
        CASE workorderpeo.work_order_status_id
          WHEN 10000
          THEN NULL
          WHEN 10001
          THEN NULL
          WHEN 10002
          THEN workorderpeo.work_order_number
          WHEN 10003
          THEN workorderpeo.work_order_number
          WHEN 10004
          THEN workorderpeo.work_order_number
          WHEN 10005
          THEN workorderpeo.work_order_number
        END ) work_order_number ,
        MAX(
        CASE workorderpeo.work_order_status_id
          WHEN 10000
          THEN workorderpeo.canceled_date
          WHEN 10001
          THEN workorderpeo.closed_date
          WHEN 10002
          THEN NULL
          WHEN 10003
          THEN NULL
          WHEN 10004
          THEN NULL
          WHEN 10005
          THEN NULL
        END ) work_order_date
      FROM cse_assets_int assetint,
        wie_wo_assets workorderassetpeo,
        wie_work_orders_vl workorderpeo,
        cse_assets_b assetsb,
        egp_system_items egp
      WHERE workorderassetpeo.work_order_id = workorderpeo.work_order_id
      AND workorderpeo.work_order_status_id BETWEEN 10000 AND 10005
      AND workorderassetpeo.asset_id = assetsb.asset_id
      AND ( assetint.asset_number    = assetsb.asset_number
      OR assetint.serial_number      = assetsb.serial_number)
      AND egp.item_number            = assetint.item_number
      AND egp.organization_id        = assetsb.item_organization_id
      AND egp.inventory_item_id      = assetsb.item_id
      AND assetint.active_end_date  IS NOT NULL
      GROUP BY assetint.interface_row_id
      ) woenddt,
      cse_assets_int assetintmain
    WHERE (assetintmain.interface_row_id  = asset.interface_row_id(+) )
    AND (assetintmain.interface_row_id    = assetserial.interface_row_id(+) )
    AND (assetintmain.interface_row_id    = item.interface_row_id(+)
    AND ( item.organization_id            = org.organization_id
    OR item.organization_id              IS NULL
    OR org.organization_id               IS NULL))
    AND (assetintmain.interface_row_id    = wc.interface_row_id(+)
    AND ( wc.organization_id              = wcorg.location_organization_id
    OR wc.organization_id                IS NULL))
    AND assetintmain.interface_row_id     = org.interface_row_id(+)
    AND assetintmain.interface_row_id     = wcorg.interface_row_id(+)
    AND assetintmain.interface_row_id     = mntwotype.interface_row_id(+)
    AND assetintmain.interface_row_id     = mntwosubtype.interface_row_id(+)
    AND assetintmain.interface_row_id     = newasset.interface_row_id(+)
    AND assetintmain.interface_row_id     = woenddt.interface_row_id(+)
    AND assetintmain.partition_number     = p_partition_number
    AND assetintmain.interface_batch_id   = p_batch_id
    AND assetintmain.interface_status_code= c_interface_status_code;
    CURSOR c_update_partlist(c_interface_status_code VARCHAR2)
    IS
      SELECT cseint.asset_id,
        cseint.interface_record_number
      FROM cse_assets_int cseint
      WHERE cseint.partition_number   = p_partition_number
      AND cseint.interface_batch_id   = p_batch_id
      AND cseint.interface_status_code= c_interface_status_code;
    l_api_name VARCHAR2(300)         := 'cse_bulk_import_pvt.populate_valid_asset_interface';
  TYPE l_valid_assets_tbl_type
IS
  TABLE OF c_valid_assets%ROWTYPE;
TYPE l_upd_partlist_tbl_type
IS
  TABLE OF c_update_partlist%ROWTYPE;
  l_valid_assets_tbl l_valid_assets_tbl_type;
  l_upd_partlist_tbl l_upd_partlist_tbl_type;
  l_error_assets_tbl l_valid_assets_tbl_type;
  l_int_errors_tbl_type cse_int_utils_pvt.int_errors_tbl_type;
  l_row_count    NUMBER;
  l_message_text VARCHAR2(2000);
BEGIN
  x_return_status := fnd_api.g_ret_sts_success;
  UPDATE cse_assets_int cseint
  SET cseint.dflt_wo_type          = NULL
  WHERE upper(cseint.dflt_wo_type) = C_NULL_STRING
  AND cseint.action_code           = C_CREATE_ACTION_CODE
  AND cseint.partition_number      = p_partition_number
  AND cseint.interface_batch_id    = p_batch_id;
  UPDATE cse_assets_int cseint
  SET cseint.dflt_wo_sub_type          = NULL
  WHERE upper(cseint.dflt_wo_sub_type) = C_NULL_STRING
  AND cseint.action_code               = C_CREATE_ACTION_CODE
  AND cseint.partition_number          = p_partition_number
  AND cseint.interface_batch_id        = p_batch_id;
  UPDATE cse_assets_int cseint
  SET active_end_date           = DECODE(active_end_date,FND_API.G_NULL_DATE,DECODE(action_code, C_CREATE_ACTION_CODE, NULL,active_end_date), cse_bulk_import_pvt.utc_to_usertimezone(active_end_date))
  WHERE active_end_date        IS NOT NULL
  AND cseint.partition_number   = p_partition_number
  AND cseint.interface_batch_id = p_batch_id;
  UPDATE cse_assets_int cseint
  SET cseint.lot_number          = NULL
  WHERE upper(cseint.lot_number) = C_NULL_STRING
  AND cseint.action_code         = C_CREATE_ACTION_CODE
  AND cseint.partition_number    = p_partition_number
  AND cseint.interface_batch_id  = p_batch_id;
  UPDATE cse_assets_int cseint
  SET cseint.serial_number          = NULL
  WHERE upper(cseint.serial_number) = C_NULL_STRING
  AND cseint.action_code            = C_CREATE_ACTION_CODE
  AND cseint.partition_number       = p_partition_number
  AND cseint.interface_batch_id     = p_batch_id;
  OPEN c_valid_assets(C_INT_READY);
  FETCH c_valid_assets BULK COLLECT INTO l_valid_assets_tbl;
  CLOSE c_valid_assets;
  FORALL i IN l_valid_assets_tbl.FIRST..l_valid_assets_tbl.LAST
  UPDATE cse_assets_int assetintupd
  SET assetintupd.item_organization_id   = NVL(to_number(l_valid_assets_tbl(i).organization_id),assetintupd.item_organization_id) ,
    assetintupd.location_organization_id = to_number(DECODE(l_valid_assets_tbl(i).current_location_context,'ORA_WORK_CENTER',l_valid_assets_tbl(i).location_organization_id,NULL)) ,
    assetintupd.item_id                  = NVL(to_number(l_valid_assets_tbl(i).inventory_item_id),assetintupd.item_id) ,
    assetintupd.uom_code                 = l_valid_assets_tbl(i).uom_code ,
    assetintupd.quantity                 = to_number(NVL(assetintupd.quantity,1)) ,
    assetintupd.asset_id                 = to_number(DECODE(assetintupd.action_code,C_CREATE_ACTION_CODE,DECODE(l_valid_assets_tbl(i).asset_id,NULL,cse_asset_numbers_s.NEXTVAL,l_valid_assets_tbl(i).asset_id) ,l_valid_assets_tbl(i).asset_id)) ,
    assetintupd.asset_number             = NVL(assetintupd.asset_number,l_valid_assets_tbl(i).asset_number) ,
    assetintupd.gen_object_id            = to_number(DECODE(assetintupd.action_code,C_CREATE_ACTION_CODE,DECODE(l_valid_assets_tbl(i).asset_id,NULL,cse_int_s.NEXTVAL,l_valid_assets_tbl(i).gen_object_id) ,l_valid_assets_tbl(i).gen_object_id)) ,
    assetintupd.work_center_id           = to_number(DECODE(l_valid_assets_tbl(i).current_location_context,'ORA_WORK_CENTER',l_valid_assets_tbl(i).work_center_id,NULL)) ,
    assetintupd.current_location_context = DECODE(assetintupd.current_location_context,NULL,NULL,l_valid_assets_tbl(i).current_location_context) ,
    assetintupd.interface_status_code    = DECODE(l_valid_assets_tbl(i).create_valid
    ||l_valid_assets_tbl(i).upd_del_valid
    ||l_valid_assets_tbl(i).wc_valid
    ||l_valid_assets_tbl(i).item_valid
    ||l_valid_assets_tbl(i).org_valid
    ||l_valid_assets_tbl(i).wcorg_valid
    ||l_valid_assets_tbl(i).wo_type_valid
    ||l_valid_assets_tbl(i).wo_sub_type_valid
    ||l_valid_assets_tbl(i).new_asset_valid
    ||l_valid_assets_tbl(i).woenddt_valid
    ||l_valid_assets_tbl(i).enddt_valid
    ||l_valid_assets_tbl(i).assetenddt_valid
    ||l_valid_assets_tbl(i).wcactvdate_valid
    ||l_valid_assets_tbl(i).create_valid_serial, 'TTTTTTTTTTTTTT','VALID','ERROR')
  WHERE assetintupd.interface_row_id = to_number(l_valid_assets_tbl(i).interface_row_id );
  OPEN c_update_partlist('VALID');
  FETCH c_update_partlist BULK COLLECT INTO l_upd_partlist_tbl;
  CLOSE c_update_partlist;
  FORALL i IN l_upd_partlist_tbl.FIRST..l_upd_partlist_tbl.LAST
  UPDATE cse_parts_list_components_int assetintupd
  SET assetintupd.asset_id                  = l_upd_partlist_tbl(i).asset_id
  WHERE assetintupd.interface_record_number = l_upd_partlist_tbl(i).interface_record_number;
  OPEN c_valid_assets(C_INT_ERROR);
  FETCH c_valid_assets BULK COLLECT INTO l_error_assets_tbl;
  CLOSE c_valid_assets;
  IF l_error_assets_tbl.COUNT > 0 THEN
    FORALL i IN l_error_assets_tbl.FIRST..l_error_assets_tbl.LAST
    UPDATE cse_parts_list_components_int assetintupd
    SET assetintupd.interface_status_code     = 'ERROR'
    WHERE assetintupd.interface_record_number = l_error_assets_tbl(i).interface_record_number ;
    FOR i IN l_error_assets_tbl.FIRST..l_error_assets_tbl.LAST
    LOOP
      IF l_error_assets_tbl(i).create_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Action Code Selected is CREATE but Asset already exists');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_RCRD_VAL';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ASSET_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_RCRD_VAL';
        l_int_errors_tbl_type(l_row_count).message_token_names   := 'REC_VALUE';
        l_int_errors_tbl_type(l_row_count).message_token_values  := l_error_assets_tbl(i).asset_number;
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).create_valid_serial <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Action Code Selected is CREATE but Asset already exists');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'CSE_AS_DUPLICATE_SER_NUM';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'SERIAL_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'CSE_AS_DUPLICATE_SER_NUM';
        l_int_errors_tbl_type(l_row_count).message_token_names   := 'ITEM_NUM$SER_NUM';
        l_int_errors_tbl_type(l_row_count).message_token_values  := l_error_assets_tbl(i).item_number||'$'||l_error_assets_tbl(i).serial_number;
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).upd_del_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Action Code Selected is UPDATE but Asset does not exists');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ASSET_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'ASSET_NUMBER';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).wc_valid <> 'T' OR l_error_assets_tbl(i).wcactvdate_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Work Center is not valid');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'WORK_CENTER_CODE';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'WORK_CENTER_CODE';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).item_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Item is not valid');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ITEM_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'ITEM_NUMBER';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).org_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Item Organization is not valid');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ORGANIZATION_CODE';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'ORGANIZATION_CODE';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).wcorg_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Work Center Organization is not valid');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'LOCATION_ORGANIZATION_CODE';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'LOCATION_ORGANIZATION_CODE';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).wo_type_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Work Order Type is not valid');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'DFLT_WO_TYPE';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'DFLT_WO_TYPE';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).wo_sub_type_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Work Order Sub-Type is not valid');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'DFLT_WO_SUB_TYPE';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'DFLT_WO_SUB_TYPE';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).new_asset_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' New asset number already exists.');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ASSET_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'ASSET_NUMBER';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).woenddt_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Open Work Order exists for asset. ');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'MNT_AD_NO_OPN_WOS_FR_ENDT';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ACTIVE_END_DATE';
        l_int_errors_tbl_type(l_row_count).message_name          := 'MNT_AD_NO_OPN_WOS_FR_ENDT';
        l_int_errors_tbl_type(l_row_count).message_token_names   := NULL;
        l_int_errors_tbl_type(l_row_count).message_token_values  := NULL;
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).enddt_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Active End Date Cannot be less than last closed/cancelled Work Order .');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'CSE_AS_END_DATE_CLS_WO';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ACTIVE_END_DATE';
        l_int_errors_tbl_type(l_row_count).message_name          := 'CSE_AS_END_DATE_CLS_WO';
        l_int_errors_tbl_type(l_row_count).message_token_names   := NULL;
        l_int_errors_tbl_type(l_row_count).message_token_values  := NULL;
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).assetenddt_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Active End Date provided for already expired Asset .');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'CSE_AS_END_DATE_UPD1';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ACTIVE_END_DATE';
        l_int_errors_tbl_type(l_row_count).message_name          := 'CSE_AS_END_DATE_UPD1';
        l_int_errors_tbl_type(l_row_count).message_token_names   := NULL;
        l_int_errors_tbl_type(l_row_count).message_token_values  := NULL;
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := 'E';
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
    END LOOP;
    cse_int_utils_pvt.log_errors( l_int_errors_tbl_type, x_return_status , x_error_message );
  END IF;
  COMMIT;
EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  IF c_valid_assets%ISOPEN THEN
    CLOSE c_valid_assets;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END populate_valid_asset_interface;

/*=============================================================================
|
|  DESCRIPTION
|      This Public API does the following actions:
|        1. Populate Valid Part List Id's to the Interface tables
|
|  PARAMETERS
|      Returns x_errbuf and Status code x_retcode back to calling API
|
*===========================================================================*/

PROCEDURE populate_partList_interface(
    p_batch_id         IN NUMBER,
    p_partition_number IN NUMBER,
    x_error_message OUT NOCOPY VARCHAR2,
    x_return_status OUT NOCOPY VARCHAR2)
IS
  CURSOR c_valid_partLists (c_interface_status_code VARCHAR2)
  IS
    SELECT DISTINCT partListinttmain.interface_row_id ,
      NVL(partListinttmain.asset_id,asset_parts.asset_id) AS asset_id ,
      partListinttmain.asset_number ,
      partListinttmain.item_number ,
      asset_parts.list_component_id ,
      asset_parts.object_version_number ,
      DECODE(partListinttmain.action_code,C_CREATE_ACTION_CODE,DECODE(asset_parts.list_component_id,NULL,'T','F') ,'T') AS create_valid ,
      DECODE(partListinttmain.action_code,C_CREATE_ACTION_CODE,'T',DECODE(asset_parts.list_component_id,NULL,'F','T') ) AS upd_del_valid ,
      item.inventory_item_id ,
      NVL(partListinttmain.item_organization_id,asset_parts.item_organization_id ) organization_id ,
      DECODE(partListinttmain.action_code,C_CREATE_ACTION_CODE,DECODE(item.inventory_item_id,NULL,'F','T' ),'T')                                                       AS item_valid ,
      DECODE(partListinttmain.action_code,C_CREATE_ACTION_CODE,DECODE(NVL(partListinttmain.item_organization_id,asset_parts.item_organization_id ),NULL,'F','T' ),'T') AS org_valid ,
      partListinttmain.created_by ,
      partListinttmain.creation_date ,
      partListinttmain.last_updated_by ,
      partListinttmain.last_update_date ,
      partListinttmain.last_update_login ,
      partListinttmain.request_id ,
      partListinttmain.job_definition_name ,
      partListinttmain.job_definition_package ,
      partListinttmain.load_request_id
    FROM
      (SELECT items.inventory_item_id ,
        items.organization_id ,
        partListint.interface_row_id
      FROM egp_system_items_vl items,
        cse_parts_list_components_int partListint
      WHERE (items.inventory_item_id      = partListint.item_id
      OR items.item_number                = partListint.item_number)
      AND partListint.item_organization_id= items.organization_id
      AND partListint.partition_number    = p_partition_number
      AND partListint.interface_batch_id  = p_batch_id
      ) item,
    (SELECT subqryasset.interface_row_id ,
      subqryasset.item_id item_id ,
      subqryasset.item_organization_id ,
      subqryasset.asset_id ,
      subqryasset.asset_number ,
      partList.list_component_id ,
      partList.object_version_number
    FROM
      ( SELECT DISTINCT assets.asset_id ,
        assets.asset_number ,
        partListint.interface_row_id interface_row_id ,
        items.inventory_item_id item_id ,
        partListint.item_number ,
        NVL(partListint.item_organization_id ,assets.item_organization_id) item_organization_id
      FROM cse_assets_b assets,
        cse_parts_list_components_int partListint,
        cse_assets_int assets_int,
        egp_system_items_vl items
      WHERE assets.asset_number             = assets_int.asset_number
      AND assets_int.interface_record_number= partListint.interface_record_number
        --                AND partListint.interface_status_code = c_interface_status_code
      AND partListint.item_number(+)                                        = items.item_number
      AND NVL(partListint.item_organization_id,assets.item_organization_id) = items.organization_id
      AND partListint.partition_number                                      = assets_int.partition_number
      AND partListint.interface_batch_id                                    = assets_int.interface_batch_id
      AND partListint.partition_number                                      = p_partition_number
      AND partListint.interface_batch_id                                    = p_batch_id
      AND partListint.asset_number                                         IS NOT NULL
      AND assets_int.new_asset_number                                      IS NULL
      UNION
      SELECT DISTINCT assets.asset_id ,
        assets.asset_number ,
        partListint.interface_row_id interface_row_id ,
        items.inventory_item_id item_id ,
        partListint.item_number ,
        NVL(partListint.item_organization_id ,assets.item_organization_id) item_organization_id
      FROM cse_assets_b assets,
        cse_parts_list_components_int partListint,
        cse_assets_int assets_int,
        egp_system_items_vl items
      WHERE assets.asset_number             = assets_int.new_asset_number
      AND assets_int.interface_record_number= partListint.interface_record_number
        --               AND partListint.interface_status_code = c_interface_status_code
      AND partListint.item_number(+)                                        = items.item_number
      AND NVL(partListint.item_organization_id,assets.item_organization_id) = items.organization_id
      AND partListint.partition_number                                      = assets_int.partition_number
      AND partListint.interface_batch_id                                    = assets_int.interface_batch_id
      AND partListint.partition_number                                      = p_partition_number
      AND partListint.interface_batch_id                                    = p_batch_id
      AND assets_int.new_asset_number                                      IS NOT NULL
      UNION
      SELECT DISTINCT assets.asset_id ,
        assets.asset_number ,
        partListint.interface_row_id interface_row_id ,
        items.inventory_item_id item_id ,
        partListint.item_number ,
        NVL(partListint.item_organization_id ,assets.item_organization_id) item_organization_id
      FROM cse_assets_b assets,
        cse_parts_list_components_int partListint,
        cse_assets_int assets_int,
        egp_system_items_vl items
      WHERE (assets.asset_id                 = assets_int.asset_id
      OR assets.asset_number                 = assets_int.asset_number)
      AND assets_int.interface_record_number = partListint.interface_record_number
        --                AND partListint.interface_status_code  = c_interface_status_code
      AND partListint.partition_number                                      = assets_int.partition_number
      AND partListint.interface_batch_id                                    = assets_int.interface_batch_id
      AND partListint.item_number(+)                                        = items.item_number
      AND NVL(partListint.item_organization_id,assets.item_organization_id) = items.organization_id
      AND partListint.partition_number                                      = p_partition_number
      AND partListint.interface_batch_id                                    = p_batch_id
      AND partListint.interface_record_number                              IS NOT NULL
      ) subqryasset ,
      cse_parts_list_components partList
    WHERE partList.asset_id(+)           = subqryasset.asset_id
    AND partList.item_organization_id(+) = subqryasset.item_organization_id
    ) asset_parts,
    cse_parts_list_components_int partListinttmain
  WHERE (partListinttmain.interface_row_id = item.interface_row_id(+)
    /*AND ( item.organization_id = NVL(org.organization_id ,asset_parts.item_organization_id ) OR item.organization_id IS NULL)*/
    )
  AND partListinttmain.interface_row_id      = asset_parts.interface_row_id(+)
  AND partListinttmain.partition_number      = p_partition_number
  AND partListinttmain.interface_batch_id    = p_batch_id
  AND partListinttmain.interface_status_code = c_interface_status_code;
  l_api_name VARCHAR2(300)                  := 'cse_bulk_import_pvt.populate_partList_interface';
TYPE l_valid_partLists_tbl_type
IS
  TABLE OF c_valid_partLists%ROWTYPE;
  l_valid_partLists_tbl l_valid_partLists_tbl_type;
  l_reset_partLists_tbl l_valid_partLists_tbl_type;
  l_int_errors_tbl_type cse_int_utils_pvt.int_errors_tbl_type;
  l_row_count    NUMBER;
  l_message_text VARCHAR2(2000);
BEGIN
  x_return_status := fnd_api.g_ret_sts_success;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'In API '||l_api_name);
  OPEN c_valid_partLists(C_INT_READY);
  FETCH c_valid_partLists BULK COLLECT INTO l_valid_partLists_tbl;
  CLOSE c_valid_partLists;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' PartLists Records to Process '||l_valid_partLists_tbl.count);
  FORALL i IN l_valid_partLists_tbl.FIRST..l_valid_partLists_tbl.LAST
  UPDATE cse_parts_list_components_int assetintupd
  SET assetintupd.item_organization_id = to_number(l_valid_partLists_tbl(i).organization_id) ,
    assetintupd.item_id                = to_number(l_valid_partLists_tbl(i).inventory_item_id) ,
    assetintupd.asset_id               = to_number(l_valid_partLists_tbl(i).asset_id) ,
    assetintupd.asset_number           = l_valid_partLists_tbl(i).asset_number ,
    assetintupd.component_quantity     = to_number(NVL(assetintupd.component_quantity , 1)) ,
    assetintupd.list_component_id      = to_number(DECODE(assetintupd.action_code,C_CREATE_ACTION_CODE,DECODE(l_valid_partLists_tbl(i).list_component_id,NULL,cse_int_s.NEXTVAL,l_valid_partLists_tbl(i).list_component_id) ,l_valid_partLists_tbl(i).list_component_id)) ,
    assetintupd.interface_status_code  = DECODE(l_valid_partLists_tbl(i).create_valid
    ||l_valid_partLists_tbl(i).upd_del_valid
    ||l_valid_partLists_tbl(i).item_valid
    ||l_valid_partLists_tbl(i).org_valid, 'TTTT','VALID','ERROR')
  WHERE assetintupd.interface_row_id = l_valid_partLists_tbl(i).interface_row_id ;
  l_valid_partLists_tbl             := l_reset_partLists_tbl;
  OPEN c_valid_partLists(C_INT_ERROR);
  FETCH c_valid_partLists BULK COLLECT INTO l_valid_partLists_tbl;
  CLOSE c_valid_partLists;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' PartLists Records in Error '||l_valid_partLists_tbl.count);
  IF l_valid_partLists_tbl.COUNT >0 THEN
    FOR i IN l_valid_partLists_tbl.FIRST..l_valid_partLists_tbl.LAST
    LOOP
      IF l_valid_partLists_tbl(i).create_valid                   <> 'T' THEN
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_valid_partLists_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_PARTS_LIST_COMPONENTS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ITEM_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := l_valid_partLists_tbl(i).item_number;
        l_int_errors_tbl_type(l_row_count).program_name          := 'cse_bulk_import_pvt.populate_partList_interface';
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_valid_partLists_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_valid_partLists_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_valid_partLists_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_valid_partLists_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_valid_partLists_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_valid_partLists_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_valid_partLists_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_valid_partLists_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_valid_partLists_tbl(i).upd_del_valid                  <> 'T' THEN
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_valid_partLists_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_PARTS_LIST_COMPONENTS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ASSET_ID';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'ASSET_ID';
        l_int_errors_tbl_type(l_row_count).program_name          := 'cse_bulk_import_pvt.populate_partList_interface';
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_valid_partLists_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_valid_partLists_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_valid_partLists_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_valid_partLists_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_valid_partLists_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_valid_partLists_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_valid_partLists_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_valid_partLists_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_valid_partLists_tbl(i).item_valid                     <> 'T' THEN
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_valid_partLists_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_PARTS_LIST_COMPONENTS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ITEM_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'ITEM_NUMBER';
        l_int_errors_tbl_type(l_row_count).program_name          := 'cse_bulk_import_pvt.populate_partList_interface';
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_valid_partLists_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_valid_partLists_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_valid_partLists_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_valid_partLists_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_valid_partLists_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_valid_partLists_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_valid_partLists_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_valid_partLists_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_valid_partLists_tbl(i).org_valid                      <> 'T' THEN
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_valid_partLists_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_PARTS_LIST_COMPONENTS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ITEM_ORGANIZATION_CODE';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'ITEM_ORGANIZATION_CODE';
        l_int_errors_tbl_type(l_row_count).program_name          := 'cse_bulk_import_pvt.populate_partList_interface';
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_valid_partLists_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_valid_partLists_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_valid_partLists_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_valid_partLists_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_valid_partLists_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_valid_partLists_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_valid_partLists_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_valid_partLists_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
    END LOOP;
    cse_int_utils_pvt.log_errors( l_int_errors_tbl_type, x_return_status , x_error_message );
  END IF;
EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  IF c_valid_partLists%ISOPEN THEN
    CLOSE c_valid_partLists;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END populate_partList_interface;

/*=============================================================================
|
|  DESCRIPTION
|      This Public API does the following actions:
|        1. Delete Valid Part List from Base table
|        2. Update Valid Part List in Base table
|        3. Create Valid Part List in Base table
|
|  PARAMETERS
|      Returns x_errbuf and Status code x_retcode back to calling API
|
*===========================================================================*/

PROCEDURE manage_partList_interface(
    p_batch_id         IN NUMBER,
    p_partition_number IN NUMBER,
    x_error_message OUT NOCOPY VARCHAR2,
    x_return_status OUT NOCOPY VARCHAR2)
IS
  CURSOR c_manage_partList (cp_action_code VARCHAR2)
  IS
    SELECT assetpartsint.list_component_id ,
      assetpartsint.asset_number ,
      assetpartsint.asset_id ,
      assetpartsint.item_organization_id ,
      assetpartsint.item_organization_code ,
      assetpartsint.item_id ,
      assetpartsint.item_number ,
      assetpartsint.item_revision ,
      assetpartsint.component_quantity ,
      assetpartsint.attribute_category ,
      assetpartsint.attribute_char1 ,
      assetpartsint.attribute_char2 ,
      assetpartsint.attribute_char3 ,
      assetpartsint.attribute_char4 ,
      assetpartsint.attribute_char5 ,
      assetpartsint.attribute_char6 ,
      assetpartsint.attribute_char7 ,
      assetpartsint.attribute_char8 ,
      assetpartsint.attribute_char9 ,
      assetpartsint.attribute_char10 ,
      assetpartsint.attribute_char11 ,
      assetpartsint.attribute_char12 ,
      assetpartsint.attribute_char13 ,
      assetpartsint.attribute_char14 ,
      assetpartsint.attribute_char15 ,
      assetpartsint.attribute_char16 ,
      assetpartsint.attribute_char17 ,
      assetpartsint.attribute_char18 ,
      assetpartsint.attribute_char19 ,
      assetpartsint.attribute_char20 ,
      assetpartsint.attribute_number1 ,
      assetpartsint.attribute_number2 ,
      assetpartsint.attribute_number3 ,
      assetpartsint.attribute_number4 ,
      assetpartsint.attribute_number5 ,
      assetpartsint.attribute_number6 ,
      assetpartsint.attribute_number7 ,
      assetpartsint.attribute_number8 ,
      assetpartsint.attribute_number9 ,
      assetpartsint.attribute_number10 ,
      assetpartsint.attribute_date1 ,
      assetpartsint.attribute_date2 ,
      assetpartsint.attribute_date3 ,
      assetpartsint.attribute_date4 ,
      assetpartsint.attribute_date5 ,
      assetpartsint.attribute_timestamp1 ,
      assetpartsint.attribute_timestamp2 ,
      assetpartsint.attribute_timestamp3 ,
      assetpartsint.attribute_timestamp4 ,
      assetpartsint.attribute_timestamp5 ,
      assetpartsint.last_updated_by ,
      assetpartsint.last_update_date ,
      assetpartsint.last_update_login ,
      assetpartsint.request_id ,
      assetpartsint.job_definition_name ,
      assetpartsint.job_definition_package
    FROM cse_parts_list_components_int assetpartsint
    WHERE assetpartsint.partition_number    = p_partition_number
    AND assetpartsint.interface_batch_id    = p_batch_id
    AND assetpartsint.action_code           = cp_action_code --'DELETE'
    AND assetpartsint.interface_status_code = 'VALID' ;
  l_api_name VARCHAR2(300)                 := 'cse_bulk_import_pvt.manage_partList_interface';
TYPE l_manage_partList_tbl_type
IS
  TABLE OF c_manage_partList%ROWTYPE;
  l_manage_partList_tbl l_manage_partList_tbl_type;
  l_reset_partList_tbl l_manage_partList_tbl_type;
BEGIN
  x_return_status := fnd_api.g_ret_sts_success;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' In API '||l_api_name);
  OPEN c_manage_partList(C_DELETE_ACTION_CODE);
  FETCH c_manage_partList BULK COLLECT INTO l_manage_partList_tbl;
  CLOSE c_manage_partList;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Part List records to Delete '||l_manage_partList_tbl.count);
  FORALL i IN l_manage_partList_tbl.FIRST..l_manage_partList_tbl.LAST
  DELETE cse_parts_list_components assetparts
  WHERE assetparts.list_component_id = l_manage_partList_tbl(i).list_component_id;
  FORALL i IN l_manage_partList_tbl.FIRST..l_manage_partList_tbl.LAST
  DELETE cse_parts_list_components_int assetpartsint
  WHERE assetpartsint.list_component_id = l_manage_partList_tbl(i).list_component_id;
  l_manage_partList_tbl                := l_reset_partList_tbl ;
  OPEN c_manage_partList(C_UPDATE_ACTION_CODE);
  FETCH c_manage_partList BULK COLLECT INTO l_manage_partList_tbl;
  CLOSE c_manage_partList;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Part List records to Update '||l_manage_partList_tbl.count);
  FORALL i IN l_manage_partList_tbl.FIRST..l_manage_partList_tbl.LAST
  UPDATE cse_parts_list_components assetparts
  SET object_version_number          = object_version_number +1,
    asset_id                         = l_manage_partList_tbl(i).asset_id,
    item_organization_id             = NVL(l_manage_partList_tbl(i).item_organization_id,item_organization_id),
    item_id                          = NVL(l_manage_partList_tbl(i).item_id,item_id),
    component_quantity               = l_manage_partList_tbl(i).component_quantity,
    attribute_category               = l_manage_partList_tbl(i).attribute_category,
    attribute_char1                  = l_manage_partList_tbl(i).attribute_char1,
    attribute_char2                  = l_manage_partList_tbl(i).attribute_char2,
    attribute_char3                  = l_manage_partList_tbl(i).attribute_char3,
    attribute_char4                  = l_manage_partList_tbl(i).attribute_char4,
    attribute_char5                  = l_manage_partList_tbl(i).attribute_char5,
    attribute_char6                  = l_manage_partList_tbl(i).attribute_char6,
    attribute_char7                  = l_manage_partList_tbl(i).attribute_char7,
    attribute_char8                  = l_manage_partList_tbl(i).attribute_char8,
    attribute_char9                  = l_manage_partList_tbl(i).attribute_char9,
    attribute_char10                 = l_manage_partList_tbl(i).attribute_char10,
    attribute_char11                 = l_manage_partList_tbl(i).attribute_char11,
    attribute_char12                 = l_manage_partList_tbl(i).attribute_char12,
    attribute_char13                 = l_manage_partList_tbl(i).attribute_char13,
    attribute_char14                 = l_manage_partList_tbl(i).attribute_char14,
    attribute_char15                 = l_manage_partList_tbl(i).attribute_char15,
    attribute_char16                 = l_manage_partList_tbl(i).attribute_char16,
    attribute_char17                 = l_manage_partList_tbl(i).attribute_char17,
    attribute_char18                 = l_manage_partList_tbl(i).attribute_char18,
    attribute_char19                 = l_manage_partList_tbl(i).attribute_char19,
    attribute_char20                 = l_manage_partList_tbl(i).attribute_char20,
    attribute_number1                = l_manage_partList_tbl(i).attribute_number1,
    attribute_number2                = l_manage_partList_tbl(i).attribute_number2,
    attribute_number3                = l_manage_partList_tbl(i).attribute_number3,
    attribute_number4                = l_manage_partList_tbl(i).attribute_number4,
    attribute_number5                = l_manage_partList_tbl(i).attribute_number5,
    attribute_number6                = l_manage_partList_tbl(i).attribute_number6,
    attribute_number7                = l_manage_partList_tbl(i).attribute_number7,
    attribute_number8                = l_manage_partList_tbl(i).attribute_number8,
    attribute_number9                = l_manage_partList_tbl(i).attribute_number9,
    attribute_number10               = l_manage_partList_tbl(i).attribute_number10,
    attribute_date1                  = l_manage_partList_tbl(i).attribute_date1,
    attribute_date2                  = l_manage_partList_tbl(i).attribute_date2,
    attribute_date3                  = l_manage_partList_tbl(i).attribute_date3,
    attribute_date4                  = l_manage_partList_tbl(i).attribute_date4,
    attribute_date5                  = l_manage_partList_tbl(i).attribute_date5,
    attribute_timestamp1             = l_manage_partList_tbl(i).attribute_timestamp1,
    attribute_timestamp2             = l_manage_partList_tbl(i).attribute_timestamp2,
    attribute_timestamp3             = l_manage_partList_tbl(i).attribute_timestamp3,
    attribute_timestamp4             = l_manage_partList_tbl(i).attribute_timestamp4,
    attribute_timestamp5             = l_manage_partList_tbl(i).attribute_timestamp5,
    last_updated_by                  = l_manage_partList_tbl(i).last_updated_by,
    last_update_date                 = l_manage_partList_tbl(i).last_update_date,
    last_update_login                = l_manage_partList_tbl(i).last_update_login,
    request_id                       = l_manage_partList_tbl(i).request_id,
    job_definition_name              = l_manage_partList_tbl(i).job_definition_name,
    job_definition_package           = l_manage_partList_tbl(i).job_definition_package
  WHERE assetparts.list_component_id = l_manage_partList_tbl(i).list_component_id;
  FORALL i IN l_manage_partList_tbl.FIRST..l_manage_partList_tbl.LAST
  DELETE cse_parts_list_components_int assetpartsint
  WHERE assetpartsint.list_component_id = l_manage_partList_tbl(i).list_component_id;
  INSERT
  INTO cse_parts_list_components
    (
      list_component_id,
      object_version_number,
      asset_id,
      item_organization_id,
      item_id,
      item_revision,
      component_quantity,
      attribute_category,
      attribute_char1,
      attribute_char2,
      attribute_char3,
      attribute_char4,
      attribute_char5,
      attribute_char6,
      attribute_char7,
      attribute_char8,
      attribute_char9,
      attribute_char10,
      attribute_char11,
      attribute_char12,
      attribute_char13,
      attribute_char14,
      attribute_char15,
      attribute_char16,
      attribute_char17,
      attribute_char18,
      attribute_char19,
      attribute_char20,
      attribute_number1,
      attribute_number2,
      attribute_number3,
      attribute_number4,
      attribute_number5,
      attribute_number6,
      attribute_number7,
      attribute_number8,
      attribute_number9,
      attribute_number10,
      attribute_date1,
      attribute_date2,
      attribute_date3,
      attribute_date4,
      attribute_date5,
      attribute_timestamp1,
      attribute_timestamp2,
      attribute_timestamp3,
      attribute_timestamp4,
      attribute_timestamp5,
      created_by,
      creation_date,
      last_updated_by,
      last_update_date,
      last_update_login,
      request_id,
      job_definition_name,
      job_definition_package
    )
    (SELECT assetpartsint.list_component_id ,
        1 object_version_number ,
        assetpartsint.asset_id ,
        assetpartsint.item_organization_id ,
        assetpartsint.item_id ,
        NULL item_revision ,
        assetpartsint.component_quantity ,
        assetpartsint.attribute_category ,
        assetpartsint.attribute_char1 ,
        assetpartsint.attribute_char2 ,
        assetpartsint.attribute_char3 ,
        assetpartsint.attribute_char4 ,
        assetpartsint.attribute_char5 ,
        assetpartsint.attribute_char6 ,
        assetpartsint.attribute_char7 ,
        assetpartsint.attribute_char8 ,
        assetpartsint.attribute_char9 ,
        assetpartsint.attribute_char10 ,
        assetpartsint.attribute_char11 ,
        assetpartsint.attribute_char12 ,
        assetpartsint.attribute_char13 ,
        assetpartsint.attribute_char14 ,
        assetpartsint.attribute_char15 ,
        assetpartsint.attribute_char16 ,
        assetpartsint.attribute_char17 ,
        assetpartsint.attribute_char18 ,
        assetpartsint.attribute_char19 ,
        assetpartsint.attribute_char20 ,
        assetpartsint.attribute_number1 ,
        assetpartsint.attribute_number2 ,
        assetpartsint.attribute_number3 ,
        assetpartsint.attribute_number4 ,
        assetpartsint.attribute_number5 ,
        assetpartsint.attribute_number6 ,
        assetpartsint.attribute_number7 ,
        assetpartsint.attribute_number8 ,
        assetpartsint.attribute_number9 ,
        assetpartsint.attribute_number10 ,
        assetpartsint.attribute_date1 ,
        assetpartsint.attribute_date2 ,
        assetpartsint.attribute_date3 ,
        assetpartsint.attribute_date4 ,
        assetpartsint.attribute_date5 ,
        assetpartsint.attribute_timestamp1 ,
        assetpartsint.attribute_timestamp2 ,
        assetpartsint.attribute_timestamp3 ,
        assetpartsint.attribute_timestamp4 ,
        assetpartsint.attribute_timestamp5 ,
        assetpartsint.created_by ,
        assetpartsint.creation_date ,
        assetpartsint.last_updated_by ,
        assetpartsint.last_update_date ,
        assetpartsint.last_update_login ,
        assetpartsint.request_id ,
        assetpartsint.job_definition_name ,
        assetpartsint.job_definition_package
      FROM cse_parts_list_components_int assetpartsint
      WHERE assetpartsint.partition_number    = p_partition_number
      AND assetpartsint.interface_batch_id    = p_batch_id
      AND assetpartsint.action_code           = C_CREATE_ACTION_CODE
      AND assetpartsint.interface_status_code = 'VALID'
    );
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Part List records to Created '||SQL%ROWCOUNT);
  DELETE
  FROM cse_parts_list_components_int assetpartsint
  WHERE assetpartsint.partition_number    = p_partition_number
  AND assetpartsint.interface_batch_id    = p_batch_id
  AND assetpartsint.action_code           = C_CREATE_ACTION_CODE
  AND assetpartsint.interface_status_code = 'VALID';
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Part List Create Interface records trace removed = '||SQL%ROWCOUNT);
EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  IF c_manage_partList%ISOPEN THEN
    CLOSE c_manage_partList;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END manage_partList_interface;

/*=============================================================================
  |
  |  DESCRIPTION
  |      This Public API does the following actions:
  |        1. Delete Valid Asset Charge records from Base table
  |        2. Update Valid Asset Charge records in Base table
  |        3. Create Valid Asset Charge records in Base table
  |
  |  PARAMETERS
  |      Returns x_errbuf and Status code x_retcode back to calling API
  |
  *===========================================================================*/

PROCEDURE manage_assetCharge_interface(
    p_batch_id         IN NUMBER,
    p_partition_number IN NUMBER,
    x_error_message OUT NOCOPY VARCHAR2,
    x_return_status OUT NOCOPY VARCHAR2)
IS
  CURSOR c_manage_assetCharge (cp_action_code VARCHAR2)
  IS
    SELECT assetChargesInt.asset_charge_id ,
      assetChargesInt.asset_id ,
      assetChargesInt.charge_definition_code ,
      assetChargesInt.price_element_code ,
      assetChargesInt.price_element_usage_code ,
      assetChargesInt.priced_quantity_uom_code ,
      assetChargesInt.unit_price ,
      assetChargesInt.currency_code ,
      assetChargesInt.primary_flag ,
      assetChargesInt.price_periodicity_code ,
      assetChargesInt.charges_rollup_flag ,
      assetChargesInt.charge_components_rollup_flag ,
      assetChargesInt.tax_included_flag ,
      assetChargesInt.attribute_category ,
      assetChargesInt.attribute_char1 ,
      assetChargesInt.attribute_char2 ,
      assetChargesInt.attribute_char3 ,
      assetChargesInt.attribute_char4 ,
      assetChargesInt.attribute_char5 ,
      assetChargesInt.attribute_char6 ,
      assetChargesInt.attribute_char7 ,
      assetChargesInt.attribute_char8 ,
      assetChargesInt.attribute_char9 ,
      assetChargesInt.attribute_char10 ,
      assetChargesInt.attribute_char11 ,
      assetChargesInt.attribute_char12 ,
      assetChargesInt.attribute_char13 ,
      assetChargesInt.attribute_char14 ,
      assetChargesInt.attribute_char15 ,
      assetChargesInt.attribute_char16 ,
      assetChargesInt.attribute_char17 ,
      assetChargesInt.attribute_char18 ,
      assetChargesInt.attribute_char19 ,
      assetChargesInt.attribute_char20 ,
      assetChargesInt.attribute_number1 ,
      assetChargesInt.attribute_number2 ,
      assetChargesInt.attribute_number3 ,
      assetChargesInt.attribute_number4 ,
      assetChargesInt.attribute_number5 ,
      assetChargesInt.attribute_number6 ,
      assetChargesInt.attribute_number7 ,
      assetChargesInt.attribute_number8 ,
      assetChargesInt.attribute_number9 ,
      assetChargesInt.attribute_number10 ,
      assetChargesInt.attribute_date1 ,
      assetChargesInt.attribute_date2 ,
      assetChargesInt.attribute_date3 ,
      assetChargesInt.attribute_date4 ,
      assetChargesInt.attribute_date5 ,
      assetChargesInt.attribute_timestamp1 ,
      assetChargesInt.attribute_timestamp2 ,
      assetChargesInt.attribute_timestamp3 ,
      assetChargesInt.attribute_timestamp4 ,
      assetChargesInt.attribute_timestamp5 ,
      assetChargesInt.last_updated_by ,
      assetChargesInt.last_update_date ,
      assetChargesInt.last_update_login ,
      assetChargesInt.request_id ,
      assetChargesInt.job_definition_name ,
      assetChargesInt.job_definition_package
    FROM CSE_ASSET_CHARGES_INT assetChargesInt
    WHERE assetChargesInt.partition_number    = p_partition_number
    AND assetChargesInt.interface_batch_id    = p_batch_id
    AND assetChargesInt.action_code           = cp_action_code
    AND assetChargesInt.interface_status_code = C_INT_VALID;
  l_api_name VARCHAR2(300)                   := 'cse_bulk_import_pvt.manage_assetCharge_interface';
TYPE l_manage_assetCharge_tbl_type
IS
  TABLE OF c_manage_assetCharge%ROWTYPE;
  l_manage_assetCharge_tbl l_manage_assetCharge_tbl_type;
  l_reset_assetCharge_tbl l_manage_assetCharge_tbl_type;
BEGIN
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
  x_return_status := fnd_api.g_ret_sts_success;
  --Delete Asset Charges
  OPEN c_manage_assetCharge(C_DELETE_ACTION_CODE);
  FETCH c_manage_assetCharge BULK COLLECT INTO l_manage_assetCharge_tbl;
  CLOSE c_manage_assetCharge;
  FORALL i IN l_manage_assetCharge_tbl.FIRST..l_manage_assetCharge_tbl.LAST
  DELETE cse_asset_charges assetCharges
  WHERE assetCharges.asset_charge_id = l_manage_assetCharge_tbl(i).asset_charge_id;
  FORALL i IN l_manage_assetCharge_tbl.FIRST..l_manage_assetCharge_tbl.LAST
  DELETE cse_asset_charges_int assetChargesInt
  WHERE assetChargesInt.asset_charge_id = l_manage_assetCharge_tbl(i).asset_charge_id;
  --Update Asset Charges
  l_manage_assetCharge_tbl := l_reset_assetCharge_tbl ;
  OPEN c_manage_assetCharge(C_UPDATE_ACTION_CODE);
  FETCH c_manage_assetCharge BULK COLLECT INTO l_manage_assetCharge_tbl;
  CLOSE c_manage_assetCharge;
  FORALL i IN l_manage_assetCharge_tbl.FIRST..l_manage_assetCharge_tbl.LAST
  UPDATE cse_asset_charges assetCharges
  SET object_version_number          = object_version_number +1,
    asset_id                         = l_manage_assetCharge_tbl(i).asset_id,
    charge_definition_code           = l_manage_assetCharge_tbl(i).charge_definition_code,
    price_element_code               = l_manage_assetCharge_tbl(i).price_element_code,
    price_element_usage_code         = l_manage_assetCharge_tbl(i).price_element_usage_code,
    priced_quantity_uom_code         = l_manage_assetCharge_tbl(i).priced_quantity_uom_code,
    unit_price                       = l_manage_assetCharge_tbl(i).unit_price,
    currency_code                    = l_manage_assetCharge_tbl(i).currency_code,
    primary_flag                     = l_manage_assetCharge_tbl(i).primary_flag,
    price_periodicity_code           = l_manage_assetCharge_tbl(i).price_periodicity_code,
    charges_rollup_flag              = l_manage_assetCharge_tbl(i).charges_rollup_flag,
    charge_components_rollup_flag    = l_manage_assetCharge_tbl(i).charge_components_rollup_flag,
    tax_included_flag                = l_manage_assetCharge_tbl(i).tax_included_flag,
    attribute_category               = l_manage_assetCharge_tbl(i).attribute_category,
    attribute_char1                  = l_manage_assetCharge_tbl(i).attribute_char1,
    attribute_char2                  = l_manage_assetCharge_tbl(i).attribute_char2,
    attribute_char3                  = l_manage_assetCharge_tbl(i).attribute_char3,
    attribute_char4                  = l_manage_assetCharge_tbl(i).attribute_char4,
    attribute_char5                  = l_manage_assetCharge_tbl(i).attribute_char5,
    attribute_char6                  = l_manage_assetCharge_tbl(i).attribute_char6,
    attribute_char7                  = l_manage_assetCharge_tbl(i).attribute_char7,
    attribute_char8                  = l_manage_assetCharge_tbl(i).attribute_char8,
    attribute_char9                  = l_manage_assetCharge_tbl(i).attribute_char9,
    attribute_char10                 = l_manage_assetCharge_tbl(i).attribute_char10,
    attribute_char11                 = l_manage_assetCharge_tbl(i).attribute_char11,
    attribute_char12                 = l_manage_assetCharge_tbl(i).attribute_char12,
    attribute_char13                 = l_manage_assetCharge_tbl(i).attribute_char13,
    attribute_char14                 = l_manage_assetCharge_tbl(i).attribute_char14,
    attribute_char15                 = l_manage_assetCharge_tbl(i).attribute_char15,
    attribute_char16                 = l_manage_assetCharge_tbl(i).attribute_char16,
    attribute_char17                 = l_manage_assetCharge_tbl(i).attribute_char17,
    attribute_char18                 = l_manage_assetCharge_tbl(i).attribute_char18,
    attribute_char19                 = l_manage_assetCharge_tbl(i).attribute_char19,
    attribute_char20                 = l_manage_assetCharge_tbl(i).attribute_char20,
    attribute_number1                = l_manage_assetCharge_tbl(i).attribute_number1,
    attribute_number2                = l_manage_assetCharge_tbl(i).attribute_number2,
    attribute_number3                = l_manage_assetCharge_tbl(i).attribute_number3,
    attribute_number4                = l_manage_assetCharge_tbl(i).attribute_number4,
    attribute_number5                = l_manage_assetCharge_tbl(i).attribute_number5,
    attribute_number6                = l_manage_assetCharge_tbl(i).attribute_number6,
    attribute_number7                = l_manage_assetCharge_tbl(i).attribute_number7,
    attribute_number8                = l_manage_assetCharge_tbl(i).attribute_number8,
    attribute_number9                = l_manage_assetCharge_tbl(i).attribute_number9,
    attribute_number10               = l_manage_assetCharge_tbl(i).attribute_number10,
    attribute_date1                  = l_manage_assetCharge_tbl(i).attribute_date1,
    attribute_date2                  = l_manage_assetCharge_tbl(i).attribute_date2,
    attribute_date3                  = l_manage_assetCharge_tbl(i).attribute_date3,
    attribute_date4                  = l_manage_assetCharge_tbl(i).attribute_date4,
    attribute_date5                  = l_manage_assetCharge_tbl(i).attribute_date5,
    attribute_timestamp1             = l_manage_assetCharge_tbl(i).attribute_timestamp1,
    attribute_timestamp2             = l_manage_assetCharge_tbl(i).attribute_timestamp2,
    attribute_timestamp3             = l_manage_assetCharge_tbl(i).attribute_timestamp3,
    attribute_timestamp4             = l_manage_assetCharge_tbl(i).attribute_timestamp4,
    attribute_timestamp5             = l_manage_assetCharge_tbl(i).attribute_timestamp5,
    last_updated_by                  = l_manage_assetCharge_tbl(i).last_updated_by,
    last_update_date                 = l_manage_assetCharge_tbl(i).last_update_date,
    last_update_login                = l_manage_assetCharge_tbl(i).last_update_login,
    request_id                       = l_manage_assetCharge_tbl(i).request_id,
    job_definition_name              = l_manage_assetCharge_tbl(i).job_definition_name,
    job_definition_package           = l_manage_assetCharge_tbl(i).job_definition_package
  WHERE assetCharges.asset_charge_id = l_manage_assetCharge_tbl(i).asset_charge_id;
  FORALL i IN l_manage_assetCharge_tbl.FIRST..l_manage_assetCharge_tbl.LAST
  DELETE cse_asset_charges_int assetChargesInt
  WHERE assetChargesInt.asset_charge_id = l_manage_assetCharge_tbl(i).asset_charge_id;
  INSERT
  INTO cse_asset_charges
    (
      asset_charge_id,
      object_version_number,
      asset_id,
      charge_definition_code,
      price_element_code,
      price_element_usage_code,
      priced_quantity_uom_code,
      unit_price,
      currency_code,
      primary_flag,
      price_periodicity_code,
      charges_rollup_flag,
      charge_components_rollup_flag,
      tax_included_flag,
      attribute_category,
      attribute_char1,
      attribute_char2,
      attribute_char3,
      attribute_char4,
      attribute_char5,
      attribute_char6,
      attribute_char7,
      attribute_char8,
      attribute_char9,
      attribute_char10,
      attribute_char11,
      attribute_char12,
      attribute_char13,
      attribute_char14,
      attribute_char15,
      attribute_char16,
      attribute_char17,
      attribute_char18,
      attribute_char19,
      attribute_char20,
      attribute_number1,
      attribute_number2,
      attribute_number3,
      attribute_number4,
      attribute_number5,
      attribute_number6,
      attribute_number7,
      attribute_number8,
      attribute_number9,
      attribute_number10,
      attribute_date1,
      attribute_date2,
      attribute_date3,
      attribute_date4,
      attribute_date5,
      attribute_timestamp1,
      attribute_timestamp2,
      attribute_timestamp3,
      attribute_timestamp4,
      attribute_timestamp5,
      created_by,
      creation_date,
      last_updated_by,
      last_update_date,
      last_update_login,
      request_id,
      job_definition_name,
      job_definition_package
    )
    (SELECT assetChargesInt.ASSET_CHARGE_ID ,
        1 object_version_number ,
        assetChargesInt.asset_id ,
        assetChargesInt.charge_definition_code ,
        assetChargesInt.price_element_code ,
        assetChargesInt.price_element_usage_code ,
        assetChargesInt.priced_quantity_uom_code ,
        assetChargesInt.unit_price ,
        assetChargesInt.currency_code ,
        assetChargesInt.primary_flag ,
        assetChargesInt.price_periodicity_code ,
        assetChargesInt.charges_rollup_flag ,
        assetChargesInt.charge_components_rollup_flag ,
        assetChargesInt.tax_included_flag ,
        assetChargesInt.attribute_category ,
        assetChargesInt.attribute_char1 ,
        assetChargesInt.attribute_char2 ,
        assetChargesInt.attribute_char3 ,
        assetChargesInt.attribute_char4 ,
        assetChargesInt.attribute_char5 ,
        assetChargesInt.attribute_char6 ,
        assetChargesInt.attribute_char7 ,
        assetChargesInt.attribute_char8 ,
        assetChargesInt.attribute_char9 ,
        assetChargesInt.attribute_char10 ,
        assetChargesInt.attribute_char11 ,
        assetChargesInt.attribute_char12 ,
        assetChargesInt.attribute_char13 ,
        assetChargesInt.attribute_char14 ,
        assetChargesInt.attribute_char15 ,
        assetChargesInt.attribute_char16 ,
        assetChargesInt.attribute_char17 ,
        assetChargesInt.attribute_char18 ,
        assetChargesInt.attribute_char19 ,
        assetChargesInt.attribute_char20 ,
        assetChargesInt.attribute_number1 ,
        assetChargesInt.attribute_number2 ,
        assetChargesInt.attribute_number3 ,
        assetChargesInt.attribute_number4 ,
        assetChargesInt.attribute_number5 ,
        assetChargesInt.attribute_number6 ,
        assetChargesInt.attribute_number7 ,
        assetChargesInt.attribute_number8 ,
        assetChargesInt.attribute_number9 ,
        assetChargesInt.attribute_number10 ,
        assetChargesInt.attribute_date1 ,
        assetChargesInt.attribute_date2 ,
        assetChargesInt.attribute_date3 ,
        assetChargesInt.attribute_date4 ,
        assetChargesInt.attribute_date5 ,
        assetChargesInt.attribute_timestamp1 ,
        assetChargesInt.attribute_timestamp2 ,
        assetChargesInt.attribute_timestamp3 ,
        assetChargesInt.attribute_timestamp4 ,
        assetChargesInt.attribute_timestamp5 ,
        assetChargesInt.created_by ,
        assetChargesInt.creation_date ,
        assetChargesInt.last_updated_by ,
        assetChargesInt.last_update_date ,
        assetChargesInt.last_update_login ,
        assetChargesInt.request_id ,
        assetChargesInt.job_definition_name ,
        assetChargesInt.job_definition_package
      FROM cse_asset_charges_int assetChargesInt
      WHERE assetChargesInt.partition_number    = p_partition_number
      AND assetChargesInt.interface_batch_id    = p_batch_id
      AND assetChargesInt.action_code           = C_CREATE_ACTION_CODE
      AND assetChargesInt.interface_status_code = C_INT_VALID
    );
  DELETE
  FROM cse_asset_charges_int assetChargesInt
  WHERE assetChargesInt.partition_number    = p_partition_number
  AND assetChargesInt.interface_batch_id    = p_batch_id
  AND assetChargesInt.action_code           = C_CREATE_ACTION_CODE
  AND assetChargesInt.interface_status_code = C_INT_VALID;
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');
EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  IF c_manage_assetCharge%ISOPEN THEN
    CLOSE c_manage_assetCharge;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END manage_assetCharge_interface;

/*=============================================================================
|
|  DESCRIPTION
|      This Public API does the following actions:
|        1. Validate Batch record along with System values
|        2. Create Transaction record for the batch
|
|  PARAMETERS
|      Returns x_errbuf and Status code x_retcode back to calling Api
|
*===========================================================================*/

PROCEDURE validate_and_create_txn(
    p_batch_id   IN NUMBER,
    p_batch_code IN VARCHAR2,
    x_transaction_id OUT NOCOPY   NUMBER,
    x_transaction_date OUT NOCOPY DATE,
    x_error_message OUT NOCOPY    VARCHAR2,
    x_return_status OUT NOCOPY    VARCHAR2)
IS
  l_api_name               VARCHAR2(300) := 'cse_bulk_import_pvt.validate_and_create_txn';
  l_Source_System_Type     VARCHAR2(30);
  l_Source_System_Code     VARCHAR2(30);
  l_Interface_Batch_Status VARCHAR2(30);
  l_validates              NUMBER := 0;
  l_Src_System_Id          NUMBER := 0;
  l_Batch_Id               NUMBER := 0;
  l_Transaction_Id         NUMBER;
  l_Transaction_date       DATE := sysdate;
  l_item_id                NUMBER;
  l_org_id                 NUMBER;
  l_src_transaction_date   TIMESTAMP(6);

BEGIN
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
  x_return_status := fnd_api.g_ret_sts_success;
  SELECT DISTINCT cseib.source_system_type,
    cseib.source_system_code,
    cseib.interface_batch_status
  INTO l_Source_System_Type,
    l_Source_System_Code,
    l_Interface_Batch_Status
  FROM cse_int_batches_b cseib
  WHERE (cseib.interface_batch_id = p_batch_id
  OR cseib.interface_batch_code   = p_batch_code)
  AND rownum                      =1;
  SELECT cseib.source_transaction_date
  INTO l_src_transaction_date
  FROM cse_int_batches_b cseib
  WHERE (cseib.interface_batch_id = p_batch_id
  OR cseib.interface_batch_code   = p_batch_code);
  IF (l_src_transaction_date     IS NULL ) THEN
    l_src_transaction_date       :=l_Transaction_date;
  END IF;
  IF l_Interface_Batch_Status <> 'READY' THEN
    x_error_message           := 'FND_CMN_INVALID_ATTRB_API_SERV';
    x_return_status           := fnd_api.g_ret_sts_error;
  END IF;
  IF l_Source_System_Type IS NOT NULL THEN
    SELECT 1
    INTO l_validates
    FROM fnd_lookups
    WHERE lookup_type      = 'ORA_CSE_SOURCE_SYSTEM_TYPE'
    AND upper(lookup_code) = upper(l_Source_System_Type) ;
  ELSE
    x_error_message := 'FND_CMN_INVALID_ATTRB_API_SERV';
    x_return_status := fnd_api.g_ret_sts_error;
  END IF;
  IF l_Source_System_Type ='ORA_INTERNAL' THEN
    SELECT application_id
    INTO l_Src_System_Id
    FROM fnd_application_vl
    WHERE product_code = l_Source_System_Code ;
  ELSE
    SELECT orig_system_id
    INTO l_Src_System_Id
    FROM hz_orig_systems_vl
    WHERE orig_system = l_Source_System_Code ;
  END IF;
  SELECT MAX(csea.item_id),
    MAX(csea.item_organization_id)
  INTO l_item_id,
    l_org_id
  FROM cse_assets_int csea
  WHERE (csea.interface_batch_id = p_batch_id
  OR csea.interface_batch_code   = p_batch_code)
  AND csea.item_id              IS NOT NULL
  AND csea.item_organization_id IS NOT NULL;
  IF NVL(l_Src_System_Id,0)     <> 0 AND NVL(l_validates,0) <> 0 AND l_item_id IS NOT NULL AND l_org_id IS NOT NULL THEN
    l_Transaction_Id            := cse_int_s.nextval;
    x_transaction_id            := l_Transaction_Id;
    INSERT
    INTO CSE_TRANSACTIONS
      (
        transaction_id ,
        object_version_number,
        src_system_type,
        src_system_id,
        src_transaction_date,
        src_transaction_id,
        src_transaction_type_id,
        src_transaction_type,
        src_transaction_qty,
        item_id,
        item_revision,
        item_organization_id,
        created_by,
        creation_date,
        last_updated_by,
        last_update_date,
        last_update_login,
        request_id,
        job_definition_name,
        job_definition_package
      )
      (SELECT l_Transaction_Id,
          object_version_number,
          source_system_type ,
          source_system_id ,
          l_src_transaction_date src_transaction_date,
          interface_batch_id src_transaction_id,
          NULL src_transaction_type_id,
          NULL src_transaction_type,
          NULL src_transaction_qty,
          l_item_id item_id,
          NULL item_revision,
          l_org_id item_organization_id,
          created_by ,
          l_Transaction_date creation_date,
          last_updated_by,
          l_Transaction_date last_update_date ,
          last_updated_by,
          request_id ,
          job_definition_name,
          job_definition_package
        FROM cse_int_batches_b cseintb
        WHERE (cseintb.interface_batch_id = p_batch_id
        OR cseintb.interface_batch_code   = p_batch_code)
      );
    x_transaction_id   := l_Transaction_Id;
    x_transaction_date := l_src_transaction_date ;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');
EXCEPTION
WHEN no_data_found THEN
  x_error_message := 'FND_CMN_INVALID_ATTRB_API_SERV';
  x_return_status := fnd_api.g_ret_sts_error;
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END validate_and_create_txn;

/*=============================================================================
|
|  DESCRIPTION
|      1. This is a private procedure local to the API.
|
|      2. Update Asset charge interface records with right asset_id
|         derived using interface_record_number from corresponding asset records
|         The derivation happens just ahead of the deletion of asset records after
|         successful processing.
*===========================================================================*/

PROCEDURE Update_Asset_Charge_Records
  (
    p_partition_number IN NUMBER,
    p_batch_id         IN NUMBER,
    p_operation_code   IN VARCHAR2,
    x_error_message OUT NOCOPY VARCHAR2,
    x_return_status OUT NOCOPY VARCHAR2
  )
IS
  CURSOR c_get_asset_int_rec
  IS
    SELECT cseAssets.asset_number,
      cseaint.interface_record_number
    FROM CSE_ASSETS_INT cseaint,
      CSE_ASSETS_B cseAssets
    WHERE cseaint.interface_status_code = C_INT_VALID
    AND cseaint.partition_number        = p_partition_number
    AND cseaint.interface_batch_id      = p_batch_id
    AND cseaint.action_code             = p_operation_code
    AND cseAssets.asset_id              = cseaint.asset_id;
TYPE l_assets_int_tbl_type
IS
  TABLE OF c_get_asset_int_rec%ROWTYPE;
  l_assets_int_tbl l_assets_int_tbl_type;
  l_api_name VARCHAR2(300) := 'cse_bulk_import_pvt.Update_Asset_Charge_Records';
BEGIN
  OPEN c_get_asset_int_rec;
  FETCH c_get_asset_int_rec BULK COLLECT INTO l_assets_int_tbl;
  CLOSE c_get_asset_int_rec;
  FORALL i IN l_assets_int_tbl.FIRST..l_assets_int_tbl.LAST
  UPDATE CSE_ASSET_CHARGES_INT
  SET asset_number              = l_assets_int_tbl(i).asset_number
  WHERE interface_record_number = l_assets_int_tbl(i).interface_record_number;
EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  IF c_get_asset_int_rec%ISOPEN THEN
    CLOSE c_get_asset_int_rec;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END Update_Asset_Charge_Records;

/*======================================================================================
|
|  DESCRIPTION
|      This Public API does the following actions:
|        1. Prepare data for Asset creation event to be shared with OKC
|
|  PARAMETERS
|      Returns x_error_message and Status code x_return_status back to calling Api
|
*======================================================================================*/

PROCEDURE create_service_asset_records(
    p_batch_id          IN NUMBER,
    p_partition_number  IN NUMBER,
    px_transaction_id   IN OUT NOCOPY NUMBER,
    px_transaction_date IN OUT NOCOPY DATE,
    x_error_message OUT NOCOPY        VARCHAR2,
    x_return_status OUT NOCOPY        VARCHAR2)
IS
  CURSOR c_create_asset_service
  IS
    SELECT asset_id ,
      item_id,
      item_organization_id,
      sold_by_business_unit_id ,
      customer_id ,
      customer_account_id ,
      customer_site_party_id ,
      customer_site_id ,
      shipment_date ,
      quantity ,
      uom_code ,
      sales_order_source_system_type ,
      sales_order_source_system ,
      sales_order_id ,
      sales_order_line_id ,
      sales_order_number ,
      sales_order_line_number ,
      px_transaction_id ,
      px_transaction_date
    FROM cse_assets_int cseaint
    WHERE cseaint.interface_status_code = 'VALID'
    AND cseaint.partition_number        = p_partition_number
    AND cseaint.interface_batch_id      = p_batch_id
    AND cseaint.action_code             = C_CREATE_ACTION_CODE
    AND cseaint.okc_interface_flag      = 'Y'
    AND cseaint.item_id                IS NOT NULL
    AND cseaint.item_organization_id   IS NOT NULL
    AND cseaint.asset_id               IS NOT NULL;
TYPE l_creation_event_tbl_type
IS
  TABLE OF c_create_asset_service%ROWTYPE;
  l_creation_event_tbl l_creation_event_tbl_type;
  l_okc_creation_event_tbl okc_srvc_transaction_int_pub.asset_creation_event_tbl_type;
  l_message_tbl okc_srvc_transaction_int_pub.message_tbl_type;
  l_message_count NUMBER;
  l_return_status VARCHAR2(2);
  l_error_msg     VARCHAR2(600);
  n BINARY_INTEGER;

BEGIN
  OPEN c_create_asset_service;
  FETCH c_create_asset_service BULK COLLECT INTO l_creation_event_tbl;
  CLOSE c_create_asset_service;
  FOR i IN 1..l_creation_event_tbl.COUNT
  LOOP
    l_okc_creation_event_tbl(i).asset_id                      :=l_creation_event_tbl(i).asset_id;
    l_okc_creation_event_tbl(i).asset_inv_item_id             :=l_creation_event_tbl(i).item_id;
    l_okc_creation_event_tbl(i).asset_ship_from_inv_org_id    :=l_creation_event_tbl(i).item_organization_id;
    l_okc_creation_event_tbl(i).asset_sold_by_bu_id           :=l_creation_event_tbl(i).sold_by_business_unit_id;
    l_okc_creation_event_tbl(i).asset_sold_to_party_id        :=l_creation_event_tbl(i).customer_id;
    l_okc_creation_event_tbl(i).asset_bill_to_account_id      :=l_creation_event_tbl(i).customer_account_id;
    l_okc_creation_event_tbl(i).asset_ship_to_party_id        :=l_creation_event_tbl(i).customer_site_party_id;
    l_okc_creation_event_tbl(i).asset_ship_to_party_site_id   :=l_creation_event_tbl(i).customer_site_id;
    l_okc_creation_event_tbl(i).asset_ship_date               :=l_creation_event_tbl(i).shipment_date;
    l_okc_creation_event_tbl(i).asset_quantity                :=l_creation_event_tbl(i).quantity;
    l_okc_creation_event_tbl(i).asset_quantity_uom_code       :=l_creation_event_tbl(i).uom_code;
    l_okc_creation_event_tbl(i).asset_sales_order_system_type :=l_creation_event_tbl(i).sales_order_source_system_type;
    l_okc_creation_event_tbl(i).asset_sales_order_system      :=l_creation_event_tbl(i).sales_order_source_system;
    l_okc_creation_event_tbl(i).asset_sales_order_id          :=l_creation_event_tbl(i).sales_order_id;
    l_okc_creation_event_tbl(i).asset_sales_order_line_id     :=l_creation_event_tbl(i).sales_order_line_id;
    l_okc_creation_event_tbl(i).asset_sales_order_number      :=l_creation_event_tbl(i).sales_order_number;
    l_okc_creation_event_tbl(i).asset_sales_order_line_num    :=l_creation_event_tbl(i).sales_order_line_number;
    l_okc_creation_event_tbl(i).asset_transaction_id          :=l_creation_event_tbl(i).px_transaction_id;
    l_okc_creation_event_tbl(i).asset_source_txn_timestamp    :=l_creation_event_tbl(i).px_transaction_date;
  END LOOP;
  cse_int_utils_pvt.create_service_contract_event ( l_okc_creation_event_tbl , l_return_status , l_message_count , l_message_tbl );
  n            :=l_message_tbl.LAST;
  IF(n         <>NULL) THEN
    l_error_msg:=l_message_tbl(n).txn_msg_text;
  ELSE
    l_error_msg :=x_error_message;
  END IF;
  IF(l_return_status<> fnd_api.g_ret_sts_success) THEN
    cse_int_utils_pvt.log_messages(fnd_log.level_info,'Cse_int_utils_pvt Api call to create_service_contract_event Failed ',l_error_msg);
  END IF;
  x_return_status :=l_return_status;
  x_error_message :=l_error_msg;
END create_service_asset_records;

/*=======================================================================================
|
|  DESCRIPTION
|      This Public API does the following actions:
|        1. Prepare data for Asset expire event to be shared with OKC
|
|  PARAMETERS
|      Returns x_error_message and Status code x_return_status back to calling Api
|
*=======================================================================================*/

PROCEDURE expire_service_asset_records(
    p_batch_id          IN NUMBER,
    p_partition_number  IN NUMBER,
    px_transaction_id   IN OUT NOCOPY NUMBER,
    px_transaction_date IN OUT NOCOPY DATE,
    x_error_message OUT NOCOPY        VARCHAR2,
    x_return_status OUT NOCOPY        VARCHAR2)
IS
  CURSOR c_expire_asset_service
  IS
    SELECT asset_id ,
      active_end_date ,
      px_transaction_id ,
      px_transaction_date
    FROM cse_assets_int cseaint
    WHERE cseaint.interface_status_code = 'VALID'
    AND cseaint.partition_number        = p_partition_number
    AND cseaint.interface_batch_id      = p_batch_id
    AND cseaint.action_code             = C_UPDATE_ACTION_CODE
    AND cseaint.asset_id               IS NOT NULL
    AND cseaint.active_end_date        IS NOT NULL
    AND cseaint.active_end_date        <>FND_API.G_NULL_DATE ;
TYPE l_expiration_event_tbl_type
IS
  TABLE OF c_expire_asset_service%ROWTYPE;
  l_expiration_event_tbl l_expiration_event_tbl_type;
  l_okc_expire_event_tbl okc_srvc_transaction_int_pub.asset_expiry_event_tbl_type;
  l_message_tbl okc_srvc_transaction_int_pub.message_tbl_type;
  l_message_count NUMBER;
  l_return_status VARCHAR2(2);
  l_error_msg     VARCHAR2(600);
  n BINARY_INTEGER;
BEGIN
  OPEN c_expire_asset_service;
  FETCH c_expire_asset_service BULK COLLECT INTO l_expiration_event_tbl;
  CLOSE c_expire_asset_service;
  FOR i IN 1..l_expiration_event_tbl.COUNT
  LOOP
    l_okc_expire_event_tbl(i).asset_id                   := l_expiration_event_tbl(i).asset_id;
    l_okc_expire_event_tbl(i).asset_expiry_date          := l_expiration_event_tbl(i).active_end_date;
    l_okc_expire_event_tbl(i).asset_transaction_id       := l_expiration_event_tbl(i).px_transaction_id;
    l_okc_expire_event_tbl(i).asset_source_txn_timestamp := l_expiration_event_tbl(i).px_transaction_date;
  END LOOP;
  cse_int_utils_pvt.expire_service_contract_event ( l_okc_expire_event_tbl , l_return_status , l_message_count , l_message_tbl );
  n            :=l_message_tbl.LAST;
  IF(n         <>NULL) THEN
    l_error_msg:=l_message_tbl(n).txn_msg_text;
  ELSE
    l_error_msg :=x_error_message;
  END IF;
  IF(l_return_status<> fnd_api.g_ret_sts_success) THEN
    cse_int_utils_pvt.log_messages(fnd_log.level_info,'Cse_int_utils_pvt Api call to expiry_service_contract_event Failed ', l_error_msg);
  END IF;
  x_return_status :=l_return_status;
  x_error_message :=l_error_msg;
END expire_service_asset_records;

/*=======================================================================================
|
|  DESCRIPTION
|      This Public API does the following actions:
|        1. Prepare data for Asset transfer event to be shared with OKC
|
|  PARAMETERS
|      Returns x_error_message and Status code x_return_status back to calling Api
|
*=======================================================================================*/

PROCEDURE transfer_service_asset_records(
    p_batch_id          IN NUMBER,
    p_partition_number  IN NUMBER,
    p_interface_row_id  IN NUMBER,
    px_transaction_id   IN OUT NOCOPY NUMBER,
    px_transaction_date IN OUT NOCOPY DATE,
    x_error_message OUT NOCOPY        VARCHAR2,
    x_return_status OUT NOCOPY        VARCHAR2)
IS
  /* transfer of customer asset*/
  CURSOR c_transfer_customer_asset
  IS
    SELECT asset_id ,
      px_transaction_date source_txn_date,
      cseaint.customer_id ,
      cseaint.customer_account_id ,
      cseaint.customer_account_site_id ,
      cseaint.customer_site_party_id ,
      cseaint.sales_order_source_system_type ,
      cseaint.sales_order_source_system ,
      cseaint.sales_order_id ,
      cseaint.sales_order_line_id ,
      cseaint.sales_order_number ,
      cseaint.sales_order_line_number ,
      px_transaction_id ,
      px_transaction_date
    FROM cse_assets_int cseaint
    WHERE cseaint.interface_status_code = 'VALID'
    AND cseaint.partition_number        = p_partition_number
    AND cseaint.interface_batch_id      = p_batch_id
    AND cseaint.action_code             = C_UPDATE_ACTION_CODE
    AND cseaint.interface_row_id        = p_interface_row_id
    AND cseaint.asset_id               IS NOT NULL
    AND cseaint.customer_number        IS NOT NULL;
TYPE l_transfer_event_tbl_type
IS
  TABLE OF c_transfer_customer_asset%ROWTYPE;
  l_transfer_event_tbl l_transfer_event_tbl_type;
  l_okc_transfer_event_tbl okc_srvc_transaction_int_pub.asset_transfer_event_tbl_type;
  l_transaction_date CSE_INT_BATCHES_B.source_transaction_date%type;
  l_message_tbl okc_srvc_transaction_int_pub.message_tbl_type;
  l_message_count NUMBER;
  l_return_status VARCHAR2(2);
  l_error_message VARCHAR2(600);
  n BINARY_INTEGER;

BEGIN
  OPEN c_transfer_customer_asset;
  FETCH c_transfer_customer_asset BULK COLLECT INTO l_transfer_event_tbl;
  CLOSE c_transfer_customer_asset;
  FOR i IN 1..l_transfer_event_tbl.COUNT
  LOOP
    l_okc_transfer_event_tbl(i).asset_id                      :=l_transfer_event_tbl(i).asset_id;
    l_okc_transfer_event_tbl(i).asset_transfer_date           :=l_transfer_event_tbl(i).source_txn_date;
    l_okc_transfer_event_tbl(i).asset_new_sold_to_party_id    :=l_transfer_event_tbl(i).customer_id;
    l_okc_transfer_event_tbl(i).asset_new_bill_to_account_id  :=l_transfer_event_tbl(i).customer_account_id;
    l_okc_transfer_event_tbl(i).asset_new_ship_to_party_id    :=l_transfer_event_tbl(i).customer_account_site_id;
    l_okc_transfer_event_tbl(i).asset_new_ship_to_pty_site_id :=l_transfer_event_tbl(i).customer_site_party_id;
    l_okc_transfer_event_tbl(i).asset_new_sales_ord_sys_type  :=l_transfer_event_tbl(i).sales_order_source_system_type;
    l_okc_transfer_event_tbl(i).asset_new_sales_ord_system    :=l_transfer_event_tbl(i).sales_order_source_system;
    l_okc_transfer_event_tbl(i).asset_new_sales_ord_id        :=l_transfer_event_tbl(i).sales_order_id;
    l_okc_transfer_event_tbl(i).asset_new_sales_ord_line_id   :=l_transfer_event_tbl(i).sales_order_line_id;
    l_okc_transfer_event_tbl(i).asset_new_sales_ord_number    :=l_transfer_event_tbl(i).sales_order_number;
    l_okc_transfer_event_tbl(i).asset_new_sales_ord_line_num  :=l_transfer_event_tbl(i).sales_order_source_system_type;
    l_okc_transfer_event_tbl(i).asset_transaction_id          :=l_transfer_event_tbl(i).px_transaction_id;
    l_okc_transfer_event_tbl(i).asset_source_txn_timestamp    :=l_transfer_event_tbl(i).px_transaction_date;
  END LOOP;
  cse_int_utils_pvt.tsfr_service_contract_event ( l_okc_transfer_event_tbl , l_return_status , l_message_count , l_message_tbl );
  n                :=l_message_tbl.LAST;
  IF(n             <>NULL) THEN
    l_error_message:=l_message_tbl(n).txn_msg_text;
  ELSE
    l_error_message :=x_error_message;
  END IF;
  IF (l_return_status<> fnd_api.g_ret_sts_success) THEN
    cse_int_utils_pvt.log_messages(fnd_log.level_info,'Cse_int_utils_pvt Api call to tsfr_service_contract_event Failed ',l_error_message);
  END IF;
  x_return_status := l_return_status;
  l_okc_transfer_event_tbl.DELETE;
  x_error_message :=l_error_message;
END transfer_service_asset_records;

/*=======================================================================================
|
|  DESCRIPTION
|      This Public API does the following actions:
|        1. Prepare data for Asset Reinstate event to be shared with OKC
|
|  PARAMETERS
|      Returns x_error_message and Status code x_return_status back to calling Api
|
*=======================================================================================*/

PROCEDURE reinstate_service_asset(
    p_batch_id          IN NUMBER,
    p_partition_number  IN NUMBER,
    p_interface_row_id  IN NUMBER,
    px_transaction_id   IN OUT NOCOPY NUMBER,
    px_transaction_date IN OUT NOCOPY DATE,
    x_error_message OUT NOCOPY        VARCHAR2,
    x_return_status OUT NOCOPY        VARCHAR2)
IS
  /* cursor to get the reinstate customer asset attributes*/
  CURSOR c_reinstate_customer_asset
  IS
    SELECT asset_id ,
      px_transaction_date source_transaction_date,
      px_transaction_id ,
      px_transaction_date
    FROM cse_assets_int cseaint
    WHERE cseaint.interface_status_code = 'VALID'
    AND cseaint.partition_number        = p_partition_number
    AND cseaint.interface_batch_id      = p_batch_id
    AND cseaint.action_code             = C_UPDATE_ACTION_CODE
    AND cseaint.interface_row_id        = p_interface_row_id
    AND cseaint.asset_id               IS NOT NULL
    AND cseaint.active_end_date         =FND_API.G_NULL_DATE;
TYPE l_reinstate_event_tbl_type
IS
  TABLE OF c_reinstate_customer_asset%ROWTYPE;
  l_reinstate_event_tbl l_reinstate_event_tbl_type;
  l_okc_reinstate_event_tbl okc_srvc_transaction_int_pub.asset_reinstate_event_tbl_type;
  l_message_tbl okc_srvc_transaction_int_pub.message_tbl_type;
  l_message_count NUMBER;
  l_return_status VARCHAR2(2);
  l_error_message VARCHAR2(600);
  n BINARY_INTEGER;

BEGIN

OPEN c_reinstate_customer_asset;
  FETCH c_reinstate_customer_asset BULK COLLECT INTO l_reinstate_event_tbl;
  CLOSE c_reinstate_customer_asset;
  FOR i IN 1..l_reinstate_event_tbl.COUNT
  LOOP
    l_okc_reinstate_event_tbl(i).asset_id                   :=l_reinstate_event_tbl(i).asset_id;
    l_okc_reinstate_event_tbl(i).asset_reinstate_date       :=l_reinstate_event_tbl(i).source_transaction_date;
    l_okc_reinstate_event_tbl(i).asset_transaction_id       :=l_reinstate_event_tbl(i).px_transaction_id;
    l_okc_reinstate_event_tbl(i).asset_source_txn_timestamp :=l_reinstate_event_tbl(i).px_transaction_date;
  END LOOP;
  cse_int_utils_pvt.rst_service_contract_event ( l_okc_reinstate_event_tbl , l_return_status , l_message_count , l_message_tbl );
  n                :=l_message_tbl.LAST;
  IF(n             <>NULL) THEN
    l_error_message:=l_message_tbl(n).txn_msg_text;
  ELSE
    l_error_message :=x_error_message;
  END IF;
  IF (l_return_status<> fnd_api.g_ret_sts_success) THEN
    cse_int_utils_pvt.log_messages(fnd_log.level_info,'Cse_int_utils_pvt Api call to reinstate_service_asset Failed ',l_error_message);
  END IF;
  x_return_status := l_return_status;
  l_okc_reinstate_event_tbl.DELETE;
  x_error_message :=l_error_message;
END reinstate_service_asset;

PROCEDURE insert_valid_structure_rec(
    p_batch_id          IN NUMBER,
    p_batch_type        IN VARCHAR2,
    p_partition_number  IN NUMBER,
    px_transaction_id   IN OUT NOCOPY NUMBER,
    px_transaction_date IN OUT NOCOPY DATE,
    x_error_message OUT NOCOPY        VARCHAR2,
    x_return_status OUT NOCOPY        VARCHAR2)
IS
  /* Cursor to get the records trying to create  a new relationship
  */
  CURSOR c_get_int_struct_data_cur
  IS
    SELECT asset_id,
      parent_asset_id,
      1 object_version_number,
      px_transaction_id transaction_id,
      relationship_action_code,
      relationship_type_code,
      'A' object_type,
      'A' subject_type,
      px_transaction_date active_start_date,
      NULL active_end_date,
      created_by,
      creation_date,
      last_updated_by,
      last_update_date,
      last_update_login,
      request_id,
      job_definition_name,
      job_definition_package
    FROM CSE_ASSETS_INT assetsInt
    WHERE assetsInt.interface_status_code  = C_INT_VALID
    AND assetsInt.partition_number         = p_partition_number
    AND assetsInt.interface_batch_id       = p_batch_id
    AND assetsInt.action_code             IN(C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
    AND assetsInt.relationship_action_code = C_ADD_REL_ACTION_CODE
    AND NOT EXISTS
      (SELECT 'X'
      FROM CSE_ASSET_RELATIONSHIPS
      WHERE subject_id=assetsInt.asset_id
      AND object_id   = assetsInt.parent_asset_id
      );
  l_api_name                   VARCHAR2(300) := 'cse_bulk_import_pvt.insert_valid_structure_rec';
  l_relationship_id            NUMBER(18,0);
  l_transacted_relationship_id NUMBER(18,0);
  l_inserted_row_count         NUMBER;

l_cust_asset_rel_rec cse_int_utils_pvt.asset_rel_event_rec_type;

BEGIN

/*Raise Customer Asset Relationship Events before DB insert */
    IF p_batch_type = 'CA' THEN
      l_cust_asset_rel_rec.relationship_id := l_relationship_id;
      l_cust_asset_rel_rec.subject_id := c_get_int_struct_data_rec.asset_id;
      l_cust_asset_rel_rec.relationship_type_code := c_get_int_struct_data_rec.relationship_type_code;
      l_cust_asset_rel_rec.object_id := c_get_int_struct_data_rec.parent_asset_id;
      cse_int_utils_pvt.raise_cust_asset_rel_event(p_cust_asset_rel_rec  => l_cust_asset_rel_rec, p_event_type => C_CREATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
      IF (x_return_status<> fnd_api.g_ret_sts_success) THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_info,'Failed  to trigger business events', x_error_message);
      END IF;
    END IF;

INSERT
    INTO CSE_ASSET_RELATIONSHIPS
      (
        RELATIONSHIP_ID,
        OBJECT_VERSION_NUMBER,
        OBJECT_ID,
        SUBJECT_ID,
        RELATIONSHIP_TYPE_CODE,
        OBJECT_TYPE,
        SUBJECT_TYPE,
        ACTIVE_START_DATE,
        ACTIVE_END_DATE,
        created_by,
        creation_date,
        last_updated_by,
        last_update_date,
        last_update_login,
        request_id,
        job_definition_name,
        job_definition_package
      )
      VALUES
      (
        l_relationship_id,
        c_get_int_struct_data_rec.object_version_number,
        c_get_int_struct_data_rec.parent_asset_id,
        c_get_int_struct_data_rec.asset_id,
        c_get_int_struct_data_rec.relationship_type_code,
        c_get_int_struct_data_rec.object_type,
        c_get_int_struct_data_rec.subject_type,
        c_get_int_struct_data_rec.active_start_date,
        c_get_int_struct_data_rec.active_end_date,
        c_get_int_struct_data_rec.created_by,
        c_get_int_struct_data_rec.creation_date,
        c_get_int_struct_data_rec.last_updated_by,
        c_get_int_struct_data_rec.last_update_date,
        c_get_int_struct_data_rec.last_update_login,
        c_get_int_struct_data_rec.request_id,
        c_get_int_struct_data_rec.job_definition_name,
        c_get_int_struct_data_rec.job_definition_package
      );
    INSERT
    INTO CSE_TRANSACTED_RELATIONSHIPS
      (
        RELATIONSHIP_ID,
        TRANSACTED_RELATIONSHIP_ID,
        TRANSACTION_ID,
        created_by,
        creation_date,
        last_updated_by,
        last_update_date,
        last_update_login,
        request_id,
        job_definition_name,
        job_definition_package
      )
      VALUES
      (
        l_relationship_id,
        l_transacted_relationship_id,
        c_get_int_struct_data_rec.transaction_id,
        c_get_int_struct_data_rec.created_by,
        c_get_int_struct_data_rec.creation_date,
        c_get_int_struct_data_rec.last_updated_by,
        c_get_int_struct_data_rec.last_update_date,
        c_get_int_struct_data_rec.last_update_login,
        c_get_int_struct_data_rec.request_id,
        c_get_int_struct_data_rec.job_definition_name,
        c_get_int_struct_data_rec.job_definition_package
      );
    INSERT
    INTO CSE_ASSET_RELATIONSHIPS_HIST
      (
        RELATIONSHIP_ID,
        TRANSACTED_RELATIONSHIP_ID,
        OBJECT_VERSION_NUMBER,
        OBJECT_ID,
        SUBJECT_ID,
        RELATIONSHIP_TYPE_CODE,
        OBJECT_TYPE,
        SUBJECT_TYPE,
        ACTIVE_START_DATE,
        ACTIVE_END_DATE,
        HISTORY_ACTION_CODE,
        created_by,
        creation_date,
        last_updated_by,
        last_update_date,
        last_update_login,
        request_id,
        job_definition_name,
        job_definition_package
      )
      VALUES
      (
        l_relationship_id,
        l_transacted_relationship_id,
        c_get_int_struct_data_rec.object_version_number,
        c_get_int_struct_data_rec.parent_asset_id,
        c_get_int_struct_data_rec.asset_id,
        c_get_int_struct_data_rec.relationship_type_code,
        c_get_int_struct_data_rec.object_type,
        c_get_int_struct_data_rec.subject_type,
        c_get_int_struct_data_rec.active_start_date,
        c_get_int_struct_data_rec.active_end_date,
        c_get_int_struct_data_rec.relationship_action_code,
        c_get_int_struct_data_rec.created_by,
        c_get_int_struct_data_rec.creation_date,
        c_get_int_struct_data_rec.last_updated_by,
        c_get_int_struct_data_rec.last_update_date,
        c_get_int_struct_data_rec.last_update_login,
        c_get_int_struct_data_rec.request_id,
        c_get_int_struct_data_rec.job_definition_name,
        c_get_int_struct_data_rec.job_definition_package
      );
    l_inserted_row_count := l_inserted_row_count + 1;
  END LOOP;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Created Relationship records, CREATE case = '||l_inserted_row_count);
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');
EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END insert_valid_structure_rec;

/*=============================================================================
|
|  DESCRIPTION
|      This Public API does the following actions:
|        1. Insert Valid relationship records in
|           a) Asset Relationships table
|           b) Asset Relationships History table
|           c) Transacted Relationship table
|
|  PARAMETERS
|      Returns x_errbuf and Status code x_retcode back to calling Api
|
*===========================================================================*/
PROCEDURE update_valid_structure_rec
  (
    p_batch_id          IN NUMBER,
    p_batch_type        IN VARCHAR2,
    p_partition_number  IN NUMBER,
    px_transaction_id   IN OUT NOCOPY NUMBER,
    px_transaction_date IN OUT NOCOPY DATE,
    x_error_message OUT NOCOPY        VARCHAR2,
    x_return_status OUT NOCOPY        VARCHAR2
  )
IS
  CURSOR valid_update_structure_rec_cur
  IS
    SELECT asset_id,
      parent_asset_id,
      relationship_action_code,
      relationship_type_code,
      created_by,
      creation_date,
      last_updated_by,
      last_update_date,
      last_update_login,
      request_id,
      job_definition_name,
      job_definition_package
    FROM CSE_ASSETS_INT assetsInt
    WHERE assetsInt.interface_status_code = C_INT_VALID
    AND assetsInt.partition_number        = p_partition_number
    AND assetsInt.interface_batch_id      = p_batch_id
    AND assetsInt.action_code             = C_UPDATE_ACTION_CODE;
  CURSOR get_relationship_cur(p_subject_id NUMBER)
  IS
    SELECT relationship_id,
      object_version_number,
      object_id,
      subject_id,
      relationship_type_code,
      object_type,
      subject_type,
      active_start_date,
      active_end_date,
      attribute_category,
      attribute_char1,
      attribute_char2,
      attribute_char3,
      attribute_char4,
      attribute_char5,
      attribute_char6,
      attribute_char7,
      attribute_char8,
      attribute_char9,
      attribute_char10,
      attribute_char11,
      attribute_char12,
      attribute_char13,
      attribute_char14,
      attribute_char15,
      attribute_char16,
      attribute_char17,
      attribute_char18,
      attribute_char19,
      attribute_char20,
      attribute_number1,
      attribute_number2,
      attribute_number3,
      attribute_number4,
      attribute_number5,
      attribute_number6,
      attribute_number7,
      attribute_number8,
      attribute_number9,
      attribute_number10,
      attribute_date1,
      attribute_date2,
      attribute_date3,
      attribute_date4,
      attribute_date5,
      attribute_timestamp1,
      attribute_timestamp2,
      attribute_timestamp3,
      attribute_timestamp4,
      attribute_timestamp5,
      created_by,
      creation_date,
      last_updated_by,
      last_update_date,
      last_update_login,
      request_id,
      job_definition_name,
      job_definition_package
    FROM CSE_ASSET_RELATIONSHIPS assetRel
    WHERE assetRel.subject_id = p_subject_id;
    
     /*Cursor to get the assets being part of a structure and whose cust/loc info is being updated*/ 
      CURSOR c_get_assets_add_updt_struc
        IS
        SELECT assetInt.asset_id,
          assetInt.customer_id,
          assetInt.CUSTOMER_ACCOUNT_ID,
          assetInt.CUSTOMER_ACCOUNT_SITE_ID,
          assetInt.CUSTOMER_ACCOUNT_SITE_USE_ID,
          assetInt.CUSTOMER_SITE_PARTY_ID,
          assetInt.CUSTOMER_SITE_ID,
          assetInt.active_end_date,
          assetInt.parent_asset_id,
          assetInt.relationship_action_code 
        FROM cse_assets_int assetInt 
        WHERE assetInt.partition_number = p_partition_number
        AND assetInt.interface_status_code  = C_INT_VALID
        AND assetInt.action_code 			= C_UPDATE_ACTION_CODE
        OR( assetInt.parent_asset_number IS NOT NULL
        AND EXISTS
        ( SELECT 'X'
          FROM cse_asset_relationships assetRel
          WHERE assetRel.object_id = assetInt.asset_id
          AND( assetRel.active_end_date IS NULL 
          OR assetRel.active_end_date > sysdate)
          ));
    
  /*Cursor to get the parent asset details of assets which are newly added as a component to a structure*/  
    		CURSOR c_get_parent_details(c_asset_id NUMBER)
		IS
		SELECT cseb.customer_id,
				cseb.customer_account_id,
        cseb.CUSTOMER_SITE_ID,
				cseb.customer_account_site_id,
				cseb.customer_account_site_use_id,
				cseb.customer_site_party_id,
				cseb.active_end_date
		FROM cse_assets_b cseb
		WHERE cseb.asset_id = c_asset_id;
    
  /*Cursor to check  the leaf node terminated */
  
  CURSOR c_get_terminated_assets
  IS 
  SELECT asset_id  
  FROM cse_assets_int assetInt 
        WHERE assetInt.partition_number = p_partition_number
        AND assetInt.interface_status_code  = C_INT_VALID
        AND assetInt.action_code 			= C_UPDATE_ACTION_CODE
        AND assetInt.active_end_date IS NOT NULL
        AND assetInt.active_end_date <> FND_API.G_NULL_DATE
        AND TRUNC(assetInt.active_end_date) <= TRUNC(sysdate)
        AND EXISTS
        (SELECT 'X' FROM cse_asset_relationships rel
        where rel.subject_id = assetInt.asset_id
        AND rel.active_end_date IS NULL);
   
 TYPE l_terminated_assets_tbl_type 
 IS TABLE OF c_get_terminated_assets%ROWTYPE;
 l_terminated_assets_tbl l_terminated_assets_tbl_type;
 
 TYPE  l_cascade_asset_tbl_type 
 IS
 TABLE OF  c_get_assets_add_updt_struc%ROWTYPE;
 l_cascade_asset_tbl l_cascade_asset_tbl_type;
  parent_asset_details_rec c_get_parent_details%ROWTYPE;
  
  l_cascade_rec cse_int_utils_pvt.cascade_rec_type;
  
            
TYPE relationship_tbl_type
IS
  TABLE OF get_relationship_cur%ROWTYPE;
TYPE valid_struct_rec_type
IS
  TABLE OF valid_update_structure_rec_cur%ROWTYPE;
  valid_struct_record_tbl valid_struct_rec_type;
  relationship_tbl relationship_tbl_type;
  l_transacted_relationship_id NUMBER(18,0);
  l_relationship_id            NUMBER(18,0);
  l_api_name                   VARCHAR2(300) := 'cse_bulk_import_pvt.update_valid_structure_rec';
  l_return_status               VARCHAR2(1) := fnd_api.g_ret_sts_success;
  l_msg_count                   NUMBER;
  l_error_msg                 VARCHAR2(300);
  l_single_child              CHAR(1) := 'N';

l_cust_asset_rel_rec cse_int_utils_pvt.asset_rel_event_rec_type;

BEGIN

cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
  x_return_status := fnd_api.g_ret_sts_success;
  OPEN valid_update_structure_rec_cur;
  FETCH valid_update_structure_rec_cur BULK COLLECT
  INTO valid_struct_record_tbl;
  CLOSE valid_update_structure_rec_cur;

FOR j IN valid_struct_record_tbl.FIRST..valid_struct_record_tbl.LAST
  LOOP
    BEGIN
      OPEN get_relationship_cur(valid_struct_record_tbl(j).asset_id);
      FETCH get_relationship_cur BULK COLLECT INTO relationship_tbl;
      CLOSE get_relationship_cur;
      l_transacted_relationship_id := cse_int_s.NEXTVAL;
      FOR i IN relationship_tbl.FIRST..relationship_tbl.LAST
      LOOP
        /*Checking if the asset is being removed from an active structure*/
        IF (valid_struct_record_tbl(j).relationship_action_code = C_REM_REL_ACTION_CODE AND relationship_tbl(i).active_end_date IS NULL) THEN
          l_relationship_id                                    := relationship_tbl(i).relationship_id;

/*Raise Customer Asset Relationship Events before DB update */
          IF p_batch_type = 'CA' THEN
            l_cust_asset_rel_rec.relationship_id := relationship_tbl(i).relationship_id;
            l_cust_asset_rel_rec.subject_id := relationship_tbl(i).subject_id;
            l_cust_asset_rel_rec.relationship_type_code := relationship_tbl(i).relationship_type_code;
            l_cust_asset_rel_rec.object_id := relationship_tbl(i).object_id;
            cse_int_utils_pvt.raise_cust_asset_rel_event(p_cust_asset_rel_rec  => l_cust_asset_rel_rec, p_event_type => C_DELETE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
            IF (x_return_status<> fnd_api.g_ret_sts_success) THEN
              cse_int_utils_pvt.log_messages(fnd_log.level_info,'Failed  to trigger business events', x_error_message);
            END IF;
          END IF;
          --populate the active_end_date value for existing relationship
          UPDATE CSE_ASSET_RELATIONSHIPS assetRel
          SET assetRel.active_end_date      = NVL(px_transaction_date,sysdate),
            assetRel.last_updated_by        = NVL(valid_struct_record_tbl(j).last_updated_by,assetRel.last_updated_by),
            assetRel.last_update_date       = NVL(valid_struct_record_tbl(j).last_update_date,assetRel.last_update_date),
            assetRel.last_update_login      = NVL(valid_struct_record_tbl(j).last_update_login,assetRel.last_update_login),
            assetRel.request_id             = NVL(valid_struct_record_tbl(j).request_id,assetRel.request_id),
            assetRel.job_definition_name    = NVL(valid_struct_record_tbl(j).job_definition_name,assetRel.job_definition_name),
            assetRel.job_definition_package = NVL(valid_struct_record_tbl(j).job_definition_package,assetRel.job_definition_package)
          WHERE assetRel.subject_id         = valid_struct_record_tbl(j).asset_id
          AND assetRel.active_end_date     IS NULL;
          INSERT
          INTO CSE_ASSET_RELATIONSHIPS_HIST
            (
              RELATIONSHIP_ID,
              TRANSACTED_RELATIONSHIP_ID,
              OBJECT_VERSION_NUMBER,
              OBJECT_ID,
              SUBJECT_ID,
              RELATIONSHIP_TYPE_CODE,
              OBJECT_TYPE,
              SUBJECT_TYPE,
              ACTIVE_START_DATE,
              ACTIVE_END_DATE,
              HISTORY_ACTION_CODE,
              attribute_category,
              attribute_char1,
              attribute_char2,
              attribute_char3,
              attribute_char4,
              attribute_char5,
              attribute_char6,
              attribute_char7,
              attribute_char8,
              attribute_char9,
              attribute_char10,
              attribute_char11,
              attribute_char12,
              attribute_char13,
              attribute_char14,
              attribute_char15,
              attribute_char16,
              attribute_char17,
              attribute_char18,
              attribute_char19,
              attribute_char20,
              attribute_number1,
              attribute_number2,
              attribute_number3,
              attribute_number4,
              attribute_number5,
              attribute_number6,
              attribute_number7,
              attribute_number8,
              attribute_number9,
              attribute_number10,
              attribute_date1,
              attribute_date2,
              attribute_date3,
              attribute_date4,
              attribute_date5,
              attribute_timestamp1,
              attribute_timestamp2,
              attribute_timestamp3,
              attribute_timestamp4,
              attribute_timestamp5,
              created_by,
              creation_date,
              last_updated_by,
              last_update_date,
              last_update_login,
              request_id,
              job_definition_name,
              job_definition_package
            )
            VALUES
            (
              relationship_tbl(i).relationship_id,
              l_transacted_relationship_id,
              relationship_tbl(i).object_version_number,
              relationship_tbl(i).object_id,
              relationship_tbl(i).subject_id,
              relationship_tbl(i).relationship_type_code,
              relationship_tbl(i).object_type,
              relationship_tbl(i).subject_type,
              relationship_tbl(i).active_start_date,
              relationship_tbl(i).active_end_date,
              valid_struct_record_tbl(j).relationship_action_code,
              relationship_tbl(i).attribute_category,
              relationship_tbl(i).attribute_char1,
              relationship_tbl(i).attribute_char2,
              relationship_tbl(i).attribute_char3,
              relationship_tbl(i).attribute_char4,
              relationship_tbl(i).attribute_char5,
              relationship_tbl(i).attribute_char6,
              relationship_tbl(i).attribute_char7,
              relationship_tbl(i).attribute_char8,
              relationship_tbl(i).attribute_char9,
              relationship_tbl(i).attribute_char10,
              relationship_tbl(i).attribute_char11,
              relationship_tbl(i).attribute_char12,
              relationship_tbl(i).attribute_char13,
              relationship_tbl(i).attribute_char14,
              relationship_tbl(i).attribute_char15,
              relationship_tbl(i).attribute_char16,
              relationship_tbl(i).attribute_char17,
              relationship_tbl(i).attribute_char18,
              relationship_tbl(i).attribute_char19,
              relationship_tbl(i).attribute_char20,
              relationship_tbl(i).attribute_number1,
              relationship_tbl(i).attribute_number2,
              relationship_tbl(i).attribute_number3,
              relationship_tbl(i).attribute_number4,
              relationship_tbl(i).attribute_number5,
              relationship_tbl(i).attribute_number6,
              relationship_tbl(i).attribute_number7,
              relationship_tbl(i).attribute_number8,
              relationship_tbl(i).attribute_number9,
              relationship_tbl(i).attribute_number10,
              relationship_tbl(i).attribute_date1,
              relationship_tbl(i).attribute_date2,
              relationship_tbl(i).attribute_date3,
              relationship_tbl(i).attribute_date4,
              relationship_tbl(i).attribute_date5,
              relationship_tbl(i).attribute_timestamp1,
              relationship_tbl(i).attribute_timestamp2,
              relationship_tbl(i).attribute_timestamp3,
              relationship_tbl(i).attribute_timestamp4,
              relationship_tbl(i).attribute_timestamp5,
              valid_struct_record_tbl(j).created_by,
              valid_struct_record_tbl(j).creation_date,
              valid_struct_record_tbl(j).last_updated_by,
              valid_struct_record_tbl(j).last_update_date,
              valid_struct_record_tbl(j).last_update_login,
              valid_struct_record_tbl(j).request_id,
              valid_struct_record_tbl(j).job_definition_name,
              valid_struct_record_tbl(j).job_definition_package
            );
        ELSIF (valid_struct_record_tbl(j).relationship_action_code = C_ADD_REL_ACTION_CODE AND valid_struct_record_tbl(j).parent_asset_id= relationship_tbl(i).object_id AND relationship_tbl(i).active_end_date IS NOT NULL) THEN
          l_relationship_id                                       := relationship_tbl(i).relationship_id;

/*Raise Customer Asset Relationship Events before DB update */
           IF p_batch_type = 'CA' THEN
            l_cust_asset_rel_rec.relationship_id := relationship_tbl(i).relationship_id;
            l_cust_asset_rel_rec.subject_id := relationship_tbl(i).subject_id;
            l_cust_asset_rel_rec.relationship_type_code := relationship_tbl(i).relationship_type_code;
            l_cust_asset_rel_rec.object_id := relationship_tbl(i).object_id;
            cse_int_utils_pvt.raise_cust_asset_rel_event(p_cust_asset_rel_rec => l_cust_asset_rel_rec, p_event_type => C_CREATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
            IF (x_return_status<> fnd_api.g_ret_sts_success) THEN
              cse_int_utils_pvt.log_messages(fnd_log.level_info,'Failed  to trigger business events', x_error_message);
            END IF;
          END IF;
          -- Activate existing inactive relationship
          UPDATE CSE_ASSET_RELATIONSHIPS assetRel
          SET assetRel.active_end_date      = NULL,
            assetRel.active_start_date      = NVL(px_transaction_date,sysdate),
            assetRel.last_updated_by        = NVL(valid_struct_record_tbl(j).last_updated_by,assetRel.last_updated_by),
            assetRel.last_update_date       = NVL(valid_struct_record_tbl(j).last_update_date,assetRel.last_update_date),
            assetRel.last_update_login      = NVL(valid_struct_record_tbl(j).last_update_login,assetRel.last_update_login),
            assetRel.request_id             = NVL(valid_struct_record_tbl(j).request_id,assetRel.request_id),
            assetRel.job_definition_name    = NVL(valid_struct_record_tbl(j).job_definition_name,assetRel.job_definition_name),
            assetRel.job_definition_package = NVL(valid_struct_record_tbl(j).job_definition_package,assetRel.job_definition_package)
          WHERE assetRel.subject_id         = valid_struct_record_tbl(j).asset_id
          AND assetRel.active_end_date     IS NOT NULL
          AND assetRel.object_id            =valid_struct_record_tbl(j).parent_asset_id;
          INSERT
          INTO CSE_ASSET_RELATIONSHIPS_HIST
            (
              RELATIONSHIP_ID,
              TRANSACTED_RELATIONSHIP_ID,
              OBJECT_VERSION_NUMBER,
              OBJECT_ID,
              SUBJECT_ID,
              RELATIONSHIP_TYPE_CODE,
              OBJECT_TYPE,
              SUBJECT_TYPE,
              ACTIVE_START_DATE,
              ACTIVE_END_DATE,
              HISTORY_ACTION_CODE,
              attribute_category,
              attribute_char1,
              attribute_char2,
              attribute_char3,
              attribute_char4,
              attribute_char5,
              attribute_char6,
              attribute_char7,
              attribute_char8,
              attribute_char9,
              attribute_char10,
              attribute_char11,
              attribute_char12,
              attribute_char13,
              attribute_char14,
              attribute_char15,
              attribute_char16,
              attribute_char17,
              attribute_char18,
              attribute_char19,
              attribute_char20,
              attribute_number1,
              attribute_number2,
              attribute_number3,
              attribute_number4,
              attribute_number5,
              attribute_number6,
              attribute_number7,
              attribute_number8,
              attribute_number9,
              attribute_number10,
              attribute_date1,
              attribute_date2,
              attribute_date3,
              attribute_date4,
              attribute_date5,
              attribute_timestamp1,
              attribute_timestamp2,
              attribute_timestamp3,
              attribute_timestamp4,
              attribute_timestamp5,
              created_by,
              creation_date,
              last_updated_by,
              last_update_date,
              last_update_login,
              request_id,
              job_definition_name,
              job_definition_package
            )
            VALUES
            (
              relationship_tbl(i).relationship_id,
              l_transacted_relationship_id,
              relationship_tbl(i).object_version_number,
              relationship_tbl(i).object_id,
              relationship_tbl(i).subject_id,
              relationship_tbl(i).relationship_type_code,
              relationship_tbl(i).object_type,
              relationship_tbl(i).subject_type,
              relationship_tbl(i).active_start_date,
              relationship_tbl(i).active_end_date,
              valid_struct_record_tbl(j).relationship_action_code,
              relationship_tbl(i).attribute_category,
              relationship_tbl(i).attribute_char1,
              relationship_tbl(i).attribute_char2,
              relationship_tbl(i).attribute_char3,
              relationship_tbl(i).attribute_char4,
              relationship_tbl(i).attribute_char5,
              relationship_tbl(i).attribute_char6,
              relationship_tbl(i).attribute_char7,
              relationship_tbl(i).attribute_char8,
              relationship_tbl(i).attribute_char9,
              relationship_tbl(i).attribute_char10,
              relationship_tbl(i).attribute_char11,
              relationship_tbl(i).attribute_char12,
              relationship_tbl(i).attribute_char13,
              relationship_tbl(i).attribute_char14,
              relationship_tbl(i).attribute_char15,
              relationship_tbl(i).attribute_char16,
              relationship_tbl(i).attribute_char17,
              relationship_tbl(i).attribute_char18,
              relationship_tbl(i).attribute_char19,
              relationship_tbl(i).attribute_char20,
              relationship_tbl(i).attribute_number1,
              relationship_tbl(i).attribute_number2,
              relationship_tbl(i).attribute_number3,
              relationship_tbl(i).attribute_number4,
              relationship_tbl(i).attribute_number5,
              relationship_tbl(i).attribute_number6,
              relationship_tbl(i).attribute_number7,
              relationship_tbl(i).attribute_number8,
              relationship_tbl(i).attribute_number9,
              relationship_tbl(i).attribute_number10,
              relationship_tbl(i).attribute_date1,
              relationship_tbl(i).attribute_date2,
              relationship_tbl(i).attribute_date3,
              relationship_tbl(i).attribute_date4,
              relationship_tbl(i).attribute_date5,
              relationship_tbl(i).attribute_timestamp1,
              relationship_tbl(i).attribute_timestamp2,
              relationship_tbl(i).attribute_timestamp3,
              relationship_tbl(i).attribute_timestamp4,
              relationship_tbl(i).attribute_timestamp5,
              valid_struct_record_tbl(j).created_by,
              valid_struct_record_tbl(j).creation_date,
              valid_struct_record_tbl(j).last_updated_by,
              valid_struct_record_tbl(j).last_update_date,
              valid_struct_record_tbl(j).last_update_login,
              valid_struct_record_tbl(j).request_id,
              valid_struct_record_tbl(j).job_definition_name,
              valid_struct_record_tbl(j).job_definition_package
            );
        END IF;
      END LOOP;
      relationship_tbl.DELETE;

-- Insert records in transacted_relationships and relationship history tables
      BEGIN
        INSERT
        INTO CSE_TRANSACTED_RELATIONSHIPS
          (
            RELATIONSHIP_ID,
            TRANSACTED_RELATIONSHIP_ID,
            TRANSACTION_ID,
            created_by,
            creation_date,
            last_updated_by,
            last_update_date,
            last_update_login,
            request_id,
            job_definition_name,
            job_definition_package
          )
          VALUES
          (
            l_relationship_id,
            l_transacted_relationship_id,
            px_transaction_id,
            valid_struct_record_tbl(j).created_by,
            valid_struct_record_tbl(j).creation_date,
            valid_struct_record_tbl(j).last_updated_by,
            valid_struct_record_tbl(j).last_update_date,
            valid_struct_record_tbl(j).last_update_login,
            valid_struct_record_tbl(j).request_id,
            valid_struct_record_tbl(j).job_definition_name,
            valid_struct_record_tbl(j).job_definition_package
          );
      EXCEPTION
      WHEN OTHERS THEN
        x_return_status := fnd_api.g_ret_sts_unexp_error;
        x_error_message := sqlerrm;
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
      END;
    EXCEPTION
    WHEN OTHERS THEN
      x_return_status := fnd_api.g_ret_sts_unexp_error;
      x_error_message := sqlerrm;
    END;
  END LOOP;
  
    OPEN c_get_terminated_assets;
        FETCH c_get_terminated_assets BULK COLLECT INTO l_terminated_assets_tbl;
        CLOSE c_get_terminated_assets;
     dbms_output.put_line('l_leaf_node_tbl count---'||l_terminated_assets_tbl.count);
        IF(l_terminated_assets_tbl.count <> 0) THEN
        FOR i IN l_terminated_assets_tbl.FIRST..l_terminated_assets_tbl.LAST
        LOOP
--            
          OPEN get_relationship_cur(l_terminated_assets_tbl(i).asset_id);
      FETCH get_relationship_cur BULK COLLECT INTO relationship_tbl;
      CLOSE get_relationship_cur;
          FOR j IN relationship_tbl.FIRST..relationship_tbl.LAST
          LOOP
          /*This condition is to check for the record in the relationship table for active relationship */
          IF (relationship_tbl(i).active_end_date IS NULL) THEN
          
         /*Raise Customer Asset Relationship Events before DB update */
           IF p_batch_type = 'CA' THEN
            l_cust_asset_rel_rec.relationship_id := relationship_tbl(j).relationship_id;
            l_cust_asset_rel_rec.subject_id := relationship_tbl(j).subject_id;
            l_cust_asset_rel_rec.relationship_type_code := relationship_tbl(j).relationship_type_code;
            l_cust_asset_rel_rec.object_id := relationship_tbl(j).object_id;
            END IF;
            END IF;
            END LOOP;
            
        cse_int_utils_pvt.raise_cust_asset_rel_event(p_cust_asset_rel_rec  => l_cust_asset_rel_rec, p_event_type => C_DELETE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
        relationship_tbl.DELETE;
        
        UPDATE cse_asset_relationships
        set active_end_date = sysdate
        where subject_id = l_terminated_assets_tbl(i).asset_id
        AND active_end_date IS NULL;
        END LOOP;
        END IF;
  
    /*Cascading updates done via cse_int_utils_pvt.cascade_asset_changes procedure*/
          OPEN c_get_assets_add_updt_struc;
          FETCH c_get_assets_add_updt_struc BULK COLLECT INTO l_cascade_asset_tbl;
          CLOSE c_get_assets_add_updt_struc;
          dbms_output.put_line('cascade_rec record count'||l_cascade_asset_tbl.count);
     IF l_cascade_asset_tbl.count >0 THEN
          
          FOR i IN l_cascade_asset_tbl.FIRST..l_cascade_asset_tbl.LAST
          LOOP
            
            
      IF (l_cascade_asset_tbl(i).relationship_action_code = C_ADD_REL_ACTION_CODE AND l_cascade_asset_tbl(i).parent_asset_id IS NOT NULL) THEN
      
            OPEN c_get_parent_details(l_cascade_asset_tbl(i).parent_asset_id);
            FETCH c_get_parent_details INTO parent_asset_details_rec; 
            CLOSE c_get_parent_details;
            dbms_output.put_line('INSIDE THE IF CONDITION asset_id'||l_cascade_asset_tbl(i).asset_id||l_cascade_asset_tbl(i).parent_asset_id||parent_asset_details_rec.CUSTOMER_ID);
        /*ASSIGN THE DATA TO THE RECORD TO BE PASSED TO CSE_INT_UTILS.CASCADE_ASSET_CHANGES*/
			l_cascade_rec.asset_id                := l_cascade_asset_tbl(i).parent_asset_id;
			l_cascade_rec.customer_id             := parent_asset_details_rec.CUSTOMER_ID;
			l_cascade_rec.cust_site_party_id      := parent_asset_details_rec.CUSTOMER_SITE_PARTY_ID;
			l_cascade_rec.cust_site_id            := parent_asset_details_rec.CUSTOMER_SITE_ID;
			l_cascade_rec.cust_account_id       := parent_asset_details_rec.CUSTOMER_ACCOUNT_ID;
			l_cascade_rec.cust_account_site_id      := parent_asset_details_rec.CUSTOMER_ACCOUNT_SITE_ID;
			l_cascade_rec.cust_site_use_id        := parent_asset_details_rec.CUSTOMER_ACCOUNT_SITE_USE_ID;
			l_cascade_rec.cust_bill_party_id      := parent_asset_details_rec.CUSTOMER_ID;
			l_cascade_rec.cust_bill_party_site_id := parent_asset_details_rec.CUSTOMER_SITE_PARTY_ID;
			l_cascade_rec.active_end_date		      := parent_asset_details_rec.ACTIVE_END_DATE;
			l_cascade_rec.transaction_id 		      := px_transaction_id;
			l_cascade_rec.transaction_date		    := px_transaction_date;
			
			cse_int_utils_pvt.Cascade_Asset_Changes( l_cascade_rec,l_return_status,l_msg_count,l_error_msg);
						
			ELSE
       dbms_output.put_line('INSIDE THE else CONDITION asset_id'||l_cascade_asset_tbl(i).asset_id||l_cascade_asset_tbl(i).parent_asset_id||parent_asset_details_rec.CUSTOMER_ID);
      /*ASSIGN THE DATA TO THE RECORD TO BE PASSED TO CSE_INT_UTILS.CASCADE_ASSET_CHANGES*/
			l_cascade_rec.asset_id                := l_cascade_asset_tbl(i).ASSET_ID;
			l_cascade_rec.customer_id             := l_cascade_asset_tbl(i).CUSTOMER_ID;
			l_cascade_rec.cust_site_party_id      := l_cascade_asset_tbl(i).CUSTOMER_SITE_PARTY_ID;
			l_cascade_rec.cust_site_id            := l_cascade_asset_tbl(i).CUSTOMER_SITE_ID;
			l_cascade_rec.cust_account_id       := l_cascade_asset_tbl(i).CUSTOMER_ACCOUNT_ID;
			l_cascade_rec.cust_account_site_id      := l_cascade_asset_tbl(i).CUSTOMER_ACCOUNT_SITE_ID;
			l_cascade_rec.cust_site_use_id        := l_cascade_asset_tbl(i).CUSTOMER_ACCOUNT_SITE_USE_ID;
			l_cascade_rec.cust_bill_party_id      := l_cascade_asset_tbl(i).CUSTOMER_ID;
			l_cascade_rec.cust_bill_party_site_id := l_cascade_asset_tbl(i).CUSTOMER_SITE_PARTY_ID;
			l_cascade_rec.active_end_date		      := l_cascade_asset_tbl(i).ACTIVE_END_DATE;
			l_cascade_rec.transaction_id 	      	:= px_transaction_id;
			l_cascade_rec.transaction_date		    := px_transaction_date;
      
			cse_int_utils_pvt.Cascade_Asset_Changes( l_cascade_rec,l_return_status,l_msg_count,l_error_msg);
      
      END IF;
       
		  IF (l_return_status <>fnd_api.g_ret_sts_success) THEN
		  cse_int_utils_pvt.log_messages(fnd_log.level_info,'Cascading changes to components failed', l_error_msg);
      END IF;
      
      END LOOP;
          END IF;
          
      
       x_return_status := l_return_status;
       x_error_message := l_error_msg;
  
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');

EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END update_valid_structure_rec;

/*=============================================================================
|
|  DESCRIPTION
|      This Public API does the following actions:
|        1. Insert Valid records in
|           a) Assets Base table
|           b) Assets TL table
|           c) Transacted Assets table
|           d) Genealogy Base table
|
|  PARAMETERS
|      Returns x_errbuf and Status code x_retcode back to calling Api
|
*===========================================================================*/

/*Cursor to get the VALID assets/records to be created*/

CURSOR c_get_valid_insert_rec
  IS
    SELECT asset_id,
      1 object_version_number,
      NVL(asset_number,asset_id) asset_number,
      asset_description,
      NULL asset_tag,
      item_id,
      item_organization_id,
      NULL item_revision,
      serial_number,
      lot_number,
      gen_object_id,
      NVL(quantity,1) quantity,
      uom_code,
      new_wo_allowed_flag,
      NULL status_code,
      active_end_date,
      NULL subinventory_code,
      NULL inventory_locator_id,
      NULL work_order_id,
      NULL work_order_operation_id,
      work_center_id,
      sales_order_id,
      sales_order_line_id,
      NVL(current_location_context,'ORA_UNKNOWN') current_location_context,
      work_center_id current_location_id,
      location_organization_id,
      NULL installed_location_context,
      NULL installed_location_id,
      shipment_date,
      NULL installed_date,
      NULL in_service_date,
      NULL purchase_date,
      NULL origination_date,
      'N' registered_flag,
      customer_id,
      customer_site_id,
      customer_site_party_id,
      customer_account_id,
      customer_account_site_id,
      customer_account_site_use_id,
      sales_order_source_system_type,
      NULL supplier_id,
      NULL supplier_site_id,
      sold_by_business_unit_id sold_by_business_unit_id,
      mntwotype.dflt_wo_type_code,
      mntwosubtype.dflt_wo_sub_type_code,
      maintainable_flag,
      attribute_category,
      attribute_char1,
      attribute_char2,
      attribute_char3,
      attribute_char4,
      attribute_char5,
      attribute_char6,
      attribute_char7,
      attribute_char8,
      attribute_char9,
      attribute_char10,
      attribute_char11,
      attribute_char12,
      attribute_char13,
      attribute_char14,
      attribute_char15,
      attribute_char16,
      attribute_char17,
      attribute_char18,
      attribute_char19,
      attribute_char20,
      attribute_number1,
      attribute_number2,
      attribute_number3,
      attribute_number4,
      attribute_number5,
      attribute_number6,
      attribute_number7,
      attribute_number8,
      attribute_number9,
      attribute_number10,
      attribute_date1,
      attribute_date2,
      attribute_date3,
      attribute_date4,
      attribute_date5,
      attribute_timestamp1,
      attribute_timestamp2,
      attribute_timestamp3,
      attribute_timestamp4,
      attribute_timestamp5,
      created_by,
      creation_date,
      last_updated_by,
      last_update_date,
      last_update_login,
      request_id,
      job_definition_name,
      job_definition_package,
      gen_object_id transacted_asset_id,
      NULL split_from_asset_id,
      NULL merged_to_asset_id,
      NULL full_snapshot_flag,
      NULL snapshot_qualified,
      'ORA_IMPORT' origination_document_type,
      0 origination_document_number,
      NULL dummy_keywork,
      NULL dummy_keyword,
      NULL keyword_text
    FROM cse_assets_int cseaint,
      (SELECT assetint.interface_row_id ,
        lookups.lookup_code dflt_wo_type_code
      FROM fnd_lookups lookups,
        cse_assets_int assetint
      WHERE assetint.dflt_wo_type     = lookups.meaning
      AND lookups.lookup_type         = 'ORA_MNT_WO_TYPE'
      AND assetint.partition_number   = p_partition_number
      AND assetint.interface_batch_id = p_batch_id
      ) mntwotype,
    (SELECT assetint.interface_row_id ,
      lookups.lookup_code dflt_wo_sub_type_code
    FROM fnd_lookups lookups,
      cse_assets_int assetint
    WHERE upper(assetint.dflt_wo_sub_type) = upper(lookups.meaning)
    AND lookups.lookup_type                = 'ORA_MNT_WO_SUB_TYPE'
    AND assetint.partition_number          = p_partition_number
    AND assetint.interface_batch_id        = p_batch_id
    ) mntwosubtype
  WHERE cseaint.interface_status_code = 'VALID'
  AND cseaint.partition_number        = p_partition_number
  AND cseaint.interface_batch_id      = p_batch_id
  AND cseaint.action_code             = C_CREATE_ACTION_CODE
  AND cseaint.item_id                IS NOT NULL
  AND cseaint.item_organization_id   IS NOT NULL
  AND cseaint.gen_object_id          IS NOT NULL
  AND cseaint.asset_id               IS NOT NULL
  AND cseaint.interface_row_id        = mntwotype.interface_row_id (+)
  AND cseaint.interface_row_id        = mntwosubtype.interface_row_id (+);

/*Cursor to get the item structure type of the assets*/

CURSOR c_get_item_structure_type(c_item_id NUMBER,c_org_id VARCHAR2)
  IS
    (SELECT BOM_ITEM_TYPE
    FROM EGP_SYSTEM_ITEMS_B esib
    WHERE esib.inventory_item_id = c_item_id
    AND esib.organization_id     = c_org_id
    ) ;
TYPE l_assets_insert_tbl_typ
IS
  TABLE OF c_get_valid_insert_rec%ROWTYPE;
  l_assets_insert_tbl l_assets_insert_tbl_typ;
  l_item_struc_type NUMBER;
  l_logical_flag    VARCHAR2(1);
TYPE organization_id_tbl_type
IS
  TABLE OF cse_assets_int.item_organization_id%TYPE;
TYPE item_id_tbl_type
IS
  TABLE OF cse_assets_int.item_id%TYPE;
TYPE serial_number_tbl_type
IS
  TABLE OF cse_assets_int.serial_number%TYPE;
TYPE lot_number_tbl_type
IS
  TABLE OF cse_assets_int.lot_number%TYPE;
TYPE interface_row_id_tbl_type
IS
  TABLE OF cse_assets_int.interface_row_id%TYPE;
  l_int_batch_type cse_int_batches_b.internal_batch_type%TYPE;
  l_organization_id_type organization_id_tbl_type;
  l_item_id_type item_id_tbl_type;
  l_serial_number_type serial_number_tbl_type;
  l_lot_number_type lot_number_tbl_type;
  l_interface_row_id_type interface_row_id_tbl_type;
  l_serial_qty        NUMBER        :=1;
  l_end_serial_number VARCHAR2(30)  :=NULL;
  l_result            NUMBER        := 0;
  l_api_name          VARCHAR2(300) := 'cse_bulk_import_pvt.insert_valid_asset_records';
  l_int_errors_tbl_type cse_int_utils_pvt.int_errors_tbl_type;
  l_row_count     NUMBER;
  l_message_text  VARCHAR2(2000);
  l_return_status VARCHAR2(1);
  l_msg_count     NUMBER;
  l_msg_data      VARCHAR2(300);

BEGIN
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
  -- bachandr: Check if the asset is Maintenance Asset or Customer Asset and update corresponding table.
  l_int_batch_type:=p_batch_type;
  x_return_status := fnd_api.g_ret_sts_success;
  l_return_status :=fnd_api.g_ret_sts_success;
  OPEN c_create_inv_serials;
  LOOP
    FETCH c_create_inv_serials BULK COLLECT
    INTO l_organization_id_type,
      l_item_id_type,
      l_serial_number_type,
      l_lot_number_type,
      l_interface_row_id_type LIMIT c_max_buffer_size;
    EXIT
  WHEN l_interface_row_id_type.count = 0;
    FOR i IN 1..l_interface_row_id_type.COUNT
    LOOP
      --Call process asset lot creation for lot cntrolled and lot -srl controlled assets.
      IF(l_lot_number_type(i) IS NOT NULL) THEN
        cse_int_utils_pvt.Process_Asset_LotNumber(p_item_id =>l_item_id_type(i), p_org_id =>l_organization_id_type(i), p_lot_number =>l_lot_number_type(i), x_return_status =>l_return_status, x_msg_count =>l_msg_count, x_msg_data =>l_msg_data );
        IF(l_return_status <>fnd_api.g_ret_sts_success) THEN
          UPDATE cse_assets_int
          SET interface_status_code                                 ='ERROR'
          WHERE interface_row_id                                    = l_interface_row_id_type(i);
          l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
          l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
          l_int_errors_tbl_type(l_row_count).object_version_number := 1;
          l_int_errors_tbl_type(l_row_count).interface_row_id      := l_interface_row_id_type(i);
          l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
          l_int_errors_tbl_type(l_row_count).error_text            := 'CSE_AS_INVALID_LOT';
          l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
          l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
          l_int_errors_tbl_type(l_row_count).column_name           := 'LOT_NUMBER';
          l_int_errors_tbl_type(l_row_count).message_name          := 'CSE_AS_INVALID_LOT';
          l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
          l_int_errors_tbl_type(l_row_count).message_token_values  := 'LOT_NUMBER';
          l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
          l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
          l_int_errors_tbl_type(l_row_count).created_by            := fnd_global.who_user_name;
          l_int_errors_tbl_type(l_row_count).creation_date         := sysdate;
          l_int_errors_tbl_type(l_row_count).last_updated_by       := fnd_global.who_user_name;
          l_int_errors_tbl_type(l_row_count).last_update_date      := sysdate;
          l_int_errors_tbl_type(l_row_count).last_update_login     := fnd_global.user_guid;
          l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
          l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
          cse_int_utils_pvt.log_messages(fnd_log.level_severe, 'inv_lot_numbers_pub.create_inv_lot', 'interface_row_id= '||l_interface_row_id_type(i)||' Inventory API Failed with Error '||x_error_message);
        END IF;
      END IF;
      -- Call create_validate_serials to create validate serial in inventory
      IF (l_return_status    =fnd_api.g_ret_sts_success AND l_serial_number_type(i) IS NOT NULL AND l_serial_number_type(i) <> C_NULL_STRING ) THEN
        l_end_serial_number := NULL;
        l_serial_qty        := 1;
        l_result            := inv_serial_number_pub.create_validate_serials( p_org_id => l_organization_id_type(i), p_item_id => l_item_id_type(i), p_qty => l_serial_qty, p_revision => NULL, p_lotnum => REPLACE(l_lot_number_type(i),FND_API.G_MISS_NUM,NULL), p_start_ser => l_serial_number_type(i), p_trx_src_type_id => NULL, p_trx_action_id => NULL, p_sub_inventory => NULL, p_loc_id => NULL, p_wip_entity_id => NULL, p_group_mark_id => NULL, p_line_mark_id => NULL, p_issue_receipt => NULL, p_end_ser => l_end_serial_number, p_msg => x_error_message, p_check_grp_mark_id => 'N', p_rcv_validate => 'N', p_rcv_source_line_id => NULL, p_xfr_org_id => NULL, p_insert_yn => 'Y' );
        IF l_result          =1 THEN
          UPDATE cse_assets_int
          SET interface_status_code                                 ='ERROR'
          WHERE interface_row_id                                    = l_interface_row_id_type(i);
          l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
          l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
          l_int_errors_tbl_type(l_row_count).object_version_number := 1;
          l_int_errors_tbl_type(l_row_count).interface_row_id      := l_interface_row_id_type(i);
          l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
          l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
          l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
          l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
          l_int_errors_tbl_type(l_row_count).column_name           := 'SERIAL_NUMBER';
          l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
          l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
          l_int_errors_tbl_type(l_row_count).message_token_values  := 'SERIAL_NUMBER';
          l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
          l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
          l_int_errors_tbl_type(l_row_count).created_by            := fnd_global.who_user_name;
          l_int_errors_tbl_type(l_row_count).creation_date         := sysdate;
          l_int_errors_tbl_type(l_row_count).last_updated_by       := fnd_global.who_user_name;
          l_int_errors_tbl_type(l_row_count).last_update_date      := sysdate;
          l_int_errors_tbl_type(l_row_count).last_update_login     := fnd_global.user_guid;
          l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
          l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
          cse_int_utils_pvt.log_messages(fnd_log.level_severe, 'inv_serial_number_pub.create_validate_serials', 'interface_row_id= '||l_interface_row_id_type(i)||' Inventory API Failed with Error '||x_error_message);
        END IF;
      END IF;
    END LOOP;
    l_organization_id_type.delete;
    l_item_id_type.delete;
    l_serial_number_type.delete;
    l_lot_number_type.delete;
    x_return_status := l_return_status;
  END LOOP;
  CLOSE c_create_inv_serials;
  cse_int_utils_pvt.log_errors( l_int_errors_tbl_type, l_return_status , x_error_message );

OPEN c_get_valid_insert_rec;
   LOOP
    FETCH c_get_valid_insert_rec BULk COLLECT
    INTO l_assets_insert_tbl LIMIT c_max_buffer_size;
    EXIT
  WHEN l_assets_insert_tbl.count = 0;

FOR i IN l_assets_insert_tbl.FIRST..l_assets_insert_tbl.LAST
    LOOP
      /*Setting the logical flag of the asset according to teh item structure type*/
      OPEN c_get_item_structure_type(l_assets_insert_tbl(i).item_id,l_assets_insert_tbl(i).item_organization_id); -- set the logical flag according to the BOM_ITEM_TYPE/item structure type of the item of the asset
      FETCH c_get_item_structure_type INTO l_item_struc_type;
      CLOSE c_get_item_structure_type;
      IF NVL(l_item_struc_type,0) IN (1,2) THEN
        l_logical_flag := 'Y';
      ELSE
        l_logical_flag := 'N';
      END IF;
      INSERT
      INTO CSE_ASSETS_B
        (
          asset_id,
          object_version_number,
          asset_number,
          asset_tag,
          item_id,
          item_organization_id,
          item_revision,
          serial_number,
          lot_number,
          gen_object_id,
          quantity,
          uom_code,
          new_wo_allowed_flag,
          status_code,
          active_end_date,
          subinventory_code,
          inventory_locator_id,
          work_order_id,
          work_order_operation_id,
          work_center_id,
          sales_order_id,
          sales_order_line_id,
          current_location_context,
          current_location_id,
          location_organization_id,
          installed_location_context,
          installed_location_id,
          shipment_date,
          installed_date,
          in_service_date,
          purchase_date,
          origination_date,
          registered_flag,
          customer_id,
          customer_site_id,
          customer_site_party_id,
          customer_account_id,
          customer_account_site_id,
          customer_account_site_use_id,
          --sales_order_source_system_type,
          supplier_id,
          supplier_site_id,
          sold_by_business_unit_id,
          dflt_wo_type,
          dflt_wo_sub_type,
          owned_by,
          used_by,
          maintainable_flag,
          logical_flag,
          attribute_category,
          attribute_char1,
          attribute_char2,
          attribute_char3,
          attribute_char4,
          attribute_char5,
          attribute_char6,
          attribute_char7,
          attribute_char8,
          attribute_char9,
          attribute_char10,
          attribute_char11,
          attribute_char12,
          attribute_char13,
          attribute_char14,
          attribute_char15,
          attribute_char16,
          attribute_char17,
          attribute_char18,
          attribute_char19,
          attribute_char20,
          attribute_number1,
          attribute_number2,
          attribute_number3,
          attribute_number4,
          attribute_number5,
          attribute_number6,
          attribute_number7,
          attribute_number8,
          attribute_number9,
          attribute_number10,
          attribute_date1,
          attribute_date2,
          attribute_date3,
          attribute_date4,
          attribute_date5,
          attribute_timestamp1,
          attribute_timestamp2,
          attribute_timestamp3,
          attribute_timestamp4,
          attribute_timestamp5,
          created_by,
          creation_date,
          last_updated_by,
          last_update_date,
          last_update_login,
          request_id,
          job_definition_name,
          job_definition_package
        )
        VALUES
        (
          l_assets_insert_tbl(i).asset_id,
          l_assets_insert_tbl(i).object_version_number,
          l_assets_insert_tbl(i).asset_number,
          l_assets_insert_tbl(i).asset_tag,
          l_assets_insert_tbl(i).item_id,
          l_assets_insert_tbl(i).item_organization_id,
          l_assets_insert_tbl(i).item_revision,
          l_assets_insert_tbl(i).serial_number,
          l_assets_insert_tbl(i).lot_number,
          l_assets_insert_tbl(i).gen_object_id,
          l_assets_insert_tbl(i).quantity,
          l_assets_insert_tbl(i).uom_code,
          l_assets_insert_tbl(i).new_wo_allowed_flag,
          l_assets_insert_tbl(i).status_code,
          l_assets_insert_tbl(i).active_end_date,
          l_assets_insert_tbl(i).subinventory_code,
          l_assets_insert_tbl(i).inventory_locator_id,
          l_assets_insert_tbl(i).work_order_id,
          l_assets_insert_tbl(i).work_order_operation_id,
          l_assets_insert_tbl(i).work_center_id,
          l_assets_insert_tbl(i).sales_order_id,
          l_assets_insert_tbl(i).sales_order_line_id,
          l_assets_insert_tbl(i).current_location_context,
          l_assets_insert_tbl(i).current_location_id,
          l_assets_insert_tbl(i).location_organization_id,
          l_assets_insert_tbl(i).installed_location_context,
          l_assets_insert_tbl(i).installed_location_id,
          DECODE(l_int_batch_type,'CA', l_assets_insert_tbl(i).shipment_date, NULL) ,
          l_assets_insert_tbl(i).installed_date,
          l_assets_insert_tbl(i).in_service_date,
          l_assets_insert_tbl(i).purchase_date,
          l_assets_insert_tbl(i).origination_date,
          l_assets_insert_tbl(i).registered_flag,
          l_assets_insert_tbl(i).customer_id,
          l_assets_insert_tbl(i).customer_site_id,
          l_assets_insert_tbl(i).customer_site_party_id,
          l_assets_insert_tbl(i).customer_account_id,
          l_assets_insert_tbl(i).customer_account_site_id,
          l_assets_insert_tbl(i).customer_account_site_use_id,
          --sales_order_source_system_type,
          l_assets_insert_tbl(i).supplier_id,
          l_assets_insert_tbl(i).supplier_site_id,
          l_assets_insert_tbl(i).sold_by_business_unit_id,
          l_assets_insert_tbl(i).dflt_wo_type_code,
          l_assets_insert_tbl(i).dflt_wo_sub_type_code,
          DECODE(l_int_batch_type,'CA','C','E'),
          DECODE(l_int_batch_type,'CA','C','E'),
          DECODE(l_int_batch_type,'CA','N','Y'),
          l_logical_flag,
          l_assets_insert_tbl(i).attribute_category,
          l_assets_insert_tbl(i).attribute_char1,
          l_assets_insert_tbl(i).attribute_char2,
          l_assets_insert_tbl(i).attribute_char3,
          l_assets_insert_tbl(i).attribute_char4,
          l_assets_insert_tbl(i).attribute_char5,
          l_assets_insert_tbl(i).attribute_char6,
          l_assets_insert_tbl(i).attribute_char7,
          l_assets_insert_tbl(i).attribute_char8,
          l_assets_insert_tbl(i).attribute_char9,
          l_assets_insert_tbl(i).attribute_char10,
          l_assets_insert_tbl(i).attribute_char11,
          l_assets_insert_tbl(i).attribute_char12,
          l_assets_insert_tbl(i).attribute_char13,
          l_assets_insert_tbl(i).attribute_char14,
          l_assets_insert_tbl(i).attribute_char15,
          l_assets_insert_tbl(i).attribute_char16,
          l_assets_insert_tbl(i).attribute_char17,
          l_assets_insert_tbl(i).attribute_char18,
          l_assets_insert_tbl(i).attribute_char19,
          l_assets_insert_tbl(i).attribute_char20,
          l_assets_insert_tbl(i).attribute_number1,
          l_assets_insert_tbl(i).attribute_number2,
          l_assets_insert_tbl(i).attribute_number3,
          l_assets_insert_tbl(i).attribute_number4,
          l_assets_insert_tbl(i).attribute_number5,
          l_assets_insert_tbl(i).attribute_number6,
          l_assets_insert_tbl(i).attribute_number7,
          l_assets_insert_tbl(i).attribute_number8,
          l_assets_insert_tbl(i).attribute_number9,
          l_assets_insert_tbl(i).attribute_number10,
          l_assets_insert_tbl(i).attribute_date1,
          l_assets_insert_tbl(i).attribute_date2,
          l_assets_insert_tbl(i).attribute_date3,
          l_assets_insert_tbl(i).attribute_date4,
          l_assets_insert_tbl(i).attribute_date5,
          l_assets_insert_tbl(i).attribute_timestamp1,
          l_assets_insert_tbl(i).attribute_timestamp2,
          l_assets_insert_tbl(i).attribute_timestamp3,
          l_assets_insert_tbl(i).attribute_timestamp4,
          l_assets_insert_tbl(i).attribute_timestamp5,
          l_assets_insert_tbl(i).created_by,
          l_assets_insert_tbl(i).creation_date,
          l_assets_insert_tbl(i).last_updated_by,
          l_assets_insert_tbl(i).last_update_date,
          l_assets_insert_tbl(i).last_update_login,
          l_assets_insert_tbl(i).request_id,
          l_assets_insert_tbl(i).job_definition_name,
          l_assets_insert_tbl(i).job_definition_package
        );
      INSERT
      INTO CSE_TRANSACTED_ASSETS
        (
          transacted_asset_id,
          transaction_id,
          asset_id,
          transacted_quantity,
          location_context,
          organization_id,
          subinventory_code,
          inventory_locator_id,
          work_order_id,
          work_order_operation_id,
          work_center_id,
          split_from_asset_id,
          merged_to_asset_id,
          full_snapshot_flag,
          snapshot_qualified,
          created_by,
          creation_date,
          last_updated_by,
          last_update_date,
          last_update_login,
          request_id,
          job_definition_name,
          job_definition_package,
          gen_object_id
        )
        VALUES
        (
          l_assets_insert_tbl(i).transacted_asset_id,
          px_transaction_id,
          l_assets_insert_tbl(i).asset_id,
          l_assets_insert_tbl(i).quantity,
          l_assets_insert_tbl(i).current_location_context,
          l_assets_insert_tbl(i).item_organization_id,
          l_assets_insert_tbl(i).subinventory_code,
          l_assets_insert_tbl(i).inventory_locator_id,
          l_assets_insert_tbl(i).work_order_id,
          l_assets_insert_tbl(i).work_order_operation_id,
          l_assets_insert_tbl(i).work_center_id,
          l_assets_insert_tbl(i).split_from_asset_id,
          l_assets_insert_tbl(i).merged_to_asset_id,
          l_assets_insert_tbl(i).full_snapshot_flag,
          l_assets_insert_tbl(i).snapshot_qualified,
          l_assets_insert_tbl(i).created_by,
          l_assets_insert_tbl(i).creation_date,
          l_assets_insert_tbl(i).last_updated_by,
          l_assets_insert_tbl(i).last_update_date,
          l_assets_insert_tbl(i).last_update_login,
          l_assets_insert_tbl(i).request_id,
          l_assets_insert_tbl(i).job_definition_name,
          l_assets_insert_tbl(i).job_definition_package,
          l_assets_insert_tbl(i).gen_object_id
        );
      INSERT
      INTO CSE_GENEALOGY_OBJECTS
        (
          gen_object_id,
          item_id,
          organization_id,
          serial_number,
          lot_number,
          origination_date,
          origination_quantity,
          origination_document_type,
          origination_document_number,
          created_by,
          creation_date,
          last_updated_by,
          last_update_date,
          last_update_login
        )
        VALUES
        (
          l_assets_insert_tbl(i).gen_object_id,
          l_assets_insert_tbl(i).item_id,
          l_assets_insert_tbl(i).item_organization_id,
          l_assets_insert_tbl(i).serial_number,
          l_assets_insert_tbl(i).lot_number,
          l_assets_insert_tbl(i).origination_date,
          l_assets_insert_tbl(i).quantity,
          l_assets_insert_tbl(i).origination_document_type,
          l_assets_insert_tbl(i).origination_document_number,
          l_assets_insert_tbl(i).created_by,
          l_assets_insert_tbl(i).creation_date,
          l_assets_insert_tbl(i).last_updated_by,
          l_assets_insert_tbl(i).last_update_date,
          l_assets_insert_tbl(i).last_update_login
        );
    END LOOP;
  END LOOP;

CLOSE c_get_valid_insert_rec;

cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Created Assets records, CREATE case = '||SQL%ROWCOUNT);

--Insert valid relationships into relevant tables
  insert_valid_structure_rec(p_batch_id, p_batch_type, p_partition_number, px_transaction_id, px_transaction_date, x_error_message, x_return_status);

FOR j IN
  (SELECT language_code
    FROM fnd_languages_b
    WHERE installed_flag IN ('B', 'I')
  )
  LOOP
    INSERT
    INTO cse_assets_tl
      (
        asset_id ,
        language ,
        source_lang ,
        description ,
        object_version_number ,
        created_by ,
        creation_date ,
        last_updated_by ,
        last_update_date ,
        last_update_login
      )
      (SELECT asset_id ,
          j.language_code ,
          userenv('LANG') ,
          asset_description ,
          1 ,
          created_by ,
          creation_date ,
          last_updated_by ,
          last_update_date ,
          last_update_login
        FROM cse_assets_int cseaint
        WHERE cseaint.interface_status_code = 'VALID'
        AND cseaint.partition_number        = p_partition_number
        AND cseaint.interface_batch_id      = p_batch_id
        AND cseaint.action_code             = C_CREATE_ACTION_CODE
        AND cseaint.asset_id               IS NOT NULL
      );
  END LOOP;

INSERT
  INTO CSE_GENEALOGY_OBJECTS
    (
      gen_object_id,
      item_id,
      organization_id,
      lot_number,
      origination_date,
      origination_quantity,
      origination_document_type,
      origination_document_number,
      created_by,
      creation_date,
      last_updated_by,
      last_update_date,
      last_update_login
    )
    (SELECT cse_int_s.NEXTVAL gen_object_id,
        item_id,
        item_organization_id,
        lot_number,
        NULL origination_date,
        quantity,
        'ORA_IMPORT' origination_document_type,
        '0' origination_document_number,
        created_by,
        creation_date,
        last_updated_by,
        last_update_date,
        last_update_login
      FROM
        (SELECT item_id,
          item_organization_id,
          lot_number,
          SUM(quantity) quantity,
          MAX(created_by) created_by,
          MAX(creation_date) creation_date,
          MAX(last_updated_by) last_updated_by,
          MAX(last_update_date) last_update_date,
          MAX(last_update_login) last_update_login
        FROM cse_assets_int cseaint
        WHERE cseaint.interface_status_code = 'VALID'
        AND cseaint.partition_number        = p_partition_number
        AND cseaint.interface_batch_id      = p_batch_id
        AND cseaint.action_code             = C_CREATE_ACTION_CODE
        AND cseaint.item_id                IS NOT NULL
        AND cseaint.item_organization_id   IS NOT NULL
        AND cseaint.gen_object_id          IS NOT NULL
        AND cseaint.asset_id               IS NOT NULL
        AND cseaint.lot_number             IS NOT NULL
        AND EXISTS
          (SELECT 1
          FROM egp_system_items_vl egpitem
          WHERE egpitem.inventory_item_id          = cseaint.item_id
          AND egpitem.organization_id              = cseaint.item_organization_id
          AND egpitem.lot_control_code             = 2
          AND egpitem.serial_number_control_code  IN ( 2,5,6)
          AND ((egpitem.asset_tracked_flag         ='Y'
          AND egpitem.allow_maintenance_asset_flag ='Y'
          AND l_int_batch_type                     ='MA' )
          OR (egpitem.asset_tracked_flag          IN ('Y','C')
          AND l_int_batch_type                     ='CA' ))
          )
        AND NOT EXISTS
          (SELECT 1
          FROM cse_genealogy_objects cseobj
          WHERE cseobj.item_id       = cseaint.item_id
          AND cseobj.organization_id = cseaint.item_organization_id
          AND cseobj.lot_number      = cseaint.lot_number
          )
        GROUP BY item_id,
          item_organization_id,
          lot_number
        )
    );
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Created Genealogy records for Lots, CREATE case = '||SQL%ROWCOUNT);
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Before Creating Item Log records');

INSERT
  INTO cse_item_attributes_audit
    (
      attribute_audit_id ,
      item_id ,
      organization_id ,
      enable_genealogy_tracking_flag ,
      asset_tracked_flag ,
      allow_maintenance_asset_flag ,
      effective_date ,
      created_by ,
      creation_date ,
      last_updated_by ,
      last_update_date ,
      last_update_login ,
      request_id
    )
    (SELECT S_ROW_ID_SEQ.NEXTVAL attribute_audit_id ,
        inventory_item_id ,
        organization_id ,
        enable_genealogy_tracking_flag ,
        asset_tracked_flag ,
        allow_maintenance_asset_flag ,
        last_update_date effective_date ,
        created_by ,
        creation_date ,
        last_updated_by ,
        last_update_date ,
        last_update_login ,
        p_batch_id request_id
      FROM egp_system_items_b egp
      WHERE (egp.inventory_item_id,egp.organization_id ) IN
        (SELECT item_id,
          item_organization_id
        FROM cse_assets_int cseaint
        WHERE cseaint.interface_status_code = 'VALID'
        AND cseaint.partition_number        = p_partition_number
        AND cseaint.interface_batch_id      = p_batch_id
        AND cseaint.item_id                IS NOT NULL
        AND cseaint.item_organization_id   IS NOT NULL
        AND cseaint.asset_id               IS NOT NULL
        AND NOT EXISTS
          (SELECT 1
          FROM cse_item_attributes_audit cseaudit
          WHERE cseaudit.item_id       = cseaint.item_id
          AND cseaudit.organization_id = cseaint.item_organization_id
          )
        )
    );
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Created Item Log records, CREATE case = '||SQL%ROWCOUNT);

IF p_batch_type ='CA' THEN
    /*Raise Customer Asset Events before records in interface table are deleted*/
    trigger_customer_asset_events( p_partition_number => p_partition_number, p_batch_id => p_batch_id, p_operation_code => C_CREATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
    IF (x_return_status<> fnd_api.g_ret_sts_success) THEN
      cse_int_utils_pvt.log_messages(fnd_log.level_info,'Failed  to trigger business events', x_error_message);
    END IF;
    Update_Asset_Charge_Records( p_partition_number => p_partition_number, p_batch_id => p_batch_id, p_operation_code => C_CREATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
    create_service_asset_records( p_batch_id => p_batch_id, p_partition_number => p_partition_number, px_transaction_id => px_transaction_id, px_transaction_date => px_transaction_date, x_error_message => x_error_message, x_return_status => x_return_status);
  END IF;

--  DELETE
--  FROM cse_assets_int cseaint
--  WHERE cseaint.interface_status_code = 'VALID'
--  AND cseaint.partition_number        = p_partition_number
--  AND cseaint.interface_batch_id      = p_batch_id
--  AND cseaint.action_code             = C_CREATE_ACTION_CODE
--  AND cseaint.item_id                IS NOT NULL
--  AND cseaint.item_organization_id   IS NOT NULL
--  AND cseaint.gen_object_id          IS NOT NULL
--  AND cseaint.asset_id               IS NOT NULL ;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Removing Asset Import traces for CREATE case = '||SQL%ROWCOUNT);
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');

/*=============================================================================
|
|  DESCRIPTION
|      This Public API does the following actions:
|        1. Update valid assets and asset description
|        2. Create Transacted Assets record for updated Assets
|
|  PARAMETERS
|      Returns x_errbuf and Status code x_retcode back to calling Api
|
*===========================================================================*/

PROCEDURE update_valid_asset_records(
    p_batch_id          IN NUMBER,
    p_partition_number  IN NUMBER,
    p_batch_type        IN VARCHAR2,
    px_transaction_id   IN OUT NOCOPY NUMBER,
    px_transaction_date IN OUT NOCOPY DATE,
    x_error_message OUT NOCOPY        VARCHAR2,
    x_return_status OUT NOCOPY        VARCHAR2)
IS
  l_Source_System_Type     VARCHAR2(30);
  l_Source_System_Code     VARCHAR2(30);
  l_Interface_Batch_Status VARCHAR2(30);
  l_validates              NUMBER := 0;
  l_Src_System_Id          NUMBER := 0;
  l_Batch_Id               NUMBER := 0;
  l_Transaction_Id         NUMBER;
  CURSOR c_update_assets
  IS
    SELECT asset_number,
      LTRIM(RTRIM(new_asset_number)) new_asset_number,
      asset_id,
      item_id,
      item_organization_id,
      quantity,
      serial_number,
      LTRIM(RTRIM(lot_number)) lot_number,
      work_center_id,
      current_location_context,
      location_organization_id,
      active_end_date,
      new_wo_allowed_flag,
      dflt_wo_type_code,
      dflt_wo_sub_type_code,
      customer_id,
      customer_site_id,
      customer_site_party_id,
      customer_account_id,
      customer_account_site_id,
      customer_account_site_use_id,
      sales_order_source_system_type,
      sold_by_business_unit_id,
      sold_by_business_unit_name,
      attribute_category,
      attribute_char1,
      attribute_char2,
      attribute_char3,
      attribute_char4,
      attribute_char5,
      attribute_char6,
      attribute_char7,
      attribute_char8,
      attribute_char9,
      attribute_char10,
      attribute_char11,
      attribute_char12,
      attribute_char13,
      attribute_char14,
      attribute_char15,
      attribute_char16,
      attribute_char17,
      attribute_char18,
      attribute_char19,
      attribute_char20,
      attribute_number1,
      attribute_number2,
      attribute_number3,
      attribute_number4,
      attribute_number5,
      attribute_number6,
      attribute_number7,
      attribute_number8,
      attribute_number9,
      attribute_number10,
      attribute_date1,
      attribute_date2,
      attribute_date3,
      attribute_date4,
      attribute_date5,
      attribute_timestamp1,
      attribute_timestamp2,
      attribute_timestamp3,
      attribute_timestamp4,
      attribute_timestamp5,
      last_updated_by,
      last_update_date,
      last_update_login,
      request_id,
      job_definition_name,
      job_definition_package,
      cseaint.interface_row_id interface_row_id
    FROM cse_assets_int cseaint,
      (SELECT DISTINCT assetint.interface_row_id ,
        (
        CASE assetint.dflt_wo_type
          WHEN C_NULL_STRING
          THEN assetint.dflt_wo_type
          ELSE lookups.lookup_code
        END) AS dflt_wo_type_code
      FROM fnd_lookups lookups,
        cse_assets_int assetint
      WHERE (assetint.dflt_wo_type    = lookups.meaning
      OR assetint.dflt_wo_type        = C_NULL_STRING )
      AND lookups.lookup_type         = 'ORA_MNT_WO_TYPE'
      AND assetint.partition_number   = p_partition_number
      AND assetint.interface_batch_id = p_batch_id
      ) mntwotype,
    (SELECT DISTINCT assetint.interface_row_id ,
      (
      CASE assetint.dflt_wo_sub_type
        WHEN C_NULL_STRING
        THEN assetint.dflt_wo_sub_type
        ELSE lookups.lookup_code
      END ) AS dflt_wo_sub_type_code
    FROM fnd_lookups lookups,
      cse_assets_int assetint
    WHERE (assetint.dflt_wo_sub_type = lookups.meaning
    OR assetint.dflt_wo_sub_type     = C_NULL_STRING )
    AND lookups.lookup_type          = 'ORA_MNT_WO_SUB_TYPE'
    AND assetint.partition_number    = p_partition_number
    AND assetint.interface_batch_id  = p_batch_id
    ) mntwosubtype
  WHERE cseaint.interface_status_code = 'VALID'
  AND cseaint.partition_number        = p_partition_number
  AND cseaint.interface_batch_id      = p_batch_id
  AND cseaint.action_code             = C_UPDATE_ACTION_CODE
  AND cseaint.asset_id               IS NOT NULL
  AND cseaint.interface_row_id        = mntwotype.interface_row_id (+)
  AND cseaint.interface_row_id        = mntwosubtype.interface_row_id (+);
  CURSOR c_asset_description
  IS
    SELECT asset_id ,
      asset_description
    FROM cse_assets_int cseaint
    WHERE cseaint.interface_status_code = 'VALID'
    AND cseaint.partition_number        = p_partition_number
    AND cseaint.interface_batch_id      = p_batch_id
    AND cseaint.action_code             = C_UPDATE_ACTION_CODE
    AND cseaint.asset_id               IS NOT NULL
    AND cseaint.asset_description      IS NOT NULL ;
  /* Cursor to get the assets whose customer is changed */
  CURSOR c_transfer_customer_asset
  IS
    SELECT assetInt.interface_row_id
    FROM CSE_ASSETS_INT assetInt,
      CSE_ASSETS_B casb
    WHERE assetInt.partition_number    = p_partition_number
    AND assetInt.interface_batch_id    = p_batch_id
    AND assetInt.interface_status_code = 'VALID'
    AND assetInt.action_code          IN (C_UPDATE_ACTION_CODE)
    AND (assetInt.customer_number     IS NOT NULL
    OR assetInt.customer_name         IS NOT NULL )
    AND casb.asset_id                  =assetInt.asset_id
    AND casb.customer_id!              =assetInt.customer_Id;
  /* Cursor to get assets whose active end date is nullified */
  CURSOR c_reinstate_customer_asset
  IS
    SELECT assetInt.interface_row_id
    FROM CSE_ASSETS_INT assetInt,
      CSE_ASSETS_B casb
    WHERE assetInt.partition_number    = p_partition_number
    AND assetInt.interface_batch_id    = p_batch_id
    AND assetInt.interface_status_code = 'VALID'
    AND assetInt.action_code          IN (C_UPDATE_ACTION_CODE)
    AND casb.asset_id                  =assetInt.asset_id
    AND casb.active_end_date          IS NOT NULL
    AND assetInt.active_end_date       =FND_API.G_NULL_DATE;
  l_api_name VARCHAR2(300)            := 'cse_bulk_import_pvt.update_valid_asset_records';
TYPE l_update_assets_tbl_type
IS
  TABLE OF c_update_assets%ROWTYPE;
  l_update_assets_tbl l_update_assets_tbl_type;
TYPE l_asset_desc_tbl_type
IS
  TABLE OF c_asset_description%ROWTYPE;
  l_asset_desc_tbl l_asset_desc_tbl_type;
  l_end_serial_number VARCHAR2(30);
  l_serial_qty        NUMBER := 1;
  l_result            NUMBER := 0;
  l_int_errors_tbl_type cse_int_utils_pvt.int_errors_tbl_type;
  l_row_count    NUMBER;
  l_message_text VARCHAR2(2000);
TYPE l_trsfr_assets_tbl_type
IS
  TABLE OF c_transfer_customer_asset%ROWTYPE;
  l_trsfr_assets l_trsfr_assets_tbl_type;
TYPE l_reinstate_assets_tbl_type
IS
  TABLE OF c_reinstate_customer_asset%ROWTYPE;
  l_rnst_assets l_reinstate_assets_tbl_type;
  l_return_status VARCHAR2(2);
  l_msg_count     NUMBER;
  l_msg_data      VARCHAR2(300);

BEGIN
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
  l_return_status :=fnd_api.g_ret_sts_success;
  x_return_status := fnd_api.g_ret_sts_success;

/* Fetching Transfered assets*/
  OPEN c_transfer_customer_asset;
  FETCH c_transfer_customer_asset BULK COLLECT INTO l_trsfr_assets;
  CLOSE c_transfer_customer_asset;
  /*Fetching reinstated assets*/
  OPEN c_reinstate_customer_asset;
  FETCH c_reinstate_customer_asset BULK COLLECT INTO l_rnst_assets;
  CLOSE c_reinstate_customer_asset;

/*Raise Customer Asset Events before DB insert so that old and new values can be compared*/
  IF p_batch_type = 'CA' THEN
    trigger_customer_asset_events( p_partition_number => p_partition_number, p_batch_id => p_batch_id, p_operation_code => C_UPDATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
    IF (x_return_status<> fnd_api.g_ret_sts_success) THEN
      cse_int_utils_pvt.log_messages(fnd_log.level_info,'Failed  to trigger business events', x_error_message);
    END IF;
  END IF;

OPEN c_update_assets;
  FETCH c_update_assets BULK COLLECT INTO l_update_assets_tbl;
  CLOSE c_update_assets;

FOR i IN 1..l_update_assets_tbl.COUNT
  LOOP
    IF (l_update_assets_tbl(i).lot_number IS NOT NULL AND l_update_assets_tbl(i).lot_number <> C_NULL_STRING ) THEN
      cse_int_utils_pvt.Process_Asset_LotNumber( p_item_id =>l_update_assets_tbl(i).item_id, p_org_id =>l_update_assets_tbl(i).item_organization_id, p_lot_number =>l_update_assets_tbl(i).lot_number, x_return_status =>l_return_status, x_msg_count =>l_msg_count, x_msg_data =>l_msg_data );
      IF(l_return_status <>fnd_api.g_ret_sts_success) THEN
        UPDATE cse_assets_int
        SET interface_status_code                                 ='ERROR'
        WHERE interface_row_id                                    = l_update_assets_tbl(i).interface_row_id;
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_update_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'CSE_AS_INVALID_LOT';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'LOT_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'CSE_AS_INVALID_LOT';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'LOT_NUMBER';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_ERROR;
        l_int_errors_tbl_type(l_row_count).created_by            := fnd_global.who_user_name;
        l_int_errors_tbl_type(l_row_count).creation_date         := sysdate;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := fnd_global.who_user_name;
        l_int_errors_tbl_type(l_row_count).last_update_date      := sysdate;
        l_int_errors_tbl_type(l_row_count).last_update_login     := fnd_global.user_guid;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, 'inv_lot_numbers_pub.create_inv_lot', 'interface_row_id= '||l_update_assets_tbl(i).interface_row_id||' Inventory API Failed with Error '||x_error_message);
        cse_int_utils_pvt.log_errors( l_int_errors_tbl_type, x_return_status , x_error_message );
      END IF;
    END IF;

IF (l_return_status =fnd_api.g_ret_sts_success AND l_update_assets_tbl(i).serial_number IS NOT NULL) THEN
      -- Call create_validate_serials to create validate serial in inventory
      l_end_serial_number := NULL;
      l_serial_qty        := 1;
      l_result            := inv_serial_number_pub.create_validate_serials( p_org_id => l_update_assets_tbl(i).item_organization_id, p_item_id => l_update_assets_tbl(i).item_id, p_qty => l_serial_qty, p_revision => NULL, p_lotnum => l_update_assets_tbl(i).lot_number, p_start_ser => l_update_assets_tbl(i).serial_number, p_trx_src_type_id => NULL, p_trx_action_id => NULL, p_sub_inventory => NULL, p_loc_id => NULL, p_wip_entity_id => NULL, p_group_mark_id => NULL, p_line_mark_id => NULL, p_issue_receipt => NULL, p_end_ser => l_end_serial_number, p_msg => x_error_message, p_check_grp_mark_id => 'N', p_rcv_validate => 'N', p_rcv_source_line_id => NULL, p_xfr_org_id => NULL, p_insert_yn => 'Y' );
      IF l_result          =1 THEN
        UPDATE cse_assets_int
        SET interface_status_code                                 ='ERROR'
        WHERE interface_row_id                                    = l_update_assets_tbl(i).interface_row_id;
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_update_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'SERIAL_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'SERIAL_NUMBER';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := fnd_global.who_user_name;
        l_int_errors_tbl_type(l_row_count).creation_date         := sysdate;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := fnd_global.who_user_name;
        l_int_errors_tbl_type(l_row_count).last_update_date      := sysdate;
        l_int_errors_tbl_type(l_row_count).last_update_login     := fnd_global.user_guid;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
        cse_int_utils_pvt.log_errors( l_int_errors_tbl_type, x_return_status , x_error_message );
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, 'inv_serial_number_pub.create_validate_serials', ' Failed Update Asset Case for Serial = '||l_update_assets_tbl(i).serial_number||' Inventory API Failed with Error '||x_error_message);
      END IF;
    END IF;
  END LOOP;
  l_update_assets_tbl.DELETE;
  x_return_status := l_return_status;

OPEN c_update_assets;
  FETCH c_update_assets BULK COLLECT INTO l_update_assets_tbl;
  CLOSE c_update_assets;

FORALL i IN l_update_assets_tbl.FIRST..l_update_assets_tbl.LAST
  UPDATE cse_assets_b cseb
  SET asset_number               = NVL(l_update_assets_tbl(i).new_asset_number, NVL(l_update_assets_tbl(i).asset_number,cseb.asset_number)),
    location_organization_id     = DECODE(l_update_assets_tbl(i).current_location_context,'ORA_WORK_CENTER', NVL(l_update_assets_tbl(i).location_organization_id,cseb.location_organization_id),cseb.location_organization_id),
    quantity                     = NVL(l_update_assets_tbl(i).quantity,cseb.quantity),
    serial_number                = DECODE(l_update_assets_tbl(i).serial_number,C_NULL_STRING,NULL,NVL(l_update_assets_tbl(i).serial_number,cseb.serial_number)),
    lot_number                   = DECODE(l_update_assets_tbl(i).lot_number,C_NULL_STRING,NULL,NVL(l_update_assets_tbl(i).lot_number,cseb.lot_number)),
    work_center_id               = DECODE(l_update_assets_tbl(i).current_location_context,'ORA_WORK_CENTER', NVL(l_update_assets_tbl(i).work_center_id, cseb.work_center_id),cseb.work_center_id),
    current_location_context     = NVL(l_update_assets_tbl(i).current_location_context, cseb.current_location_context),
    dflt_wo_type                 = DECODE(l_update_assets_tbl(i).dflt_wo_type_code,C_NULL_STRING,NULL,NVL(l_update_assets_tbl(i).dflt_wo_type_code, cseb.dflt_wo_type)),
    dflt_wo_sub_type             = DECODE(l_update_assets_tbl(i).dflt_wo_sub_type_code,C_NULL_STRING,NULL,NVL(l_update_assets_tbl(i).dflt_wo_sub_type_code, cseb.dflt_wo_sub_type)),
    active_end_date              = DECODE(l_update_assets_tbl(i).active_end_date,FND_API.G_NULL_DATE,NULL,NVL(l_update_assets_tbl(i).active_end_date,cseb.active_end_date)),
    new_wo_allowed_flag          = NVL(l_update_assets_tbl(i).new_wo_allowed_flag,cseb.new_wo_allowed_flag),
    customer_id                  = NVL(l_update_assets_tbl(i).customer_id,cseb.customer_id),
    customer_site_id             = NVL(l_update_assets_tbl(i).customer_site_id,cseb.customer_site_id),
    customer_site_party_id       = NVL(l_update_assets_tbl(i).customer_site_party_id,cseb.customer_site_party_id),
    customer_account_id          = NVL(l_update_assets_tbl(i).customer_account_id,cseb.customer_account_id),
    customer_account_site_id     = NVL(l_update_assets_tbl(i).customer_account_site_id,cseb.customer_account_site_id),
    customer_account_site_use_id = NVL(l_update_assets_tbl(i).customer_account_site_use_id,cseb.customer_account_site_use_id),
    sold_by_business_unit_id     = DECODE(l_update_assets_tbl(i).sold_by_business_unit_name,'#NULL',NULL,NVL(l_update_assets_tbl(i).sold_by_business_unit_id,cseb.sold_by_business_unit_id)),
    --sales_order_source_system_type = NVL(l_update_assets_tbl(i).sales_order_source_system_type,cseb.sales_order_source_system_type),
    attribute_category     = l_update_assets_tbl(i).attribute_category,
    attribute_char1        = l_update_assets_tbl(i).attribute_char1,
    attribute_char2        = l_update_assets_tbl(i).attribute_char2,
    attribute_char3        = l_update_assets_tbl(i).attribute_char3,
    attribute_char4        = l_update_assets_tbl(i).attribute_char4,
    attribute_char5        = l_update_assets_tbl(i).attribute_char5,
    attribute_char6        = l_update_assets_tbl(i).attribute_char6,
    attribute_char7        = l_update_assets_tbl(i).attribute_char7,
    attribute_char8        = l_update_assets_tbl(i).attribute_char8,
    attribute_char9        = l_update_assets_tbl(i).attribute_char9,
    attribute_char10       = l_update_assets_tbl(i).attribute_char10,
    attribute_char11       = l_update_assets_tbl(i).attribute_char11,
    attribute_char12       = l_update_assets_tbl(i).attribute_char12,
    attribute_char13       = l_update_assets_tbl(i).attribute_char13,
    attribute_char14       = l_update_assets_tbl(i).attribute_char14,
    attribute_char15       = l_update_assets_tbl(i).attribute_char15,
    attribute_char16       = l_update_assets_tbl(i).attribute_char16,
    attribute_char17       = l_update_assets_tbl(i).attribute_char17,
    attribute_char18       = l_update_assets_tbl(i).attribute_char18,
    attribute_char19       = l_update_assets_tbl(i).attribute_char19,
    attribute_char20       = l_update_assets_tbl(i).attribute_char20,
    attribute_number1      = l_update_assets_tbl(i).attribute_number1,
    attribute_number2      = l_update_assets_tbl(i).attribute_number2,
    attribute_number3      = l_update_assets_tbl(i).attribute_number3,
    attribute_number4      = l_update_assets_tbl(i).attribute_number4,
    attribute_number5      = l_update_assets_tbl(i).attribute_number5,
    attribute_number6      = l_update_assets_tbl(i).attribute_number6,
    attribute_number7      = l_update_assets_tbl(i).attribute_number7,
    attribute_number8      = l_update_assets_tbl(i).attribute_number8,
    attribute_number9      = l_update_assets_tbl(i).attribute_number9,
    attribute_number10     = l_update_assets_tbl(i).attribute_number10,
    attribute_date1        = l_update_assets_tbl(i).attribute_date1,
    attribute_date2        = l_update_assets_tbl(i).attribute_date2,
    attribute_date3        = l_update_assets_tbl(i).attribute_date3,
    attribute_date4        = l_update_assets_tbl(i).attribute_date4,
    attribute_date5        = l_update_assets_tbl(i).attribute_date5,
    attribute_timestamp1   = l_update_assets_tbl(i).attribute_timestamp1,
    attribute_timestamp2   = l_update_assets_tbl(i).attribute_timestamp2,
    attribute_timestamp3   = l_update_assets_tbl(i).attribute_timestamp3,
    attribute_timestamp4   = l_update_assets_tbl(i).attribute_timestamp4,
    attribute_timestamp5   = l_update_assets_tbl(i).attribute_timestamp5,
    last_updated_by        = l_update_assets_tbl(i).last_updated_by,
    last_update_date       = l_update_assets_tbl(i).last_update_date,
    last_update_login      = l_update_assets_tbl(i).last_update_login,
    request_id             = l_update_assets_tbl(i).request_id,
    job_definition_name    = l_update_assets_tbl(i).job_definition_name,
    job_definition_package = l_update_assets_tbl(i).job_definition_package
  WHERE cseb.asset_id      = l_update_assets_tbl(i).asset_id ;

OPEN c_asset_description;
  FETCH c_asset_description BULK COLLECT INTO l_asset_desc_tbl;
  CLOSE c_asset_description;
  FORALL i IN l_asset_desc_tbl.FIRST..l_asset_desc_tbl.LAST

UPDATE cse_assets_tl csetl
  SET description = l_asset_desc_tbl(i).asset_description
  WHERE asset_id  = l_asset_desc_tbl(i).asset_id ;

INSERT
  INTO cse_transacted_assets
    (
      transacted_asset_id,
      transaction_id,
      asset_id,
      transacted_quantity,
      location_context,
      organization_id,
      subinventory_code,
      inventory_locator_id,
      work_order_id,
      work_order_operation_id,
      work_center_id,
      split_from_asset_id,
      merged_to_asset_id,
      full_snapshot_flag,
      snapshot_qualified,
      created_by,
      creation_date,
      last_updated_by,
      last_update_date,
      last_update_login,
      request_id,
      job_definition_name,
      job_definition_package,
      gen_object_id
    )
    (SELECT cse_int_s.nextval transacted_asset_id,
        px_transaction_id,
        asset_id,
        quantity,
        current_location_context,
        item_organization_id,
        subinventory_code,
        NULL inventory_locator_id,
        NULL work_order_id,
        NULL work_order_operation_id,
        work_center_id,
        NULL split_from_asset_id,
        NULL merged_to_asset_id,
        NULL full_snapshot_flag,
        NULL snapshot_qualified,
        created_by,
        creation_date,
        last_updated_by,
        last_update_date,
        last_update_login,
        request_id,
        job_definition_name,
        job_definition_package,
        gen_object_id
      FROM cse_assets_int cseaint
      WHERE cseaint.interface_status_code = 'VALID'
      AND cseaint.partition_number        = p_partition_number
      AND cseaint.interface_batch_id      = p_batch_id
      AND cseaint.action_code             = C_UPDATE_ACTION_CODE
      AND cseaint.asset_id               IS NOT NULL
    );
  --Update relationship data and insert into relationship history and relationship txn
  update_valid_structure_rec(p_batch_id, p_batch_type, p_partition_number, px_transaction_id, px_transaction_date, x_error_message, x_return_status);
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Before Creating Item Log records.');

IF p_batch_type ='CA' THEN
    -- Update asset charge records with correct asset_id before deleting asset interface records

Update_Asset_Charge_Records( p_partition_number => p_partition_number, p_batch_id => p_batch_id, p_operation_code => C_UPDATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );

/* This block is called only for those records/asset updates whose customers are updated or are transfered to a differnt customer*/

FOR i IN 1..l_trsfr_assets.COUNT
    LOOP
      transfer_service_asset_records
      (
        p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_interface_row_id =>l_trsfr_assets(i).interface_row_id, px_transaction_id => px_transaction_id, px_transaction_date => px_transaction_date, x_error_message => x_error_message, x_return_status => l_return_status
      )
      ;
      IF (l_return_status<> fnd_api.g_ret_sts_success) THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_info,'Transfer_service_asset_records  Failed ', x_error_message);
      END IF;
    END LOOP;

/*This block is executed for only those records whose active_end_date is set while update*/
    expire_service_asset_records( p_batch_id => p_batch_id, p_partition_number => p_partition_number, px_transaction_id => px_transaction_id, px_transaction_date => px_transaction_date, x_error_message => x_error_message, x_return_status => l_return_status);
    IF (l_return_status<> fnd_api.g_ret_sts_success) THEN
      cse_int_utils_pvt.log_messages(fnd_log.level_info,'Expire_service_asset_records  Failed ', x_error_message);
    END IF;

/*This block is called for only those records/asset updates where there is a reinstate of the asset is done*/
    FOR i IN 1..l_rnst_assets.COUNT
    LOOP
      reinstate_service_asset
      (
        p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_interface_row_id =>l_rnst_assets(i).interface_row_id, px_transaction_id => px_transaction_id, px_transaction_date => px_transaction_date, x_error_message => x_error_message, x_return_status => l_return_status
      )
      ;
      IF (l_return_status<> fnd_api.g_ret_sts_success) THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_info,'Reinstate_service_asset_records  Failed ', x_error_message);
      END IF;
    END LOOP;
  END IF;

EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  IF c_asset_description%ISOPEN THEN
    CLOSE c_asset_description;
  END IF;
  IF c_update_assets%ISOPEN THEN
    CLOSE c_update_assets;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END update_valid_asset_records;

PROCEDURE trigger_customer_asset_events(
    p_partition_number IN NUMBER,
    p_batch_id         IN NUMBER,
    p_operation_code   IN VARCHAR2,
    x_error_message OUT NOCOPY VARCHAR2,
    x_return_status OUT NOCOPY VARCHAR2)
IS
  l_api_name VARCHAR2(300) := 'cse_bulk_import_pvt.trigger_customer_asset_events';
  l_new_asset_event_rec cse_int_utils_pvt.asset_event_rec_type;
  l_old_asset_event_rec cse_int_utils_pvt.asset_event_rec_type;
  CURSOR get_asset_interface_rec_csr
  IS
    SELECT asset_id,
      asset_number,
      item_id,
      item_organization_id,
      serial_number,
      lot_number,
      quantity,
      active_end_date,
      current_location_context,
      customer_id,
      customer_site_id
    FROM cse_assets_int cseaint
    WHERE cseaint.interface_status_code = 'VALID'
    AND cseaint.partition_number        = p_partition_number
    AND cseaint.interface_batch_id      = p_batch_id
    AND cseaint.action_code             = p_operation_code
    AND cseaint.item_id                IS NOT NULL
    AND cseaint.item_organization_id   IS NOT NULL
    AND cseaint.gen_object_id          IS NOT NULL
    AND cseaint.asset_id               IS NOT NULL;
  CURSOR get_asset_table_rec_csr(p_asset_id IN NUMBER)
  IS
    SELECT asset_id,
      asset_number,
      item_id,
      item_organization_id,
      serial_number,
      lot_number,
      quantity,
      active_end_date,
      current_location_context,
      customer_id,
      customer_site_id
    FROM cse_assets_b
    WHERE cse_assets_b.asset_id = p_asset_id;
  l_asset_table_rec get_asset_table_rec_csr%ROWTYPE;

BEGIN
  x_return_status        := fnd_api.g_ret_sts_success;
  IF(C_CREATE_ACTION_CODE = p_operation_code) THEN
    FOR get_asset_interface_rec IN get_asset_interface_rec_csr
    LOOP
      l_new_asset_event_rec                                                 := NULL;
      IF(NVL(get_asset_interface_rec.current_location_context,'ORA_UNKNOWN') = 'ORA_CUSTOMER') THEN
        l_new_asset_event_rec.asset_id                                      := get_asset_interface_rec.asset_id;
        l_new_asset_event_rec.asset_number                                  := NVL(get_asset_interface_rec.asset_number,get_asset_interface_rec.asset_id);
        l_new_asset_event_rec.item_id                                       := get_asset_interface_rec.item_id;
        l_new_asset_event_rec.item_organization_id                          := get_asset_interface_rec.item_organization_id ;
        l_new_asset_event_rec.serial_number                                 := get_asset_interface_rec.serial_number;
        l_new_asset_event_rec.lot_number                                    := get_asset_interface_rec.lot_number;
        l_new_asset_event_rec.quantity                                      := get_asset_interface_rec.quantity;
        l_new_asset_event_rec.customer_id                                   := get_asset_interface_rec.customer_id;
        l_new_asset_event_rec.customer_site_id                              := get_asset_interface_rec.customer_site_id;
        l_old_asset_event_rec                                               := NULL;
        -- raise create event here
        cse_int_utils_pvt.raise_customer_asset_event( p_old_asset_rec => NULL, p_new_asset_rec => l_new_asset_event_rec, p_event_type => C_CREATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
      END IF;
    END LOOP;
  ELSIF (C_UPDATE_ACTION_CODE = p_operation_code) THEN
    FOR get_asset_interface_rec IN get_asset_interface_rec_csr
    LOOP
      l_new_asset_event_rec := NULL;
      l_old_asset_event_rec := NULL;
      OPEN get_asset_table_rec_csr( get_asset_interface_rec.asset_id);
      FETCH get_asset_table_rec_csr INTO l_asset_table_rec;
      CLOSE get_asset_table_rec_csr;
      l_new_asset_event_rec.asset_id             := get_asset_interface_rec.asset_id;
      l_new_asset_event_rec.asset_number         := NVL(get_asset_interface_rec.asset_number,l_asset_table_rec.asset_number);
      l_new_asset_event_rec.item_id              := NVL(get_asset_interface_rec.item_id,l_asset_table_rec.item_id);
      l_new_asset_event_rec.item_organization_id := NVL(get_asset_interface_rec.item_organization_id,l_asset_table_rec.item_organization_id) ;
      l_new_asset_event_rec.serial_number        := NVL(get_asset_interface_rec.serial_number,l_asset_table_rec.serial_number);
      l_new_asset_event_rec.lot_number           := NVL(get_asset_interface_rec.lot_number,get_asset_interface_rec.lot_number);
      l_new_asset_event_rec.quantity             := NVL(get_asset_interface_rec.quantity,l_asset_table_rec.quantity);
      l_new_asset_event_rec.customer_id          := NVL(get_asset_interface_rec.customer_id,l_asset_table_rec.customer_id);
      l_new_asset_event_rec.customer_site_id     := NVL(get_asset_interface_rec.customer_site_id,l_asset_table_rec.customer_site_id);
      IF(get_asset_interface_rec.active_end_date  = FND_API.G_NULL_DATE)THEN
        l_new_asset_event_rec.active_end_date    := NULL;
      ELSE
        l_new_asset_event_rec.active_end_date := NVL(get_asset_interface_rec.active_end_date,l_asset_table_rec.active_end_date);
      END IF;
      l_old_asset_event_rec.asset_id             := l_asset_table_rec.asset_id;
      l_old_asset_event_rec.asset_number         := l_asset_table_rec.asset_number;
      l_old_asset_event_rec.item_id              := l_asset_table_rec.item_id;
      l_old_asset_event_rec.item_organization_id := l_asset_table_rec.item_organization_id;
      l_old_asset_event_rec.serial_number        := l_asset_table_rec.serial_number;
      l_old_asset_event_rec.lot_number           := l_asset_table_rec.lot_number;
      l_old_asset_event_rec.quantity             := l_asset_table_rec.quantity;
      l_old_asset_event_rec.active_end_date      := l_asset_table_rec.active_end_date;
      l_old_asset_event_rec.customer_id          := l_asset_table_rec.customer_id;
      l_old_asset_event_rec.customer_site_id     := l_asset_table_rec.customer_site_id;
      -- Asset is being converted to a customer asset
      IF(NVL(get_asset_interface_rec.current_location_context,l_asset_table_rec.current_location_context) = 'ORA_CUSTOMER' AND l_asset_table_rec.current_location_context <> 'ORA_CUSTOMER') THEN
        cse_int_utils_pvt.raise_customer_asset_event( p_old_asset_rec => l_old_asset_event_rec, p_new_asset_rec => l_new_asset_event_rec, p_event_type => C_CREATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
        -- asset is a customer asset and is being updated
      ELSIF(NVL(get_asset_interface_rec.current_location_context,l_asset_table_rec.current_location_context) = 'ORA_CUSTOMER' AND l_asset_table_rec.current_location_context = 'ORA_CUSTOMER') THEN
        -- raise update event here
        cse_int_utils_pvt.raise_customer_asset_event( p_old_asset_rec => l_old_asset_event_rec, p_new_asset_rec => l_new_asset_event_rec, p_event_type => C_UPDATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
        -- asset was a customer asset, but no longer will be a customer asset
      ELSIF(NVL(get_asset_interface_rec.current_location_context,l_asset_table_rec.current_location_context) <> 'ORA_CUSTOMER' AND l_asset_table_rec.current_location_context = 'ORA_CUSTOMER') THEN
        -- raise update event here
        cse_int_utils_pvt.raise_customer_asset_event( p_old_asset_rec => l_old_asset_event_rec, p_new_asset_rec => l_new_asset_event_rec, p_event_type => C_UPDATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
      END IF;
    END LOOP;
  END IF;
EXCEPTION

WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'Failed to trigger business events' || sqlerrm);

END trigger_customer_asset_events;

END CSE_BULK_IMPORT_PVT;

परिवर्तित टेक्स्ट

फ़ाइल खोलें

create or replace PACKAGE BODY CSE_BULK_IMPORT_PVT
AS
  /*$Header: fusionapps/scm/cse/db/plsql/cse_bulk_import_pvt.pkb /st_fusionapps_pt-v2mibscmoal/15 2016/12/29 23:59:25 soumdutt Exp $*/
  -- Maximum Partition Size Constants
  C_MAX_PARTITION_SIZE  CONSTANT NUMBER       := 1000;
  C_MAX_BUFFER_SIZE     CONSTANT NUMBER       := 1000;
  C_CREATE_ACTION_CODE  CONSTANT VARCHAR2(30) := 'ORA_CREATE';
  C_UPDATE_ACTION_CODE  CONSTANT VARCHAR2(30) := 'ORA_UPDATE';
  C_DELETE_ACTION_CODE  CONSTANT VARCHAR2(30) := 'ORA_DELETE';
  C_ADD_REL_ACTION_CODE CONSTANT VARCHAR2(30) := 'ORA_ADD';
  C_REM_REL_ACTION_CODE CONSTANT VARCHAR2(30) := 'ORA_REMOVE';
  C_INT_READY           CONSTANT VARCHAR2(30) := 'READY';
  C_INT_VALID           CONSTANT VARCHAR2(30) := 'VALID';
  C_INT_ERROR           CONSTANT VARCHAR2(30) := 'ERROR';
  C_ASSETS_INT_TBL_NAME CONSTANT VARCHAR2(30) := 'CSE_ASSETS_INT';
  C_ASSET_CHGS_TBL_NAME CONSTANT VARCHAR2(30) := 'CSE_ASSET_CHARGES_INT';
  C_MESSAGE_TOKEN_NAME  CONSTANT VARCHAR2(30) := 'ATTRIBUTE_NAME';
  C_SEVERITY_ERROR      CONSTANT VARCHAR2(1)  := 'E';
  C_SEVERITY_WARNING    CONSTANT VARCHAR2(1)  := 'W';
  C_NULL_STRING         CONSTANT VARCHAR2(5)  := '#NULL';
  C_NULL_DATE           CONSTANT DATE         := TO_DATE('5','j');

BEGIN

x_return_status := fnd_api.g_ret_sts_success;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'Entering API'||l_api_name);
  IF p_batch_type             = 'CA' THEN
    l_current_location_type1 := 'ORA_CUSTOMER';
    l_current_location_type2 := 'ORA_CUSTOMER';
    l_source_system_code     := 'CSI';
  ELSIF p_batch_type          = 'MA' THEN
    l_current_location_type1 := 'ORA_WORK_CENTER';
    l_current_location_type2 := 'ORA_UNKNOWN';
    l_source_system_code     := 'MNT';
  END IF;

BEGIN

SELECT 'Y'
    INTO l_validate_batch_needed
    FROM dual
    WHERE EXISTS
      (SELECT 1
      FROM cse_assets_int
      WHERE interface_status_code   = 'READY'
      AND interface_batch_id       IS NULL
      AND interface_batch_code     IS NULL
      AND current_location_context IN ( l_current_location_type1,l_current_location_type2)
      );
  EXCEPTION
  WHEN NO_DATA_FOUND THEN
    l_validate_batch_needed:=NULL;
  END;
  IF l_validate_batch_needed = 'Y' THEN
    l_interface_batch_id    := CSE_INT_S.NEXTVAL;
    l_load_request_id       := CSE_INT_S.NEXTVAL;
    x_batch_id              := l_interface_batch_id;
    x_batch_code            := SUBSTR(p_batch_type||l_interface_batch_id,1,30);
    INSERT
    INTO cse_int_batches_b
      (
        interface_batch_id ,
        object_version_number ,
        interface_batch_code ,
        interface_batch_status ,
        source_system_type ,
        source_system_code ,
        internal_batch_type ,
        created_by ,
        creation_date ,
        last_updated_by ,
        last_update_date ,
        last_update_login ,
        load_request_id ,
        request_id ,
        job_definition_name ,
        job_definition_package
      )
      VALUES
      (
        l_interface_batch_id ,
        1 ,
        x_batch_code ,
        'READY' ,
        'ORA_INTERNAL' ,
        l_source_system_code ,
        p_batch_type ,
        fnd_global.who_user_name ,
        sysdate ,
        fnd_global.who_user_name ,
        sysdate ,
        fnd_global.user_guid ,
        l_load_request_id ,
        fnd_job.REQUEST_ID ,
        fnd_job.JOB_DEFINITION_NAME ,
        fnd_job.JOB_PACKAGE_NAME
      );
    INSERT
    INTO cse_int_batches_tl
      (
        interface_batch_id ,
        language ,
        object_version_number ,
        source_lang ,
        interface_batch_name ,
        interface_batch_description ,
        load_request_id ,
        created_by ,
        creation_date ,
        last_updated_by ,
        last_update_date ,
        last_update_login
      )
      VALUES
      (
        l_interface_batch_id ,
        USERENV('LANG') ,
        1 ,
        USERENV('LANG') ,
        x_batch_code ,
        x_batch_code ,
        l_load_request_id ,
        fnd_global.who_user_name ,
        sysdate ,
        fnd_global.who_user_name ,
        sysdate ,
        fnd_global.user_guid
      );
    UPDATE cse_assets_int
    SET interface_batch_id        = l_interface_batch_id ,
      interface_batch_code        = x_batch_code
    WHERE interface_status_code   = 'READY'
    AND interface_batch_id       IS NULL
    AND interface_batch_code     IS NULL
    AND current_location_context IN ( l_current_location_type1,l_current_location_type2);
  END IF;
EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END create_batch;
/*=============================================================================
|  PROCEDURE - partition_batch()
|
|  DESCRIPTION
|      This procedure is used to partition a batch into similar bucket size
|      for better performance.
|
|  PARAMETERS
|      p_batch_id - Input parameter of batch id that need to be processed
|      x_partition_numbers - Out parameter with table of partitions assigned
|                            to a batch
|      x_error_message - Out parameter with error message if any
|      x_return_status - Out parameter with Success or failure status of proc
|
|
*============================================================================*/
PROCEDURE partition_batch(
    px_batch_id  IN OUT NOCOPY NUMBER,
    p_batch_code IN VARCHAR2,
    x_partition_numbers OUT NOCOPY FND_TABLE_OF_NUMBER,
    x_record_count OUT NOCOPY  NUMBER,
    x_error_message OUT NOCOPY VARCHAR2,
    x_return_status OUT NOCOPY VARCHAR2)
IS
  CURSOR c_update_partList( cp_partition_number NUMBER , cp_batch_id NUMBER , cp_batch_code VARCHAR2 )
  IS
    SELECT cseai.partition_number ,
      cseai.asset_number ,
      cseai.interface_record_number ,
      cseai.interface_batch_id ,
      cseai.item_organization_code
    FROM cse_assets_int cseai
    WHERE cseai.partition_number    = cp_partition_number
    AND cseai.interface_status_code = 'READY'
    AND (cseai.interface_batch_id   = cp_batch_id
    OR cseai.interface_batch_code   = cp_batch_code);
  CURSOR c_update_actv_asset_partList( cp_partition_number NUMBER , cp_batch_id NUMBER , cp_batch_code VARCHAR2 )
  IS
    SELECT cseai.partition_number ,
      cseai.interface_record_number ,
      cseai.interface_batch_id ,
      cseai.asset_number ,
      cseai.item_organization_code ,
      (SELECT cseb.item_organization_id
      FROM cse_assets_b cseb
      WHERE cseb.asset_number=cseai.asset_number
      ) AS asset_org_id ,
    (SELECT iorgp.organization_id
    FROM inv_org_parameters iorgp
    WHERE cseai.item_organization_code=iorgp.organization_code
    ) AS organization_id
  FROM cse_assets_int cseai
  WHERE cseai.interface_status_code = 'READY'
  AND cseai.partition_number        = cp_partition_number
  AND (cseai.interface_batch_id     = cp_batch_id
  OR cseai.interface_batch_code     = cp_batch_code);
  CURSOR c_get_int_batch_type( cp_batch_id NUMBER ,cp_batch_code VARCHAR2)
  IS
    SELECT INTERNAL_BATCH_TYPE
    FROM CSE_INT_BATCHES_B cseIntBatch
    WHERE (cseIntBatch.interface_batch_id = cp_batch_id
    OR cseIntBatch.interface_batch_code   = cp_batch_code);
  /*Cursor to get the records trying perforn more than one operation on the same asset in the same batch*/
  CURSOR c_get_records_dup_asset
  IS
    SELECT interface_record_number
    FROM cse_assets_int
    WHERE (interface_batch_code                             = p_batch_code
    OR interface_batch_id                                   = px_batch_id)
    AND interface_status_code                               = 'READY'
    AND NVL(RELATIONSHIP_ACTION_CODE,C_REM_REL_ACTION_CODE) = C_ADD_REL_ACTION_CODE
    AND asset_number                                       IN
      (SELECT asset_number
      FROM cse_assets_int
      WHERE interface_status_code = 'READY'
      AND (interface_batch_code   =p_batch_code
      OR interface_batch_id       =px_batch_id)
      GROUP BY asset_number
      HAVING COUNT(*) >1
      );
TYPE l_update_partList_tbl_type
IS
  TABLE OF c_update_partList%ROWTYPE;
TYPE l_updt_actv_partList_tbl_type
IS
  TABLE OF c_update_actv_asset_partList%ROWTYPE;
  l_update_partList_tbl l_update_partList_tbl_type;
  l_update_actv_partList_tbl l_updt_actv_partList_tbl_type;
  l_api_name          VARCHAR2(300) := 'cse_bulk_import_pvt.partition_batch';
  l_Count_records     NUMBER;
  l_Number_of_Batches NUMBER;
  l_batch_code cse_int_batches_b.interface_batch_code%TYPE := p_batch_code;
  l_int_batch_type cse_int_batches_b.internal_batch_type%TYPE;
  l_batch_id      NUMBER := px_batch_id;
  l_partition_num NUMBER;
TYPE l_dup_asset_tbl_type
IS
  TABLE OF c_get_records_dup_asset%ROWTYPE;
  l_dup_asset_tbl l_dup_asset_tbl_type;

BEGIN

cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
  x_return_status := fnd_api.g_ret_sts_success;
  IF px_batch_id  IS NOT NULL AND p_batch_code IS NULL THEN
    BEGIN
      SELECT DISTINCT cseib.interface_batch_code
      INTO l_batch_code
      FROM cse_int_batches_b cseib
      WHERE cseib.interface_batch_id = px_batch_id;
    END;
  ELSIF px_batch_id IS NULL AND p_batch_code IS NOT NULL THEN

BEGIN

SELECT DISTINCT cseib.interface_batch_id
      INTO l_batch_id
      FROM cse_int_batches_b cseib
      WHERE cseib.interface_batch_code = p_batch_code;
    END;
  END IF;
  px_batch_id := l_batch_id ;
  SELECT COUNT(1)
  INTO l_Count_records
  FROM cse_assets_int csei
  WHERE (csei.interface_batch_id = l_batch_id
  OR csei.interface_batch_code   = l_batch_code)
  AND csei.interface_status_code = 'READY';
  x_record_count                :=l_Count_records;
  IF l_Count_records             > 0 THEN
    l_Number_of_Batches         := CEIL(l_Count_records/c_max_partition_size);
    x_partition_numbers         := FND_TABLE_OF_NUMBER();
    FOR i IN 1..l_Number_of_Batches
    LOOP
      l_partition_num := cse_int_s.nextval;
      x_partition_numbers.extend;
      x_partition_numbers(i) := l_partition_num;
      UPDATE cse_assets_int cseai
      SET partition_number     = l_partition_num,
        asset_number           = DECODE(asset_number,NULL, DECODE(action_code,C_CREATE_ACTION_CODE,TO_CHAR(cse_asset_numbers_s.nextval),asset_number),asset_number),
        last_updated_by        = fnd_global.who_user_name,
        last_update_date       = sysdate,
        last_update_login      = fnd_global.user_guid,
        job_definition_name    = fnd_job.job_definition_name,
        job_definition_package = fnd_job.job_package_name,
        interface_batch_id     = l_batch_id
      WHERE ROWNUM BETWEEN 1 AND c_max_partition_size
      AND cseai.partition_number     IS NULL
      AND cseai.interface_status_code = 'READY'
      AND (cseai.interface_batch_id   = l_batch_id
      OR cseai.interface_batch_code   = l_batch_code);
      /*Creating a new partition for records trying to perform more than one operation on the same asset
      */
      OPEN c_get_records_dup_asset;
      LOOP
        FETCH c_get_records_dup_asset BULK COLLECT
        INTO l_dup_asset_tbl LIMIT c_max_buffer_size ;
        EXIT
      WHEN l_dup_asset_tbl.count = 0;
        l_partition_num         := cse_int_s.nextval;
        x_partition_numbers.extend;
        x_partition_numbers(i+1) := l_partition_num;
        FORALL i            IN l_dup_asset_tbl.FIRST..l_dup_asset_tbl.LAST
        UPDATE cse_assets_int cseai
        SET partition_number          = l_partition_num,
          asset_number                = DECODE(asset_number,NULL, DECODE(action_code,C_CREATE_ACTION_CODE,TO_CHAR(cse_asset_numbers_s.nextval),asset_number),asset_number),
          last_updated_by             = fnd_global.who_user_name,
          last_update_date            = sysdate,
          last_update_login           = fnd_global.user_guid,
          job_definition_name         = fnd_job.job_definition_name,
          job_definition_package      = fnd_job.job_package_name,
          interface_batch_id          = l_batch_id
        WHERE interface_record_number = l_dup_asset_tbl(i).interface_record_number;
      END LOOP;
      CLOSE c_get_records_dup_asset;
      -- bachandr: Check if the asset is Maintenance Asset or Customer Asset and update corresponding table.
      OPEN c_get_int_batch_type(l_batch_id,l_batch_code);
      FETCH c_get_int_batch_type INTO l_int_batch_type;
      CLOSE c_get_int_batch_type;
      FOR j IN x_partition_numbers.FIRST..x_partition_numbers.LAST
      LOOP
        IF l_int_batch_type IS NOT NULL AND l_int_batch_type = 'MA' THEN
          OPEN c_update_actv_asset_partList(x_partition_numbers(j),l_batch_id,l_batch_code);
          FETCH c_update_actv_asset_partList BULK COLLECT
          INTO l_update_actv_partList_tbl;
          CLOSE c_update_actv_asset_partList;
          FORALL i IN l_update_actv_partList_tbl.FIRST..l_update_actv_partList_tbl.LAST
          UPDATE cse_parts_list_components_int cseparti
          SET partition_number                   = l_update_actv_partList_tbl(i).partition_number,
            item_organization_code               = l_update_actv_partList_tbl(i).item_organization_code,
            asset_number                         = l_update_actv_partList_tbl(i).asset_number,
            interface_batch_id                   = l_update_actv_partList_tbl(i).interface_batch_id,
            item_organization_id                 = NVL(l_update_actv_partList_tbl(i).asset_org_id,l_update_actv_partList_tbl(i).organization_id)
          WHERE cseparti.interface_record_number = l_update_actv_partList_tbl(i).interface_record_number
          AND cseparti.interface_status_code     = 'READY'
          AND (cseparti.interface_batch_id       = l_batch_id
          OR cseparti.interface_batch_code       = l_batch_code);
        ELSIF l_int_batch_type                  IS NOT NULL AND l_int_batch_type = 'CA' THEN
          OPEN c_update_partList(x_partition_numbers(j),l_batch_id,l_batch_code);
          FETCH c_update_partList BULK COLLECT INTO l_update_partList_tbl;
          CLOSE c_update_partList;
          FORALL i IN l_update_partList_tbl.FIRST..l_update_partList_tbl.LAST
          UPDATE CSE_ASSET_CHARGES_INT cseAssetCharges
          SET partition_number                          = l_update_partList_tbl(i).partition_number,
            interface_batch_id                          = l_update_partList_tbl(i).interface_batch_id
          WHERE cseAssetCharges.interface_record_number = l_update_partList_tbl(i).interface_record_number
          AND cseAssetCharges.interface_status_code     = 'READY'
          AND (cseAssetCharges.interface_batch_id       = l_batch_id
          OR cseAssetCharges.interface_batch_code       = l_batch_code);
        END IF;
      END LOOP;
    END LOOP;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');

EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  IF c_get_int_batch_type%ISOPEN THEN
    CLOSE c_update_partList;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);

END partition_batch;

BEGIN

FOR i IN 1 .. p_interface_rowid_tbl.COUNT
  LOOP
    l_message_text := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(p_message_name,1,3), p_msg_name => p_message_name, p_token_name => p_message_token_names, p_token_value => p_message_token_values );
    --Collect interface row details required for logging the error.
    IF p_table_name = C_ASSETS_INT_TBL_NAME THEN
      OPEN c_get_asset_int_dtls(p_interface_rowid_tbl(i));
      FETCH c_get_asset_int_dtls
      INTO l_request_id,
        l_job_definition_name,
        l_job_defintion_package;
      CLOSE c_get_asset_int_dtls;
    ELSIF p_table_name = C_ASSET_CHGS_TBL_NAME THEN
      OPEN c_get_asset_chg_int_dtls(p_interface_rowid_tbl(i));
      FETCH c_get_asset_chg_int_dtls
      INTO l_request_id,
        l_job_definition_name,
        l_job_defintion_package;
      CLOSE c_get_asset_chg_int_dtls;
    END IF;
    CSE_INT_UTILS_PVT.log_messages( fnd_log.level_severe, l_api_name, 'Interface_row_id= '||p_interface_rowid_tbl(i)||' - '||l_message_text );
    l_row_count                                         := l_row_count + 1;
    l_int_errors_tbl(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
    l_int_errors_tbl(l_row_count).object_version_number := 1;
    l_int_errors_tbl(l_row_count).interface_row_id      := p_interface_rowid_tbl(i);
    l_int_errors_tbl(l_row_count).interface_batch_id    := p_batch_id;
    l_int_errors_tbl(l_row_count).error_text            := l_message_text;
    l_int_errors_tbl(l_row_count).error_language        := userenv('LANG');
    l_int_errors_tbl(l_row_count).table_name            := p_table_name;
    l_int_errors_tbl(l_row_count).column_name           := p_column_name;
    l_int_errors_tbl(l_row_count).message_name          := p_message_name;
    l_int_errors_tbl(l_row_count).message_token_names   := p_message_token_names;
    l_int_errors_tbl(l_row_count).message_token_values  := p_message_token_values;
    l_int_errors_tbl(l_row_count).program_name          := p_program_name;
    l_int_errors_tbl(l_row_count).message_severity      := C_SEVERITY_ERROR;
    l_int_errors_tbl(l_row_count).created_by            := fnd_global.who_user_name;
    l_int_errors_tbl(l_row_count).creation_date         := sysdate;
    l_int_errors_tbl(l_row_count).last_updated_by       := fnd_global.who_user_name;
    l_int_errors_tbl(l_row_count).last_update_date      := sysdate;
    l_int_errors_tbl(l_row_count).last_update_login     := fnd_global.user_guid;
    l_int_errors_tbl(l_row_count).request_id            := l_request_id;
    l_int_errors_tbl(l_row_count).job_definition_name   := l_job_definition_name;
    l_int_errors_tbl(l_row_count).job_definition_package:= l_job_defintion_package;
  END LOOP;
  CSE_INT_UTILS_PVT.log_errors( p_int_errors_tbl => l_int_errors_tbl, x_return_status => x_return_status , x_error_msg => x_error_message );
  -- update the interface table and set the record status to error
  IF p_table_name = C_ASSETS_INT_TBL_NAME THEN
    FORALL i IN 1 .. p_interface_rowid_tbl.COUNT
    UPDATE cse_assets_int assetInt
    SET assetInt.interface_status_code = C_INT_ERROR
    WHERE assetInt.interface_batch_id  = p_batch_id
    AND assetInt.partition_number      = p_partition_number
    AND assetInt.interface_row_id      = p_interface_rowid_tbl(i);
  ELSIF p_table_name                   = C_ASSET_CHGS_TBL_NAME THEN
    FORALL i IN 1 .. p_interface_rowid_tbl.COUNT
    UPDATE cse_asset_charges_int assetChgInt
    SET assetChgInt.interface_status_code = C_INT_ERROR
    WHERE assetChgInt.interface_batch_id  = p_batch_id
    AND assetChgInt.partition_number      = p_partition_number
    AND assetChgInt.interface_row_id      = p_interface_rowid_tbl(i);
  END IF;
  -- A validation error has occured. Set return status to error.
  x_return_status := fnd_api.g_ret_sts_error;

EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);

END log_validation_error;

END get_batch_codes;

BEGIN

cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
  -- Cursor to check mandatory Asset organization attribute
  OPEN c_org_mandatory_cur;
  LOOP
    FETCH c_org_mandatory_cur BULK COLLECT
    INTO l_interfaceTbl LIMIT c_max_partition_size;
    EXIT
  WHEN l_interfaceTbl.COUNT = 0;
    log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ITEM_ORGANIZATION_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_NO_ORG', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'ITEM_ORGANIZATION_CODE', x_error_message => x_error_message, x_return_status => x_return_status );
  END LOOP;
  l_interfaceTbl.DELETE;
  CLOSE c_org_mandatory_cur;
  -- Cursor to validate mandatory Asset Item attribute
  OPEN c_asset_item_mand_cur;
  LOOP
    FETCH c_asset_item_mand_cur BULK COLLECT
    INTO l_interfaceTbl LIMIT c_max_partition_size;
    EXIT
  WHEN l_interfaceTbl.COUNT = 0;
    log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ITEM_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_NO_PRODUCT', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'ITEM_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
  END LOOP;
  l_interfaceTbl.DELETE;
  CLOSE c_asset_item_mand_cur;
  -- Cuser to check mandatory customer attribute.
  OPEN c_customer_mand_cur;
  LOOP
    FETCH c_customer_mand_cur BULK COLLECT
    INTO l_interfaceTbl LIMIT c_max_partition_size;
    EXIT
  WHEN l_interfaceTbl.COUNT = 0;
    log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'CUSTOMER_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_NO_CUST', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CUSTOMER_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
  END LOOP;
  l_interfaceTbl.DELETE;
  CLOSE c_customer_mand_cur;
  -- Cuser to check mandatory customer attribute.
  OPEN c_import_mand_cur;
  LOOP
    FETCH c_import_mand_cur BULK COLLECT
    INTO l_interfaceTbl LIMIT c_max_partition_size;
    EXIT
  WHEN l_interfaceTbl.COUNT = 0;
    log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'INTERFACE_RECORD_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_REQ_ATTRIB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'INTERFACE_RECORD_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
  END LOOP;
  l_interfaceTbl.DELETE;
  CLOSE c_import_mand_cur;
  -- Cursor to check missing asset_number for update case
  OPEN c_missing_asset_num_cur;
  LOOP
    FETCH c_missing_asset_num_cur BULK COLLECT
    INTO l_interfaceTbl LIMIT c_max_partition_size;
    EXIT
  WHEN l_interfaceTbl.COUNT = 0;
    log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ASSET_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_REQ_ATTRIB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'ASSET_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
  END LOOP;
  l_interfaceTbl.DELETE;
  CLOSE c_missing_asset_num_cur;
  -- Cursor to check invalid asset_number for update case
  OPEN c_invalid_asset_num_cur;
  LOOP
    FETCH c_invalid_asset_num_cur BULK COLLECT
    INTO l_interfaceTbl LIMIT c_max_partition_size;
    EXIT
  WHEN l_interfaceTbl.COUNT = 0;
    log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ASSET_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'ASSET_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
  END LOOP;
  l_interfaceTbl.DELETE;
  CLOSE c_invalid_asset_num_cur;
  --Cursor to check mandatory UOM_CODE attribute
  OPEN c_uom_mand_cur;
  LOOP
    FETCH c_uom_mand_cur BULK COLLECT
    INTO l_interfaceTbl LIMIT c_max_partition_size;
    EXIT
  WHEN l_interfaceTbl.COUNT = 0;
    log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'UOM_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_REQ_ATTRIB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'UOM_CODE', x_error_message => x_error_message, x_return_status => x_return_status );
  END LOOP;
  l_interfaceTbl.DELETE;
  CLOSE c_uom_mand_cur;
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');

EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  IF (c_org_mandatory_cur%isopen) THEN
    CLOSE c_org_mandatory_cur;
  END IF;
  IF (c_asset_item_mand_cur%isopen) THEN
    CLOSE c_asset_item_mand_cur;
  END IF;
  IF (c_customer_mand_cur%isopen) THEN
    CLOSE c_customer_mand_cur;
  END IF;
  IF (c_import_mand_cur%isopen) THEN
    CLOSE c_import_mand_cur;
  END IF;
  IF (c_uom_mand_cur%isopen) THEN
    CLOSE c_uom_mand_cur;
  END IF;
  IF (c_missing_asset_num_cur%isopen) THEN
    CLOSE c_missing_asset_num_cur;
  END IF;
  IF (c_invalid_asset_num_cur%isopen) THEN
    CLOSE c_invalid_asset_num_cur;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);

END validate_custAsset_mand_attr;

BEGIN

cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
  OPEN c_get_asset_int_rec;
  FETCH c_get_asset_int_rec BULK COLLECT INTO l_assets_int_tbl;
  CLOSE c_get_asset_int_rec;
  FOR i IN l_assets_int_tbl.FIRST..l_assets_int_tbl.LAST
  LOOP
    IF (l_assets_int_tbl(i).ITEM_ORGANIZATION_CODE IS NOT NULL) THEN
      OPEN c_convert_org_code(l_assets_int_tbl(i).ITEM_ORGANIZATION_CODE);
      FETCH c_convert_org_code INTO l_assets_int_tbl(i).ITEM_ORGANIZATION_ID;
      CLOSE c_convert_org_code;
    ELSE
      /* This is used to fetch the item_org_id for the assets being updated where this value is not passed by the user while upadte*/
      SELECT item_organization_id
      INTO l_assets_int_tbl(i).ITEM_ORGANIZATION_ID
      FROM cse_assets_b
      WHERE asset_id=l_assets_int_tbl(i).asset_id;
    END IF;
    IF (l_assets_int_tbl(i).ITEM_NUMBER IS NOT NULL) THEN
      OPEN c_convert_item_number(l_assets_int_tbl(i).ITEM_NUMBER, l_assets_int_tbl(i).ITEM_ORGANIZATION_ID);
      FETCH c_convert_item_number INTO l_assets_int_tbl(i).ITEM_ID;
      CLOSE c_convert_item_number;
    ELSE
      /* This is used to fetch the item_id for the assets being updated where this value is not passed by the user while update*/
      SELECT item_id
      INTO l_assets_int_tbl(i).ITEM_ID
      FROM cse_assets_b
      WHERE asset_id=l_assets_int_tbl(i).asset_id;
    END IF;
    -- Check serial control code and generate serial number accordingly
    IF( l_assets_int_tbl(i).ITEM_ID IS NOT NULL AND l_assets_int_tbl(i).ITEM_ORGANIZATION_ID IS NOT NULL) THEN
      OPEN c_get_serial_control_code(l_assets_int_tbl(i).item_id, l_assets_int_tbl(i).item_organization_id);
      FETCH c_get_serial_control_code INTO l_serial_control_code;
      CLOSE c_get_serial_control_code;
      IF (l_serial_control_code      = 5 OR l_serial_control_code = 6) THEN
        IF (l_serial_control_code    = 5) THEN
          l_issue_receipt           := 'R';
        ELSIF (l_serial_control_code = 6) THEN
          l_issue_receipt           := 'I';
        END IF;
        /*
        l_inv_return = inv_tm_ser_mgr.validate_serial_numbers(
        p_org_id             => l_assets_int_tbl(i).item_organization_id ,
        p_item_id            => l_assets_int_tbl(i).item_id ,
        p_qty                => l_qty ,
        p_revision           => NULL ,
        p_lotnum             => NULL ,
        p_start_ser          => l_assets_int_tbl(i).serial_number ,
        p_trx_src_type_id    => NULL ,
        p_trx_action_id      => NULL ,
        p_sub_inventory      => NULL ,
        p_loc_id             => NULL ,
        p_wip_entity_id      => NULL ,
        p_group_mark_id      => NULL ,
        p_line_mark_id       => NULL ,
        p_issue_receipt      => l_assets_int_tbl(i).serial_number ,
        p_end_ser            => l_end_serial ,
        p_msg                => l_ret_msg ,
        p_check_grp_mark_id  => 'Y' ,
        p_rcv_validate       => NULL ,
        p_rcv_source_line_id => NULL ,
        p_xfr_org_id         => NULL ,
        p_insert_YN          => 'Y'
        );
        IF(l_inv_return != 0)
        --LOG error here.
        END IF;*/
      END IF;
    END IF;
    ---Check asset_tracked_flag of the item----
    IF(l_assets_int_tbl(i).ITEM_ID IS NOT NULL AND l_assets_int_tbl(i).ITEM_ORGANIZATION_ID IS NOT NULL) THEN
      OPEN c_get_asset_tracked_flag(l_assets_int_tbl(i).item_id, l_assets_int_tbl(i).item_organization_id);
      FETCH c_get_asset_tracked_flag INTO l_asset_tracked_flag;
      CLOSE c_get_asset_tracked_flag;
    END IF;
    IF (l_assets_int_tbl(i).CUSTOMER_NUMBER IS NOT NULL OR l_assets_int_tbl(i).CUSTOMER_NAME IS NOT NULL) THEN
      OPEN c_convert_customer(l_assets_int_tbl(i).CUSTOMER_NUMBER, l_assets_int_tbl(i).CUSTOMER_NAME);
      FETCH c_convert_customer INTO l_assets_int_tbl(i).CUSTOMER_ID;
      CLOSE c_convert_customer;
    END IF;
    IF (l_assets_int_tbl(i).CUSTOMER_SITE_PARTY_NUMBER IS NOT NULL OR l_assets_int_tbl(i).CUSTOMER_SITE_PARTY_NAME IS NOT NULL) THEN
      OPEN c_convert_custSiteParty(l_assets_int_tbl(i).CUSTOMER_SITE_PARTY_NUMBER, l_assets_int_tbl(i).CUSTOMER_SITE_PARTY_NAME);
      FETCH c_convert_custSiteParty INTO l_assets_int_tbl(i).customer_site_party_id;
      CLOSE c_convert_custSiteParty;
    END IF;
    IF (l_assets_int_tbl(i).CUSTOMER_SITE_NUMBER IS NOT NULL OR l_assets_int_tbl(i).CUSTOMER_SITE_NAME IS NOT NULL) THEN
      OPEN c_convert_customerSite(l_assets_int_tbl(i).CUSTOMER_SITE_NUMBER, l_assets_int_tbl(i).CUSTOMER_SITE_NAME);
      FETCH c_convert_customerSite INTO l_assets_int_tbl(i).customer_site_id;
      CLOSE c_convert_customerSite;
    END IF;
    IF (l_assets_int_tbl(i).CUSTOMER_ACCOUNT_NUMBER IS NOT NULL OR l_assets_int_tbl(i).CUSTOMER_ACCOUNT_NAME IS NOT NULL) THEN
      OPEN c_convert_custAccount(l_assets_int_tbl(i).CUSTOMER_ACCOUNT_NUMBER, l_assets_int_tbl(i).CUSTOMER_ACCOUNT_NAME);
      FETCH c_convert_custAccount INTO l_assets_int_tbl(i).customer_account_id;
      CLOSE c_convert_custAccount;
    END IF;
    IF (l_assets_int_tbl(i).CUSTOMER_ACCOUNT_SITE_NUMBER IS NOT NULL OR l_assets_int_tbl(i).CUSTOMER_ACCOUNT_SITE_NAME IS NOT NULL) THEN
      OPEN c_convert_CustAccSite(l_assets_int_tbl(i).customer_account_id, l_assets_int_tbl(i).CUSTOMER_ACCOUNT_SITE_NUMBER, l_assets_int_tbl(i).CUSTOMER_ACCOUNT_SITE_NAME);
      FETCH c_convert_CustAccSite INTO l_assets_int_tbl(i).customer_account_site_id;
      CLOSE c_convert_CustAccSite;
    END IF;
    IF (l_assets_int_tbl(i).CUSTOMER_ACCOUNT_SITE_USE_CODE IS NOT NULL) THEN
      OPEN c_convert_custSiteUseId(l_assets_int_tbl(i).customer_account_site_id, l_assets_int_tbl(i).CUSTOMER_ACCOUNT_SITE_USE_CODE);
      FETCH c_convert_custSiteUseId
      INTO l_assets_int_tbl(i).customer_account_site_use_id;
      CLOSE c_convert_custSiteUseId;
    END IF;
    IF (l_assets_int_tbl(i).SOLD_BY_BUSINESS_UNIT_NAME IS NOT NULL) THEN
      IF(l_assets_int_tbl(i).SOLD_BY_BUSINESS_UNIT_NAME ='#NULL') THEN
        l_assets_int_tbl(i).SOLD_BY_BUSINESS_UNIT_ID   :=NULL;
      ELSE
        OPEN c_convert_sold_by_bu_name(l_assets_int_tbl(i).SOLD_BY_BUSINESS_UNIT_NAME);
        FETCH c_convert_sold_by_bu_name
        INTO l_assets_int_tbl(i).SOLD_BY_BUSINESS_UNIT_ID;
        CLOSE c_convert_sold_by_bu_name;
      END IF;
    END IF;
    --Default the quantity of serilaized asset to 1---
    IF( l_assets_int_tbl(i).quantity IS NULL ) THEN
      OPEN c_get_serial_control_code(l_assets_int_tbl(i).item_id, l_assets_int_tbl(i).item_organization_id);
      FETCH c_get_serial_control_code INTO l_serial_control_code;
      CLOSE c_get_serial_control_code;
      OPEN c_get_inv_item_flag(l_assets_int_tbl(i).item_id, l_assets_int_tbl(i).item_organization_id);
      FETCH c_get_inv_item_flag INTO l_inv_item_flg;
      CLOSE c_get_inv_item_flag;
      IF (l_serial_control_code IN (2,5,6)) AND NVL(l_inv_item_flg,'N') <>'N' THEN
        l_assets_int_tbl(i).quantity                                    :=1;
      END IF;
    END IF;
    --Code to ignore the serial or lot number entered for intangible assets and Logical assets----
    IF(l_assets_int_tbl(i).serial_number IS NOT NULL OR l_assets_int_tbl(i).lot_number IS NOT NULL) THEN
      OPEN c_get_inv_item_flag(l_assets_int_tbl(i).item_id, l_assets_int_tbl(i).item_organization_id);
      FETCH c_get_inv_item_flag INTO l_inv_item_flg;
      CLOSE c_get_inv_item_flag;
      OPEN c_get_item_structure_type(l_assets_int_tbl(i).item_id, l_assets_int_tbl(i).item_organization_id);
      FETCH c_get_item_structure_type INTO l_item_struc_type;
      CLOSE c_get_item_structure_type;
      IF (l_inv_item_flg                   ='N' OR NVL(l_item_struc_type,0) IN(1,2)) THEN
        l_assets_int_tbl(i).serial_number := NULL;
        l_assets_int_tbl(i).lot_number    :=NULL;
      END IF;
    END IF;
    UPDATE cse_assets_int assetInt
    SET assetInt.item_organization_id      = l_assets_int_tbl(i).item_organization_id ,
      assetInt.item_id                     = l_assets_int_tbl(i).item_id ,
      assetInt.quantity                    =l_assets_int_tbl(i).quantity,
      assetInt.serial_number               =l_assets_int_tbl(i).serial_number,
      assetInt.lot_number                  =l_assets_int_tbl(i).lot_number,
      assetInt.customer_id                 = l_assets_int_tbl(i).customer_id ,
      assetInt.customer_site_party_id      = l_assets_int_tbl(i).customer_site_party_id ,
      assetInt.customer_site_id            = l_assets_int_tbl(i).customer_site_id ,
      assetInt.customer_account_id         = l_assets_int_tbl(i).customer_account_id ,
      assetInt.customer_account_site_id    = l_assets_int_tbl(i).customer_account_site_id ,
      assetInt.customer_account_site_use_id= l_assets_int_tbl(i).customer_account_site_use_id ,
      assetInt.sold_by_business_unit_id    = l_assets_int_tbl(i).sold_by_business_unit_id,
      assetInt.active_end_date             = DECODE(assetInt.action_code,C_UPDATE_ACTION_CODE,DECODE(l_assets_int_tbl(i).quantity,0,sysdate,l_assets_int_tbl(i).active_end_date),l_assets_int_tbl(i).active_end_date),
      assetInt.asset_id                    = to_number(DECODE(assetInt.action_code,C_CREATE_ACTION_CODE,DECODE(l_assets_int_tbl(i).asset_id,NULL,cse_asset_numbers_s.NEXTVAL,l_assets_int_tbl(i).asset_id) ,l_assets_int_tbl(i).asset_id)) ,
      assetInt.parent_asset_id             = to_number(l_assets_int_tbl(i).parent_asset_id),
      assetInt.parent_int_record_id        = to_number(l_assets_int_tbl(i).parent_int_record_id),
      assetInt.gen_object_id               = to_number(DECODE(assetInt.action_code,C_CREATE_ACTION_CODE,DECODE(l_assets_int_tbl(i).asset_id,NULL,cse_int_s.NEXTVAL,l_assets_int_tbl(i).gen_object_id) ,l_assets_int_tbl(i).gen_object_id)),
      assetInt.new_wo_allowed_flag         = DECODE(assetInt.action_code,C_CREATE_ACTION_CODE,'N',l_assets_int_tbl(i).new_wo_allowed_flag)
    WHERE assetInt.interface_row_id        = to_number(l_assets_int_tbl(i).interface_row_id );
  END LOOP;
  --Populate the parent_asset_id for records where parent is being created inflight
  UPDATE cse_assets_int assetInt
  SET assetInt.parent_asset_id = NVL(assetInt.parent_asset_id,
    (SELECT assetInt2.asset_id
    FROM CSE_ASSETS_INT assetInt2
    WHERE assetInt2.interface_row_id = assetInt.parent_int_record_id
    AND assetInt2.interface_batch_id = p_batch_id
    AND ROWNUM                       = 1
    ))
  WHERE assetInt.parent_asset_id        IS NULL
  AND assetInt.parent_int_record_id     IS NOT NULL
  AND assetInt.relationship_action_code IS NOT NULL
  AND assetInt.interface_batch_id        = p_batch_id;
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');

EXCEPTION
WHEN no_data_found THEN
  x_error_message := 'FND_CMN_INVALID_ATTRB_API_SERV';
  x_return_status := fnd_api.g_ret_sts_error;
  IF c_get_asset_int_rec%ISOPEN THEN
    CLOSE c_get_asset_int_rec;
  END IF;
  IF c_convert_org_code%ISOPEN THEN
    CLOSE c_convert_org_code;
  END IF;
  IF c_convert_item_number%ISOPEN THEN
    CLOSE c_convert_item_number;
  END IF;
  IF c_convert_customer%ISOPEN THEN
    CLOSE c_convert_customer;
  END IF;
  IF c_convert_custSiteParty%ISOPEN THEN
    CLOSE c_convert_custSiteParty;
  END IF;
  IF c_convert_customerSite%ISOPEN THEN
    CLOSE c_convert_customerSite;
  END IF;
  IF c_convert_custAccount%ISOPEN THEN
    CLOSE c_convert_custAccount;
  END IF;
  IF c_convert_CustAccSite%ISOPEN THEN
    CLOSE c_convert_CustAccSite;
  END IF;
  IF c_convert_custSiteUseId%ISOPEN THEN
    CLOSE c_convert_custSiteUseId;
  END IF;
  IF c_convert_sold_by_bu_name%ISOPEN THEN
    CLOSE c_convert_sold_by_bu_name;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, x_error_message);

WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  IF c_get_asset_int_rec%ISOPEN THEN
    CLOSE c_get_asset_int_rec;
  END IF;
  IF c_convert_org_code%ISOPEN THEN
    CLOSE c_convert_org_code;
  END IF;
  IF c_convert_item_number%ISOPEN THEN
    CLOSE c_convert_item_number;
  END IF;
  IF c_convert_customer%ISOPEN THEN
    CLOSE c_convert_customer;
  END IF;
  IF c_convert_custSiteParty%ISOPEN THEN
    CLOSE c_convert_custSiteParty;
  END IF;
  IF c_convert_customerSite%ISOPEN THEN
    CLOSE c_convert_customerSite;
  END IF;
  IF c_convert_custAccount%ISOPEN THEN
    CLOSE c_convert_custAccount;
  END IF;
  IF c_convert_CustAccSite%ISOPEN THEN
    CLOSE c_convert_CustAccSite;
  END IF;
  IF c_convert_custSiteUseId%ISOPEN THEN
    CLOSE c_convert_custSiteUseId;
  END IF;
  IF c_convert_sold_by_bu_name%ISOPEN THEN
    CLOSE c_convert_sold_by_bu_name;
  END IF;
  IF c_get_inv_item_flag%ISOPEN THEN
    CLOSE c_get_inv_item_flag;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);

END convert_custAsset_value_to_id;

PROCEDURE bulk_validate_asset(
    p_batch_id         IN NUMBER,
    p_partition_number IN NUMBER,
    x_error_message OUT NOCOPY VARCHAR2,
    x_return_status OUT NOCOPY VARCHAR2 )
IS
    -- Cursor for validating that the Asset item/Org pair exists in the Item Master table.
  CURSOR c_asset_item_org_invalid_cur
  IS
    SELECT assetInt.interface_row_id,
      assetInt.item_number,
      assetInt.item_organization_code
    FROM CSE_ASSETS_INT assetInt
    WHERE assetInt.partition_number    = p_partition_number
    AND assetInt.interface_batch_id    = p_batch_id
    AND assetInt.interface_status_code = C_INT_READY
    AND assetInt.action_code           = C_CREATE_ACTION_CODE
    AND (assetInt.item_id             IS NULL
    OR (assetInt.item_id              IS NOT NULL
    AND NOT EXISTS
      (SELECT 'x'
      FROM EGP_SYSTEM_ITEMS_B esib
      WHERE esib.inventory_item_id = assetInt.item_id
      AND esib.organization_id     = assetInt.item_organization_id
        ) ) );

-- Cursor for validating Asset item not a valid customer
  CURSOR c_asset_item_cust_invalid_cur
  IS
    SELECT assetInt.interface_row_id,
      assetInt.item_number
    FROM CSE_ASSETS_INT assetInt
    WHERE assetInt.partition_number    = p_partition_number
    AND assetInt.interface_batch_id    = p_batch_id
    AND assetInt.interface_status_code = C_INT_READY
    AND assetInt.action_code           = C_CREATE_ACTION_CODE
    AND (assetInt.item_id             IS NULL
    OR (assetInt.item_id              IS NOT NULL
    AND NOT EXISTS
      (SELECT 'x'
      FROM EGP_SYSTEM_ITEMS_B esib
      WHERE esib.inventory_item_id = assetInt.item_id
      AND esib.organization_id     = assetInt.item_organization_id
      AND esib.asset_tracked_flag IN ('C','Y')
      ) ) );
    --Cursor for validating if Item is updated
    CURSOR c_asset_item_update_cur
    IS
      SELECT assetInt.interface_row_id,
        assetInt.item_number
      FROM CSE_ASSETS_INT assetInt,
        CSE_ASSETS_B cseb
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code           = C_UPDATE_ACTION_CODE
      AND (assetInt.item_id             IS NULL
        /* Item_id is checked against NULL cause the item_id is converted in convert_custasset_value method where it is decoded with the help of item_number and Org_code passed,In case only one of them is provided or if the wrong combination is provided for update, item_id will be decoded as NULL  */
      OR( assetInt.asset_id =cseb.asset_id
      AND assetInt.item_id <>cseb.item_id));
    --Cursor for validation Organization code update
    CURSOR c_asset_org_update_cur
    IS
      SELECT assetInt.interface_row_id,
        assetInt.item_organization_code
      FROM CSE_ASSETS_INT assetInt,
        CSE_ASSETS_B cseb
      WHERE assetInt.partition_number     = p_partition_number
      AND assetInt.interface_batch_id     = p_batch_id
      AND assetInt.interface_status_code  = C_INT_READY
      AND assetInt.action_code            = C_UPDATE_ACTION_CODE
      AND (assetInt.item_organization_id IS NULL
      OR(assetInt.asset_id                =cseb.asset_id
      AND assetInt.item_organization_id  <> cseb.item_organization_id));
    -- Cursor for validating UOM
    CURSOR c_uom_invalid_cur
    IS
      SELECT assetInt.interface_row_id,
        assetInt.uom_code
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code           =C_CREATE_ACTION_CODE
      AND assetInt.uom_code             IS NOT NULL
      AND NOT EXISTS
        (SELECT 'x'
        FROM INV_ITEM_UOMS_V ivom,
          INV_UOM_CLASSES_VL iuom
        WHERE ivom.UOM_CLASS        = iuom.UOM_CLASS
        AND (ivom.INVENTORY_ITEM_ID = assetInt.item_id
        AND ivom.ORGANIZATION_ID    = assetInt.item_organization_id
        AND ivom.UOM_CODE           = assetInt.uom_code)
        );
    --Cursor to validate UOM_CODE UPDATE
    CURSOR c_asset_uom_update_cur
    IS
      SELECT assetInt.interface_row_id,
        assetInt.item_organization_code
      FROM CSE_ASSETS_INT assetInt,
        CSE_ASSETS_B cseb
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code           = C_UPDATE_ACTION_CODE
      AND (assetInt.uom_code            IS NOT NULL
      AND assetInt.asset_id              =cseb.asset_id
      AND assetInt.uom_code             <>cseb.uom_code);
    -- Cursor for validating Asset no unique
    CURSOR c_asset_not_unique_cur
    IS
      SELECT assetInt.interface_row_id,
        assetInt.asset_number
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code          IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
      AND EXISTS
        (SELECT 'x'
        FROM CSE_ASSETS_B assetb
        WHERE assetb.asset_number = DECODE(assetInt.action_code, C_CREATE_ACTION_CODE, assetInt.asset_number, C_UPDATE_ACTION_CODE, assetInt.new_asset_number)
        );
    -- Cursor for validating Asset item serial no unique for create asset
    CURSOR c_itser_exists_create_cur
    IS
      SELECT assetInt.interface_row_id,
        assetInt.item_number,
        assetInt.serial_number
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code           = C_CREATE_ACTION_CODE
      AND EXISTS
        (SELECT 'x'
        FROM CSE_ASSETS_B assetb
        WHERE assetb.item_id            = assetInt.item_id
        AND assetb.item_organization_id = assetInt.item_organization_id
        AND (assetInt.serial_number    IS NOT NULL
        AND assetb.serial_number        = assetInt.serial_number)
        );
    -- Cursor for validating Asset item serial no unique for update asset
    CURSOR c_itser_exists_update_cur
    IS
      SELECT assetInt.interface_row_id,
        assetInt.item_number,
        assetInt.serial_number
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code           = C_UPDATE_ACTION_CODE
      AND EXISTS
        (SELECT 'x'
        FROM CSE_ASSETS_B assetb
        WHERE assetb.item_id            = assetInt.item_id
        AND assetb.item_organization_id = assetInt.item_organization_id
        AND (assetInt.serial_number    IS NOT NULL
        AND assetb.serial_number        = assetInt.serial_number)
        AND assetb.asset_number        <> assetInt.asset_number
        );
    -- Cursor for checking if asset is end dated and if update is being made.
    CURSOR c_is_asset_end_dated
    IS
      SELECT assetInt.interface_row_id
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code           = C_UPDATE_ACTION_CODE
      AND EXISTS
        (SELECT 'x'
        FROM CSE_ASSETS_B assetb
        WHERE assetb.asset_id                                   = assetInt.asset_id
        AND assetb.active_end_date                                  IS NOT NULL
        AND assetb.active_end_date                                  <= sysdate
        AND NVL(TRUNC(assetInt.active_end_date),TRUNC(C_NULL_DATE)) <> TRUNC(FND_API.G_NULL_DATE)
        );
    /*checks if active_end_date is passed null/not updated then it replaces it with C_NULL_DATE(05-jan-12)and then compares with the Reinstate date
    else null comparison always makes the condition false */
      -- Cursor for checking if asset is end dated and if the end_date set is valid
    CURSOR c_invalid_end_date
    IS
      SELECT assetInt.interface_row_id
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number      = p_partition_number
      AND assetInt.interface_batch_id      = p_batch_id
      AND assetInt.interface_status_code   = C_INT_READY
      AND assetInt.action_code            IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
      AND assetInt.active_end_date > sysdate
      ;
    -- Cursor for checking if item is not serial controlled but serial is entered
    CURSOR c_asset_no_serial_control
    IS
      SELECT assetInt.interface_row_id
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code          IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
      AND assetInt.item_id              IS NOT NULL
      AND EXISTS
        (SELECT 'x'
        FROM EGP_SYSTEM_ITEMS_B esib
        WHERE esib.inventory_item_id             = assetInt.item_id
        AND esib.organization_id                 = assetInt.item_organization_id
        AND (assetInt.serial_number             IS NOT NULL
        AND esib.SERIAL_NUMBER_CONTROL_CODE NOT IN (2,5,6))
        );
    -- Cursor for checking if item is not lot controlled but lot is entered
    CURSOR c_asset_no_lot_control
    IS
      SELECT assetInt.interface_row_id
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code          IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
      AND assetInt.item_id              IS NOT NULL
      AND EXISTS
        (SELECT 'x'
        FROM EGP_SYSTEM_ITEMS_B esib
        WHERE esib.inventory_item_id = assetInt.item_id
        AND esib.organization_id     = assetInt.item_organization_id
        AND (assetInt.lot_number    IS NOT NULL
        AND esib.LOT_CONTROL_CODE   IS NULL)
        );
    -- Cursor for checking if the Quanity is not 1 when the item is serial controlled
    CURSOR c_serial_asset_wrong_quantity
    IS
      SELECT assetInt.interface_row_id
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code          IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
      AND assetInt.quantity             IS NOT NULL
      AND EXISTS
        (SELECT 'x'
        FROM EGP_SYSTEM_ITEMS_B esib
        WHERE esib.inventory_item_id           = assetInt.item_id
        AND esib.organization_id               = assetInt.item_organization_id
        AND (assetInt.quantity                <> 1
        AND (esib.SERIAL_NUMBER_CONTROL_CODE  IN (2,5,6)
        AND NVL(esib.INVENTORY_ITEM_FLAG,'N') <> 'N'))
        );
    --- Cursor for checking if the Quantity is less than 0 when item is not serial controlled for update---
    CURSOR c_nonserial_asset_invalid_upd
    IS
      SELECT assetInt.interface_row_id
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code           = C_UPDATE_ACTION_CODE
      AND assetInt.quantity             IS NOT NULL
      AND EXISTS
        (SELECT 'x'
        FROM EGP_SYSTEM_ITEMS_B esib
        WHERE esib.inventory_item_id               = assetInt.item_id
        AND esib.organization_id                   = assetInt.item_organization_id
        AND assetInt.quantity                      < 0
        AND (NVL(esib.SERIAL_NUMBER_CONTROL_CODE,1)=1
        OR NVL(esib.INVENTORY_ITEM_FLAG,'N')       ='N')
        );
    -------Cursor to check if quantity is less than or equal to zero for non serial assets while creation.
    CURSOR c_nonserial_asset_wrong_qty
    IS
      SELECT assetInt.interface_row_id
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number    = p_partition_number
      AND assetInt.interface_batch_id    = p_batch_id
      AND assetInt.interface_status_code = C_INT_READY
      AND assetInt.action_code           = C_CREATE_ACTION_CODE
      AND EXISTS
        (SELECT 'x'
        FROM EGP_SYSTEM_ITEMS_B esib
        WHERE esib.inventory_item_id               = assetInt.item_id
        AND esib.organization_id                   = assetInt.item_organization_id
        AND (NVL(esib.SERIAL_NUMBER_CONTROL_CODE,1)=1
        OR NVL(esib.INVENTORY_ITEM_FLAG,'N')       ='N')
        )
    AND (( assetInt.quantity IS NOT NULL
    AND assetInt.quantity    <=0)
    OR assetInt.quantity     IS NULL);
    -- Cursor for identifying Invalid Relationship action code
    CURSOR c_invalid_structure_act_code
    IS
      SELECT assetInt.interface_row_id
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number            = p_partition_number
      AND assetInt.interface_batch_id            = p_batch_id
      AND assetInt.interface_status_code         = C_INT_READY
      AND assetInt.action_code                  IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
      AND assetInt.relationship_action_code     IS NOT NULL
      AND assetInt.relationship_action_code NOT IN (C_ADD_REL_ACTION_CODE,C_REM_REL_ACTION_CODE);
    l_interfaceTbl cse_int_utils_pvt.interface_row_id_type;
    l_api_name VARCHAR2(300) := 'cse_bulk_import_pvt.bulk_validate_asset';

BEGIN

cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
    -- Validate Asset Item
    FOR asset_item_rec IN c_asset_item_org_invalid_cur
    LOOP
      l_interfaceTbl(1) := asset_item_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ITEM_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_ITEM_NOT_ORG_ASSIGN', p_message_token_names => 'ITEM_NUM$ORG_CODE', p_message_token_values => asset_item_rec.item_number|| '$' || asset_item_rec.item_organization_code, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Validate Asset Item not valid customer Asset
    FOR asset_item_cust_rec IN c_asset_item_cust_invalid_cur
    LOOP
      l_interfaceTbl(1) := asset_item_cust_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ITEM_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_INVAL_CUST_AS_ITM', p_message_token_names => 'ITEM_NUM', p_message_token_values => asset_item_cust_rec.item_number, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Validate UOM attribute
    FOR asset_uom_rec IN c_uom_invalid_cur
    LOOP
      l_interfaceTbl(1) := asset_uom_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'UOM_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_INVAL_UOM_CODE', p_message_token_names => 'UOM_CODE', p_message_token_values => asset_uom_rec.uom_code, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Validate if Asset no is unique
    FOR asset_unique_rec IN c_asset_not_unique_cur
    LOOP
      l_interfaceTbl(1) := asset_unique_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ASSET_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_DUPLICATE_ASSET_NUM', p_message_token_names => 'ASSET_NUM', p_message_token_values => asset_unique_rec.asset_number, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    --Cursor for chceking if item is updated
    FOR asset_item_update_rec IN c_asset_item_update_cur
    LOOP
      l_interfaceTbl(1) := asset_item_update_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ITEM_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AINTG_INVAL_ATTR_UPD', p_message_token_names => C_MESSAGE_TOKEN_NAME, p_message_token_values => 'ITEM_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    --Cursor for validating organization code updated
    FOR asset_org_update_rec IN c_asset_org_update_cur
    LOOP
      l_interfaceTbl(1) := asset_org_update_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ITEM_ORGANIZATION_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AINTG_INVAL_ATTR_UPD', p_message_token_names => C_MESSAGE_TOKEN_NAME, p_message_token_values => 'ITEM_ORGANIZATION_CODE', x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    --Cursor for validating Uom_code update
    FOR asset_org_update_rec IN c_asset_uom_update_cur
    LOOP
      l_interfaceTbl(1) := asset_org_update_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'UOM_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AINTG_INVAL_ATTR_UPD', p_message_token_names => C_MESSAGE_TOKEN_NAME, p_message_token_values => 'UOM_CODE', x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Validate if Asset Item, serial number is unique
    FOR asset_itser_rec IN c_itser_exists_create_cur
    LOOP
      l_interfaceTbl(1) := asset_itser_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ITEM_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_DUPLICATE_SER_NUM', p_message_token_names => 'ITEM_NUM$SER_NUM', p_message_token_values => asset_itser_rec.item_number || '$' || asset_itser_rec.serial_number, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Validate if Asset Item, serial number is unique
    FOR asset_itser_rec IN c_itser_exists_update_cur
    LOOP
      l_interfaceTbl(1) := asset_itser_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ITEM_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_DUPLICATE_SER_NUM', p_message_token_names => 'ITEM_NUM$SER_NUM', p_message_token_values => asset_itser_rec.item_number || '$' || asset_itser_rec.serial_number, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Validate if updates are made on an end dated asset
    FOR asset_end_date_rec IN c_is_asset_end_dated
    LOOP
      l_interfaceTbl(1) := asset_end_date_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ACTIVE_END_DATE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_END_DATE_UPD1', p_message_token_names => NULL, p_message_token_values => NULL, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;

--Validate if asset is being end dated with invalid value---
     FOR asset_end_date_inv IN c_invalid_end_date
    LOOP
     l_interfaceTbl(1) := asset_end_date_inv.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ACTIVE_END_DATE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AINTG_DT_NOT_BEFORE_TODAY', p_message_token_names => 'DATE_ATTRIBUTE_NAME', p_message_token_values => 'ACTIVE_END_DATE', x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Validate if serial number is provided but item is not serial controlled
    FOR asset_serial_rec IN c_asset_no_serial_control
    LOOP
      l_interfaceTbl(1) := asset_serial_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'SERIAL_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_SERNUM_NOT_ALLOWED', p_message_token_names => NULL, p_message_token_values => NULL, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Validate if lot is provided but item is not lot controlled
    FOR asset_lot_rec IN c_asset_no_lot_control
    LOOP
      l_interfaceTbl(1) := asset_lot_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'LOT_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_LOT_NOT_ALLOWED', p_message_token_names => NULL, p_message_token_values => NULL, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Cursor for checking if the Quanity is not 1 when the item is serial controlled
    FOR asset_qty_rec IN c_serial_asset_wrong_quantity
    LOOP
      l_interfaceTbl(1) := asset_qty_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'SERIAL_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_SER_QTY', p_message_token_names => NULL, p_message_token_values => NULL, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    --Cursor for checking if the Quantity is negative when item is not serial controlled for Create.--
    FOR asset_wrong_qty_rec IN c_nonserial_asset_wrong_qty
    LOOP
      l_interfaceTbl(1) := asset_wrong_qty_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'QUANTITY', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_NONSERIAL_QTY', p_message_token_names => C_MESSAGE_TOKEN_NAME, p_message_token_values => 'QUANTITY', x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    --Cursor to check if quantity is negative for update of non serial assets---
    FOR asset_invalid_qty IN c_nonserial_asset_invalid_upd
    LOOP
      l_interfaceTbl(1) := asset_invalid_qty.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'QUANTITY', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_NONSERIAL_QTY', p_message_token_names => C_MESSAGE_TOKEN_NAME, p_message_token_values => 'QUANTITY', x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    --Cursor for identifying Invalid Relationship action code
    FOR invalid_relationship_action IN c_invalid_structure_act_code
    LOOP
      l_interfaceTbl(1) := invalid_relationship_action.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'RELATIONSHIP_ACTION_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => C_MESSAGE_TOKEN_NAME, p_message_token_values => 'RELATIONSHIP_ACTION_CODE', x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');

EXCEPTION
  WHEN OTHERS THEN
    x_return_status := fnd_api.g_ret_sts_unexp_error;
    x_error_message := sqlerrm;
    cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);

END bulk_validate_asset;

/*=============================================================================
|
|  DESCRIPTION
|      This Public API does the following actions:
|        1. Validates the asset structure
|
|  PARAMETERS
|      Returns x_errbuf and Status code x_retcode back to calling API
|
*===========================================================================*/
PROCEDURE validate_asset_struc_params(
    p_batch_id         IN NUMBER,
    p_partition_number IN NUMBER,
    x_error_message OUT NOCOPY VARCHAR2,
    x_return_status OUT NOCOPY VARCHAR2)
IS
  -- Cursor to pick out the INVALID parent_int_record_number/parent_asset_number
  CURSOR c_get_invalid_parent_asset
  IS
    SELECT assetInt.interface_row_id,
      CASE
        WHEN assetInt.parent_int_record_number IS NOT NULL
        THEN 'PARENT_INT_RECORD_NUMBER'
        WHEN assetInt.parent_asset_number IS NOT NULL
        THEN 'PARENT_ASSET_NUMBER'
        ELSE 'UNKNOWN'
      END AS PARENT_TYPE
    FROM CSE_ASSETS_INT assetInt
    WHERE assetInt.partition_number          = p_partition_number
    AND assetInt.interface_batch_id          = p_batch_id
    AND assetInt.interface_status_code       = C_INT_READY
    AND assetInt.relationship_action_code    = C_ADD_REL_ACTION_CODE
    AND assetInt.action_code                IN (C_CREATE_ACTION_CODE, C_UPDATE_ACTION_CODE)
    AND ((assetInt.parent_int_record_number IS NOT NULL
    AND NOT EXISTS
      (SELECT 1
      FROM CSE_ASSETS_INT assetInt2
      WHERE assetInt2.interface_record_number IS NOT NULL
      AND assetInt2.INTERFACE_STATUS_CODE     <> C_INT_ERROR
      AND assetInt2.ACTION_CODE                = C_CREATE_ACTION_CODE
      AND assetInt2.interface_record_number    = assetInt.parent_int_record_number
      )
      AND assetInt.parent_asset_id IS NULL
      )
    OR (assetInt.parent_asset_number IS NOT NULL
    AND (NOT EXISTS
      (SELECT 1
      FROM CSE_ASSETS_B assetB
      WHERE assetB.asset_number IS NOT NULL
      AND assetB.asset_number    = assetInt.parent_asset_number
      )
    OR EXISTS
      (SELECT 1
      FROM CSE_ASSETS_INT assetInt3
      WHERE assetInt3.asset_number  IS NOT NULL
      AND assetInt3.asset_number     = assetInt.parent_asset_number
      AND assetInt3.action_code     <> C_UPDATE_ACTION_CODE
      AND assetInt.INTERFACE_ROW_ID <> assetInt.interface_row_id
      ) )) );
    -- Cursor to identify whether parent asset provided is a VALID CUSTOMER asset
    CURSOR c_get_non_cust_parent_asset
    IS
      SELECT assetInt.interface_row_id,
        CASE
          WHEN assetInt.parent_int_record_number IS NOT NULL
          THEN 'PARENT_INT_RECORD_NUMBER'
          WHEN assetInt.parent_asset_number IS NOT NULL
          THEN 'PARENT_ASSET_NUMBER'
          ELSE 'UNKNOWN'
        END AS PARENT_TYPE
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number         = p_partition_number
      AND assetInt.interface_batch_id         = p_batch_id
      AND assetInt.interface_status_code      = C_INT_READY
      AND assetInt.relationship_action_code   = C_ADD_REL_ACTION_CODE
      AND assetInt.action_code               IN (C_CREATE_ACTION_CODE, C_UPDATE_ACTION_CODE)
      AND (assetInt.parent_int_record_number IS NOT NULL
      AND NOT EXISTS
        (SELECT 1
        FROM CSE_ASSETS_INT assetInt2
        WHERE assetInt2.interface_record_number IS NOT NULL
        AND assetInt2.INTERFACE_STATUS_CODE     <> C_INT_ERROR
        AND assetInt2.interface_record_number    = assetInt.parent_int_record_number
        )
    OR (assetInt.parent_asset_number IS NOT NULL
    AND EXISTS
      (SELECT 1
      FROM CSE_ASSETS_B assetB
      WHERE assetB.asset_number           IS NOT NULL
      AND assetB.asset_number              = assetInt.parent_asset_number
      AND assetB.CURRENT_LOCATION_CONTEXT <> 'ORA_CUSTOMER'
      )));
      -- Cursor to identify attempts to make an asset component of itself
      CURSOR c_self_componented_asset_cur
      IS
        SELECT assetInt.interface_row_id,
          CASE
            WHEN assetInt.parent_int_record_number IS NOT NULL
            THEN 'PARENT_INT_RECORD_NUMBER'
            WHEN assetInt.parent_asset_number IS NOT NULL
            THEN 'PARENT_ASSET_NUMBER'
            ELSE 'UNKNOWN'
          END AS PARENT_TYPE
        FROM CSE_ASSETS_INT assetInt
        WHERE assetInt.partition_number       = p_partition_number
        AND assetInt.interface_batch_id       = p_batch_id
        AND assetInt.interface_status_code    = C_INT_READY
        AND assetInt.relationship_action_code = C_ADD_REL_ACTION_CODE
        AND assetInt.action_code             IN (C_CREATE_ACTION_CODE, C_UPDATE_ACTION_CODE)
        AND (EXISTS
          (SELECT 1
          FROM CSE_ASSETS_INT assetInt2
          WHERE assetInt.interface_row_id          = assetInt2.interface_row_id
          AND ((assetInt.parent_int_record_number IS NOT NULL
          AND (assetInt.parent_int_record_number   = assetInt2.interface_record_number
          OR assetInt.parent_int_record_id         = assetInt2.interface_row_id))
          OR (assetInt.parent_asset_number        IS NOT NULL
          AND(assetInt.parent_asset_number         = assetInt2.asset_number
          OR assetInt.parent_asset_id              = assetInt2.asset_id)))
          )
      OR assetInt.asset_id IN
        (SELECT object_id
        FROM cse_asset_relationships Rel
        WHERE Rel.active_end_date   IS NULL
          START WITH subject_id      = assetInt.parent_asset_id
          CONNECT BY PRIOR object_id = subject_id
        ));
        --Cursor to identify attempt to assign an asset to a different structure or twice to the same , including duplicate requests to add in same batch/call
        CURSOR c_get_asset_struct_repetition
        IS
          SELECT assetInt.interface_row_id,
            CASE
              WHEN assetInt.parent_int_record_number IS NOT NULL
              THEN 'PARENT_INT_RECORD_NUMBER'
              WHEN assetInt.parent_asset_number IS NOT NULL
              THEN 'PARENT_ASSET_NUMBER'
              ELSE 'UNKNOWN'
            END AS PARENT_TYPE
          FROM CSE_ASSETS_INT assetInt
          WHERE assetInt.partition_number       = p_partition_number
          AND assetInt.interface_batch_id       = p_batch_id
          AND assetInt.interface_status_code    = C_INT_READY
          AND assetInt.relationship_action_code = C_ADD_REL_ACTION_CODE
          AND assetInt.action_code              = C_UPDATE_ACTION_CODE
          AND (assetInt.asset_number           IS NOT NULL
          AND EXISTS
            (SELECT 1
            FROM CSE_ASSET_RELATIONSHIPS assetRel,
              CSE_ASSETS_B assetB
            WHERE assetInt.asset_number   = assetB.asset_number
            AND assetRel.subject_Id       = assetB.asset_id
            AND assetRel.subject_type     = 'A'
            AND assetRel.active_end_date IS NULL
            ));
          --Cursor to identify records with Inactive child and active parent
          CURSOR c_get_inac_child_cur
          IS
            SELECT assetInt.interface_row_id
            FROM CSE_ASSETS_INT assetInt
            WHERE assetInt.partition_number       = p_partition_number
            AND assetInt.interface_batch_id       = p_batch_id
            AND assetInt.interface_status_code    = C_INT_READY
            AND assetInt.relationship_action_code = C_ADD_REL_ACTION_CODE
            AND assetInt.action_code              = C_UPDATE_ACTION_CODE
            AND EXISTS
              (SELECT 1
              FROM CSE_ASSETS_B assetB
              WHERE (assetInt.asset_number       = assetB.asset_number
              OR assetInt.asset_id               = assetB.asset_id)
              AND (TRUNC(assetB.active_end_date) < TRUNC(sysdate)
              AND TRUNC(assetB.active_end_date) <>TRUNC(FND_API.G_NULL_DATE))
              )
          AND NOT EXISTS
            (SELECT 1
            FROM CSE_ASSETS_B assetB
            WHERE (assetInt.parent_asset_number = assetB.asset_number
            OR assetInt.parent_asset_id         = assetB.asset_id)
            AND (TRUNC(assetB.active_end_date)  < TRUNC(sysdate)
            AND TRUNC(assetB.active_end_date)  <>TRUNC(FND_API.G_NULL_DATE))
            );
          --Cursor to identify records with active child and inactive parent
          CURSOR c_get_inac_parent_cur
          IS
            SELECT assetInt.interface_row_id
            FROM CSE_ASSETS_INT assetInt
            WHERE assetInt.partition_number       = p_partition_number
            AND assetInt.interface_batch_id       = p_batch_id
            AND assetInt.interface_status_code    = C_INT_READY
            AND assetInt.relationship_action_code = C_ADD_REL_ACTION_CODE
            AND assetInt.action_code             IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
            AND NOT EXISTS
              (SELECT 1
              FROM CSE_ASSETS_B assetB
              WHERE (assetInt.asset_number       = assetB.asset_number
              OR assetInt.asset_id               = assetB.asset_id)
              AND (TRUNC(assetB.active_end_date) < TRUNC(sysdate)
              AND TRUNC(assetB.active_end_date) <>TRUNC(FND_API.G_NULL_DATE))
              )
          AND EXISTS
            (SELECT 1
            FROM CSE_ASSETS_B assetB
            WHERE (assetInt.parent_asset_number = assetB.asset_number
            OR assetInt.parent_asset_id         = assetB.asset_id)
            AND (TRUNC(assetB.active_end_date)  < TRUNC(sysdate)
            AND TRUNC(assetB.active_end_date)  <>TRUNC(FND_API.G_NULL_DATE))
            );
          -- Cursor to pick records where attempt is made to remove a component not being part of any
          CURSOR c_struct_not_exist_assets_cur
          IS
            SELECT assetInt.interface_row_id
            FROM CSE_ASSETS_INT assetInt
            WHERE assetInt.partition_number       = p_partition_number
            AND assetInt.interface_batch_id       = p_batch_id
            AND assetInt.interface_status_code    = C_INT_READY
            AND assetInt.relationship_action_code = C_REM_REL_ACTION_CODE
            AND assetInt.action_code              = C_UPDATE_ACTION_CODE
            AND NOT EXISTS
              (SELECT 1
              FROM CSE_ASSET_RELATIONSHIPS assetRel
              WHERE assetRel.subject_id           = assetInt.asset_id
              AND assetRel.relationship_type_code = 'ORA_COMPONENT'
              AND assetrel.subject_type           = 'A'
              AND assetRel.active_end_date       IS NULL
              );
          /*Cursor to identify assets created and added to a structure with customer/location info different from the parent asset*/
          CURSOR c_get_invld_child_asset
          IS
            SELECT interface_row_id,
              asset_number
            FROM CSE_ASSETS_int assetInt
            WHERE assetInt.partition_number          = p_partition_number
            AND assetInt.interface_batch_id          = p_batch_id
            AND assetInt.interface_status_code       = C_INT_READY
            AND assetInt.action_code                 = C_CREATE_ACTION_CODE
            AND assetInt.relationship_action_code    = C_ADD_REL_ACTION_CODE
            AND ( assetInt.parent_int_record_number IS NOT NULL
            AND EXISTS
              (SELECT 'X'
              FROM CSE_ASSETS_INT cseaint
              WHERE cseaint.interface_record_number IS NOT NULL
              AND cseaint.action_code                = C_CREATE_ACTION_CODE
              AND cseaint.interface_status_code     <> C_INT_ERROR
              AND cseaint.interface_record_number    = assetInt.parent_int_record_number
              AND (cseaint.customer_id              <> assetInt.customer_id
              OR cseaint.CUSTOMER_ACCOUNT_ID        <> assetInt.CUSTOMER_ACCOUNT_ID
              OR cseaint.CUSTOMER_ACCOUNT_SITE_ID   <> assetInt.CUSTOMER_ACCOUNT_SITE_ID
              OR cseaint.CUSTOMER_SITE_PARTY_ID     <> assetInt.CUSTOMER_SITE_PARTY_ID
              OR cseaint.CUSTOMER_SITE_ID           <> assetInt.CUSTOMER_SITE_ID )
              )
          OR (assetInt.parent_asset_number IS NOT NULL
          AND EXISTS
            (SELECT 'X'
            FROM CSE_ASSETS_B cseb
            WHERE cseb.asset_id               = assetInt.parent_asset_id
            AND (cseb.customer_id            <> assetInt.customer_id
            OR cseb.CUSTOMER_ACCOUNT_ID      <> assetInt.CUSTOMER_ACCOUNT_ID
            OR cseb.CUSTOMER_ACCOUNT_SITE_ID <> assetInt.CUSTOMER_ACCOUNT_SITE_ID
            OR cseb.CUSTOMER_SITE_PARTY_ID   <> assetInt.CUSTOMER_SITE_PARTY_ID
            OR cseb.CUSTOMER_SITE_ID         <> assetInt.CUSTOMER_SITE_ID)
            )));
            /*Cursor to get the assets being updated with different customre/location info than the parent asset*/
            CURSOR c_get_invld_chld_asset_update
            IS
              SELECT assetInt.interface_row_id,
                assetInt.asset_number
              FROM CSE_ASSETS_INT assetInt
              WHERE assetInt.partition_number    = p_partition_number
              AND assetInt.interface_batch_id    = p_batch_id
              AND assetInt.interface_status_code = C_INT_READY
              AND assetInt.action_code           = C_UPDATE_ACTION_CODE
              AND (assetInt.customer_id         IS NOT NULL
              OR CUSTOMER_ACCOUNT_ID            IS NOT NULL
              OR CUSTOMER_ACCOUNT_SITE_ID       IS NOT NULL
              OR CUSTOMER_ACCOUNT_SITE_USE_ID   IS NOT NULL
              OR CUSTOMER_SITE_PARTY_ID         IS NOT NULL
              OR CUSTOMER_SITE_ID               IS NOT NULL )
              AND EXISTS
                (SELECT 'X'
                FROM CSE_ASSET_RELATIONSHIPS assetRel
                WHERE subject_id               = assetInt.asset_id
                AND( assetRel.active_end_date IS NULL
                OR assetRel.active_end_date   >= sysdate)
                );
            l_interfaceTbl cse_int_utils_pvt.interface_row_id_type;
            l_api_name VARCHAR2(300) := 'cse_bulk_import_pvt.validate_asset_struc_params';
          BEGIN
            cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
            FOR invalid_parent_asset_rec IN c_get_invalid_parent_asset
            LOOP--
              l_interfaceTbl(1) := invalid_parent_asset_rec.interface_row_id;
              log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => invalid_parent_asset_rec.parent_type, p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => invalid_parent_asset_rec.parent_type, x_error_message => x_error_message, x_return_status => x_return_status );
              l_interfaceTbl.DELETE;
            END LOOP;
            FOR non_cust_parent_asset_rec IN c_get_non_cust_parent_asset
            LOOP--
              l_interfaceTbl(1) := non_cust_parent_asset_rec.interface_row_id;
              log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => non_cust_parent_asset_rec.parent_type, p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_INVAL_CUST_ASSET', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => non_cust_parent_asset_rec.parent_type, x_error_message => x_error_message, x_return_status => x_return_status );
              l_interfaceTbl.DELETE;
            END LOOP;
            FOR self_componented_asset_rec IN c_self_componented_asset_cur
            LOOP--
              l_interfaceTbl(1) := self_componented_asset_rec.interface_row_id;
              log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => self_componented_asset_rec.parent_type, p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_CMP_ASSO_NO_CIRC', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => self_componented_asset_rec.parent_type, x_error_message => x_error_message, x_return_status => x_return_status );
              l_interfaceTbl.DELETE;
            END LOOP;
            FOR asset_struct_repetition_rec IN c_get_asset_struct_repetition
            LOOP--
              l_interfaceTbl(1) := asset_struct_repetition_rec.interface_row_id;
              log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => asset_struct_repetition_rec.parent_type, p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_CMP_ASSO_NO_DUP', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => asset_struct_repetition_rec.parent_type, x_error_message => x_error_message, x_return_status => x_return_status );
              l_interfaceTbl.DELETE;
            END LOOP;
            FOR c_get_inac_child_rec IN c_get_inac_child_cur
            LOOP--
              l_interfaceTbl(1) := c_get_inac_child_rec.interface_row_id;
              log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ASSET_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_INAC_CMP_ADD', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'ASSET_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
              l_interfaceTbl.DELETE;
            END LOOP;
            FOR c_get_inac_parent_rec IN c_get_inac_parent_cur
            LOOP--
              l_interfaceTbl(1) := c_get_inac_parent_rec.interface_row_id;
              log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'PARENT_ASSET_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_INAC_PRT_ADD', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'PARENT_ASSET_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
              l_interfaceTbl.DELETE;
            END LOOP;
            FOR c_no_struct_exist_asset_rec IN c_struct_not_exist_assets_cur
            LOOP--
              l_interfaceTbl(1) := c_no_struct_exist_asset_rec.interface_row_id;
              log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ASSET_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_NOT_IN_CFG', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'ASSET_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
              l_interfaceTbl.DELETE;
            END LOOP;
            FOR child_asset_create_rec IN c_get_invld_child_asset
            LOOP--
              l_interfaceTbl(1) := child_asset_create_rec.interface_row_id;
              log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ASSET_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_DIFF_CUST_LOC_CMP', p_message_token_names => 'ASSET_NUM', p_message_token_values => child_asset_create_rec.asset_number, x_error_message => x_error_message, x_return_status => x_return_status );
              l_interfaceTbl.DELETE;
            END LOOP;
            FOR child_asset_update_rec IN c_get_invld_chld_asset_update
            LOOP--
              l_interfaceTbl(1) := child_asset_update_rec.interface_row_id;
              log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ASSET_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_CMP_TRS_MOV', p_message_token_names => 'ASSET_NUM', p_message_token_values => child_asset_update_rec.asset_number, x_error_message => x_error_message, x_return_status => x_return_status );
              l_interfaceTbl.DELETE;
            END LOOP;
            cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');
          EXCEPTION
          WHEN OTHERS THEN
            x_return_status := fnd_api.g_ret_sts_unexp_error;
            x_error_message := sqlerrm;
            IF (c_get_invalid_parent_asset%isopen) THEN
              CLOSE c_get_invalid_parent_asset;
            END IF;
            IF (c_get_non_cust_parent_asset%isopen) THEN
              CLOSE c_get_non_cust_parent_asset;
            END IF;
            IF (c_self_componented_asset_cur%isopen) THEN
              CLOSE c_self_componented_asset_cur;
            END IF;
            IF (c_get_asset_struct_repetition%isopen) THEN
              CLOSE c_self_componented_asset_cur;
            END IF;
            IF (c_get_inac_child_cur%isopen) THEN
              CLOSE c_self_componented_asset_cur;
            END IF;
            IF (c_get_inac_parent_cur%isopen) THEN
              CLOSE c_self_componented_asset_cur;
            END IF;
            IF (c_struct_not_exist_assets_cur%isopen) THEN
              CLOSE c_self_componented_asset_cur;
            END IF;
            IF (c_get_invld_child_asset%isopen) THEN
              CLOSE c_get_invld_child_asset;
            END IF;
            IF (c_get_invld_chld_asset_update%isopen) THEN
              CLOSE c_get_invld_chld_asset_update;
            END IF;
            cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
          END validate_asset_struc_params;

/*=============================================================================
|
|  DESCRIPTION
|   Validate input customer asset records, log errors
|      and set the interface record status
|
|  PARAMETERS
|      Returns x_errbuf and Status code x_retcode back to calling API
|
*===========================================================================*/

PROCEDURE bulk_validate_customer_asset(
    p_batch_id         IN NUMBER,
    p_partition_number IN NUMBER,
    x_error_message OUT NOCOPY VARCHAR2,
    x_return_status OUT NOCOPY VARCHAR2)
IS
  -- Cursor for validating customer
  CURSOR c_customer_invalid_cur
  IS
    SELECT assetInt.interface_row_id
    FROM CSE_ASSETS_INT assetInt
    WHERE assetInt.partition_number    = p_partition_number
    AND assetInt.interface_batch_id    = p_batch_id
    AND assetInt.interface_status_code = C_INT_READY
    AND assetInt.action_code          IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
    AND (assetInt.customer_number     IS NOT NULL
    OR assetInt.customer_name         IS NOT NULL )
    AND NOT EXISTS
      (SELECT cust.party_id
      FROM hz_parties cust
      WHERE (cust.party_number = assetInt.customer_number
      OR cust.party_name       = assetInt.customer_name )
      );
  -- Sold by business Unit
  -- TBD
  -- Sold by business Unit
  -- Cursor for validating location customer
  CURSOR c_loc_cust_invalid_cur
  IS
    SELECT assetInt.interface_row_id
    FROM CSE_ASSETS_INT assetInt
    WHERE assetInt.partition_number           = p_partition_number
    AND assetInt.interface_batch_id           = p_batch_id
    AND assetInt.interface_status_code        = C_INT_READY
    AND assetInt.action_code                 IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
    AND (assetInt.customer_site_party_number IS NOT NULL
    OR assetInt.customer_site_party_name     IS NOT NULL )
    AND NOT EXISTS
      (SELECT custSiteParty.party_id
      FROM hz_parties custSiteParty
      WHERE (custSiteParty.party_number = assetInt.customer_site_party_number
      OR custSiteParty.party_name       = assetInt.customer_site_party_name)
      );
  -- Cursor for validating location
  CURSOR c_location_invalid_cur
  IS
    SELECT assetInt.interface_row_id
    FROM CSE_ASSETS_INT assetInt
    WHERE assetInt.partition_number     = p_partition_number
    AND assetInt.interface_batch_id     = p_batch_id
    AND assetInt.interface_status_code  = C_INT_READY
    AND assetInt.action_code           IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
    AND (assetInt.customer_site_number IS NOT NULL
    OR assetInt.customer_site_name     IS NOT NULL )
    AND NOT EXISTS
      (SELECT custSite.party_site_id
      FROM hz_party_sites custSite
      WHERE (custSite.party_site_number = assetInt.customer_site_number
      OR custSite.party_site_name       = assetInt.customer_site_name)
      );
  -- Cursor for validating Bill-to Customer
  CURSOR c_bill_to_invalid_cur
  IS
    SELECT assetInt.interface_row_id
    FROM CSE_ASSETS_INT assetInt
    WHERE assetInt.partition_number        = p_partition_number
    AND assetInt.interface_batch_id        = p_batch_id
    AND assetInt.interface_status_code     = C_INT_READY
    AND assetInt.action_code              IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
    AND (assetInt.customer_account_number IS NOT NULL
    OR assetInt.customer_account_name     IS NOT NULL )
    AND NOT EXISTS
      (SELECT custAcc.cust_account_id
      FROM hz_cust_accounts custAcc
      WHERE (custAcc.account_number = assetInt.customer_account_number
      OR custAcc.account_name       = assetInt.customer_account_name)
      );
  -- Cursor for validating Bill-to Location.
  CURSOR c_bill_to_loc_invalid_cur
  IS
    SELECT assetInt.interface_row_id
    FROM CSE_ASSETS_INT assetInt
    WHERE assetInt.partition_number             = p_partition_number
    AND assetInt.interface_batch_id             = p_batch_id
    AND assetInt.interface_status_code          = C_INT_READY
    AND assetInt.action_code                   IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
    AND (assetInt.customer_account_site_number IS NOT NULL
    OR assetInt.customer_account_site_name     IS NOT NULL )
    AND NOT EXISTS
      (SELECT cust_acct_site_id
      FROM hz_cust_acct_sites_all hcas,
        hz_party_sites hps
      WHERE (hps.party_site_number = assetInt.customer_account_site_number
      OR hps.party_site_name       = assetInt.customer_account_site_name)
      AND hcas.party_site_id       = hps.party_site_id
      AND hcas.cust_account_id     =
        (SELECT custAcc.cust_account_id
        FROM hz_cust_accounts custAcc
        WHERE (custAcc.account_number = assetInt.customer_account_number
        OR custAcc.account_name       = assetInt.customer_account_name)
        )
      );
    -- Cursor for validating Bill-to Location Site
    CURSOR c_bt_loc_site_invalid_cur
    IS
      SELECT assetInt.interface_row_id
      FROM CSE_ASSETS_INT assetInt
      WHERE assetInt.partition_number              = p_partition_number
      AND assetInt.interface_batch_id              = p_batch_id
      AND assetInt.interface_status_code           = C_INT_READY
      AND assetInt.action_code                    IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
      AND assetInt.customer_account_site_use_code IS NOT NULL
      AND NOT EXISTS
        (SELECT custSite.site_use_id customer_account_site_use_id
        FROM hz_cust_site_uses_all custSite
        WHERE custSite.site_use_code   = assetInt.customer_account_site_use_code
        AND custSite.cust_acct_site_id =
          (SELECT cust_acct_site_id
          FROM hz_cust_acct_sites_all hcas,
            hz_party_sites hps
          WHERE (hps.party_site_number = assetInt.customer_account_site_number
          OR hps.party_site_name       = assetInt.customer_account_site_name)
          AND hcas.party_site_id       = hps.party_site_id
          AND hcas.cust_account_id     =
            (SELECT custAcc.cust_account_id
            FROM hz_cust_accounts custAcc
            WHERE (custAcc.account_number = assetInt.customer_account_number
            OR custAcc.account_name       = assetInt.customer_account_name)
            )
          )
        );
      --Cursor to validate if asset being updated is not from 'ORA_CUSTOMER'
      CURSOR c_inv_asset_updt_invalid_cur
      IS
        SELECT assetInt.interface_row_id,
          assetInt.asset_number,
          assetInt.asset_id
        FROM CSE_ASSETS_INT assetInt,
          CSE_ASSETS_B cseb
        WHERE assetInt.partition_number    = p_partition_number
        AND assetInt.interface_batch_id    = p_batch_id
        AND assetInt.interface_status_code = C_INT_READY
        AND assetInt.action_code           = C_UPDATE_ACTION_CODE
        AND cseb.asset_id                  = assetInt.asset_id
        AND cseb.current_location_context <> 'ORA_CUSTOMER';
      -----Cursor for validating Sold_By_Business_Unit_Name
      CURSOR c_sold_by_bu_invalid_cur
      IS
        SELECT assetInt.interface_row_id,
          assetInt.sold_by_business_unit_name
        FROM CSE_ASSETS_INT assetInt
        WHERE assetInt.partition_number          = p_partition_number
        AND assetInt.interface_batch_id          = p_batch_id
        AND assetInt.interface_status_code       = C_INT_READY
        AND assetInt.action_code                IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
        AND assetInt.sold_by_business_unit_name IS NOT NULL
        AND NOT EXISTS
          (SELECT bu_id
          FROM fun_all_business_units_v fabu
          WHERE fabu.bu_id                      =assetInt.sold_by_business_unit_id
          OR assetInt.sold_by_business_unit_id IS NULL
          );
      --- Cursor to set status of rows to error where parent is invalidated on later stage
      CURSOR c_get_invalid_parented_cur
      IS
        SELECT assetInt.interface_row_id,
          CASE
            WHEN assetInt.parent_int_record_number IS NOT NULL
            THEN 'PARENT_INT_RECORD_NUMBER'
            WHEN assetInt.parent_asset_number IS NOT NULL
            THEN 'PARENT_ASSET_NUMBER'
            ELSE 'UNKNOWN'
          END AS PARENT_TYPE
        FROM CSE_ASSETS_INT assetInt
        WHERE assetInt.interface_batch_id      = p_batch_id
        AND assetInt.partition_number          = p_partition_number
        AND assetInt.parent_int_record_number IS NOT NULL
        AND assetInt.relationship_action_code IS NOT NULL
        AND EXISTS
          (SELECT 1
          FROM cse_assets_int assetInt2
          WHERE assetInt2.interface_status_code = C_INT_ERROR
          AND assetInt2.action_code             = C_CREATE_ACTION_CODE
          AND assetInt2.interface_record_number = assetInt.parent_int_record_number
          AND assetInt2.interface_batch_id      = p_batch_id
          );
      l_interfaceTbl cse_int_utils_pvt.interface_row_id_type;
      l_api_name VARCHAR2(300) := 'cse_bulk_import_pvt.bulk_validate_customer_asset';
    BEGIN
      cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
      --Invoke the common asset validation API to perform standard asset validations
      bulk_validate_asset( p_batch_id => p_batch_id, p_partition_number => p_partition_number, x_error_message => x_error_message, x_return_status => x_return_status );
      -- Cursor to validate if customer is valid
      OPEN c_customer_invalid_cur;
      LOOP
        FETCH c_customer_invalid_cur BULK COLLECT
        INTO l_interfaceTbl LIMIT c_max_partition_size;
        EXIT
      WHEN l_interfaceTbl.COUNT = 0;
        log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'CUSTOMER_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CUSTOMER_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
      END LOOP;
      l_interfaceTbl.DELETE;
      CLOSE c_customer_invalid_cur;
      -- Cursor to validate if location customer is valid
      OPEN c_loc_cust_invalid_cur;
      LOOP
        FETCH c_loc_cust_invalid_cur BULK COLLECT
        INTO l_interfaceTbl LIMIT c_max_partition_size;
        EXIT
      WHEN l_interfaceTbl.COUNT = 0;
        log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'CUSTOMER_SITE_PARTY_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CUSTOMER_SITE_PARTY_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
      END LOOP;
      l_interfaceTbl.DELETE;
      CLOSE c_loc_cust_invalid_cur;
      -- Cursor to validate if location is valid
      OPEN c_location_invalid_cur;
      LOOP
        FETCH c_location_invalid_cur BULK COLLECT
        INTO l_interfaceTbl LIMIT c_max_partition_size;
        EXIT
      WHEN l_interfaceTbl.COUNT = 0;
        log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'CUSTOMER_SITE_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CUSTOMER_SITE_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
      END LOOP;
      l_interfaceTbl.DELETE;
      CLOSE c_location_invalid_cur;
      -- Cursor to validate if bill-to customer is valid
      OPEN c_bill_to_invalid_cur;
      LOOP
        FETCH c_bill_to_invalid_cur BULK COLLECT
        INTO l_interfaceTbl LIMIT c_max_partition_size;
        EXIT
      WHEN l_interfaceTbl.COUNT = 0;
        log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'CUSTOMER_ACCOUNT_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CUSTOMER_ACCOUNT_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
      END LOOP;
      l_interfaceTbl.DELETE;
      CLOSE c_bill_to_invalid_cur;
      -- Cursor to validate if bill-to location is valid
      OPEN c_bill_to_loc_invalid_cur;
      LOOP
        FETCH c_bill_to_loc_invalid_cur BULK COLLECT
        INTO l_interfaceTbl LIMIT c_max_partition_size;
        EXIT
      WHEN l_interfaceTbl.COUNT = 0;
        log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'CUSTOMER_ACCOUNT_SITE_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CUSTOMER_ACCOUNT_SITE_NUMBER', x_error_message => x_error_message, x_return_status => x_return_status );
      END LOOP;
      l_interfaceTbl.DELETE;
      CLOSE c_bill_to_loc_invalid_cur;
      -- Cursor to validate if bill-to location site use code is valid
      OPEN c_bt_loc_site_invalid_cur;
      LOOP
        FETCH c_bt_loc_site_invalid_cur BULK COLLECT
        INTO l_interfaceTbl LIMIT c_max_partition_size;
        EXIT
      WHEN l_interfaceTbl.COUNT = 0;
        log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'CUSTOMER_ACCOUNT_SITE_USE_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CUSTOMER_ACCOUNT_SITE_USE_CODE', x_error_message => x_error_message, x_return_status => x_return_status );
      END LOOP;
      l_interfaceTbl.DELETE;
      CLOSE c_bt_loc_site_invalid_cur;
      ---Cursor to validate if Sold By Business Unit  is valid
      FOR c_get_invld_sold_by_rec IN c_sold_by_bu_invalid_cur
      LOOP--
        l_interfaceTbl(1) := c_get_invld_sold_by_rec.interface_row_id;
    --    log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'SOLD_BY_BUSINESS_UNIT_NAME', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_INVALID_SOLDBY_BU', p_message_token_names => 'SOLDBY_BU', p_message_token_values => c_get_invld_sold_by_rec.sold_by_business_unit_name, x_error_message => x_error_message, x_return_status => x_return_status );
          log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'SOLD_BY_BUSINESS_UNIT_NAME', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_INVALID_SOLDBY_BU', p_message_token_names => 'SOLDBY_BU', p_message_token_values => c_get_invld_sold_by_rec.sold_by_business_unit_name, x_error_message => x_error_message, x_return_status => x_return_status );
     l_interfaceTbl.DELETE;
      END LOOP;
      --Validate asset structure attributes
      validate_asset_struc_params( p_batch_id => p_batch_id, p_partition_number => p_partition_number, x_error_message => x_error_message, x_return_status => x_return_status );
      --Update child records with error status whose parents have status as ERROR
      FOR c_get_invalid_parented_rec IN c_get_invalid_parented_cur
      LOOP--
        l_interfaceTbl(1) := c_get_invalid_parented_rec.interface_row_id;
        log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => c_get_invalid_parented_rec.PARENT_TYPE, p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => c_get_invalid_parented_rec.PARENT_TYPE, x_error_message => x_error_message, x_return_status => x_return_status );
        l_interfaceTbl.DELETE;
      END LOOP;
      -- validating if asset being updated is not from ORA_CUSTOMER
      FOR c_get_invld_asset_upd_rec IN c_inv_asset_updt_invalid_cur
      LOOP--
        l_interfaceTbl(1) := c_get_invld_asset_upd_rec.interface_row_id;
        log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSETS_INT_TBL_NAME, p_column_name => 'ASSET_NUMBER', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'CSE_AS_INV_LOC_CUST_ASSET', p_message_token_names => 'ASSET_NUMBER', p_message_token_values => c_get_invld_asset_upd_rec.ASSET_NUMBER, x_error_message => x_error_message, x_return_status => x_return_status );
        l_interfaceTbl.DELETE;
      END LOOP;
      -- All validations are over.
      -- Set the status to valid for those records whose status is not yet Error.
      UPDATE cse_assets_int assetInt
      SET assetInt.interface_status_code  = C_INT_VALID
      WHERE assetInt.interface_batch_id   = p_batch_id
      AND assetInt.partition_number       = p_partition_number
      AND assetInt.interface_status_code <> C_INT_ERROR;
      cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');
    EXCEPTION
    WHEN OTHERS THEN
      x_return_status := fnd_api.g_ret_sts_unexp_error;
      x_error_message := sqlerrm;
      IF (c_customer_invalid_cur%isopen) THEN
        CLOSE c_customer_invalid_cur;
      END IF;
      IF (c_loc_cust_invalid_cur%isopen) THEN
        CLOSE c_loc_cust_invalid_cur;
      END IF;
      IF (c_location_invalid_cur%isopen) THEN
        CLOSE c_location_invalid_cur;
      END IF;
      IF (c_bill_to_invalid_cur%isopen) THEN
        CLOSE c_bill_to_invalid_cur;
      END IF;
      IF (c_bill_to_loc_invalid_cur%isopen) THEN
        CLOSE c_bill_to_loc_invalid_cur;
      END IF;
      IF (c_bt_loc_site_invalid_cur%isopen) THEN
        CLOSE c_bt_loc_site_invalid_cur;
      END IF;
      IF (c_sold_by_bu_invalid_cur%isopen) THEN
        CLOSE c_sold_by_bu_invalid_cur;
      END IF;
      IF (c_inv_asset_updt_invalid_cur%isopen) THEN
        CLOSE c_inv_asset_updt_invalid_cur;
      END IF;
      cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
    END bulk_validate_customer_asset;

/*=============================================================================
          |
          |  DESCRIPTION
          |      This Public API does the following actions:
          |        1. Updates invalid from interface tables
          |
          |  PARAMETERS
          |      Returns x_errbuf and Status code x_retcode back to calling API
          |
          *===========================================================================*/

PROCEDURE validate_item_orgs(
            p_batch_id IN NUMBER,
            x_error_message OUT NOCOPY VARCHAR2,
            x_return_status OUT NOCOPY VARCHAR2)
        IS
          l_int_errors_tbl_type cse_int_utils_pvt.int_errors_tbl_type;
        TYPE l_invalid_items_type
      IS
        TABLE OF cse_assets_int%ROWTYPE INDEX BY PLS_INTEGER;
        l_invalid_items_tbl_type l_invalid_items_type;
        l_row_count    NUMBER;
        l_message_text VARCHAR2(200);
        l_api_name     VARCHAR2(300) := 'cse_bulk_import_pvt.validate_item_orgs';

BEGIN

SELECT casint.* BULK COLLECT
          INTO l_invalid_items_tbl_type
          FROM cse_assets_int casint
          WHERE casint.interface_batch_id =p_batch_id
          AND casint.interface_status_code='READY'
          AND interface_row_id NOT       IN
            (SELECT DISTINCT interface_row_id
            FROM cse_assets_int assetint,
              egp_system_items_vl items,
              inv_org_parameters orgs
            WHERE (items.inventory_item_id  = assetint.item_id
            OR items.item_number            = NVL(assetint.item_number,items.item_number))
            AND (orgs.organization_code     = NVL(assetint.item_organization_code,orgs.organization_code)
            OR orgs.organization_id         = assetint.item_organization_id)
            AND items.organization_id       = orgs.organization_id
            AND assetint.interface_batch_id = p_batch_id
            );
          IF(l_invalid_items_tbl_type.COUNT > 0) THEN
            FORALL i IN l_invalid_items_tbl_type.FIRST .. l_invalid_items_tbl_type.LAST
            UPDATE cse_assets_int casint
            SET casint.interface_status_code = 'ERROR'
            WHERE casint.interface_batch_id  =p_batch_id
            AND interface_row_id             =l_invalid_items_tbl_type(i).interface_row_id;
            FOR i IN l_invalid_items_tbl_type.FIRST..l_invalid_items_tbl_type.LAST
            LOOP
              cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_invalid_items_tbl_type(i).interface_row_id||' Item Organization is not valid');
              l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
              l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
              l_int_errors_tbl_type(l_row_count).object_version_number := 1;
              l_int_errors_tbl_type(l_row_count).interface_row_id      := l_invalid_items_tbl_type(i).interface_row_id;
              l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
              l_int_errors_tbl_type(l_row_count).error_text            := 'MNT_AD_VAL_ITMORG';
              l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
              l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
              l_int_errors_tbl_type(l_row_count).column_name           := 'ITEM_ORGANIZATION_CODE';
              l_int_errors_tbl_type(l_row_count).message_name          := 'MNT_AD_VAL_ITMORG';
              l_int_errors_tbl_type(l_row_count).message_token_names   := 'NUM$ORG_CODE';
              l_int_errors_tbl_type(l_row_count).message_token_values  := l_invalid_items_tbl_type(i).item_number||'$'||l_invalid_items_tbl_type(i).item_organization_code;
              l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
              l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
              l_int_errors_tbl_type(l_row_count).created_by            := l_invalid_items_tbl_type(i).created_by;
              l_int_errors_tbl_type(l_row_count).creation_date         := l_invalid_items_tbl_type(i).creation_date;
              l_int_errors_tbl_type(l_row_count).last_updated_by       := l_invalid_items_tbl_type(i).last_updated_by;
              l_int_errors_tbl_type(l_row_count).last_update_date      := l_invalid_items_tbl_type(i).last_update_date;
              l_int_errors_tbl_type(l_row_count).last_update_login     := l_invalid_items_tbl_type(i).last_update_login;
              l_int_errors_tbl_type(l_row_count).request_id            := l_invalid_items_tbl_type(i).request_id;
              l_int_errors_tbl_type(l_row_count).job_definition_name   := l_invalid_items_tbl_type(i).job_definition_name;
              l_int_errors_tbl_type(l_row_count).job_definition_package:= l_invalid_items_tbl_type(i).job_definition_package;
              l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
              l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
            END LOOP;
            cse_int_utils_pvt.log_errors( l_int_errors_tbl_type, x_return_status , x_error_message );
          END IF;
          COMMIT;
        END;
        x_return_status := fnd_api.g_ret_sts_success;

EXCEPTION
      WHEN OTHERS THEN
        x_return_status := fnd_api.g_ret_sts_unexp_error;
        x_error_message := sqlerrm;
      END validate_item_orgs;

BEGIN
      -- Duplicate Check and Update

BEGIN

UPDATE cse_assets_int casint
        SET casint.interface_status_code = 'ERROR_DUP'
        WHERE casint.interface_batch_id  =p_batch_id
        AND casint.interface_status_code ='VALID'
        AND casint.partition_number      =p_partiton_number
        AND casint.rowid                 >
          (SELECT MIN(casintdup.rowid)
          FROM cse_assets_int casintdup
          WHERE casint.serial_number         =casintdup.serial_number
          AND casint.item_number             =casintdup.item_number
          AND casintdup.interface_status_code='VALID'
          AND casintdup.partition_number     =p_partiton_number
          AND casintdup.interface_batch_id   =p_batch_id
          )
        AND casint.serial_number <> C_NULL_STRING;
        UPDATE cse_assets_int casint
        SET casint.interface_status_code = 'ERROR_DUP_ASSET'
        WHERE casint.interface_batch_id  =p_batch_id
        AND casint.interface_status_code ='VALID'
        AND casint.partition_number      =p_partiton_number
        AND casint.rowid                 >
          (SELECT MIN(casintdup.rowid)
          FROM cse_assets_int casintdup
          WHERE casint.asset_number          =casintdup.asset_number
          AND casintdup.interface_status_code='VALID'
          AND casintdup.partition_number     =p_partiton_number
          AND casintdup.interface_batch_id   =p_batch_id
          );
      END;
      FOR i  IN
      (SELECT *
      FROM cse_assets_int
      WHERE interface_status_code = 'ERROR_DUP'
      AND interface_batch_id      =p_batch_id
      )
      LOOP
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||i.interface_row_id||' Serial is duplicate');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := i.interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_RCRD_VAL';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'SERIAL_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_RCRD_VAL';
        l_int_errors_tbl_type(l_row_count).message_token_names   := 'REC_VALUE';
        l_int_errors_tbl_type(l_row_count).message_token_values  := i.serial_number;
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := i.created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := i.creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := i.last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := i.last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := i.last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := i.request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := i.job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= i.job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END LOOP;
      FOR i  IN
      (SELECT *
      FROM cse_assets_int
      WHERE interface_status_code = 'ERROR_DUP_ASSET'
      AND interface_batch_id      =p_batch_id
      )
      LOOP
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||i.interface_row_id||' Asset is duplicate');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := i.interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_RCRD_VAL';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ASSET_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_RCRD_VAL';
        l_int_errors_tbl_type(l_row_count).message_token_names   := 'REC_VALUE';
        l_int_errors_tbl_type(l_row_count).message_token_values  := i.asset_number;
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := i.created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := i.creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := i.last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := i.last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := i.last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := i.request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := i.job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= i.job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END LOOP;
      cse_int_utils_pvt.log_errors( l_int_errors_tbl_type, x_return_status , x_error_message );
      UPDATE cse_assets_int casint
      SET casint.interface_status_code  = 'ERROR'
      WHERE casint.interface_batch_id   =p_batch_id
      AND casint.interface_status_code IN ('ERROR_DUP','ERROR_DUP_ASSET');
      x_return_status                  := fnd_api.g_ret_sts_success;

EXCEPTION
    WHEN OTHERS THEN
      x_return_status := fnd_api.g_ret_sts_unexp_error;
      x_error_message := sqlerrm;

END validate_duplicate_serials;

PROCEDURE populate_valid_asset_interface(
      p_batch_id         IN NUMBER,
      p_partition_number IN NUMBER,
      x_error_message OUT NOCOPY VARCHAR2,
      x_return_status OUT NOCOPY VARCHAR2)
  IS
    CURSOR c_valid_assets(c_interface_status_code VARCHAR2)
    IS
      SELECT DISTINCT assetintmain.interface_row_id ,
        asset.asset_id ,
        assetintmain.asset_number ,
        assetintmain.new_asset_number ,
        assetintmain.item_number ,
        assetintmain.serial_number ,
        DECODE(assetintmain.action_code,C_CREATE_ACTION_CODE,DECODE(asset.asset_id,NULL,'T','F') ,'T')        AS create_valid ,
        DECODE(assetintmain.action_code,C_CREATE_ACTION_CODE,DECODE(assetserial.asset_id,NULL,'T','F') ,'T')  AS create_valid_serial ,
        DECODE(assetintmain.action_code,C_CREATE_ACTION_CODE,'T',DECODE(asset.asset_id,NULL,'F','T') )        AS upd_del_valid ,
        DECODE(assetintmain.action_code,C_UPDATE_ACTION_CODE,DECODE(newasset.new_asset_id,NULL,'T','F'),'T' ) AS new_asset_valid ,
        asset.gen_object_id ,
        NVL(item.inventory_item_id,asset.item_id) AS inventory_item_id ,
        item.uom_code ,
        NVL(org.organization_id,asset.item_organization_id) AS organization_id ,
        wcorg.location_organization_id ,
        wc.work_center_id ,
        assetintmain.created_by ,
        assetintmain.creation_date ,
        assetintmain.last_updated_by ,
        assetintmain.last_update_date ,
        assetintmain.last_update_login ,
        assetintmain.request_id ,
        assetintmain.job_definition_name ,
        assetintmain.job_definition_package ,
        assetintmain.load_request_id ,
        assetintmain.interface_record_number ,
        DECODE(assetintmain.work_center_code,NULL,'T',DECODE(wc.work_center_id,NULL,'F','T') )                                                                                                                                                                                                                                  AS wc_valid ,
        DECODE(assetintmain.action_code,C_CREATE_ACTION_CODE,DECODE(item.inventory_item_id,NULL,'F','T' ),'T')                                                                                                                                                                                                                  AS item_valid ,
        DECODE(assetintmain.action_code,C_CREATE_ACTION_CODE,DECODE(org.organization_id,NULL,'F','T' ),'T')                                                                                                                                                                                                                     AS org_valid ,
        DECODE(assetintmain.current_location_context,NULL,'T',DECODE(wc.work_center_id,NULL,'T',DECODE(wcorg.location_organization_id,NULL,'F','T' )))                                                                                                                                                                          AS wcorg_valid ,
        DECODE(assetintmain.action_code,C_CREATE_ACTION_CODE,DECODE(wc.inactive_date,NULL,'T',DECODE(SIGN( CAST(wc.inactive_date AS DATE) - CAST(SYSTIMESTAMP AS DATE)),-1,'F','T')),'T')                                                                                                                                       AS wcactvdate_valid ,
        DECODE(wc.work_center_id,NULL,'ORA_UNKNOWN',DECODE(wcorg.location_organization_id,NULL,'ORA_UNKNOWN','ORA_WORK_CENTER' ))                                                                                                                                                                                               AS current_location_context ,
        DECODE(assetintmain.dflt_wo_sub_type,NULL,'T',DECODE(mntwosubtype.dflt_wo_sub_type,NULL,DECODE(assetintmain.dflt_wo_sub_type,C_NULL_STRING,'T','F'),'T') )                                                                                                                                                              AS wo_sub_type_valid ,
        DECODE(assetintmain.dflt_wo_type,NULL,'T',DECODE(mntwotype.dflt_wo_type,NULL,DECODE(assetintmain.dflt_wo_type,C_NULL_STRING,'T','F'),'T') )                                                                                                                                                                             AS wo_type_valid ,
        DECODE(assetintmain.action_code,C_UPDATE_ACTION_CODE,DECODE(assetintmain.active_end_date,NULL,'T',DECODE(woenddt.work_order_number,NULL,'T','F') ),'T')                                                                                                                                                                 AS woenddt_valid ,
        DECODE(assetintmain.action_code,C_UPDATE_ACTION_CODE,DECODE(assetintmain.active_end_date,NULL,'T',DECODE(assetintmain.active_end_date,FND_API.G_NULL_DATE,'T',DECODE((SIGN( CAST(assetintmain.active_end_date AS DATE) - CAST(NVL(woenddt.work_order_date,assetintmain.active_end_date) AS DATE)) ),-1,'F','T' ))),'T') AS enddt_valid ,
        DECODE(assetintmain.action_code,C_CREATE_ACTION_CODE,DECODE(assetintmain.active_end_date,NULL,'T',DECODE(assetintmain.active_end_date,FND_API.G_NULL_DATE,'T',DECODE(SIGN( TRUNC(assetintmain.active_end_date)         - TRUNC(SYSTIMESTAMP)),-1,'F','T'))),'T')                                                        AS assetenddt_valid
      FROM
        (SELECT orgs.organization_id ,
          assetint.interface_row_id
        FROM inv_org_parameters orgs,
          cse_assets_int assetint
        WHERE ( orgs.organization_code  = assetint.item_organization_code
        OR orgs.organization_id         = assetint.item_organization_id )
        AND assetint.partition_number   = p_partition_number
        AND assetint.interface_batch_id = p_batch_id
        ) org,
      (SELECT orgs.organization_id location_organization_id,
        assetint.interface_row_id
      FROM inv_org_parameters orgs,
        cse_assets_int assetint
      WHERE ( orgs.organization_code  = assetint.location_organization_code
      OR orgs.organization_id         = assetint.location_organization_id )
      AND assetint.partition_number   = p_partition_number
      AND assetint.interface_batch_id = p_batch_id
      ) wcorg,
      (SELECT wcs.work_center_id ,
        wcs.organization_id ,
        assetint.interface_row_id ,
        wcs.inactive_date
      FROM wis_work_centers_vl wcs,
        cse_assets_int assetint
      WHERE (wcs.work_center_code     = assetint.work_center_code
      OR wcs.work_center_id           = assetint.work_center_id )
      AND assetint.partition_number   = p_partition_number
      AND assetint.interface_batch_id = p_batch_id
      ) wc,
      (SELECT items.inventory_item_id ,
        items.organization_id ,
        items.primary_uom_code uom_code ,
        assetint.interface_row_id
      FROM egp_system_items_vl items,
        cse_assets_int assetint
      WHERE (items.inventory_item_id          = assetint.item_id
      OR items.item_number                    = assetint.item_number)
      AND assetint.partition_number           = p_partition_number
      AND assetint.interface_batch_id         = p_batch_id
      AND items.asset_tracked_flag            ='Y'
      AND items.allow_maintenance_asset_flag  ='Y'
      AND ( items.serial_number_control_code IN ( 2,5,6)
      OR items.lot_control_code               =2 )
      )item,
      (SELECT assets.asset_id ,
        assets.asset_number ,
        assets.gen_object_id ,
        assetint.interface_row_id ,
        assets.item_id ,
        assets.item_organization_id ,
        assets.active_end_date
      FROM cse_assets_b assets,
        cse_assets_int assetint
      WHERE assetint.serial_number IS NOT NULL
      AND assets.serial_number      = assetint.serial_number
      AND EXISTS
        (SELECT 1
        FROM egp_system_items egp
        WHERE egp.item_number     = assetint.item_number
        AND egp.organization_id   = assets.item_organization_id
        AND egp.inventory_item_id = assets.item_id
        )
      AND assetint.partition_number   = p_partition_number
      AND assetint.interface_batch_id = p_batch_id
      ) assetserial,
      (SELECT assets.asset_id ,
        assets.asset_number ,
        assets.gen_object_id ,
        assetint.interface_row_id ,
        assets.item_id ,
        assets.item_organization_id ,
        assets.active_end_date
      FROM cse_assets_b assets,
        cse_assets_int assetint
      WHERE assetint.asset_number    IS NOT NULL
      AND assets.asset_number         = assetint.asset_number
      AND assetint.partition_number   = p_partition_number
      AND assetint.interface_batch_id = p_batch_id
      ) asset,
      (SELECT assets.asset_id new_asset_id ,
        assets.asset_number new_asset_number ,
        assetint.interface_row_id
      FROM cse_assets_b assets,
        cse_assets_int assetint
      WHERE assetint.new_asset_number IS NOT NULL
      AND assets.asset_number          = assetint.new_asset_number
      AND assetint.partition_number    = p_partition_number
      AND assetint.interface_batch_id  = p_batch_id
      AND assetint.action_code         = C_UPDATE_ACTION_CODE
      ) newasset,
      (SELECT assetint.interface_row_id ,
        lookups.lookup_code dflt_wo_type
      FROM fnd_lookups lookups,
        cse_assets_int assetint
      WHERE assetint.dflt_wo_type     = lookups.meaning
      AND lookups.lookup_type         = 'ORA_MNT_WO_TYPE'
      AND assetint.partition_number   = p_partition_number
      AND assetint.interface_batch_id = p_batch_id
      ) mntwotype,
      (SELECT assetint.interface_row_id ,
        lookups.lookup_code dflt_wo_sub_type
      FROM fnd_lookups lookups,
        cse_assets_int assetint
      WHERE upper(assetint.dflt_wo_sub_type) = upper(lookups.meaning)
      AND lookups.lookup_type                = 'ORA_MNT_WO_SUB_TYPE'
      AND assetint.partition_number          = p_partition_number
      AND assetint.interface_batch_id        = p_batch_id
      ) mntwosubtype,
      (SELECT assetint.interface_row_id ,
        MAX(
        CASE workorderpeo.work_order_status_id
          WHEN 10000
          THEN NULL
          WHEN 10001
          THEN NULL
          WHEN 10002
          THEN workorderpeo.work_order_number
          WHEN 10003
          THEN workorderpeo.work_order_number
          WHEN 10004
          THEN workorderpeo.work_order_number
          WHEN 10005
          THEN workorderpeo.work_order_number
        END ) work_order_number ,
        MAX(
        CASE workorderpeo.work_order_status_id
          WHEN 10000
          THEN workorderpeo.canceled_date
          WHEN 10001
          THEN workorderpeo.closed_date
          WHEN 10002
          THEN NULL
          WHEN 10003
          THEN NULL
          WHEN 10004
          THEN NULL
          WHEN 10005
          THEN NULL
        END ) work_order_date
      FROM cse_assets_int assetint,
        wie_wo_assets workorderassetpeo,
        wie_work_orders_vl workorderpeo,
        cse_assets_b assetsb,
        egp_system_items egp
      WHERE workorderassetpeo.work_order_id = workorderpeo.work_order_id
      AND workorderpeo.work_order_status_id BETWEEN 10000 AND 10005
      AND workorderassetpeo.asset_id = assetsb.asset_id
      AND ( assetint.asset_number    = assetsb.asset_number
      OR assetint.serial_number      = assetsb.serial_number)
      AND egp.item_number            = assetint.item_number
      AND egp.organization_id        = assetsb.item_organization_id
      AND egp.inventory_item_id      = assetsb.item_id
      AND assetint.active_end_date  IS NOT NULL
      GROUP BY assetint.interface_row_id
      ) woenddt,
      cse_assets_int assetintmain
    WHERE (assetintmain.interface_row_id  = asset.interface_row_id(+) )
    AND (assetintmain.interface_row_id    = assetserial.interface_row_id(+) )
    AND (assetintmain.interface_row_id    = item.interface_row_id(+)
    AND ( item.organization_id            = org.organization_id
    OR item.organization_id              IS NULL
    OR org.organization_id               IS NULL))
    AND (assetintmain.interface_row_id    = wc.interface_row_id(+)
    AND ( wc.organization_id              = wcorg.location_organization_id
    OR wc.organization_id                IS NULL))
    AND assetintmain.interface_row_id     = org.interface_row_id(+)
    AND assetintmain.interface_row_id     = wcorg.interface_row_id(+)
    AND assetintmain.interface_row_id     = mntwotype.interface_row_id(+)
    AND assetintmain.interface_row_id     = mntwosubtype.interface_row_id(+)
    AND assetintmain.interface_row_id     = newasset.interface_row_id(+)
    AND assetintmain.interface_row_id     = woenddt.interface_row_id(+)
    AND assetintmain.partition_number     = p_partition_number
    AND assetintmain.interface_batch_id   = p_batch_id
    AND assetintmain.interface_status_code= c_interface_status_code;
    CURSOR c_update_partlist(c_interface_status_code VARCHAR2)
    IS
      SELECT cseint.asset_id,
        cseint.interface_record_number
      FROM cse_assets_int cseint
      WHERE cseint.partition_number   = p_partition_number
      AND cseint.interface_batch_id   = p_batch_id
      AND cseint.interface_status_code= c_interface_status_code;
    l_api_name VARCHAR2(300)         := 'cse_bulk_import_pvt.populate_valid_asset_interface';
  TYPE l_valid_assets_tbl_type
IS
  TABLE OF c_valid_assets%ROWTYPE;
TYPE l_upd_partlist_tbl_type
IS
  TABLE OF c_update_partlist%ROWTYPE;
  l_valid_assets_tbl l_valid_assets_tbl_type;
  l_upd_partlist_tbl l_upd_partlist_tbl_type;
  l_error_assets_tbl l_valid_assets_tbl_type;
  l_int_errors_tbl_type cse_int_utils_pvt.int_errors_tbl_type;
  l_row_count    NUMBER;
  l_message_text VARCHAR2(2000);

BEGIN

x_return_status := fnd_api.g_ret_sts_success;
  UPDATE cse_assets_int cseint
  SET cseint.dflt_wo_type          = NULL
  WHERE upper(cseint.dflt_wo_type) = C_NULL_STRING
  AND cseint.action_code           = C_CREATE_ACTION_CODE
  AND cseint.partition_number      = p_partition_number
  AND cseint.interface_batch_id    = p_batch_id;
  UPDATE cse_assets_int cseint
  SET cseint.dflt_wo_sub_type          = NULL
  WHERE upper(cseint.dflt_wo_sub_type) = C_NULL_STRING
  AND cseint.action_code               = C_CREATE_ACTION_CODE
  AND cseint.partition_number          = p_partition_number
  AND cseint.interface_batch_id        = p_batch_id;
  UPDATE cse_assets_int cseint
  SET active_end_date           = DECODE(active_end_date,FND_API.G_NULL_DATE,DECODE(action_code, C_CREATE_ACTION_CODE, NULL,active_end_date), cse_bulk_import_pvt.utc_to_usertimezone(active_end_date))
  WHERE active_end_date        IS NOT NULL
  AND cseint.partition_number   = p_partition_number
  AND cseint.interface_batch_id = p_batch_id;
  UPDATE cse_assets_int cseint
  SET cseint.lot_number          = NULL
  WHERE upper(cseint.lot_number) = C_NULL_STRING
  AND cseint.action_code         = C_CREATE_ACTION_CODE
  AND cseint.partition_number    = p_partition_number
  AND cseint.interface_batch_id  = p_batch_id;
  UPDATE cse_assets_int cseint
  SET cseint.serial_number          = NULL
  WHERE upper(cseint.serial_number) = C_NULL_STRING
  AND cseint.action_code            = C_CREATE_ACTION_CODE
  AND cseint.partition_number       = p_partition_number
  AND cseint.interface_batch_id     = p_batch_id;
  OPEN c_valid_assets(C_INT_READY);
  FETCH c_valid_assets BULK COLLECT INTO l_valid_assets_tbl;
  CLOSE c_valid_assets;
  FORALL i IN l_valid_assets_tbl.FIRST..l_valid_assets_tbl.LAST
  UPDATE cse_assets_int assetintupd
  SET assetintupd.item_organization_id   = NVL(to_number(l_valid_assets_tbl(i).organization_id),assetintupd.item_organization_id) ,
    assetintupd.location_organization_id = to_number(DECODE(l_valid_assets_tbl(i).current_location_context,'ORA_WORK_CENTER',l_valid_assets_tbl(i).location_organization_id,NULL)) ,
    assetintupd.item_id                  = NVL(to_number(l_valid_assets_tbl(i).inventory_item_id),assetintupd.item_id) ,
    assetintupd.uom_code                 = l_valid_assets_tbl(i).uom_code ,
    assetintupd.quantity                 = to_number(NVL(assetintupd.quantity,1)) ,
    assetintupd.asset_id                 = to_number(DECODE(assetintupd.action_code,C_CREATE_ACTION_CODE,DECODE(l_valid_assets_tbl(i).asset_id,NULL,cse_asset_numbers_s.NEXTVAL,l_valid_assets_tbl(i).asset_id) ,l_valid_assets_tbl(i).asset_id)) ,
    assetintupd.asset_number             = NVL(assetintupd.asset_number,l_valid_assets_tbl(i).asset_number) ,
    assetintupd.gen_object_id            = to_number(DECODE(assetintupd.action_code,C_CREATE_ACTION_CODE,DECODE(l_valid_assets_tbl(i).asset_id,NULL,cse_int_s.NEXTVAL,l_valid_assets_tbl(i).gen_object_id) ,l_valid_assets_tbl(i).gen_object_id)) ,
    assetintupd.work_center_id           = to_number(DECODE(l_valid_assets_tbl(i).current_location_context,'ORA_WORK_CENTER',l_valid_assets_tbl(i).work_center_id,NULL)) ,
    assetintupd.current_location_context = DECODE(assetintupd.current_location_context,NULL,NULL,l_valid_assets_tbl(i).current_location_context) ,
    assetintupd.interface_status_code    = DECODE(l_valid_assets_tbl(i).create_valid
    ||l_valid_assets_tbl(i).upd_del_valid
    ||l_valid_assets_tbl(i).wc_valid
    ||l_valid_assets_tbl(i).item_valid
    ||l_valid_assets_tbl(i).org_valid
    ||l_valid_assets_tbl(i).wcorg_valid
    ||l_valid_assets_tbl(i).wo_type_valid
    ||l_valid_assets_tbl(i).wo_sub_type_valid
    ||l_valid_assets_tbl(i).new_asset_valid
    ||l_valid_assets_tbl(i).woenddt_valid
    ||l_valid_assets_tbl(i).enddt_valid
    ||l_valid_assets_tbl(i).assetenddt_valid
    ||l_valid_assets_tbl(i).wcactvdate_valid
    ||l_valid_assets_tbl(i).create_valid_serial, 'TTTTTTTTTTTTTT','VALID','ERROR')
  WHERE assetintupd.interface_row_id = to_number(l_valid_assets_tbl(i).interface_row_id );
  OPEN c_update_partlist('VALID');
  FETCH c_update_partlist BULK COLLECT INTO l_upd_partlist_tbl;
  CLOSE c_update_partlist;
  FORALL i IN l_upd_partlist_tbl.FIRST..l_upd_partlist_tbl.LAST
  UPDATE cse_parts_list_components_int assetintupd
  SET assetintupd.asset_id                  = l_upd_partlist_tbl(i).asset_id
  WHERE assetintupd.interface_record_number = l_upd_partlist_tbl(i).interface_record_number;
  OPEN c_valid_assets(C_INT_ERROR);
  FETCH c_valid_assets BULK COLLECT INTO l_error_assets_tbl;
  CLOSE c_valid_assets;
  IF l_error_assets_tbl.COUNT > 0 THEN
    FORALL i IN l_error_assets_tbl.FIRST..l_error_assets_tbl.LAST
    UPDATE cse_parts_list_components_int assetintupd
    SET assetintupd.interface_status_code     = 'ERROR'
    WHERE assetintupd.interface_record_number = l_error_assets_tbl(i).interface_record_number ;
    FOR i IN l_error_assets_tbl.FIRST..l_error_assets_tbl.LAST
    LOOP
      IF l_error_assets_tbl(i).create_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Action Code Selected is CREATE but Asset already exists');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_RCRD_VAL';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ASSET_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_RCRD_VAL';
        l_int_errors_tbl_type(l_row_count).message_token_names   := 'REC_VALUE';
        l_int_errors_tbl_type(l_row_count).message_token_values  := l_error_assets_tbl(i).asset_number;
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).create_valid_serial <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Action Code Selected is CREATE but Asset already exists');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'CSE_AS_DUPLICATE_SER_NUM';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'SERIAL_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'CSE_AS_DUPLICATE_SER_NUM';
        l_int_errors_tbl_type(l_row_count).message_token_names   := 'ITEM_NUM$SER_NUM';
        l_int_errors_tbl_type(l_row_count).message_token_values  := l_error_assets_tbl(i).item_number||'$'||l_error_assets_tbl(i).serial_number;
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).upd_del_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Action Code Selected is UPDATE but Asset does not exists');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ASSET_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'ASSET_NUMBER';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).wc_valid <> 'T' OR l_error_assets_tbl(i).wcactvdate_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Work Center is not valid');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'WORK_CENTER_CODE';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'WORK_CENTER_CODE';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).item_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Item is not valid');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ITEM_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'ITEM_NUMBER';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).org_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Item Organization is not valid');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ORGANIZATION_CODE';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'ORGANIZATION_CODE';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).wcorg_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Work Center Organization is not valid');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'LOCATION_ORGANIZATION_CODE';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'LOCATION_ORGANIZATION_CODE';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).wo_type_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Work Order Type is not valid');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'DFLT_WO_TYPE';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'DFLT_WO_TYPE';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).wo_sub_type_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Work Order Sub-Type is not valid');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'DFLT_WO_SUB_TYPE';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'DFLT_WO_SUB_TYPE';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).new_asset_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' New asset number already exists.');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ASSET_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'ASSET_NUMBER';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).woenddt_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Open Work Order exists for asset. ');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'MNT_AD_NO_OPN_WOS_FR_ENDT';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ACTIVE_END_DATE';
        l_int_errors_tbl_type(l_row_count).message_name          := 'MNT_AD_NO_OPN_WOS_FR_ENDT';
        l_int_errors_tbl_type(l_row_count).message_token_names   := NULL;
        l_int_errors_tbl_type(l_row_count).message_token_values  := NULL;
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).enddt_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Active End Date Cannot be less than last closed/cancelled Work Order .');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'CSE_AS_END_DATE_CLS_WO';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ACTIVE_END_DATE';
        l_int_errors_tbl_type(l_row_count).message_name          := 'CSE_AS_END_DATE_CLS_WO';
        l_int_errors_tbl_type(l_row_count).message_token_names   := NULL;
        l_int_errors_tbl_type(l_row_count).message_token_values  := NULL;
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_error_assets_tbl(i).assetenddt_valid <> 'T' THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'interface_row_id= '||l_error_assets_tbl(i).interface_row_id||' Active End Date provided for already expired Asset .');
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_error_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'CSE_AS_END_DATE_UPD1';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ACTIVE_END_DATE';
        l_int_errors_tbl_type(l_row_count).message_name          := 'CSE_AS_END_DATE_UPD1';
        l_int_errors_tbl_type(l_row_count).message_token_names   := NULL;
        l_int_errors_tbl_type(l_row_count).message_token_values  := NULL;
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := 'E';
        l_int_errors_tbl_type(l_row_count).created_by            := l_error_assets_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_error_assets_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_error_assets_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_error_assets_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_error_assets_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_error_assets_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_error_assets_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_error_assets_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
    END LOOP;
    cse_int_utils_pvt.log_errors( l_int_errors_tbl_type, x_return_status , x_error_message );
  END IF;
  COMMIT;

EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  IF c_valid_assets%ISOPEN THEN
    CLOSE c_valid_assets;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END populate_valid_asset_interface;

BEGIN

x_return_status := fnd_api.g_ret_sts_success;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'In API '||l_api_name);
  OPEN c_valid_partLists(C_INT_READY);
  FETCH c_valid_partLists BULK COLLECT INTO l_valid_partLists_tbl;
  CLOSE c_valid_partLists;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' PartLists Records to Process '||l_valid_partLists_tbl.count);
  FORALL i IN l_valid_partLists_tbl.FIRST..l_valid_partLists_tbl.LAST
  UPDATE cse_parts_list_components_int assetintupd
  SET assetintupd.item_organization_id = to_number(l_valid_partLists_tbl(i).organization_id) ,
    assetintupd.item_id                = to_number(l_valid_partLists_tbl(i).inventory_item_id) ,
    assetintupd.asset_id               = to_number(l_valid_partLists_tbl(i).asset_id) ,
    assetintupd.asset_number           = l_valid_partLists_tbl(i).asset_number ,
    assetintupd.component_quantity     = to_number(NVL(assetintupd.component_quantity , 1)) ,
    assetintupd.list_component_id      = to_number(DECODE(assetintupd.action_code,C_CREATE_ACTION_CODE,DECODE(l_valid_partLists_tbl(i).list_component_id,NULL,cse_int_s.NEXTVAL,l_valid_partLists_tbl(i).list_component_id) ,l_valid_partLists_tbl(i).list_component_id)) ,
    assetintupd.interface_status_code  = DECODE(l_valid_partLists_tbl(i).create_valid
    ||l_valid_partLists_tbl(i).upd_del_valid
    ||l_valid_partLists_tbl(i).item_valid
    ||l_valid_partLists_tbl(i).org_valid, 'TTTT','VALID','ERROR')
  WHERE assetintupd.interface_row_id = l_valid_partLists_tbl(i).interface_row_id ;
  l_valid_partLists_tbl             := l_reset_partLists_tbl;
  OPEN c_valid_partLists(C_INT_ERROR);
  FETCH c_valid_partLists BULK COLLECT INTO l_valid_partLists_tbl;
  CLOSE c_valid_partLists;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' PartLists Records in Error '||l_valid_partLists_tbl.count);
  IF l_valid_partLists_tbl.COUNT >0 THEN
    FOR i IN l_valid_partLists_tbl.FIRST..l_valid_partLists_tbl.LAST
    LOOP
      IF l_valid_partLists_tbl(i).create_valid                   <> 'T' THEN
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_valid_partLists_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_PARTS_LIST_COMPONENTS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ITEM_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := l_valid_partLists_tbl(i).item_number;
        l_int_errors_tbl_type(l_row_count).program_name          := 'cse_bulk_import_pvt.populate_partList_interface';
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_valid_partLists_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_valid_partLists_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_valid_partLists_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_valid_partLists_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_valid_partLists_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_valid_partLists_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_valid_partLists_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_valid_partLists_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_valid_partLists_tbl(i).upd_del_valid                  <> 'T' THEN
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_valid_partLists_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_PARTS_LIST_COMPONENTS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ASSET_ID';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'ASSET_ID';
        l_int_errors_tbl_type(l_row_count).program_name          := 'cse_bulk_import_pvt.populate_partList_interface';
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_valid_partLists_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_valid_partLists_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_valid_partLists_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_valid_partLists_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_valid_partLists_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_valid_partLists_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_valid_partLists_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_valid_partLists_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_valid_partLists_tbl(i).item_valid                     <> 'T' THEN
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_valid_partLists_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_PARTS_LIST_COMPONENTS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ITEM_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'ITEM_NUMBER';
        l_int_errors_tbl_type(l_row_count).program_name          := 'cse_bulk_import_pvt.populate_partList_interface';
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_valid_partLists_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_valid_partLists_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_valid_partLists_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_valid_partLists_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_valid_partLists_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_valid_partLists_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_valid_partLists_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_valid_partLists_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
      IF l_valid_partLists_tbl(i).org_valid                      <> 'T' THEN
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_valid_partLists_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_PARTS_LIST_COMPONENTS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'ITEM_ORGANIZATION_CODE';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'ITEM_ORGANIZATION_CODE';
        l_int_errors_tbl_type(l_row_count).program_name          := 'cse_bulk_import_pvt.populate_partList_interface';
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := l_valid_partLists_tbl(i).created_by;
        l_int_errors_tbl_type(l_row_count).creation_date         := l_valid_partLists_tbl(i).creation_date;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := l_valid_partLists_tbl(i).last_updated_by;
        l_int_errors_tbl_type(l_row_count).last_update_date      := l_valid_partLists_tbl(i).last_update_date;
        l_int_errors_tbl_type(l_row_count).last_update_login     := l_valid_partLists_tbl(i).last_update_login;
        l_int_errors_tbl_type(l_row_count).request_id            := l_valid_partLists_tbl(i).request_id;
        l_int_errors_tbl_type(l_row_count).job_definition_name   := l_valid_partLists_tbl(i).job_definition_name;
        l_int_errors_tbl_type(l_row_count).job_definition_package:= l_valid_partLists_tbl(i).job_definition_package;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
      END IF;
    END LOOP;
    cse_int_utils_pvt.log_errors( l_int_errors_tbl_type, x_return_status , x_error_message );
  END IF;

EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  IF c_valid_partLists%ISOPEN THEN
    CLOSE c_valid_partLists;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END populate_partList_interface;

BEGIN

x_return_status := fnd_api.g_ret_sts_success;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' In API '||l_api_name);
  OPEN c_manage_partList(C_DELETE_ACTION_CODE);
  FETCH c_manage_partList BULK COLLECT INTO l_manage_partList_tbl;
  CLOSE c_manage_partList;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Part List records to Delete '||l_manage_partList_tbl.count);
  FORALL i IN l_manage_partList_tbl.FIRST..l_manage_partList_tbl.LAST
  DELETE cse_parts_list_components assetparts
  WHERE assetparts.list_component_id = l_manage_partList_tbl(i).list_component_id;
  FORALL i IN l_manage_partList_tbl.FIRST..l_manage_partList_tbl.LAST
  DELETE cse_parts_list_components_int assetpartsint
  WHERE assetpartsint.list_component_id = l_manage_partList_tbl(i).list_component_id;
  l_manage_partList_tbl                := l_reset_partList_tbl ;
  OPEN c_manage_partList(C_UPDATE_ACTION_CODE);
  FETCH c_manage_partList BULK COLLECT INTO l_manage_partList_tbl;
  CLOSE c_manage_partList;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Part List records to Update '||l_manage_partList_tbl.count);
  FORALL i IN l_manage_partList_tbl.FIRST..l_manage_partList_tbl.LAST
  UPDATE cse_parts_list_components assetparts
  SET object_version_number          = object_version_number +1,
    asset_id                         = l_manage_partList_tbl(i).asset_id,
    item_organization_id             = NVL(l_manage_partList_tbl(i).item_organization_id,item_organization_id),
    item_id                          = NVL(l_manage_partList_tbl(i).item_id,item_id),
    component_quantity               = l_manage_partList_tbl(i).component_quantity,
    attribute_category               = l_manage_partList_tbl(i).attribute_category,
    attribute_char1                  = l_manage_partList_tbl(i).attribute_char1,
    attribute_char2                  = l_manage_partList_tbl(i).attribute_char2,
    attribute_char3                  = l_manage_partList_tbl(i).attribute_char3,
    attribute_char4                  = l_manage_partList_tbl(i).attribute_char4,
    attribute_char5                  = l_manage_partList_tbl(i).attribute_char5,
    attribute_char6                  = l_manage_partList_tbl(i).attribute_char6,
    attribute_char7                  = l_manage_partList_tbl(i).attribute_char7,
    attribute_char8                  = l_manage_partList_tbl(i).attribute_char8,
    attribute_char9                  = l_manage_partList_tbl(i).attribute_char9,
    attribute_char10                 = l_manage_partList_tbl(i).attribute_char10,
    attribute_char11                 = l_manage_partList_tbl(i).attribute_char11,
    attribute_char12                 = l_manage_partList_tbl(i).attribute_char12,
    attribute_char13                 = l_manage_partList_tbl(i).attribute_char13,
    attribute_char14                 = l_manage_partList_tbl(i).attribute_char14,
    attribute_char15                 = l_manage_partList_tbl(i).attribute_char15,
    attribute_char16                 = l_manage_partList_tbl(i).attribute_char16,
    attribute_char17                 = l_manage_partList_tbl(i).attribute_char17,
    attribute_char18                 = l_manage_partList_tbl(i).attribute_char18,
    attribute_char19                 = l_manage_partList_tbl(i).attribute_char19,
    attribute_char20                 = l_manage_partList_tbl(i).attribute_char20,
    attribute_number1                = l_manage_partList_tbl(i).attribute_number1,
    attribute_number2                = l_manage_partList_tbl(i).attribute_number2,
    attribute_number3                = l_manage_partList_tbl(i).attribute_number3,
    attribute_number4                = l_manage_partList_tbl(i).attribute_number4,
    attribute_number5                = l_manage_partList_tbl(i).attribute_number5,
    attribute_number6                = l_manage_partList_tbl(i).attribute_number6,
    attribute_number7                = l_manage_partList_tbl(i).attribute_number7,
    attribute_number8                = l_manage_partList_tbl(i).attribute_number8,
    attribute_number9                = l_manage_partList_tbl(i).attribute_number9,
    attribute_number10               = l_manage_partList_tbl(i).attribute_number10,
    attribute_date1                  = l_manage_partList_tbl(i).attribute_date1,
    attribute_date2                  = l_manage_partList_tbl(i).attribute_date2,
    attribute_date3                  = l_manage_partList_tbl(i).attribute_date3,
    attribute_date4                  = l_manage_partList_tbl(i).attribute_date4,
    attribute_date5                  = l_manage_partList_tbl(i).attribute_date5,
    attribute_timestamp1             = l_manage_partList_tbl(i).attribute_timestamp1,
    attribute_timestamp2             = l_manage_partList_tbl(i).attribute_timestamp2,
    attribute_timestamp3             = l_manage_partList_tbl(i).attribute_timestamp3,
    attribute_timestamp4             = l_manage_partList_tbl(i).attribute_timestamp4,
    attribute_timestamp5             = l_manage_partList_tbl(i).attribute_timestamp5,
    last_updated_by                  = l_manage_partList_tbl(i).last_updated_by,
    last_update_date                 = l_manage_partList_tbl(i).last_update_date,
    last_update_login                = l_manage_partList_tbl(i).last_update_login,
    request_id                       = l_manage_partList_tbl(i).request_id,
    job_definition_name              = l_manage_partList_tbl(i).job_definition_name,
    job_definition_package           = l_manage_partList_tbl(i).job_definition_package
  WHERE assetparts.list_component_id = l_manage_partList_tbl(i).list_component_id;
  FORALL i IN l_manage_partList_tbl.FIRST..l_manage_partList_tbl.LAST
  DELETE cse_parts_list_components_int assetpartsint
  WHERE assetpartsint.list_component_id = l_manage_partList_tbl(i).list_component_id;
  INSERT
  INTO cse_parts_list_components
    (
      list_component_id,
      object_version_number,
      asset_id,
      item_organization_id,
      item_id,
      item_revision,
      component_quantity,
      attribute_category,
      attribute_char1,
      attribute_char2,
      attribute_char3,
      attribute_char4,
      attribute_char5,
      attribute_char6,
      attribute_char7,
      attribute_char8,
      attribute_char9,
      attribute_char10,
      attribute_char11,
      attribute_char12,
      attribute_char13,
      attribute_char14,
      attribute_char15,
      attribute_char16,
      attribute_char17,
      attribute_char18,
      attribute_char19,
      attribute_char20,
      attribute_number1,
      attribute_number2,
      attribute_number3,
      attribute_number4,
      attribute_number5,
      attribute_number6,
      attribute_number7,
      attribute_number8,
      attribute_number9,
      attribute_number10,
      attribute_date1,
      attribute_date2,
      attribute_date3,
      attribute_date4,
      attribute_date5,
      attribute_timestamp1,
      attribute_timestamp2,
      attribute_timestamp3,
      attribute_timestamp4,
      attribute_timestamp5,
      created_by,
      creation_date,
      last_updated_by,
      last_update_date,
      last_update_login,
      request_id,
      job_definition_name,
      job_definition_package
    )
    (SELECT assetpartsint.list_component_id ,
        1 object_version_number ,
        assetpartsint.asset_id ,
        assetpartsint.item_organization_id ,
        assetpartsint.item_id ,
        NULL item_revision ,
        assetpartsint.component_quantity ,
        assetpartsint.attribute_category ,
        assetpartsint.attribute_char1 ,
        assetpartsint.attribute_char2 ,
        assetpartsint.attribute_char3 ,
        assetpartsint.attribute_char4 ,
        assetpartsint.attribute_char5 ,
        assetpartsint.attribute_char6 ,
        assetpartsint.attribute_char7 ,
        assetpartsint.attribute_char8 ,
        assetpartsint.attribute_char9 ,
        assetpartsint.attribute_char10 ,
        assetpartsint.attribute_char11 ,
        assetpartsint.attribute_char12 ,
        assetpartsint.attribute_char13 ,
        assetpartsint.attribute_char14 ,
        assetpartsint.attribute_char15 ,
        assetpartsint.attribute_char16 ,
        assetpartsint.attribute_char17 ,
        assetpartsint.attribute_char18 ,
        assetpartsint.attribute_char19 ,
        assetpartsint.attribute_char20 ,
        assetpartsint.attribute_number1 ,
        assetpartsint.attribute_number2 ,
        assetpartsint.attribute_number3 ,
        assetpartsint.attribute_number4 ,
        assetpartsint.attribute_number5 ,
        assetpartsint.attribute_number6 ,
        assetpartsint.attribute_number7 ,
        assetpartsint.attribute_number8 ,
        assetpartsint.attribute_number9 ,
        assetpartsint.attribute_number10 ,
        assetpartsint.attribute_date1 ,
        assetpartsint.attribute_date2 ,
        assetpartsint.attribute_date3 ,
        assetpartsint.attribute_date4 ,
        assetpartsint.attribute_date5 ,
        assetpartsint.attribute_timestamp1 ,
        assetpartsint.attribute_timestamp2 ,
        assetpartsint.attribute_timestamp3 ,
        assetpartsint.attribute_timestamp4 ,
        assetpartsint.attribute_timestamp5 ,
        assetpartsint.created_by ,
        assetpartsint.creation_date ,
        assetpartsint.last_updated_by ,
        assetpartsint.last_update_date ,
        assetpartsint.last_update_login ,
        assetpartsint.request_id ,
        assetpartsint.job_definition_name ,
        assetpartsint.job_definition_package
      FROM cse_parts_list_components_int assetpartsint
      WHERE assetpartsint.partition_number    = p_partition_number
      AND assetpartsint.interface_batch_id    = p_batch_id
      AND assetpartsint.action_code           = C_CREATE_ACTION_CODE
      AND assetpartsint.interface_status_code = 'VALID'
    );
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Part List records to Created '||SQL%ROWCOUNT);
  DELETE
  FROM cse_parts_list_components_int assetpartsint
  WHERE assetpartsint.partition_number    = p_partition_number
  AND assetpartsint.interface_batch_id    = p_batch_id
  AND assetpartsint.action_code           = C_CREATE_ACTION_CODE
  AND assetpartsint.interface_status_code = 'VALID';
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Part List Create Interface records trace removed = '||SQL%ROWCOUNT);
EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  IF c_manage_partList%ISOPEN THEN
    CLOSE c_manage_partList;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END manage_partList_interface;
/*=============================================================================
|
|  DESCRIPTION
|      This Public API does the following actions:
|        1. Populate Valid Asset charge Id's to the Interface tables
|
|  PARAMETERS
|      Returns x_errbuf and Status code x_retcode back to calling API
|
*===========================================================================*/
PROCEDURE populate_assetCharge_interface(
    p_batch_id         IN NUMBER,
    p_partition_number IN NUMBER,
    x_error_message OUT NOCOPY VARCHAR2,
    x_return_status OUT NOCOPY VARCHAR2)
IS
  -- Cursor for validating if charge_definition_code is missing
  CURSOR c_charge_def_mand_cur
  IS
    SELECT assetChargesInt.interface_row_id
    FROM cse_asset_charges_int assetChargesInt
    WHERE assetChargesInt.partition_number       = p_partition_number
    AND assetChargesInt.interface_batch_id       = p_batch_id
    AND assetChargesInt.interface_status_code    = C_INT_READY
    AND assetChargesInt.action_code              = C_CREATE_ACTION_CODE
    AND (assetChargesInt.charge_definition_code IS NULL
    OR assetChargesInt.charge_definition_code    = FND_API.G_NULL_CHAR);
  -- Cursor for validating if priced_quantity_uom_code is missing
  CURSOR c_priced_qty_mand_cur
  IS
    SELECT assetChargesInt.interface_row_id
    FROM cse_asset_charges_int assetChargesInt
    WHERE assetChargesInt.partition_number         = p_partition_number
    AND assetChargesInt.interface_batch_id         = p_batch_id
    AND assetChargesInt.interface_status_code      = C_INT_READY
    AND assetChargesInt.action_code                = C_CREATE_ACTION_CODE
    AND (assetChargesInt.priced_quantity_uom_code IS NULL
    OR assetChargesInt.priced_quantity_uom_code    = FND_API.G_NULL_CHAR);
  -- Cursor for validating if unit_price is missing
  CURSOR c_unit_price_mand_cur
  IS
    SELECT assetChargesInt.interface_row_id
    FROM cse_asset_charges_int assetChargesInt
    WHERE assetChargesInt.partition_number    = p_partition_number
    AND assetChargesInt.interface_batch_id    = p_batch_id
    AND assetChargesInt.interface_status_code = C_INT_READY
    AND assetChargesInt.action_code           = C_CREATE_ACTION_CODE
    AND assetChargesInt.unit_price           IS NULL;
  -- Cursor for validating if currency_code is missing
  CURSOR c_currency_code_mand_cur
  IS
    SELECT assetChargesInt.interface_row_id
    FROM cse_asset_charges_int assetChargesInt
    WHERE assetChargesInt.partition_number    = p_partition_number
    AND assetChargesInt.interface_batch_id    = p_batch_id
    AND assetChargesInt.interface_status_code = C_INT_READY
    AND assetChargesInt.action_code           = C_CREATE_ACTION_CODE
    AND (assetChargesInt.currency_code       IS NULL
    OR assetChargesInt.currency_code          = FND_API.G_NULL_CHAR);
  -- Cursor for validating if primary_flag is missing
  CURSOR c_primary_flag_mand_cur
  IS
    SELECT assetChargesInt.interface_row_id
    FROM cse_asset_charges_int assetChargesInt
    WHERE assetChargesInt.partition_number    = p_partition_number
    AND assetChargesInt.interface_batch_id    = p_batch_id
    AND assetChargesInt.interface_status_code = C_INT_READY
    AND assetChargesInt.action_code           = C_CREATE_ACTION_CODE
    AND (assetChargesInt.primary_flag        IS NULL
    OR assetChargesInt.primary_flag           = FND_API.G_NULL_CHAR);
  -- Cursor for validating if charges_rollup_flag is missing
  CURSOR c_charges_rollup_mand_cur
  IS
    SELECT assetChargesInt.interface_row_id
    FROM cse_asset_charges_int assetChargesInt
    WHERE assetChargesInt.partition_number    = p_partition_number
    AND assetChargesInt.interface_batch_id    = p_batch_id
    AND assetChargesInt.interface_status_code = C_INT_READY
    AND assetChargesInt.action_code           = C_CREATE_ACTION_CODE
    AND (assetChargesInt.charges_rollup_flag IS NULL
    OR assetChargesInt.charges_rollup_flag    = FND_API.G_NULL_CHAR);
  -- Cursor for validating if tax_included_flag is missing
  CURSOR c_tax_included_mand_cur
  IS
    SELECT assetChargesInt.interface_row_id
    FROM cse_asset_charges_int assetChargesInt
    WHERE assetChargesInt.partition_number    = p_partition_number
    AND assetChargesInt.interface_batch_id    = p_batch_id
    AND assetChargesInt.interface_status_code = C_INT_READY
    AND assetChargesInt.action_code           = C_CREATE_ACTION_CODE
    AND (assetChargesInt.tax_included_flag   IS NULL
    OR assetChargesInt.tax_included_flag      = FND_API.G_NULL_CHAR);
  -- Cursor for validating if charge definition code is unique while creating
  CURSOR c_charge_def_unique_cur
  IS
    SELECT assetChargesInt.interface_row_id,
      assetChargesInt.charge_definition_code
    FROM cse_asset_charges_int assetChargesInt
    WHERE assetChargesInt.partition_number       = p_partition_number
    AND assetChargesInt.interface_batch_id       = p_batch_id
    AND assetChargesInt.interface_status_code    = C_INT_READY
    AND assetChargesInt.action_code              = C_CREATE_ACTION_CODE
    AND (assetChargesInt.charge_definition_code IS NOT NULL
    AND EXISTS (
      (SELECT 'x'
      FROM cse_asset_charges assetChg,
        cse_assets_b assets
      WHERE assetChg.charge_definition_code = assetChargesInt.charge_definition_code
      AND assetChg.asset_id                 = assets.asset_id
      AND assets.asset_number               = assetChargesInt.asset_number
      )
  UNION
    (SELECT 'x'
    FROM cse_asset_charges_int assetChargesIntIn
    WHERE assetChargesIntIn.charge_definition_code = assetChargesInt.charge_definition_code
    AND assetChargesIntIn.asset_number             = assetChargesInt.asset_number
    AND assetChargesIntIn.interface_row_id        <> assetChargesInt.interface_row_id
    AND assetChargesIntIn.partition_number         = p_partition_number
    AND assetChargesIntIn.interface_batch_id       = p_batch_id
    ) ) );
    -- Cursor for validating charge definition record exists during update/delete
    CURSOR c_rec_not_found_cur
    IS
      SELECT assetChargesInt.interface_row_id,
        assetChargesInt.charge_definition_code
      FROM cse_asset_charges_int assetChargesInt
      WHERE assetChargesInt.partition_number       = p_partition_number
      AND assetChargesInt.interface_batch_id       = p_batch_id
      AND assetChargesInt.interface_status_code    = C_INT_READY
      AND assetChargesInt.action_code             IN (C_UPDATE_ACTION_CODE,C_DELETE_ACTION_CODE)
      AND (assetChargesInt.charge_definition_code IS NOT NULL
      AND NOT EXISTS
        (SELECT 'x'
        FROM cse_asset_charges assetChg,
          cse_assets_b assets
        WHERE assetChg.charge_definition_code = assetChargesInt.charge_definition_code
        AND assetChg.asset_id                 = assets.asset_id
        AND assets.asset_number               = assetChargesInt.asset_number
        ));
      -- Cursor for validating if primary flag is valid
      CURSOR c_pri_flag_valid_cur
      IS
        SELECT assetChargesInt.interface_row_id
        FROM cse_asset_charges_int assetChargesInt
        WHERE assetChargesInt.partition_number    = p_partition_number
        AND assetChargesInt.interface_batch_id    = p_batch_id
        AND assetChargesInt.interface_status_code = C_INT_READY
        AND assetChargesInt.action_code          IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
        AND (assetChargesInt.primary_flag        IS NOT NULL
        AND assetChargesInt.primary_flag NOT     IN ('Y','N'));
      -- Cursor for validating if charges rollup flag is valid
      CURSOR c_cr_flag_valid_cur
      IS
        SELECT assetChargesInt.interface_row_id
        FROM cse_asset_charges_int assetChargesInt
        WHERE assetChargesInt.partition_number       = p_partition_number
        AND assetChargesInt.interface_batch_id       = p_batch_id
        AND assetChargesInt.interface_status_code    = C_INT_READY
        AND assetChargesInt.action_code             IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
        AND (assetChargesInt.charges_rollup_flag    IS NOT NULL
        AND assetChargesInt.charges_rollup_flag NOT IN ('Y','N'));
      -- Cursor for validating if charge component rollup flag is valid
      CURSOR c_ccr_flag_valid_cur
      IS
        SELECT assetChargesInt.interface_row_id
        FROM cse_asset_charges_int assetChargesInt
        WHERE assetChargesInt.partition_number                 = p_partition_number
        AND assetChargesInt.interface_batch_id                 = p_batch_id
        AND assetChargesInt.interface_status_code              = C_INT_READY
        AND assetChargesInt.action_code                       IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
        AND (assetChargesInt.charge_components_rollup_flag    IS NOT NULL
        AND assetChargesInt.charge_components_rollup_flag NOT IN ('Y','N'));
      -- Cursor for validating if tax included flag is valid
      CURSOR c_ti_flag_valid_cur
      IS
        SELECT assetChargesInt.interface_row_id
        FROM cse_asset_charges_int assetChargesInt
        WHERE assetChargesInt.partition_number     = p_partition_number
        AND assetChargesInt.interface_batch_id     = p_batch_id
        AND assetChargesInt.interface_status_code  = C_INT_READY
        AND assetChargesInt.action_code           IN (C_CREATE_ACTION_CODE,C_UPDATE_ACTION_CODE)
        AND (assetChargesInt.tax_included_flag    IS NOT NULL
        AND assetChargesInt.tax_included_flag NOT IN ('Y','N'));
      -- Cursor for fetching all valid asset charge records
      CURSOR c_valid_assetCharges
      IS
        SELECT DISTINCT assetChargesInt.interface_row_id,
          (SELECT assetCharges.asset_charge_id
          FROM cse_asset_charges assetCharges
          WHERE assetCharges.charge_definition_code = assetChargesInt.charge_definition_code
          AND assetCharges.asset_id                 = assetb.asset_id
          AND ROWNUM                                = 1
          ) asset_charge_id,
        assetb.asset_id
      FROM cse_asset_charges_int assetChargesInt,
        cse_assets_b assetb
      WHERE assetChargesInt.asset_number        = assetb.asset_number
      AND assetChargesInt.partition_number      = p_partition_number
      AND assetChargesInt.interface_batch_id    = p_batch_id
      AND assetChargesInt.interface_status_code = C_INT_READY;
    TYPE l_valid_assetCharges_tbl_type
  IS
    TABLE OF c_valid_assetCharges%ROWTYPE;
    l_valid_assetCharges_tbl l_valid_assetCharges_tbl_type;
    l_api_name VARCHAR2(300) := 'cse_bulk_import_pvt.populate_assetCharge_interface';
    l_interfaceTbl cse_int_utils_pvt.interface_row_id_type;
    l_valid_record VARCHAR2(1);

BEGIN

cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
    x_return_status := fnd_api.g_ret_sts_success;
    -- Cursor to check mandatory Asset organization attribute
    OPEN c_charge_def_mand_cur;
    LOOP
      FETCH c_charge_def_mand_cur BULK COLLECT
      INTO l_interfaceTbl LIMIT c_max_partition_size;
      EXIT
    WHEN l_interfaceTbl.COUNT = 0;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSET_CHGS_TBL_NAME, p_column_name => 'CHARGE_DEFINITION_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_REQ_ATTRIB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CHARGE_DEFINITION_CODE', x_error_message => x_error_message, x_return_status => x_return_status );
    END LOOP;
    l_interfaceTbl.DELETE;
    CLOSE c_charge_def_mand_cur;
    -- Cursor to check mandatory Asset organization attribute
    OPEN c_priced_qty_mand_cur;
    LOOP
      FETCH c_priced_qty_mand_cur BULK COLLECT
      INTO l_interfaceTbl LIMIT c_max_partition_size;
      EXIT
    WHEN l_interfaceTbl.COUNT = 0;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSET_CHGS_TBL_NAME, p_column_name => 'PRICED_QUANTITY_UOM_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_REQ_ATTRIB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'PRICED_QUANTITY_UOM_CODE', x_error_message => x_error_message, x_return_status => x_return_status );
    END LOOP;
    l_interfaceTbl.DELETE;
    CLOSE c_priced_qty_mand_cur;
    -- Cursor to check mandatory Asset organization attribute
    OPEN c_unit_price_mand_cur;
    LOOP
      FETCH c_unit_price_mand_cur BULK COLLECT
      INTO l_interfaceTbl LIMIT c_max_partition_size;
      EXIT
    WHEN l_interfaceTbl.COUNT = 0;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSET_CHGS_TBL_NAME, p_column_name => 'UNIT_PRICE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_REQ_ATTRIB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'UNIT_PRICE', x_error_message => x_error_message, x_return_status => x_return_status );
    END LOOP;
    l_interfaceTbl.DELETE;
    CLOSE c_unit_price_mand_cur;
    -- Cursor to check mandatory Asset organization attribute
    OPEN c_currency_code_mand_cur;
    LOOP
      FETCH c_currency_code_mand_cur BULK COLLECT
      INTO l_interfaceTbl LIMIT c_max_partition_size;
      EXIT
    WHEN l_interfaceTbl.COUNT = 0;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSET_CHGS_TBL_NAME, p_column_name => 'CURRENCY_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_REQ_ATTRIB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CURRENCY_CODE', x_error_message => x_error_message, x_return_status => x_return_status );
    END LOOP;
    l_interfaceTbl.DELETE;
    CLOSE c_currency_code_mand_cur;
    -- Cursor to check mandatory Asset organization attribute
    OPEN c_primary_flag_mand_cur;
    LOOP
      FETCH c_primary_flag_mand_cur BULK COLLECT
      INTO l_interfaceTbl LIMIT c_max_partition_size;
      EXIT
    WHEN l_interfaceTbl.COUNT = 0;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSET_CHGS_TBL_NAME, p_column_name => 'PRIMARY_FLAG', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_REQ_ATTRIB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'PRIMARY_FLAG', x_error_message => x_error_message, x_return_status => x_return_status );
    END LOOP;
    l_interfaceTbl.DELETE;
    CLOSE c_primary_flag_mand_cur;
    -- Cursor to check mandatory Asset organization attribute
    OPEN c_charges_rollup_mand_cur;
    LOOP
      FETCH c_charges_rollup_mand_cur BULK COLLECT
      INTO l_interfaceTbl LIMIT c_max_partition_size;
      EXIT
    WHEN l_interfaceTbl.COUNT = 0;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSET_CHGS_TBL_NAME, p_column_name => 'CHARGES_ROLLUP_FLAG', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_REQ_ATTRIB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CHARGES_ROLLUP_FLAG', x_error_message => x_error_message, x_return_status => x_return_status );
    END LOOP;
    l_interfaceTbl.DELETE;
    CLOSE c_charges_rollup_mand_cur;
    -- Cursor to check mandatory Asset organization attribute
    OPEN c_tax_included_mand_cur;
    LOOP
      FETCH c_tax_included_mand_cur BULK COLLECT
      INTO l_interfaceTbl LIMIT c_max_partition_size;
      EXIT
    WHEN l_interfaceTbl.COUNT = 0;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSET_CHGS_TBL_NAME, p_column_name => 'TAX_INCLUDED_FLAG', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_REQ_ATTRIB_API_SERV', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'TAX_INCLUDED_FLAG', x_error_message => x_error_message, x_return_status => x_return_status );
    END LOOP;
    l_interfaceTbl.DELETE;
    CLOSE c_tax_included_mand_cur;
    -- Cursor to check charge definition code during create is unique
    FOR charge_def_unique_rec IN c_charge_def_unique_cur
    LOOP
      l_interfaceTbl(1) := charge_def_unique_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSET_CHGS_TBL_NAME, p_column_name => 'CHARGE_DEFINITION_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_RCRD_VAL', p_message_token_names => 'REC_VALUE', p_message_token_values => charge_def_unique_rec.charge_definition_code, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Cursor to check if charge definition record exists during update or delete
    FOR chg_def_not_found_rec IN c_rec_not_found_cur
    LOOP
      l_interfaceTbl(1) := chg_def_not_found_rec.interface_row_id;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSET_CHGS_TBL_NAME, p_column_name => 'CHARGE_DEFINITION_CODE', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_RCRD_MSNG', p_message_token_names => 'REC_NAME', p_message_token_values => chg_def_not_found_rec.charge_definition_code, x_error_message => x_error_message, x_return_status => x_return_status );
      l_interfaceTbl.DELETE;
    END LOOP;
    -- Cursor to check if primary flag is valid value
    OPEN c_pri_flag_valid_cur;
    LOOP
      FETCH c_pri_flag_valid_cur BULK COLLECT
      INTO l_interfaceTbl LIMIT c_max_partition_size;
      EXIT
    WHEN l_interfaceTbl.COUNT = 0;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSET_CHGS_TBL_NAME, p_column_name => 'PRIMARY_FLAG', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRIB_Y_N', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'PRIMARY_FLAG', x_error_message => x_error_message, x_return_status => x_return_status );
    END LOOP;
    l_interfaceTbl.DELETE;
    CLOSE c_pri_flag_valid_cur;
    -- Cursor to check if charges rollup flag is valid value
    OPEN c_cr_flag_valid_cur;
    LOOP
      FETCH c_cr_flag_valid_cur BULK COLLECT
      INTO l_interfaceTbl LIMIT c_max_partition_size;
      EXIT
    WHEN l_interfaceTbl.COUNT = 0;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSET_CHGS_TBL_NAME, p_column_name => 'CHARGES_ROLLUP_FLAG', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRIB_Y_N', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CHARGES_ROLLUP_FLAG', x_error_message => x_error_message, x_return_status => x_return_status );
    END LOOP;
    l_interfaceTbl.DELETE;
    CLOSE c_cr_flag_valid_cur;
    -- Cursor to check if charge component rollup flag is valid value
    OPEN c_ccr_flag_valid_cur;
    LOOP
      FETCH c_ccr_flag_valid_cur BULK COLLECT
      INTO l_interfaceTbl LIMIT c_max_partition_size;
      EXIT
    WHEN l_interfaceTbl.COUNT = 0;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSET_CHGS_TBL_NAME, p_column_name => 'CHARGE_COMPONENTS_ROLLUP_FLAG', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRIB_Y_N', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'CHARGE_COMPONENTS_ROLLUP_FLAG', x_error_message => x_error_message, x_return_status => x_return_status );
    END LOOP;
    l_interfaceTbl.DELETE;
    CLOSE c_ccr_flag_valid_cur;
    -- Cursor to check if tax included flag is valid value
    OPEN c_ti_flag_valid_cur;
    LOOP
      FETCH c_ti_flag_valid_cur BULK COLLECT
      INTO l_interfaceTbl LIMIT c_max_partition_size;
      EXIT
    WHEN l_interfaceTbl.COUNT = 0;
      log_validation_error( p_interface_rowid_tbl => l_interfaceTbl, p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_table_name => C_ASSET_CHGS_TBL_NAME, p_column_name => 'TAX_INCLUDED_FLAG', p_program_name => l_api_name, p_message_severity => C_SEVERITY_ERROR, p_message_name => 'FND_CMN_INVALID_ATTRIB_Y_N', p_message_token_names => 'ATTRIBUTE_NAME', p_message_token_values => 'TAX_INCLUDED_FLAG', x_error_message => x_error_message, x_return_status => x_return_status );
    END LOOP;
    l_interfaceTbl.DELETE;
    CLOSE c_ti_flag_valid_cur;
    -- All asset charge records are validated. Mark those which are not in error status to valid.
    OPEN c_valid_assetCharges;
    FETCH c_valid_assetCharges BULK COLLECT INTO l_valid_assetCharges_tbl;
    CLOSE c_valid_assetCharges;
    FORALL i IN l_valid_assetCharges_tbl.FIRST..l_valid_assetCharges_tbl.LAST
    UPDATE CSE_ASSET_CHARGES_INT assetChargesInt
    SET assetChargesInt.asset_id            = l_valid_assetCharges_tbl(i).asset_id ,
      assetChargesInt.asset_charge_id       = to_number(DECODE(assetChargesInt.action_code,C_CREATE_ACTION_CODE,DECODE(l_valid_assetCharges_tbl(i).asset_charge_id,NULL,cse_int_s.NEXTVAL,l_valid_assetCharges_tbl(i).asset_charge_id) ,l_valid_assetCharges_tbl(i).asset_charge_id)) ,
      assetChargesInt.interface_status_code = C_INT_VALID
    WHERE assetChargesInt.interface_row_id  = l_valid_assetCharges_tbl(i).interface_row_id;
    cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');

EXCEPTION
  WHEN OTHERS THEN
    x_return_status := fnd_api.g_ret_sts_unexp_error;
    x_error_message := sqlerrm;
    IF (c_charge_def_mand_cur%isopen) THEN
      CLOSE c_charge_def_mand_cur;
    END IF;
    IF (c_priced_qty_mand_cur%isopen) THEN
      CLOSE c_priced_qty_mand_cur;
    END IF;
    IF (c_unit_price_mand_cur%isopen) THEN
      CLOSE c_unit_price_mand_cur;
    END IF;
    IF (c_currency_code_mand_cur%isopen) THEN
      CLOSE c_currency_code_mand_cur;
    END IF;
    IF (c_primary_flag_mand_cur%isopen) THEN
      CLOSE c_primary_flag_mand_cur;
    END IF;
    IF (c_charges_rollup_mand_cur%isopen) THEN
      CLOSE c_charges_rollup_mand_cur;
    END IF;
    IF (c_tax_included_mand_cur%isopen) THEN
      CLOSE c_tax_included_mand_cur;
    END IF;
    IF (c_pri_flag_valid_cur%isopen) THEN
      CLOSE c_pri_flag_valid_cur;
    END IF;
    IF (c_cr_flag_valid_cur%isopen) THEN
      CLOSE c_cr_flag_valid_cur;
    END IF;
    IF (c_ccr_flag_valid_cur%isopen) THEN
      CLOSE c_ccr_flag_valid_cur;
    END IF;
    IF (c_ti_flag_valid_cur%isopen) THEN
      CLOSE c_ti_flag_valid_cur;
    END IF;
    cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);

END populate_assetCharge_interface;

BEGIN

cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
  x_return_status := fnd_api.g_ret_sts_success;
  --Delete Asset Charges
  OPEN c_manage_assetCharge(C_DELETE_ACTION_CODE);
  FETCH c_manage_assetCharge BULK COLLECT INTO l_manage_assetCharge_tbl;
  CLOSE c_manage_assetCharge;
  FORALL i IN l_manage_assetCharge_tbl.FIRST..l_manage_assetCharge_tbl.LAST
  DELETE cse_asset_charges assetCharges
  WHERE assetCharges.asset_charge_id = l_manage_assetCharge_tbl(i).asset_charge_id;
  FORALL i IN l_manage_assetCharge_tbl.FIRST..l_manage_assetCharge_tbl.LAST
  DELETE cse_asset_charges_int assetChargesInt
  WHERE assetChargesInt.asset_charge_id = l_manage_assetCharge_tbl(i).asset_charge_id;
  --Update Asset Charges
  l_manage_assetCharge_tbl := l_reset_assetCharge_tbl ;
  OPEN c_manage_assetCharge(C_UPDATE_ACTION_CODE);
  FETCH c_manage_assetCharge BULK COLLECT INTO l_manage_assetCharge_tbl;
  CLOSE c_manage_assetCharge;
  FORALL i IN l_manage_assetCharge_tbl.FIRST..l_manage_assetCharge_tbl.LAST
  UPDATE cse_asset_charges assetCharges
  SET object_version_number          = object_version_number +1,
    asset_id                         = l_manage_assetCharge_tbl(i).asset_id,
    charge_definition_code           = l_manage_assetCharge_tbl(i).charge_definition_code,
    price_element_code               = l_manage_assetCharge_tbl(i).price_element_code,
    price_element_usage_code         = l_manage_assetCharge_tbl(i).price_element_usage_code,
    priced_quantity_uom_code         = l_manage_assetCharge_tbl(i).priced_quantity_uom_code,
    unit_price                       = l_manage_assetCharge_tbl(i).unit_price,
    currency_code                    = l_manage_assetCharge_tbl(i).currency_code,
    primary_flag                     = l_manage_assetCharge_tbl(i).primary_flag,
    price_periodicity_code           = l_manage_assetCharge_tbl(i).price_periodicity_code,
    charges_rollup_flag              = l_manage_assetCharge_tbl(i).charges_rollup_flag,
    charge_components_rollup_flag    = l_manage_assetCharge_tbl(i).charge_components_rollup_flag,
    tax_included_flag                = l_manage_assetCharge_tbl(i).tax_included_flag,
    attribute_category               = l_manage_assetCharge_tbl(i).attribute_category,
    attribute_char1                  = l_manage_assetCharge_tbl(i).attribute_char1,
    attribute_char2                  = l_manage_assetCharge_tbl(i).attribute_char2,
    attribute_char3                  = l_manage_assetCharge_tbl(i).attribute_char3,
    attribute_char4                  = l_manage_assetCharge_tbl(i).attribute_char4,
    attribute_char5                  = l_manage_assetCharge_tbl(i).attribute_char5,
    attribute_char6                  = l_manage_assetCharge_tbl(i).attribute_char6,
    attribute_char7                  = l_manage_assetCharge_tbl(i).attribute_char7,
    attribute_char8                  = l_manage_assetCharge_tbl(i).attribute_char8,
    attribute_char9                  = l_manage_assetCharge_tbl(i).attribute_char9,
    attribute_char10                 = l_manage_assetCharge_tbl(i).attribute_char10,
    attribute_char11                 = l_manage_assetCharge_tbl(i).attribute_char11,
    attribute_char12                 = l_manage_assetCharge_tbl(i).attribute_char12,
    attribute_char13                 = l_manage_assetCharge_tbl(i).attribute_char13,
    attribute_char14                 = l_manage_assetCharge_tbl(i).attribute_char14,
    attribute_char15                 = l_manage_assetCharge_tbl(i).attribute_char15,
    attribute_char16                 = l_manage_assetCharge_tbl(i).attribute_char16,
    attribute_char17                 = l_manage_assetCharge_tbl(i).attribute_char17,
    attribute_char18                 = l_manage_assetCharge_tbl(i).attribute_char18,
    attribute_char19                 = l_manage_assetCharge_tbl(i).attribute_char19,
    attribute_char20                 = l_manage_assetCharge_tbl(i).attribute_char20,
    attribute_number1                = l_manage_assetCharge_tbl(i).attribute_number1,
    attribute_number2                = l_manage_assetCharge_tbl(i).attribute_number2,
    attribute_number3                = l_manage_assetCharge_tbl(i).attribute_number3,
    attribute_number4                = l_manage_assetCharge_tbl(i).attribute_number4,
    attribute_number5                = l_manage_assetCharge_tbl(i).attribute_number5,
    attribute_number6                = l_manage_assetCharge_tbl(i).attribute_number6,
    attribute_number7                = l_manage_assetCharge_tbl(i).attribute_number7,
    attribute_number8                = l_manage_assetCharge_tbl(i).attribute_number8,
    attribute_number9                = l_manage_assetCharge_tbl(i).attribute_number9,
    attribute_number10               = l_manage_assetCharge_tbl(i).attribute_number10,
    attribute_date1                  = l_manage_assetCharge_tbl(i).attribute_date1,
    attribute_date2                  = l_manage_assetCharge_tbl(i).attribute_date2,
    attribute_date3                  = l_manage_assetCharge_tbl(i).attribute_date3,
    attribute_date4                  = l_manage_assetCharge_tbl(i).attribute_date4,
    attribute_date5                  = l_manage_assetCharge_tbl(i).attribute_date5,
    attribute_timestamp1             = l_manage_assetCharge_tbl(i).attribute_timestamp1,
    attribute_timestamp2             = l_manage_assetCharge_tbl(i).attribute_timestamp2,
    attribute_timestamp3             = l_manage_assetCharge_tbl(i).attribute_timestamp3,
    attribute_timestamp4             = l_manage_assetCharge_tbl(i).attribute_timestamp4,
    attribute_timestamp5             = l_manage_assetCharge_tbl(i).attribute_timestamp5,
    last_updated_by                  = l_manage_assetCharge_tbl(i).last_updated_by,
    last_update_date                 = l_manage_assetCharge_tbl(i).last_update_date,
    last_update_login                = l_manage_assetCharge_tbl(i).last_update_login,
    request_id                       = l_manage_assetCharge_tbl(i).request_id,
    job_definition_name              = l_manage_assetCharge_tbl(i).job_definition_name,
    job_definition_package           = l_manage_assetCharge_tbl(i).job_definition_package
  WHERE assetCharges.asset_charge_id = l_manage_assetCharge_tbl(i).asset_charge_id;
  FORALL i IN l_manage_assetCharge_tbl.FIRST..l_manage_assetCharge_tbl.LAST
  DELETE cse_asset_charges_int assetChargesInt
  WHERE assetChargesInt.asset_charge_id = l_manage_assetCharge_tbl(i).asset_charge_id;
  INSERT
  INTO cse_asset_charges
    (
      asset_charge_id,
      object_version_number,
      asset_id,
      charge_definition_code,
      price_element_code,
      price_element_usage_code,
      priced_quantity_uom_code,
      unit_price,
      currency_code,
      primary_flag,
      price_periodicity_code,
      charges_rollup_flag,
      charge_components_rollup_flag,
      tax_included_flag,
      attribute_category,
      attribute_char1,
      attribute_char2,
      attribute_char3,
      attribute_char4,
      attribute_char5,
      attribute_char6,
      attribute_char7,
      attribute_char8,
      attribute_char9,
      attribute_char10,
      attribute_char11,
      attribute_char12,
      attribute_char13,
      attribute_char14,
      attribute_char15,
      attribute_char16,
      attribute_char17,
      attribute_char18,
      attribute_char19,
      attribute_char20,
      attribute_number1,
      attribute_number2,
      attribute_number3,
      attribute_number4,
      attribute_number5,
      attribute_number6,
      attribute_number7,
      attribute_number8,
      attribute_number9,
      attribute_number10,
      attribute_date1,
      attribute_date2,
      attribute_date3,
      attribute_date4,
      attribute_date5,
      attribute_timestamp1,
      attribute_timestamp2,
      attribute_timestamp3,
      attribute_timestamp4,
      attribute_timestamp5,
      created_by,
      creation_date,
      last_updated_by,
      last_update_date,
      last_update_login,
      request_id,
      job_definition_name,
      job_definition_package
    )
    (SELECT assetChargesInt.ASSET_CHARGE_ID ,
        1 object_version_number ,
        assetChargesInt.asset_id ,
        assetChargesInt.charge_definition_code ,
        assetChargesInt.price_element_code ,
        assetChargesInt.price_element_usage_code ,
        assetChargesInt.priced_quantity_uom_code ,
        assetChargesInt.unit_price ,
        assetChargesInt.currency_code ,
        assetChargesInt.primary_flag ,
        assetChargesInt.price_periodicity_code ,
        assetChargesInt.charges_rollup_flag ,
        assetChargesInt.charge_components_rollup_flag ,
        assetChargesInt.tax_included_flag ,
        assetChargesInt.attribute_category ,
        assetChargesInt.attribute_char1 ,
        assetChargesInt.attribute_char2 ,
        assetChargesInt.attribute_char3 ,
        assetChargesInt.attribute_char4 ,
        assetChargesInt.attribute_char5 ,
        assetChargesInt.attribute_char6 ,
        assetChargesInt.attribute_char7 ,
        assetChargesInt.attribute_char8 ,
        assetChargesInt.attribute_char9 ,
        assetChargesInt.attribute_char10 ,
        assetChargesInt.attribute_char11 ,
        assetChargesInt.attribute_char12 ,
        assetChargesInt.attribute_char13 ,
        assetChargesInt.attribute_char14 ,
        assetChargesInt.attribute_char15 ,
        assetChargesInt.attribute_char16 ,
        assetChargesInt.attribute_char17 ,
        assetChargesInt.attribute_char18 ,
        assetChargesInt.attribute_char19 ,
        assetChargesInt.attribute_char20 ,
        assetChargesInt.attribute_number1 ,
        assetChargesInt.attribute_number2 ,
        assetChargesInt.attribute_number3 ,
        assetChargesInt.attribute_number4 ,
        assetChargesInt.attribute_number5 ,
        assetChargesInt.attribute_number6 ,
        assetChargesInt.attribute_number7 ,
        assetChargesInt.attribute_number8 ,
        assetChargesInt.attribute_number9 ,
        assetChargesInt.attribute_number10 ,
        assetChargesInt.attribute_date1 ,
        assetChargesInt.attribute_date2 ,
        assetChargesInt.attribute_date3 ,
        assetChargesInt.attribute_date4 ,
        assetChargesInt.attribute_date5 ,
        assetChargesInt.attribute_timestamp1 ,
        assetChargesInt.attribute_timestamp2 ,
        assetChargesInt.attribute_timestamp3 ,
        assetChargesInt.attribute_timestamp4 ,
        assetChargesInt.attribute_timestamp5 ,
        assetChargesInt.created_by ,
        assetChargesInt.creation_date ,
        assetChargesInt.last_updated_by ,
        assetChargesInt.last_update_date ,
        assetChargesInt.last_update_login ,
        assetChargesInt.request_id ,
        assetChargesInt.job_definition_name ,
        assetChargesInt.job_definition_package
      FROM cse_asset_charges_int assetChargesInt
      WHERE assetChargesInt.partition_number    = p_partition_number
      AND assetChargesInt.interface_batch_id    = p_batch_id
      AND assetChargesInt.action_code           = C_CREATE_ACTION_CODE
      AND assetChargesInt.interface_status_code = C_INT_VALID
    );
  DELETE
  FROM cse_asset_charges_int assetChargesInt
  WHERE assetChargesInt.partition_number    = p_partition_number
  AND assetChargesInt.interface_batch_id    = p_batch_id
  AND assetChargesInt.action_code           = C_CREATE_ACTION_CODE
  AND assetChargesInt.interface_status_code = C_INT_VALID;
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');

EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  IF c_manage_assetCharge%ISOPEN THEN
    CLOSE c_manage_assetCharge;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);

END manage_assetCharge_interface;

BEGIN

cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
  x_return_status := fnd_api.g_ret_sts_success;
  SELECT DISTINCT cseib.source_system_type,
    cseib.source_system_code,
    cseib.interface_batch_status
  INTO l_Source_System_Type,
    l_Source_System_Code,
    l_Interface_Batch_Status
  FROM cse_int_batches_b cseib
  WHERE (cseib.interface_batch_id = p_batch_id
  OR cseib.interface_batch_code   = p_batch_code)
  AND rownum                      =1;
  SELECT cseib.source_transaction_date
  INTO l_src_transaction_date
  FROM cse_int_batches_b cseib
  WHERE (cseib.interface_batch_id = p_batch_id
  OR cseib.interface_batch_code   = p_batch_code);
  IF (l_src_transaction_date     IS NULL ) THEN
    l_src_transaction_date       :=l_Transaction_date;
  END IF;
  IF l_Interface_Batch_Status <> 'READY' THEN
    x_error_message           := 'FND_CMN_INVALID_ATTRB_API_SERV';
    x_return_status           := fnd_api.g_ret_sts_error;
  END IF;
  IF l_Source_System_Type IS NOT NULL THEN
    SELECT 1
    INTO l_validates
    FROM fnd_lookups
    WHERE lookup_type      = 'ORA_CSE_SOURCE_SYSTEM_TYPE'
    AND upper(lookup_code) = upper(l_Source_System_Type) ;
  ELSE
    x_error_message := 'FND_CMN_INVALID_ATTRB_API_SERV';
    x_return_status := fnd_api.g_ret_sts_error;
  END IF;
  IF l_Source_System_Type ='ORA_INTERNAL' THEN
    SELECT application_id
    INTO l_Src_System_Id
    FROM fnd_application_vl
    WHERE product_code = l_Source_System_Code ;
  ELSE
    SELECT orig_system_id
    INTO l_Src_System_Id
    FROM hz_orig_systems_vl
    WHERE orig_system = l_Source_System_Code ;
  END IF;
  SELECT MAX(csea.item_id),
    MAX(csea.item_organization_id)
  INTO l_item_id,
    l_org_id
  FROM cse_assets_int csea
  WHERE (csea.interface_batch_id = p_batch_id
  OR csea.interface_batch_code   = p_batch_code)
  AND csea.item_id              IS NOT NULL
  AND csea.item_organization_id IS NOT NULL;
  IF NVL(l_Src_System_Id,0)     <> 0 AND NVL(l_validates,0) <> 0 AND l_item_id IS NOT NULL AND l_org_id IS NOT NULL THEN
    l_Transaction_Id            := cse_int_s.nextval;
    x_transaction_id            := l_Transaction_Id;
    INSERT
    INTO CSE_TRANSACTIONS
      (
        transaction_id ,
        object_version_number,
        src_system_type,
        src_system_id,
        src_transaction_date,
        src_transaction_id,
        src_transaction_type_id,
        src_transaction_type,
        src_transaction_qty,
        item_id,
        item_revision,
        item_organization_id,
        created_by,
        creation_date,
        last_updated_by,
        last_update_date,
        last_update_login,
        request_id,
        job_definition_name,
        job_definition_package
      )
      (SELECT l_Transaction_Id,
          object_version_number,
          source_system_type ,
          source_system_id ,
          l_src_transaction_date src_transaction_date,
          interface_batch_id src_transaction_id,
          NULL src_transaction_type_id,
          NULL src_transaction_type,
          NULL src_transaction_qty,
          l_item_id item_id,
          NULL item_revision,
          l_org_id item_organization_id,
          created_by ,
          l_Transaction_date creation_date,
          last_updated_by,
          l_Transaction_date last_update_date ,
          last_updated_by,
          request_id ,
          job_definition_name,
          job_definition_package
        FROM cse_int_batches_b cseintb
        WHERE (cseintb.interface_batch_id = p_batch_id
        OR cseintb.interface_batch_code   = p_batch_code)
      );
    x_transaction_id   := l_Transaction_Id;
    x_transaction_date := l_src_transaction_date ;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');

EXCEPTION
WHEN no_data_found THEN
  x_error_message := 'FND_CMN_INVALID_ATTRB_API_SERV';
  x_return_status := fnd_api.g_ret_sts_error;
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);

END validate_and_create_txn;

BEGIN

OPEN c_get_asset_int_rec;
  FETCH c_get_asset_int_rec BULK COLLECT INTO l_assets_int_tbl;
  CLOSE c_get_asset_int_rec;
  FORALL i IN l_assets_int_tbl.FIRST..l_assets_int_tbl.LAST
  UPDATE CSE_ASSET_CHARGES_INT
  SET asset_number              = l_assets_int_tbl(i).asset_number
  WHERE interface_record_number = l_assets_int_tbl(i).interface_record_number;

EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  IF c_get_asset_int_rec%ISOPEN THEN
    CLOSE c_get_asset_int_rec;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);

END Update_Asset_Charge_Records;

BEGIN

OPEN c_create_asset_service;
  FETCH c_create_asset_service BULK COLLECT INTO l_creation_event_tbl;
  CLOSE c_create_asset_service;
  FOR i IN 1..l_creation_event_tbl.COUNT
  LOOP
   dbms_output.put_line('creation_service_contract_event count--'||i);
    l_okc_creation_event_tbl(i).asset_id                      :=l_creation_event_tbl(i).asset_id;
    l_okc_creation_event_tbl(i).asset_inv_item_id             :=l_creation_event_tbl(i).item_id;
    l_okc_creation_event_tbl(i).asset_ship_from_inv_org_id    :=l_creation_event_tbl(i).item_organization_id;
    l_okc_creation_event_tbl(i).asset_sold_by_bu_id           :=l_creation_event_tbl(i).sold_by_business_unit_id;
    l_okc_creation_event_tbl(i).asset_sold_to_party_id        :=l_creation_event_tbl(i).customer_id;
    l_okc_creation_event_tbl(i).asset_bill_to_account_id      :=l_creation_event_tbl(i).customer_account_id;
    l_okc_creation_event_tbl(i).asset_ship_to_party_id        :=l_creation_event_tbl(i).customer_site_party_id;
    l_okc_creation_event_tbl(i).asset_ship_to_party_site_id   :=l_creation_event_tbl(i).customer_site_id;
    l_okc_creation_event_tbl(i).asset_ship_date               :=l_creation_event_tbl(i).shipment_date;
    l_okc_creation_event_tbl(i).asset_quantity                :=l_creation_event_tbl(i).quantity;
    l_okc_creation_event_tbl(i).asset_quantity_uom_code       :=l_creation_event_tbl(i).uom_code;
    l_okc_creation_event_tbl(i).asset_sales_order_system_type :=l_creation_event_tbl(i).sales_order_source_system_type;
    l_okc_creation_event_tbl(i).asset_sales_order_system      :=l_creation_event_tbl(i).sales_order_source_system;
    l_okc_creation_event_tbl(i).asset_sales_order_id          :=l_creation_event_tbl(i).sales_order_id;
    l_okc_creation_event_tbl(i).asset_sales_order_line_id     :=l_creation_event_tbl(i).sales_order_line_id;
    l_okc_creation_event_tbl(i).asset_sales_order_number      :=l_creation_event_tbl(i).sales_order_number;
    l_okc_creation_event_tbl(i).asset_sales_order_line_num    :=l_creation_event_tbl(i).sales_order_line_number;
    l_okc_creation_event_tbl(i).asset_transaction_id          :=l_creation_event_tbl(i).px_transaction_id;
    l_okc_creation_event_tbl(i).asset_source_txn_timestamp    :=l_creation_event_tbl(i).px_transaction_date;
  END LOOP;
  cse_int_utils_pvt.create_service_contract_event ( l_okc_creation_event_tbl , l_return_status , l_message_count , l_message_tbl );
  dbms_output.put_line('Create_service_asset_records_called');
  n            :=l_message_tbl.LAST;
  IF(n         <>NULL) THEN
    l_error_msg:=l_message_tbl(n).txn_msg_text;
  ELSE
    l_error_msg :=x_error_message;
  END IF;
  IF(l_return_status<> fnd_api.g_ret_sts_success) THEN
    cse_int_utils_pvt.log_messages(fnd_log.level_info,'Cse_int_utils_pvt Api call to create_service_contract_event Failed ',l_error_msg);
  END IF;
  x_return_status :=l_return_status;
  x_error_message :=l_error_msg;

END create_service_asset_records;

BEGIN

OPEN c_expire_asset_service;
  FETCH c_expire_asset_service BULK COLLECT INTO l_expiration_event_tbl;
  CLOSE c_expire_asset_service;
  FOR i IN 1..l_expiration_event_tbl.COUNT
  LOOP
  dbms_output.put_line('expire_service_contract_event count');
    l_okc_expire_event_tbl(i).asset_id                   := l_expiration_event_tbl(i).asset_id;
    l_okc_expire_event_tbl(i).asset_expiry_date          := l_expiration_event_tbl(i).active_end_date;
    l_okc_expire_event_tbl(i).asset_transaction_id       := l_expiration_event_tbl(i).px_transaction_id;
    l_okc_expire_event_tbl(i).asset_source_txn_timestamp := l_expiration_event_tbl(i).px_transaction_date;
  END LOOP;
  cse_int_utils_pvt.expire_service_contract_event ( l_okc_expire_event_tbl , l_return_status , l_message_count , l_message_tbl );
    dbms_output.put_line('expire_service_contract_event called');
  n            :=l_message_tbl.LAST;
  IF(n         <>NULL) THEN
    l_error_msg:=l_message_tbl(n).txn_msg_text;
  ELSE
    l_error_msg :=x_error_message;
  END IF;
  IF(l_return_status<> fnd_api.g_ret_sts_success) THEN
    cse_int_utils_pvt.log_messages(fnd_log.level_info,'Cse_int_utils_pvt Api call to expiry_service_contract_event Failed ', l_error_msg);
  END IF;
  x_return_status :=l_return_status;
  x_error_message :=l_error_msg;

END expire_service_asset_records;

/*=======================================================================================
|
|  DESCRIPTION
|      This Public API does the following actions:
|        1. Prepare data for Asset transfer event to be shared with OKC
|
|  PARAMETERS
|      Returns x_error_message and Status code x_return_status back to calling Api
|
*=======================================================================================*/

BEGIN

OPEN c_transfer_customer_asset;
  FETCH c_transfer_customer_asset BULK COLLECT INTO l_transfer_event_tbl;
  CLOSE c_transfer_customer_asset;
  FOR i IN 1..l_transfer_event_tbl.COUNT
  LOOP
    l_okc_transfer_event_tbl(i).asset_id                      :=l_transfer_event_tbl(i).asset_id;
    l_okc_transfer_event_tbl(i).asset_transfer_date           :=l_transfer_event_tbl(i).source_txn_date;
    l_okc_transfer_event_tbl(i).asset_new_sold_to_party_id    :=l_transfer_event_tbl(i).customer_id;
    l_okc_transfer_event_tbl(i).asset_new_bill_to_account_id  :=l_transfer_event_tbl(i).customer_account_id;
    l_okc_transfer_event_tbl(i).asset_new_ship_to_party_id    :=l_transfer_event_tbl(i).customer_account_site_id;
    l_okc_transfer_event_tbl(i).asset_new_ship_to_pty_site_id :=l_transfer_event_tbl(i).customer_site_party_id;
    l_okc_transfer_event_tbl(i).asset_new_sales_ord_sys_type  :=l_transfer_event_tbl(i).sales_order_source_system_type;
    l_okc_transfer_event_tbl(i).asset_new_sales_ord_system    :=l_transfer_event_tbl(i).sales_order_source_system;
    l_okc_transfer_event_tbl(i).asset_new_sales_ord_id        :=l_transfer_event_tbl(i).sales_order_id;
    l_okc_transfer_event_tbl(i).asset_new_sales_ord_line_id   :=l_transfer_event_tbl(i).sales_order_line_id;
    l_okc_transfer_event_tbl(i).asset_new_sales_ord_number    :=l_transfer_event_tbl(i).sales_order_number;
    l_okc_transfer_event_tbl(i).asset_new_sales_ord_line_num  :=l_transfer_event_tbl(i).sales_order_source_system_type;
    l_okc_transfer_event_tbl(i).asset_transaction_id          :=l_transfer_event_tbl(i).px_transaction_id;
    l_okc_transfer_event_tbl(i).asset_source_txn_timestamp    :=l_transfer_event_tbl(i).px_transaction_date;
  END LOOP;
  cse_int_utils_pvt.tsfr_service_contract_event ( l_okc_transfer_event_tbl , l_return_status , l_message_count , l_message_tbl );
     dbms_output.put_line('transfer_service_asset_records called');
  n                :=l_message_tbl.LAST;
  IF(n             <>NULL) THEN
    l_error_message:=l_message_tbl(n).txn_msg_text;
  ELSE
    l_error_message :=x_error_message;
  END IF;
  IF (l_return_status<> fnd_api.g_ret_sts_success) THEN
    cse_int_utils_pvt.log_messages(fnd_log.level_info,'Cse_int_utils_pvt Api call to tsfr_service_contract_event Failed ',l_error_message);
  END IF;
  x_return_status := l_return_status;
  l_okc_transfer_event_tbl.DELETE;
  x_error_message :=l_error_message;

END transfer_service_asset_records;

/*=======================================================================================
|
|  DESCRIPTION
|      This Public API does the following actions:
|        1. Prepare data for Asset Reinstate event to be shared with OKC
|
|  PARAMETERS
|      Returns x_error_message and Status code x_return_status back to calling Api
|
*=======================================================================================*/

BEGIN

OPEN c_reinstate_customer_asset;
  FETCH c_reinstate_customer_asset BULK COLLECT INTO l_reinstate_event_tbl;
  CLOSE c_reinstate_customer_asset;
  FOR i IN 1..l_reinstate_event_tbl.COUNT
  LOOP
    l_okc_reinstate_event_tbl(i).asset_id                   :=l_reinstate_event_tbl(i).asset_id;
    l_okc_reinstate_event_tbl(i).asset_reinstate_date       :=l_reinstate_event_tbl(i).source_transaction_date;
    l_okc_reinstate_event_tbl(i).asset_transaction_id       :=l_reinstate_event_tbl(i).px_transaction_id;
    l_okc_reinstate_event_tbl(i).asset_source_txn_timestamp :=l_reinstate_event_tbl(i).px_transaction_date;
  END LOOP;
  cse_int_utils_pvt.rst_service_contract_event ( l_okc_reinstate_event_tbl , l_return_status , l_message_count , l_message_tbl );
  n                :=l_message_tbl.LAST;
  IF(n             <>NULL) THEN
    l_error_message:=l_message_tbl(n).txn_msg_text;
  ELSE
    l_error_message :=x_error_message;
  END IF;
  IF (l_return_status<> fnd_api.g_ret_sts_success) THEN
    cse_int_utils_pvt.log_messages(fnd_log.level_info,'Cse_int_utils_pvt Api call to reinstate_service_asset Failed ',l_error_message);
    dbms_output.put_line('reinstate_service_asset called');
  END IF;
  x_return_status := l_return_status;
  l_okc_reinstate_event_tbl.DELETE;
  x_error_message :=l_error_message;

END reinstate_service_asset;

BEGIN

cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
  x_return_status      := fnd_api.g_ret_sts_success;
  l_inserted_row_count :=0;
  FOR c_get_int_struct_data_rec IN c_get_int_struct_data_cur
  LOOP
    l_relationship_id            := cse_int_s.NEXTVAL;
    l_transacted_relationship_id := cse_int_s.NEXTVAL;
    /*Raise Customer Asset Relationship Events before DB insert */
    IF p_batch_type                                = 'CA' THEN
      l_cust_asset_rel_rec.relationship_id        := l_relationship_id;
      l_cust_asset_rel_rec.subject_id             := c_get_int_struct_data_rec.asset_id;
      l_cust_asset_rel_rec.relationship_type_code := c_get_int_struct_data_rec.relationship_type_code;
      l_cust_asset_rel_rec.object_id              := c_get_int_struct_data_rec.parent_asset_id;
      cse_int_utils_pvt.raise_cust_asset_rel_event(p_cust_asset_rel_rec => l_cust_asset_rel_rec, p_event_type => C_CREATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
      IF (x_return_status<> fnd_api.g_ret_sts_success) THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_info,'Failed  to trigger business events', x_error_message);
      END IF;
    END IF;
    INSERT
    INTO CSE_ASSET_RELATIONSHIPS
      (
        RELATIONSHIP_ID,
        OBJECT_VERSION_NUMBER,
        OBJECT_ID,
        SUBJECT_ID,
        RELATIONSHIP_TYPE_CODE,
        OBJECT_TYPE,
        SUBJECT_TYPE,
        ACTIVE_START_DATE,
        ACTIVE_END_DATE,
        created_by,
        creation_date,
        last_updated_by,
        last_update_date,
        last_update_login,
        request_id,
        job_definition_name,
        job_definition_package
      )
      VALUES
      (
        l_relationship_id,
        c_get_int_struct_data_rec.object_version_number,
        c_get_int_struct_data_rec.parent_asset_id,
        c_get_int_struct_data_rec.asset_id,
        c_get_int_struct_data_rec.relationship_type_code,
        c_get_int_struct_data_rec.object_type,
        c_get_int_struct_data_rec.subject_type,
        c_get_int_struct_data_rec.active_start_date,
        c_get_int_struct_data_rec.active_end_date,
        c_get_int_struct_data_rec.created_by,
        c_get_int_struct_data_rec.creation_date,
        c_get_int_struct_data_rec.last_updated_by,
        c_get_int_struct_data_rec.last_update_date,
        c_get_int_struct_data_rec.last_update_login,
        c_get_int_struct_data_rec.request_id,
        c_get_int_struct_data_rec.job_definition_name,
        c_get_int_struct_data_rec.job_definition_package
      );
    INSERT
    INTO CSE_TRANSACTED_RELATIONSHIPS
      (
        RELATIONSHIP_ID,
        TRANSACTED_RELATIONSHIP_ID,
        TRANSACTION_ID,
        created_by,
        creation_date,
        last_updated_by,
        last_update_date,
        last_update_login,
        request_id,
        job_definition_name,
        job_definition_package
      )
      VALUES
      (
        l_relationship_id,
        l_transacted_relationship_id,
        c_get_int_struct_data_rec.transaction_id,
        c_get_int_struct_data_rec.created_by,
        c_get_int_struct_data_rec.creation_date,
        c_get_int_struct_data_rec.last_updated_by,
        c_get_int_struct_data_rec.last_update_date,
        c_get_int_struct_data_rec.last_update_login,
        c_get_int_struct_data_rec.request_id,
        c_get_int_struct_data_rec.job_definition_name,
        c_get_int_struct_data_rec.job_definition_package
      );
    INSERT
    INTO CSE_ASSET_RELATIONSHIPS_HIST
      (
        RELATIONSHIP_ID,
        TRANSACTED_RELATIONSHIP_ID,
        OBJECT_VERSION_NUMBER,
        OBJECT_ID,
        SUBJECT_ID,
        RELATIONSHIP_TYPE_CODE,
        OBJECT_TYPE,
        SUBJECT_TYPE,
        ACTIVE_START_DATE,
        ACTIVE_END_DATE,
        HISTORY_ACTION_CODE,
        created_by,
        creation_date,
        last_updated_by,
        last_update_date,
        last_update_login,
        request_id,
        job_definition_name,
        job_definition_package
      )
      VALUES
      (
        l_relationship_id,
        l_transacted_relationship_id,
        c_get_int_struct_data_rec.object_version_number,
        c_get_int_struct_data_rec.parent_asset_id,
        c_get_int_struct_data_rec.asset_id,
        c_get_int_struct_data_rec.relationship_type_code,
        c_get_int_struct_data_rec.object_type,
        c_get_int_struct_data_rec.subject_type,
        c_get_int_struct_data_rec.active_start_date,
        c_get_int_struct_data_rec.active_end_date,
        c_get_int_struct_data_rec.relationship_action_code,
        c_get_int_struct_data_rec.created_by,
        c_get_int_struct_data_rec.creation_date,
        c_get_int_struct_data_rec.last_updated_by,
        c_get_int_struct_data_rec.last_update_date,
        c_get_int_struct_data_rec.last_update_login,
        c_get_int_struct_data_rec.request_id,
        c_get_int_struct_data_rec.job_definition_name,
        c_get_int_struct_data_rec.job_definition_package
      );
    l_inserted_row_count := l_inserted_row_count + 1;
  END LOOP;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Created Relationship records, CREATE case = '||l_inserted_row_count);
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');
EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
END insert_valid_structure_rec;
/*=============================================================================
|
|  DESCRIPTION
|      This Public API does the following actions:
|        1. Insert Valid relationship records in
|           a) Asset Relationships table
|           b) Asset Relationships History table
|           c) Transacted Relationship table
|
|  PARAMETERS
|      Returns x_errbuf and Status code x_retcode back to calling Api
|
*===========================================================================*/
PROCEDURE update_valid_structure_rec
  (
    p_batch_id          IN NUMBER,
    p_batch_type        IN VARCHAR2,
    p_partition_number  IN NUMBER,
    px_transaction_id   IN OUT NOCOPY NUMBER,
    px_transaction_date IN OUT NOCOPY DATE,
    x_error_message OUT NOCOPY        VARCHAR2,
    x_return_status OUT NOCOPY        VARCHAR2
  )
IS
  CURSOR valid_update_structure_rec_cur
  IS
    SELECT asset_id,
      parent_asset_id,
      relationship_action_code,
      relationship_type_code,
      created_by,
      creation_date,
      last_updated_by,
      last_update_date,
      last_update_login,
      request_id,
      job_definition_name,
      job_definition_package
    FROM CSE_ASSETS_INT assetsInt
    WHERE assetsInt.interface_status_code = C_INT_VALID
    AND assetsInt.partition_number        = p_partition_number
    AND assetsInt.interface_batch_id      = p_batch_id
    AND assetsInt.action_code             = C_UPDATE_ACTION_CODE;
  CURSOR get_relationship_cur(p_subject_id NUMBER)
  IS
    SELECT relationship_id,
      object_version_number,
      object_id,
      subject_id,
      relationship_type_code,
      object_type,
      subject_type,
      active_start_date,
      active_end_date,
      attribute_category,
      attribute_char1,
      attribute_char2,
      attribute_char3,
      attribute_char4,
      attribute_char5,
      attribute_char6,
      attribute_char7,
      attribute_char8,
      attribute_char9,
      attribute_char10,
      attribute_char11,
      attribute_char12,
      attribute_char13,
      attribute_char14,
      attribute_char15,
      attribute_char16,
      attribute_char17,
      attribute_char18,
      attribute_char19,
      attribute_char20,
      attribute_number1,
      attribute_number2,
      attribute_number3,
      attribute_number4,
      attribute_number5,
      attribute_number6,
      attribute_number7,
      attribute_number8,
      attribute_number9,
      attribute_number10,
      attribute_date1,
      attribute_date2,
      attribute_date3,
      attribute_date4,
      attribute_date5,
      attribute_timestamp1,
      attribute_timestamp2,
      attribute_timestamp3,
      attribute_timestamp4,
      attribute_timestamp5,
      created_by,
      creation_date,
      last_updated_by,
      last_update_date,
      last_update_login,
      request_id,
      job_definition_name,
      job_definition_package
    FROM CSE_ASSET_RELATIONSHIPS assetRel
    WHERE assetRel.subject_id = p_subject_id;
  /*Cursor to get the assets being part of a structure and whose cust/loc info is being updated*/
  CURSOR c_get_assets_add_updt_struc
  IS
    SELECT assetInt.asset_id,
      assetInt.customer_id,
      assetInt.CUSTOMER_ACCOUNT_ID,
      assetInt.CUSTOMER_ACCOUNT_SITE_ID,
      assetInt.CUSTOMER_ACCOUNT_SITE_USE_ID,
      assetInt.CUSTOMER_SITE_PARTY_ID,
      assetInt.CUSTOMER_SITE_ID,
      assetInt.active_end_date,
      assetInt.parent_asset_id,
      assetInt.relationship_action_code
    FROM cse_assets_int assetInt
    WHERE assetInt.partition_number    = p_partition_number
    AND assetInt.interface_status_code = C_INT_VALID
    AND assetInt.action_code           = C_UPDATE_ACTION_CODE
    OR( assetInt.parent_asset_number  IS NOT NULL
    AND EXISTS
      (SELECT 'X'
      FROM cse_asset_relationships assetRel
      WHERE assetRel.object_id       = assetInt.asset_id
      AND( assetRel.active_end_date IS NULL
      OR assetRel.active_end_date    > sysdate)
      ));
    /*Cursor to get the parent asset details of assets which are newly added as a component to a structure*/
    CURSOR c_get_parent_details(c_asset_id NUMBER)
    IS
      SELECT cseb.customer_id,
        cseb.customer_account_id,
        cseb.CUSTOMER_SITE_ID,
        cseb.customer_account_site_id,
        cseb.customer_account_site_use_id,
        cseb.customer_site_party_id,
        cseb.active_end_date,
        cseb.customer_billing_party_id,
        cseb.customer_billing_party_site_id
      FROM cse_assets_b cseb
      WHERE cseb.asset_id = c_asset_id;
    /*Cursor to check  the leaf node terminated */
    CURSOR c_get_terminated_assets
    IS
      SELECT assetInt.asset_id,
      assetInt.relationship_type_code,
       assetInt.created_by,
       assetInt.creation_date,
       assetInt.last_updated_by,
       assetInt.last_update_date,
       assetInt.last_update_login,
       assetInt.request_id,
       assetInt.job_definition_name,
       assetInt.job_definition_package
      FROM cse_assets_int assetInt
      WHERE assetInt.partition_number      = p_partition_number
      AND assetInt.interface_status_code   = C_INT_VALID
      AND assetInt.action_code             = C_UPDATE_ACTION_CODE
      AND assetInt.active_end_date        IS NOT NULL
      AND assetInt.active_end_date        <> FND_API.G_NULL_DATE
      AND TRUNC(assetInt.active_end_date) <= TRUNC(sysdate)
      AND EXISTS
        (SELECT 'X'
        FROM cse_asset_relationships rel
        WHERE rel.subject_id     = assetInt.asset_id
        AND rel.active_end_date IS NULL
        );
    CURSOR c_get_cust_bill_party_id( c_cust_bill_party_site NUMBER)
    IS
      SELECT hps.party_id
      FROM hz_party_sites hps
      WHERE hps.party_site_id = c_cust_bill_party_site
      AND EXISTS
        (SELECT 'X'
        FROM hz_cust_acct_sites_all hcas
        WHERE hcas.party_site_id = hps.party_site_id
        );
  TYPE l_terminated_assets_tbl_type
IS
  TABLE OF c_get_terminated_assets%ROWTYPE;
  l_terminated_assets_tbl l_terminated_assets_tbl_type;
TYPE l_cascade_asset_tbl_type
IS
  TABLE OF c_get_assets_add_updt_struc%ROWTYPE;
  l_cascade_asset_tbl l_cascade_asset_tbl_type;
  parent_asset_details_rec c_get_parent_details%ROWTYPE;
  l_cascade_rec cse_int_utils_pvt.cascade_rec_type;
TYPE relationship_tbl_type
IS
  TABLE OF get_relationship_cur%ROWTYPE;
TYPE valid_struct_rec_type
IS
  TABLE OF valid_update_structure_rec_cur%ROWTYPE;
  valid_struct_record_tbl valid_struct_rec_type;
  relationship_tbl relationship_tbl_type;
  l_transacted_relationship_id NUMBER(18,0);
  l_relationship_id            NUMBER(18,0);
  l_api_name                   VARCHAR2(300) := 'cse_bulk_import_pvt.update_valid_structure_rec';
  l_return_status              VARCHAR2(1)   := fnd_api.g_ret_sts_success;
  l_msg_count                  NUMBER;
  l_error_msg                  VARCHAR2(300);
  l_cust_bill_party_id         NUMBER;
  l_cust_asset_rel_rec cse_int_utils_pvt.asset_rel_event_rec_type;

BEGIN

OPEN get_relationship_cur(valid_struct_record_tbl(j).asset_id);
      FETCH get_relationship_cur BULK COLLECT INTO relationship_tbl;
      CLOSE get_relationship_cur;
      l_transacted_relationship_id := cse_int_s.NEXTVAL;
      FOR i IN relationship_tbl.FIRST..relationship_tbl.LAST
      LOOP
        /*Checking if the asset is being removed from an active structure*/
        IF (valid_struct_record_tbl(j).relationship_action_code = C_REM_REL_ACTION_CODE AND relationship_tbl(i).active_end_date IS NULL) THEN
          l_relationship_id                                    := relationship_tbl(i).relationship_id;
          /*Raise Customer Asset Relationship Events before DB update */
          IF p_batch_type                                = 'CA' THEN
            l_cust_asset_rel_rec.relationship_id        := relationship_tbl(i).relationship_id;
            l_cust_asset_rel_rec.subject_id             := relationship_tbl(i).subject_id;
            l_cust_asset_rel_rec.relationship_type_code := relationship_tbl(i).relationship_type_code;
            l_cust_asset_rel_rec.object_id              := relationship_tbl(i).object_id;
            cse_int_utils_pvt.raise_cust_asset_rel_event(p_cust_asset_rel_rec => l_cust_asset_rel_rec, p_event_type => C_DELETE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
            IF (x_return_status<> fnd_api.g_ret_sts_success) THEN
              cse_int_utils_pvt.log_messages(fnd_log.level_info,'Failed  to trigger business events', x_error_message);
            END IF;
          END IF;
          --populate the active_end_date value for existing relationship
          UPDATE CSE_ASSET_RELATIONSHIPS assetRel
          SET assetRel.active_end_date      = NVL(px_transaction_date,sysdate),
            assetRel.last_updated_by        = NVL(valid_struct_record_tbl(j).last_updated_by,assetRel.last_updated_by),
            assetRel.last_update_date       = NVL(valid_struct_record_tbl(j).last_update_date,assetRel.last_update_date),
            assetRel.last_update_login      = NVL(valid_struct_record_tbl(j).last_update_login,assetRel.last_update_login),
            assetRel.request_id             = NVL(valid_struct_record_tbl(j).request_id,assetRel.request_id),
            assetRel.job_definition_name    = NVL(valid_struct_record_tbl(j).job_definition_name,assetRel.job_definition_name),
            assetRel.job_definition_package = NVL(valid_struct_record_tbl(j).job_definition_package,assetRel.job_definition_package)
          WHERE assetRel.subject_id         = valid_struct_record_tbl(j).asset_id
          AND assetRel.active_end_date     IS NULL;
          INSERT
          INTO CSE_ASSET_RELATIONSHIPS_HIST
            (
              RELATIONSHIP_ID,
              TRANSACTED_RELATIONSHIP_ID,
              OBJECT_VERSION_NUMBER,
              OBJECT_ID,
              SUBJECT_ID,
              RELATIONSHIP_TYPE_CODE,
              OBJECT_TYPE,
              SUBJECT_TYPE,
              ACTIVE_START_DATE,
              ACTIVE_END_DATE,
              HISTORY_ACTION_CODE,
              attribute_category,
              attribute_char1,
              attribute_char2,
              attribute_char3,
              attribute_char4,
              attribute_char5,
              attribute_char6,
              attribute_char7,
              attribute_char8,
              attribute_char9,
              attribute_char10,
              attribute_char11,
              attribute_char12,
              attribute_char13,
              attribute_char14,
              attribute_char15,
              attribute_char16,
              attribute_char17,
              attribute_char18,
              attribute_char19,
              attribute_char20,
              attribute_number1,
              attribute_number2,
              attribute_number3,
              attribute_number4,
              attribute_number5,
              attribute_number6,
              attribute_number7,
              attribute_number8,
              attribute_number9,
              attribute_number10,
              attribute_date1,
              attribute_date2,
              attribute_date3,
              attribute_date4,
              attribute_date5,
              attribute_timestamp1,
              attribute_timestamp2,
              attribute_timestamp3,
              attribute_timestamp4,
              attribute_timestamp5,
              created_by,
              creation_date,
              last_updated_by,
              last_update_date,
              last_update_login,
              request_id,
              job_definition_name,
              job_definition_package
            )
            VALUES
            (
              relationship_tbl(i).relationship_id,
              l_transacted_relationship_id,
              relationship_tbl(i).object_version_number,
              relationship_tbl(i).object_id,
              relationship_tbl(i).subject_id,
              relationship_tbl(i).relationship_type_code,
              relationship_tbl(i).object_type,
              relationship_tbl(i).subject_type,
              relationship_tbl(i).active_start_date,
              relationship_tbl(i).active_end_date,
              valid_struct_record_tbl(j).relationship_action_code,
              relationship_tbl(i).attribute_category,
              relationship_tbl(i).attribute_char1,
              relationship_tbl(i).attribute_char2,
              relationship_tbl(i).attribute_char3,
              relationship_tbl(i).attribute_char4,
              relationship_tbl(i).attribute_char5,
              relationship_tbl(i).attribute_char6,
              relationship_tbl(i).attribute_char7,
              relationship_tbl(i).attribute_char8,
              relationship_tbl(i).attribute_char9,
              relationship_tbl(i).attribute_char10,
              relationship_tbl(i).attribute_char11,
              relationship_tbl(i).attribute_char12,
              relationship_tbl(i).attribute_char13,
              relationship_tbl(i).attribute_char14,
              relationship_tbl(i).attribute_char15,
              relationship_tbl(i).attribute_char16,
              relationship_tbl(i).attribute_char17,
              relationship_tbl(i).attribute_char18,
              relationship_tbl(i).attribute_char19,
              relationship_tbl(i).attribute_char20,
              relationship_tbl(i).attribute_number1,
              relationship_tbl(i).attribute_number2,
              relationship_tbl(i).attribute_number3,
              relationship_tbl(i).attribute_number4,
              relationship_tbl(i).attribute_number5,
              relationship_tbl(i).attribute_number6,
              relationship_tbl(i).attribute_number7,
              relationship_tbl(i).attribute_number8,
              relationship_tbl(i).attribute_number9,
              relationship_tbl(i).attribute_number10,
              relationship_tbl(i).attribute_date1,
              relationship_tbl(i).attribute_date2,
              relationship_tbl(i).attribute_date3,
              relationship_tbl(i).attribute_date4,
              relationship_tbl(i).attribute_date5,
              relationship_tbl(i).attribute_timestamp1,
              relationship_tbl(i).attribute_timestamp2,
              relationship_tbl(i).attribute_timestamp3,
              relationship_tbl(i).attribute_timestamp4,
              relationship_tbl(i).attribute_timestamp5,
              valid_struct_record_tbl(j).created_by,
              valid_struct_record_tbl(j).creation_date,
              valid_struct_record_tbl(j).last_updated_by,
              valid_struct_record_tbl(j).last_update_date,
              valid_struct_record_tbl(j).last_update_login,
              valid_struct_record_tbl(j).request_id,
              valid_struct_record_tbl(j).job_definition_name,
              valid_struct_record_tbl(j).job_definition_package
            );
        ELSIF (valid_struct_record_tbl(j).relationship_action_code = C_ADD_REL_ACTION_CODE AND valid_struct_record_tbl(j).parent_asset_id= relationship_tbl(i).object_id AND relationship_tbl(i).active_end_date IS NOT NULL) THEN
          l_relationship_id                                       := relationship_tbl(i).relationship_id;
          /*Raise Customer Asset Relationship Events before DB update */
          IF p_batch_type                                = 'CA' THEN
            l_cust_asset_rel_rec.relationship_id        := relationship_tbl(i).relationship_id;
            l_cust_asset_rel_rec.subject_id             := relationship_tbl(i).subject_id;
            l_cust_asset_rel_rec.relationship_type_code := relationship_tbl(i).relationship_type_code;
            l_cust_asset_rel_rec.object_id              := relationship_tbl(i).object_id;
            cse_int_utils_pvt.raise_cust_asset_rel_event(p_cust_asset_rel_rec => l_cust_asset_rel_rec, p_event_type => C_CREATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
            IF (x_return_status<> fnd_api.g_ret_sts_success) THEN
              cse_int_utils_pvt.log_messages(fnd_log.level_info,'Failed  to trigger business events', x_error_message);
            END IF;
          END IF;
          -- Activate existing inactive relationship
          UPDATE CSE_ASSET_RELATIONSHIPS assetRel
          SET assetRel.active_end_date      = NULL,
            assetRel.active_start_date      = NVL(px_transaction_date,sysdate),
            assetRel.last_updated_by        = NVL(valid_struct_record_tbl(j).last_updated_by,assetRel.last_updated_by),
            assetRel.last_update_date       = NVL(valid_struct_record_tbl(j).last_update_date,assetRel.last_update_date),
            assetRel.last_update_login      = NVL(valid_struct_record_tbl(j).last_update_login,assetRel.last_update_login),
            assetRel.request_id             = NVL(valid_struct_record_tbl(j).request_id,assetRel.request_id),
            assetRel.job_definition_name    = NVL(valid_struct_record_tbl(j).job_definition_name,assetRel.job_definition_name),
            assetRel.job_definition_package = NVL(valid_struct_record_tbl(j).job_definition_package,assetRel.job_definition_package)
          WHERE assetRel.subject_id         = valid_struct_record_tbl(j).asset_id
          AND assetRel.active_end_date     IS NOT NULL
          AND assetRel.object_id            =valid_struct_record_tbl(j).parent_asset_id;
          INSERT
          INTO CSE_ASSET_RELATIONSHIPS_HIST
            (
              RELATIONSHIP_ID,
              TRANSACTED_RELATIONSHIP_ID,
              OBJECT_VERSION_NUMBER,
              OBJECT_ID,
              SUBJECT_ID,
              RELATIONSHIP_TYPE_CODE,
              OBJECT_TYPE,
              SUBJECT_TYPE,
              ACTIVE_START_DATE,
              ACTIVE_END_DATE,
              HISTORY_ACTION_CODE,
              attribute_category,
              attribute_char1,
              attribute_char2,
              attribute_char3,
              attribute_char4,
              attribute_char5,
              attribute_char6,
              attribute_char7,
              attribute_char8,
              attribute_char9,
              attribute_char10,
              attribute_char11,
              attribute_char12,
              attribute_char13,
              attribute_char14,
              attribute_char15,
              attribute_char16,
              attribute_char17,
              attribute_char18,
              attribute_char19,
              attribute_char20,
              attribute_number1,
              attribute_number2,
              attribute_number3,
              attribute_number4,
              attribute_number5,
              attribute_number6,
              attribute_number7,
              attribute_number8,
              attribute_number9,
              attribute_number10,
              attribute_date1,
              attribute_date2,
              attribute_date3,
              attribute_date4,
              attribute_date5,
              attribute_timestamp1,
              attribute_timestamp2,
              attribute_timestamp3,
              attribute_timestamp4,
              attribute_timestamp5,
              created_by,
              creation_date,
              last_updated_by,
              last_update_date,
              last_update_login,
              request_id,
              job_definition_name,
              job_definition_package
            )
            VALUES
            (
              relationship_tbl(i).relationship_id,
              l_transacted_relationship_id,
              relationship_tbl(i).object_version_number,
              relationship_tbl(i).object_id,
              relationship_tbl(i).subject_id,
              relationship_tbl(i).relationship_type_code,
              relationship_tbl(i).object_type,
              relationship_tbl(i).subject_type,
              relationship_tbl(i).active_start_date,
              relationship_tbl(i).active_end_date,
              valid_struct_record_tbl(j).relationship_action_code,
              relationship_tbl(i).attribute_category,
              relationship_tbl(i).attribute_char1,
              relationship_tbl(i).attribute_char2,
              relationship_tbl(i).attribute_char3,
              relationship_tbl(i).attribute_char4,
              relationship_tbl(i).attribute_char5,
              relationship_tbl(i).attribute_char6,
              relationship_tbl(i).attribute_char7,
              relationship_tbl(i).attribute_char8,
              relationship_tbl(i).attribute_char9,
              relationship_tbl(i).attribute_char10,
              relationship_tbl(i).attribute_char11,
              relationship_tbl(i).attribute_char12,
              relationship_tbl(i).attribute_char13,
              relationship_tbl(i).attribute_char14,
              relationship_tbl(i).attribute_char15,
              relationship_tbl(i).attribute_char16,
              relationship_tbl(i).attribute_char17,
              relationship_tbl(i).attribute_char18,
              relationship_tbl(i).attribute_char19,
              relationship_tbl(i).attribute_char20,
              relationship_tbl(i).attribute_number1,
              relationship_tbl(i).attribute_number2,
              relationship_tbl(i).attribute_number3,
              relationship_tbl(i).attribute_number4,
              relationship_tbl(i).attribute_number5,
              relationship_tbl(i).attribute_number6,
              relationship_tbl(i).attribute_number7,
              relationship_tbl(i).attribute_number8,
              relationship_tbl(i).attribute_number9,
              relationship_tbl(i).attribute_number10,
              relationship_tbl(i).attribute_date1,
              relationship_tbl(i).attribute_date2,
              relationship_tbl(i).attribute_date3,
              relationship_tbl(i).attribute_date4,
              relationship_tbl(i).attribute_date5,
              relationship_tbl(i).attribute_timestamp1,
              relationship_tbl(i).attribute_timestamp2,
              relationship_tbl(i).attribute_timestamp3,
              relationship_tbl(i).attribute_timestamp4,
              relationship_tbl(i).attribute_timestamp5,
              valid_struct_record_tbl(j).created_by,
              valid_struct_record_tbl(j).creation_date,
              valid_struct_record_tbl(j).last_updated_by,
              valid_struct_record_tbl(j).last_update_date,
              valid_struct_record_tbl(j).last_update_login,
              valid_struct_record_tbl(j).request_id,
              valid_struct_record_tbl(j).job_definition_name,
              valid_struct_record_tbl(j).job_definition_package
            );
        END IF;
      END LOOP;
      relationship_tbl.DELETE;
      -- Insert records in transacted_relationships and relationship history tables
      BEGIN

INSERT
        INTO CSE_TRANSACTED_RELATIONSHIPS
          (
            RELATIONSHIP_ID,
            TRANSACTED_RELATIONSHIP_ID,
            TRANSACTION_ID,
            created_by,
            creation_date,
            last_updated_by,
            last_update_date,
            last_update_login,
            request_id,
            job_definition_name,
            job_definition_package
          )
          VALUES
          (
            l_relationship_id,
            l_transacted_relationship_id,
            px_transaction_id,
            valid_struct_record_tbl(j).created_by,
            valid_struct_record_tbl(j).creation_date,
            valid_struct_record_tbl(j).last_updated_by,
            valid_struct_record_tbl(j).last_update_date,
            valid_struct_record_tbl(j).last_update_login,
            valid_struct_record_tbl(j).request_id,
            valid_struct_record_tbl(j).job_definition_name,
            valid_struct_record_tbl(j).job_definition_package
          );
      EXCEPTION
      WHEN OTHERS THEN
        x_return_status := fnd_api.g_ret_sts_unexp_error;
        x_error_message := sqlerrm;
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);
      END;
    EXCEPTION
    WHEN OTHERS THEN
      x_return_status := fnd_api.g_ret_sts_unexp_error;
      x_error_message := sqlerrm;
    END;
  END LOOP;
  OPEN c_get_terminated_assets;
  FETCH c_get_terminated_assets BULK COLLECT INTO l_terminated_assets_tbl;
  CLOSE c_get_terminated_assets;
  IF(l_terminated_assets_tbl.count <> 0) THEN
    FOR i IN l_terminated_assets_tbl.FIRST..l_terminated_assets_tbl.LAST
    LOOP
      l_transacted_relationship_id := cse_int_s.NEXTVAL;
      OPEN get_relationship_cur(l_terminated_assets_tbl(i).asset_id);
      FETCH get_relationship_cur BULK COLLECT INTO relationship_tbl;
      CLOSE get_relationship_cur;
      FOR j IN relationship_tbl.FIRST..relationship_tbl.LAST
      LOOP
        /*This condition is to check for the record in the relationship table for active relationship */
        IF (relationship_tbl(j).active_end_date IS NULL) THEN
          /*Raise Customer Asset Relationship Events before DB update */
          IF p_batch_type                                = 'CA' THEN
            l_cust_asset_rel_rec.relationship_id        := relationship_tbl(j).relationship_id;
            l_cust_asset_rel_rec.subject_id             := relationship_tbl(j).subject_id;
            l_cust_asset_rel_rec.relationship_type_code := relationship_tbl(j).relationship_type_code;
            l_cust_asset_rel_rec.object_id              := relationship_tbl(j).object_id;
          END IF;

cse_int_utils_pvt.raise_cust_asset_rel_event(p_cust_asset_rel_rec => l_cust_asset_rel_rec, p_event_type => C_DELETE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
      IF (x_return_status<> fnd_api.g_ret_sts_success) THEN
       cse_int_utils_pvt.log_messages(fnd_log.level_info,'Failed  to trigger business events', x_error_message);
       END IF;

UPDATE cse_asset_relationships assetRel
      SET    assetRel.active_end_date       = sysdate,
            assetRel.last_updated_by        = NVL(l_terminated_assets_tbl(i).last_updated_by,assetRel.last_updated_by),
            assetRel.last_update_date       = NVL(l_terminated_assets_tbl(i).last_update_date,assetRel.last_update_date),
            assetRel.last_update_login      = NVL(l_terminated_assets_tbl(i).last_update_login,assetRel.last_update_login),
            assetRel.request_id             = NVL(l_terminated_assets_tbl(i).request_id,assetRel.request_id),
            assetRel.job_definition_name    = NVL(l_terminated_assets_tbl(i).job_definition_name,assetRel.job_definition_name),
            assetRel.job_definition_package = NVL(l_terminated_assets_tbl(i).job_definition_package,assetRel.job_definition_package)
      WHERE subject_id     = l_terminated_assets_tbl(i).asset_id
      AND active_end_date IS NULL;

INSERT
          INTO CSE_ASSET_RELATIONSHIPS_HIST
            (
              RELATIONSHIP_ID,
              TRANSACTED_RELATIONSHIP_ID,
              OBJECT_VERSION_NUMBER,
              OBJECT_ID,
              SUBJECT_ID,
              RELATIONSHIP_TYPE_CODE,
              OBJECT_TYPE,
              SUBJECT_TYPE,
              ACTIVE_START_DATE,
              ACTIVE_END_DATE,
              HISTORY_ACTION_CODE,
              attribute_category,
              attribute_char1,
              attribute_char2,
              attribute_char3,
              attribute_char4,
              attribute_char5,
              attribute_char6,
              attribute_char7,
              attribute_char8,
              attribute_char9,
              attribute_char10,
              attribute_char11,
              attribute_char12,
              attribute_char13,
              attribute_char14,
              attribute_char15,
              attribute_char16,
              attribute_char17,
              attribute_char18,
              attribute_char19,
              attribute_char20,
              attribute_number1,
              attribute_number2,
              attribute_number3,
              attribute_number4,
              attribute_number5,
              attribute_number6,
              attribute_number7,
              attribute_number8,
              attribute_number9,
              attribute_number10,
              attribute_date1,
              attribute_date2,
              attribute_date3,
              attribute_date4,
              attribute_date5,
              attribute_timestamp1,
              attribute_timestamp2,
              attribute_timestamp3,
              attribute_timestamp4,
              attribute_timestamp5,
              created_by,
              creation_date,
              last_updated_by,
              last_update_date,
              last_update_login,
              request_id,
              job_definition_name,
              job_definition_package
            )
            VALUES
            (
              relationship_tbl(j).relationship_id,
              l_transacted_relationship_id,
              relationship_tbl(j).object_version_number,
              relationship_tbl(j).object_id,
              relationship_tbl(j).subject_id,
              relationship_tbl(j).relationship_type_code,
              relationship_tbl(j).object_type,
              relationship_tbl(j).subject_type,
              relationship_tbl(j).active_start_date,
              relationship_tbl(j).active_end_date,
              C_REM_REL_ACTION_CODE,
              relationship_tbl(j).attribute_category,
              relationship_tbl(j).attribute_char1,
              relationship_tbl(j).attribute_char2,
              relationship_tbl(j).attribute_char3,
              relationship_tbl(j).attribute_char4,
              relationship_tbl(j).attribute_char5,
              relationship_tbl(j).attribute_char6,
              relationship_tbl(j).attribute_char7,
              relationship_tbl(j).attribute_char8,
              relationship_tbl(j).attribute_char9,
              relationship_tbl(j).attribute_char10,
              relationship_tbl(j).attribute_char11,
              relationship_tbl(j).attribute_char12,
              relationship_tbl(j).attribute_char13,
              relationship_tbl(j).attribute_char14,
              relationship_tbl(j).attribute_char15,
              relationship_tbl(j).attribute_char16,
              relationship_tbl(j).attribute_char17,
              relationship_tbl(j).attribute_char18,
              relationship_tbl(j).attribute_char19,
              relationship_tbl(j).attribute_char20,
              relationship_tbl(j).attribute_number1,
              relationship_tbl(j).attribute_number2,
              relationship_tbl(j).attribute_number3,
              relationship_tbl(j).attribute_number4,
              relationship_tbl(j).attribute_number5,
              relationship_tbl(j).attribute_number6,
              relationship_tbl(j).attribute_number7,
              relationship_tbl(j).attribute_number8,
              relationship_tbl(j).attribute_number9,
              relationship_tbl(j).attribute_number10,
              relationship_tbl(j).attribute_date1,
              relationship_tbl(j).attribute_date2,
              relationship_tbl(j).attribute_date3,
              relationship_tbl(j).attribute_date4,
              relationship_tbl(j).attribute_date5,
              relationship_tbl(j).attribute_timestamp1,
              relationship_tbl(j).attribute_timestamp2,
              relationship_tbl(j).attribute_timestamp3,
              relationship_tbl(j).attribute_timestamp4,
              relationship_tbl(j).attribute_timestamp5,
               l_terminated_assets_tbl(i).created_by,
               l_terminated_assets_tbl(i).creation_date,
              l_terminated_assets_tbl(i).last_updated_by,
              l_terminated_assets_tbl(i).last_update_date,
              l_terminated_assets_tbl(i).last_update_login,
              l_terminated_assets_tbl(i).request_id,
              l_terminated_assets_tbl(i).job_definition_name,
               l_terminated_assets_tbl(i).job_definition_package
            );
         INSERT
        INTO CSE_TRANSACTED_RELATIONSHIPS
          (
            RELATIONSHIP_ID,
            TRANSACTED_RELATIONSHIP_ID,
            TRANSACTION_ID,
            created_by,
            creation_date,
            last_updated_by,
            last_update_date,
            last_update_login,
            request_id,
            job_definition_name,
            job_definition_package
          )
          VALUES
          (
            relationship_tbl(j).relationship_id,
            l_transacted_relationship_id,
            px_transaction_id,
            l_terminated_assets_tbl(i).created_by,
            l_terminated_assets_tbl(i).creation_date,
            l_terminated_assets_tbl(i).last_updated_by,
            l_terminated_assets_tbl(i).last_update_date,
            l_terminated_assets_tbl(i).last_update_login,
            l_terminated_assets_tbl(i).request_id,
            l_terminated_assets_tbl(i).job_definition_name,
            l_terminated_assets_tbl(i).job_definition_package
          );

END IF;
      END LOOP;
       relationship_tbl.DELETE;
    END LOOP;
  END IF;
  /*Cascading updates done via cse_int_utils_pvt.cascade_asset_changes procedure*/
  OPEN c_get_assets_add_updt_struc;
  FETCH c_get_assets_add_updt_struc BULK COLLECT INTO l_cascade_asset_tbl;
  CLOSE c_get_assets_add_updt_struc;
  IF l_cascade_asset_tbl.count >0 THEN
    FOR i IN l_cascade_asset_tbl.FIRST..l_cascade_asset_tbl.LAST
    LOOP
      IF (l_cascade_asset_tbl(i).relationship_action_code = C_ADD_REL_ACTION_CODE AND l_cascade_asset_tbl(i).parent_asset_id IS NOT NULL) THEN
        OPEN c_get_parent_details(l_cascade_asset_tbl(i).parent_asset_id);
        FETCH c_get_parent_details INTO parent_asset_details_rec;
        CLOSE c_get_parent_details;
        /*ASSIGN THE DATA TO THE RECORD TO BE PASSED TO CSE_INT_UTILS.CASCADE_ASSET_CHANGES*/
        l_cascade_rec.asset_id                := l_cascade_asset_tbl(i).parent_asset_id;
        l_cascade_rec.customer_id             := parent_asset_details_rec.CUSTOMER_ID;
        l_cascade_rec.cust_site_party_id      := parent_asset_details_rec.CUSTOMER_SITE_PARTY_ID;
        l_cascade_rec.cust_site_id            := parent_asset_details_rec.CUSTOMER_SITE_ID;
        l_cascade_rec.cust_account_id         := parent_asset_details_rec.CUSTOMER_ACCOUNT_ID;
        l_cascade_rec.cust_account_site_id    := parent_asset_details_rec.CUSTOMER_ACCOUNT_SITE_ID;
        l_cascade_rec.cust_site_use_id        := parent_asset_details_rec.CUSTOMER_ACCOUNT_SITE_USE_ID;
        l_cascade_rec.cust_bill_party_id      := parent_asset_details_rec.CUSTOMER_BILLING_PARTY_ID;
        l_cascade_rec.cust_bill_party_site_id := parent_asset_details_rec.CUSTOMER_BILLING_PARTY_SITE_ID;
        l_cascade_rec.active_end_date         := parent_asset_details_rec.ACTIVE_END_DATE;
        l_cascade_rec.transaction_id          := px_transaction_id;
        l_cascade_rec.transaction_date        := px_transaction_date;
        cse_int_utils_pvt.Cascade_Asset_Changes( l_cascade_rec,l_return_status,l_msg_count,l_error_msg);
         IF (l_return_status <>fnd_api.g_ret_sts_success) THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_info,'Cascading changes to components failed', l_error_msg);
        END IF;
      ELSE
        IF( l_cascade_asset_tbl(i).CUSTOMER_ACCOUNT_SITE_ID IS NOT NULL ) THEN
          OPEN c_get_cust_bill_party_id(l_cascade_asset_tbl(i).CUSTOMER_ACCOUNT_SITE_ID);
          FETCH c_get_cust_bill_party_id INTO l_cust_bill_party_id;
          CLOSE c_get_cust_bill_party_id;
        END IF;
        /*ASSIGN THE DATA TO THE RECORD TO BE PASSED TO CSE_INT_UTILS.CASCADE_ASSET_CHANGES*/
        l_cascade_rec.asset_id                := l_cascade_asset_tbl(i).ASSET_ID;
        l_cascade_rec.customer_id             := l_cascade_asset_tbl(i).CUSTOMER_ID;
        l_cascade_rec.cust_site_party_id      := l_cascade_asset_tbl(i).CUSTOMER_SITE_PARTY_ID;
        l_cascade_rec.cust_site_id            := l_cascade_asset_tbl(i).CUSTOMER_SITE_ID;
        l_cascade_rec.cust_account_id         := l_cascade_asset_tbl(i).CUSTOMER_ACCOUNT_ID;
        l_cascade_rec.cust_account_site_id    := l_cascade_asset_tbl(i).CUSTOMER_ACCOUNT_SITE_ID;
        l_cascade_rec.cust_site_use_id        := l_cascade_asset_tbl(i).CUSTOMER_ACCOUNT_SITE_USE_ID;
        l_cascade_rec.cust_bill_party_id      := l_cust_bill_party_id;
        l_cascade_rec.cust_bill_party_site_id := l_cascade_asset_tbl(i).CUSTOMER_ACCOUNT_SITE_ID;
        l_cascade_rec.active_end_date         := l_cascade_asset_tbl(i).ACTIVE_END_DATE;
        l_cascade_rec.transaction_id          := px_transaction_id;
        l_cascade_rec.transaction_date        := px_transaction_date;
        cse_int_utils_pvt.Cascade_Asset_Changes( l_cascade_rec,l_return_status,l_msg_count,l_error_msg);
      END IF;
      IF (l_return_status <>fnd_api.g_ret_sts_success) THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_info,'Cascading changes to components failed', l_error_msg);
      END IF;
    END LOOP;
  END IF;
  x_return_status := l_return_status;
  x_error_message := l_error_msg;
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');

EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);

END update_valid_structure_rec;

PROCEDURE insert_valid_asset_records(
    p_batch_id          IN NUMBER,
    p_partition_number  IN NUMBER,
    p_batch_type        IN VARCHAR2,
    px_transaction_id   IN OUT NOCOPY NUMBER,
    px_transaction_date IN OUT NOCOPY DATE,
    x_error_message OUT NOCOPY        VARCHAR2,
    x_return_status OUT NOCOPY        VARCHAR2 )
IS
  CURSOR c_create_inv_serials
  IS
    SELECT item_organization_id organization_id ,
      item_id ,
      serial_number ,
      NVL(lot_number,FND_API.G_MISS_CHAR) lot_number ,
      interface_row_id
    FROM cse_assets_int cseaint
    WHERE cseaint.interface_status_code = 'VALID'
    AND cseaint.partition_number        = p_partition_number
    AND cseaint.interface_batch_id      = p_batch_id
    AND cseaint.action_code             = C_CREATE_ACTION_CODE
    AND cseaint.item_id                IS NOT NULL
    AND cseaint.item_organization_id   IS NOT NULL
    AND cseaint.asset_id               IS NOT NULL
    AND (cseaint.serial_number         IS NOT NULL
    OR cseaint.lot_number              IS NOT NULL);
  /*Cursor to get the VALID assets/records to be created*/
  CURSOR c_get_valid_insert_rec
  IS
    SELECT asset_id,
      1 object_version_number,
      NVL(asset_number,asset_id) asset_number,
      asset_description,
      NULL asset_tag,
      item_id,
      item_organization_id,
      NULL item_revision,
      serial_number,
      lot_number,
      gen_object_id,
      NVL(quantity,1) quantity,
      uom_code,
      new_wo_allowed_flag,
      NULL status_code,
      active_end_date,
      NULL subinventory_code,
      NULL inventory_locator_id,
      NULL work_order_id,
      NULL work_order_operation_id,
      work_center_id,
      sales_order_id,
      sales_order_line_id,
      NVL(current_location_context,'ORA_UNKNOWN') current_location_context,
      work_center_id current_location_id,
      location_organization_id,
      NULL installed_location_context,
      NULL installed_location_id,
      shipment_date,
      NULL installed_date,
      NULL in_service_date,
      NULL purchase_date,
      NULL origination_date,
      'N' registered_flag,
      customer_id,
      customer_site_id,
      customer_site_party_id,
      customer_account_id,
      customer_account_site_id,
      customer_account_site_use_id,
      sales_order_source_system_type,
      NULL supplier_id,
      NULL supplier_site_id,
      sold_by_business_unit_id sold_by_business_unit_id,
      mntwotype.dflt_wo_type_code,
      mntwosubtype.dflt_wo_sub_type_code,
      maintainable_flag,
      attribute_category,
      attribute_char1,
      attribute_char2,
      attribute_char3,
      attribute_char4,
      attribute_char5,
      attribute_char6,
      attribute_char7,
      attribute_char8,
      attribute_char9,
      attribute_char10,
      attribute_char11,
      attribute_char12,
      attribute_char13,
      attribute_char14,
      attribute_char15,
      attribute_char16,
      attribute_char17,
      attribute_char18,
      attribute_char19,
      attribute_char20,
      attribute_number1,
      attribute_number2,
      attribute_number3,
      attribute_number4,
      attribute_number5,
      attribute_number6,
      attribute_number7,
      attribute_number8,
      attribute_number9,
      attribute_number10,
      attribute_date1,
      attribute_date2,
      attribute_date3,
      attribute_date4,
      attribute_date5,
      attribute_timestamp1,
      attribute_timestamp2,
      attribute_timestamp3,
      attribute_timestamp4,
      attribute_timestamp5,
      created_by,
      creation_date,
      last_updated_by,
      last_update_date,
      last_update_login,
      request_id,
      job_definition_name,
      job_definition_package,
      gen_object_id transacted_asset_id,
      NULL split_from_asset_id,
      NULL merged_to_asset_id,
      NULL full_snapshot_flag,
      NULL snapshot_qualified,
      'ORA_IMPORT' origination_document_type,
      0 origination_document_number,
      NULL dummy_keywork,
      NULL dummy_keyword,
      NULL keyword_text
    FROM cse_assets_int cseaint,
      (SELECT assetint.interface_row_id ,
        lookups.lookup_code dflt_wo_type_code
      FROM fnd_lookups lookups,
        cse_assets_int assetint
      WHERE assetint.dflt_wo_type     = lookups.meaning
      AND lookups.lookup_type         = 'ORA_MNT_WO_TYPE'
      AND assetint.partition_number   = p_partition_number
      AND assetint.interface_batch_id = p_batch_id
      ) mntwotype,
    (SELECT assetint.interface_row_id ,
      lookups.lookup_code dflt_wo_sub_type_code
    FROM fnd_lookups lookups,
      cse_assets_int assetint
    WHERE upper(assetint.dflt_wo_sub_type) = upper(lookups.meaning)
    AND lookups.lookup_type                = 'ORA_MNT_WO_SUB_TYPE'
    AND assetint.partition_number          = p_partition_number
    AND assetint.interface_batch_id        = p_batch_id
    ) mntwosubtype
  WHERE cseaint.interface_status_code = 'VALID'
  AND cseaint.partition_number        = p_partition_number
  AND cseaint.interface_batch_id      = p_batch_id
  AND cseaint.action_code             = C_CREATE_ACTION_CODE
  AND cseaint.item_id                IS NOT NULL
  AND cseaint.item_organization_id   IS NOT NULL
  AND cseaint.gen_object_id          IS NOT NULL
  AND cseaint.asset_id               IS NOT NULL
  AND cseaint.interface_row_id        = mntwotype.interface_row_id (+)
  AND cseaint.interface_row_id        = mntwosubtype.interface_row_id (+);
  /*Cursor to get the item structure type of the assets*/
  CURSOR c_get_item_structure_type(c_item_id NUMBER,c_org_id VARCHAR2)
  IS
    (SELECT BOM_ITEM_TYPE
    FROM EGP_SYSTEM_ITEMS_B esib
    WHERE esib.inventory_item_id = c_item_id
    AND esib.organization_id     = c_org_id
    ) ;

/*Cursor to get customer_billing_party_id info*/
    CURSOR c_get_cust_bill_party_id( c_cust_bill_party_site NUMBER)
    IS
      SELECT hps.party_id
      FROM hz_party_sites hps
      WHERE hps.party_site_id = c_cust_bill_party_site
      AND EXISTS
        (SELECT 'X'
        FROM hz_cust_acct_sites_all hcas
        WHERE hcas.party_site_id = hps.party_site_id
        );

TYPE l_assets_insert_tbl_typ
IS
  TABLE OF c_get_valid_insert_rec%ROWTYPE;
  l_assets_insert_tbl l_assets_insert_tbl_typ;
  l_item_struc_type NUMBER;
  l_logical_flag    VARCHAR2(1);
TYPE organization_id_tbl_type
IS
  TABLE OF cse_assets_int.item_organization_id%TYPE;
TYPE item_id_tbl_type
IS
  TABLE OF cse_assets_int.item_id%TYPE;
TYPE serial_number_tbl_type
IS
  TABLE OF cse_assets_int.serial_number%TYPE;
TYPE lot_number_tbl_type
IS
  TABLE OF cse_assets_int.lot_number%TYPE;
TYPE interface_row_id_tbl_type
IS
  TABLE OF cse_assets_int.interface_row_id%TYPE;
  l_int_batch_type cse_int_batches_b.internal_batch_type%TYPE;
  l_organization_id_type organization_id_tbl_type;
  l_item_id_type item_id_tbl_type;
  l_serial_number_type serial_number_tbl_type;
  l_lot_number_type lot_number_tbl_type;
  l_interface_row_id_type interface_row_id_tbl_type;
  l_serial_qty        NUMBER        :=1;
  l_end_serial_number VARCHAR2(30)  :=NULL;
  l_result            NUMBER        := 0;
  l_api_name          VARCHAR2(300) := 'cse_bulk_import_pvt.insert_valid_asset_records';
  l_int_errors_tbl_type cse_int_utils_pvt.int_errors_tbl_type;
  l_row_count     NUMBER;
  l_message_text  VARCHAR2(2000);
  l_return_status VARCHAR2(1);
  l_msg_count     NUMBER;
  l_msg_data      VARCHAR2(300);
  l_cust_bill_party_id NUMBER;

BEGIN

cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
  -- bachandr: Check if the asset is Maintenance Asset or Customer Asset and update corresponding table.
  l_int_batch_type:=p_batch_type;
  x_return_status := fnd_api.g_ret_sts_success;
  l_return_status :=fnd_api.g_ret_sts_success;
  OPEN c_create_inv_serials;
  LOOP
    FETCH c_create_inv_serials BULK COLLECT
    INTO l_organization_id_type,
      l_item_id_type,
      l_serial_number_type,
      l_lot_number_type,
      l_interface_row_id_type LIMIT c_max_buffer_size;
    EXIT
  WHEN l_interface_row_id_type.count = 0;
    FOR i IN 1..l_interface_row_id_type.COUNT
    LOOP
      --Call process asset lot creation for lot cntrolled and lot -srl controlled assets.
      IF(l_lot_number_type(i) IS NOT NULL) THEN
        cse_int_utils_pvt.Process_Asset_LotNumber(p_item_id =>l_item_id_type(i), p_org_id =>l_organization_id_type(i), p_lot_number =>l_lot_number_type(i), x_return_status =>l_return_status, x_msg_count =>l_msg_count, x_msg_data =>l_msg_data );
        IF(l_return_status <>fnd_api.g_ret_sts_success) THEN
          UPDATE cse_assets_int
          SET interface_status_code                                 ='ERROR'
          WHERE interface_row_id                                    = l_interface_row_id_type(i);
          l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
          l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
          l_int_errors_tbl_type(l_row_count).object_version_number := 1;
          l_int_errors_tbl_type(l_row_count).interface_row_id      := l_interface_row_id_type(i);
          l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
          l_int_errors_tbl_type(l_row_count).error_text            := 'CSE_AS_INVALID_LOT';
          l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
          l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
          l_int_errors_tbl_type(l_row_count).column_name           := 'LOT_NUMBER';
          l_int_errors_tbl_type(l_row_count).message_name          := 'CSE_AS_INVALID_LOT';
          l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
          l_int_errors_tbl_type(l_row_count).message_token_values  := 'LOT_NUMBER';
          l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
          l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
          l_int_errors_tbl_type(l_row_count).created_by            := fnd_global.who_user_name;
          l_int_errors_tbl_type(l_row_count).creation_date         := sysdate;
          l_int_errors_tbl_type(l_row_count).last_updated_by       := fnd_global.who_user_name;
          l_int_errors_tbl_type(l_row_count).last_update_date      := sysdate;
          l_int_errors_tbl_type(l_row_count).last_update_login     := fnd_global.user_guid;
          l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
          l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
          cse_int_utils_pvt.log_messages(fnd_log.level_severe, 'inv_lot_numbers_pub.create_inv_lot', 'interface_row_id= '||l_interface_row_id_type(i)||' Inventory API Failed with Error '||x_error_message);
        END IF;
      END IF;
      -- Call create_validate_serials to create validate serial in inventory
      IF (l_return_status    =fnd_api.g_ret_sts_success AND l_serial_number_type(i) IS NOT NULL AND l_serial_number_type(i) <> C_NULL_STRING ) THEN
        l_end_serial_number := NULL;
        l_serial_qty        := 1;
        l_result            := inv_serial_number_pub.create_validate_serials( p_org_id => l_organization_id_type(i), p_item_id => l_item_id_type(i), p_qty => l_serial_qty, p_revision => NULL, p_lotnum => REPLACE(l_lot_number_type(i),FND_API.G_MISS_NUM,NULL), p_start_ser => l_serial_number_type(i), p_trx_src_type_id => NULL, p_trx_action_id => NULL, p_sub_inventory => NULL, p_loc_id => NULL, p_wip_entity_id => NULL, p_group_mark_id => NULL, p_line_mark_id => NULL, p_issue_receipt => NULL, p_end_ser => l_end_serial_number, p_msg => x_error_message, p_check_grp_mark_id => 'N', p_rcv_validate => 'N', p_rcv_source_line_id => NULL, p_xfr_org_id => NULL, p_insert_yn => 'Y' );
        IF l_result          =1 THEN
          UPDATE cse_assets_int
          SET interface_status_code                                 ='ERROR'
          WHERE interface_row_id                                    = l_interface_row_id_type(i);
          l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
          l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
          l_int_errors_tbl_type(l_row_count).object_version_number := 1;
          l_int_errors_tbl_type(l_row_count).interface_row_id      := l_interface_row_id_type(i);
          l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
          l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
          l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
          l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
          l_int_errors_tbl_type(l_row_count).column_name           := 'SERIAL_NUMBER';
          l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
          l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
          l_int_errors_tbl_type(l_row_count).message_token_values  := 'SERIAL_NUMBER';
          l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
          l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
          l_int_errors_tbl_type(l_row_count).created_by            := fnd_global.who_user_name;
          l_int_errors_tbl_type(l_row_count).creation_date         := sysdate;
          l_int_errors_tbl_type(l_row_count).last_updated_by       := fnd_global.who_user_name;
          l_int_errors_tbl_type(l_row_count).last_update_date      := sysdate;
          l_int_errors_tbl_type(l_row_count).last_update_login     := fnd_global.user_guid;
          l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
          l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
          cse_int_utils_pvt.log_messages(fnd_log.level_severe, 'inv_serial_number_pub.create_validate_serials', 'interface_row_id= '||l_interface_row_id_type(i)||' Inventory API Failed with Error '||x_error_message);
        END IF;
      END IF;
    END LOOP;
    l_organization_id_type.delete;
    l_item_id_type.delete;
    l_serial_number_type.delete;
    l_lot_number_type.delete;
    x_return_status := l_return_status;
  END LOOP;
  CLOSE c_create_inv_serials;
  cse_int_utils_pvt.log_errors( l_int_errors_tbl_type, l_return_status , x_error_message );
  OPEN c_get_valid_insert_rec;
  LOOP
    FETCH c_get_valid_insert_rec BULk COLLECT
    INTO l_assets_insert_tbl LIMIT c_max_buffer_size;
    EXIT
  WHEN l_assets_insert_tbl.count = 0;
    FOR i IN l_assets_insert_tbl.FIRST..l_assets_insert_tbl.LAST
    LOOP
      /*Setting the logical flag of the asset according to teh item structure type*/
      OPEN c_get_item_structure_type(l_assets_insert_tbl(i).item_id,l_assets_insert_tbl(i).item_organization_id); -- set the logical flag according to the BOM_ITEM_TYPE/item structure type of the item of the asset
      FETCH c_get_item_structure_type INTO l_item_struc_type;
      CLOSE c_get_item_structure_type;
      IF NVL(l_item_struc_type,0) IN (1,2) THEN
        l_logical_flag := 'Y';
      ELSE
        l_logical_flag := 'N';
      END IF;
      IF (l_assets_insert_tbl(i).customer_account_site_id IS NOT NULL) THEN
        OPEN c_get_cust_bill_party_id(l_assets_insert_tbl(i).customer_account_site_id);
        FETCH c_get_cust_bill_party_id INTO l_cust_bill_party_id;
        CLOSE c_get_cust_bill_party_id;
      END IF;

INSERT
      INTO CSE_ASSETS_B
        (
          asset_id,
          object_version_number,
          asset_number,
          asset_tag,
          item_id,
          item_organization_id,
          item_revision,
          serial_number,
          lot_number,
          gen_object_id,
          quantity,
          uom_code,
          new_wo_allowed_flag,
          status_code,
          active_end_date,
          subinventory_code,
          inventory_locator_id,
          work_order_id,
          work_order_operation_id,
          work_center_id,
          sales_order_id,
          sales_order_line_id,
          current_location_context,
          current_location_id,
          location_organization_id,
          installed_location_context,
          installed_location_id,
          shipment_date,
          installed_date,
          in_service_date,
          purchase_date,
          origination_date,
          registered_flag,
          customer_id,
          customer_site_id,
          customer_site_party_id,
          customer_account_id,
          customer_account_site_id,
          customer_account_site_use_id,
          customer_billing_party_site_id,
          customer_billing_party_id,
          --sales_order_source_system_type,
          supplier_id,
          supplier_site_id,
          sold_by_business_unit_id,
          dflt_wo_type,
          dflt_wo_sub_type,
          owned_by,
          used_by,
          maintainable_flag,
          logical_flag,
          attribute_category,
          attribute_char1,
          attribute_char2,
          attribute_char3,
          attribute_char4,
          attribute_char5,
          attribute_char6,
          attribute_char7,
          attribute_char8,
          attribute_char9,
          attribute_char10,
          attribute_char11,
          attribute_char12,
          attribute_char13,
          attribute_char14,
          attribute_char15,
          attribute_char16,
          attribute_char17,
          attribute_char18,
          attribute_char19,
          attribute_char20,
          attribute_number1,
          attribute_number2,
          attribute_number3,
          attribute_number4,
          attribute_number5,
          attribute_number6,
          attribute_number7,
          attribute_number8,
          attribute_number9,
          attribute_number10,
          attribute_date1,
          attribute_date2,
          attribute_date3,
          attribute_date4,
          attribute_date5,
          attribute_timestamp1,
          attribute_timestamp2,
          attribute_timestamp3,
          attribute_timestamp4,
          attribute_timestamp5,
          created_by,
          creation_date,
          last_updated_by,
          last_update_date,
          last_update_login,
          request_id,
          job_definition_name,
          job_definition_package
        )
        VALUES
        (
          l_assets_insert_tbl(i).asset_id,
          l_assets_insert_tbl(i).object_version_number,
          l_assets_insert_tbl(i).asset_number,
          l_assets_insert_tbl(i).asset_tag,
          l_assets_insert_tbl(i).item_id,
          l_assets_insert_tbl(i).item_organization_id,
          l_assets_insert_tbl(i).item_revision,
          l_assets_insert_tbl(i).serial_number,
          l_assets_insert_tbl(i).lot_number,
          l_assets_insert_tbl(i).gen_object_id,
          l_assets_insert_tbl(i).quantity,
          l_assets_insert_tbl(i).uom_code,
          l_assets_insert_tbl(i).new_wo_allowed_flag,
          l_assets_insert_tbl(i).status_code,
          l_assets_insert_tbl(i).active_end_date,
          l_assets_insert_tbl(i).subinventory_code,
          l_assets_insert_tbl(i).inventory_locator_id,
          l_assets_insert_tbl(i).work_order_id,
          l_assets_insert_tbl(i).work_order_operation_id,
          l_assets_insert_tbl(i).work_center_id,
          l_assets_insert_tbl(i).sales_order_id,
          l_assets_insert_tbl(i).sales_order_line_id,
          l_assets_insert_tbl(i).current_location_context,
          l_assets_insert_tbl(i).current_location_id,
          l_assets_insert_tbl(i).location_organization_id,
          l_assets_insert_tbl(i).installed_location_context,
          l_assets_insert_tbl(i).installed_location_id,
          DECODE(l_int_batch_type,'CA', l_assets_insert_tbl(i).shipment_date, NULL) ,
          l_assets_insert_tbl(i).installed_date,
          l_assets_insert_tbl(i).in_service_date,
          l_assets_insert_tbl(i).purchase_date,
          l_assets_insert_tbl(i).origination_date,
          l_assets_insert_tbl(i).registered_flag,
          l_assets_insert_tbl(i).customer_id,
          l_assets_insert_tbl(i).customer_site_id,
          l_assets_insert_tbl(i).customer_site_party_id,
          l_assets_insert_tbl(i).customer_account_id,
          l_assets_insert_tbl(i).customer_account_site_id,
          l_assets_insert_tbl(i).customer_account_site_use_id,
          l_assets_insert_tbl(i).customer_account_site_id,
          l_cust_bill_party_id,
          --sales_order_source_system_type,
          l_assets_insert_tbl(i).supplier_id,
          l_assets_insert_tbl(i).supplier_site_id,
          l_assets_insert_tbl(i).sold_by_business_unit_id,
          l_assets_insert_tbl(i).dflt_wo_type_code,
          l_assets_insert_tbl(i).dflt_wo_sub_type_code,
          DECODE(l_int_batch_type,'CA','C','E'),
          DECODE(l_int_batch_type,'CA','C','E'),
          DECODE(l_int_batch_type,'CA','N','Y'),
          l_logical_flag,
          l_assets_insert_tbl(i).attribute_category,
          l_assets_insert_tbl(i).attribute_char1,
          l_assets_insert_tbl(i).attribute_char2,
          l_assets_insert_tbl(i).attribute_char3,
          l_assets_insert_tbl(i).attribute_char4,
          l_assets_insert_tbl(i).attribute_char5,
          l_assets_insert_tbl(i).attribute_char6,
          l_assets_insert_tbl(i).attribute_char7,
          l_assets_insert_tbl(i).attribute_char8,
          l_assets_insert_tbl(i).attribute_char9,
          l_assets_insert_tbl(i).attribute_char10,
          l_assets_insert_tbl(i).attribute_char11,
          l_assets_insert_tbl(i).attribute_char12,
          l_assets_insert_tbl(i).attribute_char13,
          l_assets_insert_tbl(i).attribute_char14,
          l_assets_insert_tbl(i).attribute_char15,
          l_assets_insert_tbl(i).attribute_char16,
          l_assets_insert_tbl(i).attribute_char17,
          l_assets_insert_tbl(i).attribute_char18,
          l_assets_insert_tbl(i).attribute_char19,
          l_assets_insert_tbl(i).attribute_char20,
          l_assets_insert_tbl(i).attribute_number1,
          l_assets_insert_tbl(i).attribute_number2,
          l_assets_insert_tbl(i).attribute_number3,
          l_assets_insert_tbl(i).attribute_number4,
          l_assets_insert_tbl(i).attribute_number5,
          l_assets_insert_tbl(i).attribute_number6,
          l_assets_insert_tbl(i).attribute_number7,
          l_assets_insert_tbl(i).attribute_number8,
          l_assets_insert_tbl(i).attribute_number9,
          l_assets_insert_tbl(i).attribute_number10,
          l_assets_insert_tbl(i).attribute_date1,
          l_assets_insert_tbl(i).attribute_date2,
          l_assets_insert_tbl(i).attribute_date3,
          l_assets_insert_tbl(i).attribute_date4,
          l_assets_insert_tbl(i).attribute_date5,
          l_assets_insert_tbl(i).attribute_timestamp1,
          l_assets_insert_tbl(i).attribute_timestamp2,
          l_assets_insert_tbl(i).attribute_timestamp3,
          l_assets_insert_tbl(i).attribute_timestamp4,
          l_assets_insert_tbl(i).attribute_timestamp5,
          l_assets_insert_tbl(i).created_by,
          l_assets_insert_tbl(i).creation_date,
          l_assets_insert_tbl(i).last_updated_by,
          l_assets_insert_tbl(i).last_update_date,
          l_assets_insert_tbl(i).last_update_login,
          l_assets_insert_tbl(i).request_id,
          l_assets_insert_tbl(i).job_definition_name,
          l_assets_insert_tbl(i).job_definition_package
        );
      INSERT
      INTO CSE_TRANSACTED_ASSETS
        (
          transacted_asset_id,
          transaction_id,
          asset_id,
          transacted_quantity,
          location_context,
          organization_id,
          subinventory_code,
          inventory_locator_id,
          work_order_id,
          work_order_operation_id,
          work_center_id,
          split_from_asset_id,
          merged_to_asset_id,
          full_snapshot_flag,
          snapshot_qualified,
          created_by,
          creation_date,
          last_updated_by,
          last_update_date,
          last_update_login,
          request_id,
          job_definition_name,
          job_definition_package,
          gen_object_id
        )
        VALUES
        (
          l_assets_insert_tbl(i).transacted_asset_id,
          px_transaction_id,
          l_assets_insert_tbl(i).asset_id,
          l_assets_insert_tbl(i).quantity,
          l_assets_insert_tbl(i).current_location_context,
          l_assets_insert_tbl(i).item_organization_id,
          l_assets_insert_tbl(i).subinventory_code,
          l_assets_insert_tbl(i).inventory_locator_id,
          l_assets_insert_tbl(i).work_order_id,
          l_assets_insert_tbl(i).work_order_operation_id,
          l_assets_insert_tbl(i).work_center_id,
          l_assets_insert_tbl(i).split_from_asset_id,
          l_assets_insert_tbl(i).merged_to_asset_id,
          l_assets_insert_tbl(i).full_snapshot_flag,
          l_assets_insert_tbl(i).snapshot_qualified,
          l_assets_insert_tbl(i).created_by,
          l_assets_insert_tbl(i).creation_date,
          l_assets_insert_tbl(i).last_updated_by,
          l_assets_insert_tbl(i).last_update_date,
          l_assets_insert_tbl(i).last_update_login,
          l_assets_insert_tbl(i).request_id,
          l_assets_insert_tbl(i).job_definition_name,
          l_assets_insert_tbl(i).job_definition_package,
          l_assets_insert_tbl(i).gen_object_id
        );
      INSERT
      INTO CSE_GENEALOGY_OBJECTS
        (
          gen_object_id,
          item_id,
          organization_id,
          serial_number,
          lot_number,
          origination_date,
          origination_quantity,
          origination_document_type,
          origination_document_number,
          created_by,
          creation_date,
          last_updated_by,
          last_update_date,
          last_update_login
        )
        VALUES
        (
          l_assets_insert_tbl(i).gen_object_id,
          l_assets_insert_tbl(i).item_id,
          l_assets_insert_tbl(i).item_organization_id,
          l_assets_insert_tbl(i).serial_number,
          l_assets_insert_tbl(i).lot_number,
          l_assets_insert_tbl(i).origination_date,
          l_assets_insert_tbl(i).quantity,
          l_assets_insert_tbl(i).origination_document_type,
          l_assets_insert_tbl(i).origination_document_number,
          l_assets_insert_tbl(i).created_by,
          l_assets_insert_tbl(i).creation_date,
          l_assets_insert_tbl(i).last_updated_by,
          l_assets_insert_tbl(i).last_update_date,
          l_assets_insert_tbl(i).last_update_login
        );
    END LOOP;
  END LOOP;
  CLOSE c_get_valid_insert_rec;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Created Assets records, CREATE case = '||SQL%ROWCOUNT);
  --Insert valid relationships into relevant tables
  insert_valid_structure_rec(p_batch_id, p_batch_type, p_partition_number, px_transaction_id, px_transaction_date, x_error_message, x_return_status);
  FOR j IN
  (SELECT language_code
    FROM fnd_languages_b
    WHERE installed_flag IN ('B', 'I')
  )
  LOOP
    INSERT
    INTO cse_assets_tl
      (
        asset_id ,
        language ,
        source_lang ,
        description ,
        object_version_number ,
        created_by ,
        creation_date ,
        last_updated_by ,
        last_update_date ,
        last_update_login
      )
      (SELECT asset_id ,
          j.language_code ,
          userenv('LANG') ,
          asset_description ,
          1 ,
          created_by ,
          creation_date ,
          last_updated_by ,
          last_update_date ,
          last_update_login
        FROM cse_assets_int cseaint
        WHERE cseaint.interface_status_code = 'VALID'
        AND cseaint.partition_number        = p_partition_number
        AND cseaint.interface_batch_id      = p_batch_id
        AND cseaint.action_code             = C_CREATE_ACTION_CODE
        AND cseaint.asset_id               IS NOT NULL
      );
  END LOOP;
  INSERT
  INTO CSE_GENEALOGY_OBJECTS
    (
      gen_object_id,
      item_id,
      organization_id,
      lot_number,
      origination_date,
      origination_quantity,
      origination_document_type,
      origination_document_number,
      created_by,
      creation_date,
      last_updated_by,
      last_update_date,
      last_update_login
    )
    (SELECT cse_int_s.NEXTVAL gen_object_id,
        item_id,
        item_organization_id,
        lot_number,
        NULL origination_date,
        quantity,
        'ORA_IMPORT' origination_document_type,
        '0' origination_document_number,
        created_by,
        creation_date,
        last_updated_by,
        last_update_date,
        last_update_login
      FROM
        (SELECT item_id,
          item_organization_id,
          lot_number,
          SUM(quantity) quantity,
          MAX(created_by) created_by,
          MAX(creation_date) creation_date,
          MAX(last_updated_by) last_updated_by,
          MAX(last_update_date) last_update_date,
          MAX(last_update_login) last_update_login
        FROM cse_assets_int cseaint
        WHERE cseaint.interface_status_code = 'VALID'
        AND cseaint.partition_number        = p_partition_number
        AND cseaint.interface_batch_id      = p_batch_id
        AND cseaint.action_code             = C_CREATE_ACTION_CODE
        AND cseaint.item_id                IS NOT NULL
        AND cseaint.item_organization_id   IS NOT NULL
        AND cseaint.gen_object_id          IS NOT NULL
        AND cseaint.asset_id               IS NOT NULL
        AND cseaint.lot_number             IS NOT NULL
        AND EXISTS
          (SELECT 1
          FROM egp_system_items_vl egpitem
          WHERE egpitem.inventory_item_id          = cseaint.item_id
          AND egpitem.organization_id              = cseaint.item_organization_id
          AND egpitem.lot_control_code             = 2
          AND egpitem.serial_number_control_code  IN ( 2,5,6)
          AND ((egpitem.asset_tracked_flag         ='Y'
          AND egpitem.allow_maintenance_asset_flag ='Y'
          AND l_int_batch_type                     ='MA' )
          OR (egpitem.asset_tracked_flag          IN ('Y','C')
          AND l_int_batch_type                     ='CA' ))
          )
        AND NOT EXISTS
          (SELECT 1
          FROM cse_genealogy_objects cseobj
          WHERE cseobj.item_id       = cseaint.item_id
          AND cseobj.organization_id = cseaint.item_organization_id
          AND cseobj.lot_number      = cseaint.lot_number
          )
        GROUP BY item_id,
          item_organization_id,
          lot_number
        )
    );
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Created Genealogy records for Lots, CREATE case = '||SQL%ROWCOUNT);
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Before Creating Item Log records');
  INSERT
  INTO cse_item_attributes_audit
    (
      attribute_audit_id ,
      item_id ,
      organization_id ,
      enable_genealogy_tracking_flag ,
      asset_tracked_flag ,
      allow_maintenance_asset_flag ,
      effective_date ,
      created_by ,
      creation_date ,
      last_updated_by ,
      last_update_date ,
      last_update_login ,
      request_id
    )
    (SELECT S_ROW_ID_SEQ.NEXTVAL attribute_audit_id ,
        inventory_item_id ,
        organization_id ,
        enable_genealogy_tracking_flag ,
        asset_tracked_flag ,
        allow_maintenance_asset_flag ,
        last_update_date effective_date ,
        created_by ,
        creation_date ,
        last_updated_by ,
        last_update_date ,
        last_update_login ,
        p_batch_id request_id
      FROM egp_system_items_b egp
      WHERE (egp.inventory_item_id,egp.organization_id ) IN
        (SELECT item_id,
          item_organization_id
        FROM cse_assets_int cseaint
        WHERE cseaint.interface_status_code = 'VALID'
        AND cseaint.partition_number        = p_partition_number
        AND cseaint.interface_batch_id      = p_batch_id
        AND cseaint.item_id                IS NOT NULL
        AND cseaint.item_organization_id   IS NOT NULL
        AND cseaint.asset_id               IS NOT NULL
        AND NOT EXISTS
          (SELECT 1
          FROM cse_item_attributes_audit cseaudit
          WHERE cseaudit.item_id       = cseaint.item_id
          AND cseaudit.organization_id = cseaint.item_organization_id
          )
        )
    );
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Created Item Log records, CREATE case = '||SQL%ROWCOUNT);
  IF p_batch_type ='CA' THEN
    /*Raise Customer Asset Events before records in interface table are deleted*/
    trigger_customer_asset_events( p_partition_number => p_partition_number, p_batch_id => p_batch_id, p_operation_code => C_CREATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
    IF (x_return_status<> fnd_api.g_ret_sts_success) THEN
      cse_int_utils_pvt.log_messages(fnd_log.level_info,'Failed  to trigger business events', x_error_message);
    END IF;
    Update_Asset_Charge_Records( p_partition_number => p_partition_number, p_batch_id => p_batch_id, p_operation_code => C_CREATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
    create_service_asset_records( p_batch_id => p_batch_id, p_partition_number => p_partition_number, px_transaction_id => px_transaction_id, px_transaction_date => px_transaction_date, x_error_message => x_error_message, x_return_status => x_return_status);
  END IF;
  DELETE
  FROM cse_assets_int cseaint
  WHERE cseaint.interface_status_code = 'VALID'
  AND cseaint.partition_number        = p_partition_number
  AND cseaint.interface_batch_id      = p_batch_id
  AND cseaint.action_code             = C_CREATE_ACTION_CODE
  AND cseaint.item_id                IS NOT NULL
  AND cseaint.item_organization_id   IS NOT NULL
  AND cseaint.gen_object_id          IS NOT NULL
  AND cseaint.asset_id               IS NOT NULL ;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Removing Asset Import traces for CREATE case = '||SQL%ROWCOUNT);
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');

EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);

END insert_valid_asset_records;

/*Cursor to get the customer_billing_party_id for assets*/
    CURSOR c_get_cust_bill_party_id( c_cust_bill_party_site NUMBER)
    IS
      SELECT hps.party_id
      FROM hz_party_sites hps
      WHERE hps.party_site_id = c_cust_bill_party_site
      AND EXISTS
        (SELECT 'X'
        FROM hz_cust_acct_sites_all hcas
        WHERE hcas.party_site_id = hps.party_site_id
        );

l_api_name VARCHAR2(300)            := 'cse_bulk_import_pvt.update_valid_asset_records';
TYPE l_update_assets_tbl_type
IS
  TABLE OF c_update_assets%ROWTYPE;
  l_update_assets_tbl l_update_assets_tbl_type;
TYPE l_asset_desc_tbl_type
IS
  TABLE OF c_asset_description%ROWTYPE;
  l_asset_desc_tbl l_asset_desc_tbl_type;
  l_end_serial_number VARCHAR2(30);
  l_serial_qty        NUMBER := 1;
  l_result            NUMBER := 0;
  l_int_errors_tbl_type cse_int_utils_pvt.int_errors_tbl_type;
  l_row_count    NUMBER;
  l_message_text VARCHAR2(2000);
 TYPE l_trsfr_assets_tbl_type
IS
  TABLE OF c_transfer_customer_asset%ROWTYPE;
  l_trsfr_assets l_trsfr_assets_tbl_type;
TYPE l_reinstate_assets_tbl_type
IS
  TABLE OF c_reinstate_customer_asset%ROWTYPE;
  l_rnst_assets l_reinstate_assets_tbl_type;
  l_return_status VARCHAR2(2);
  l_msg_count     NUMBER;
  l_msg_data      VARCHAR2(300);
  l_cust_bill_party_id NUMBER;

BEGIN

cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'Beginning of procedure..');
  l_return_status :=fnd_api.g_ret_sts_success;
  x_return_status := fnd_api.g_ret_sts_success;
  /* Fetching Transfered assets*/
  OPEN c_transfer_customer_asset;
  FETCH c_transfer_customer_asset BULK COLLECT INTO l_trsfr_assets;
  CLOSE c_transfer_customer_asset;
  /*Fetching reinstated assets*/
  OPEN c_reinstate_customer_asset;
  FETCH c_reinstate_customer_asset BULK COLLECT INTO l_rnst_assets;
  CLOSE c_reinstate_customer_asset;
  /*Raise Customer Asset Events before DB insert so that old and new values can be compared*/
  IF p_batch_type = 'CA' THEN
    trigger_customer_asset_events( p_partition_number => p_partition_number, p_batch_id => p_batch_id, p_operation_code => C_UPDATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
    IF (x_return_status<> fnd_api.g_ret_sts_success) THEN
      cse_int_utils_pvt.log_messages(fnd_log.level_info,'Failed  to trigger business events', x_error_message);
    END IF;
  END IF;
  OPEN c_update_assets;
  FETCH c_update_assets BULK COLLECT INTO l_update_assets_tbl;
  CLOSE c_update_assets;
  FOR i IN 1..l_update_assets_tbl.COUNT
  LOOP
    IF (l_update_assets_tbl(i).lot_number IS NOT NULL AND l_update_assets_tbl(i).lot_number <> C_NULL_STRING ) THEN
      cse_int_utils_pvt.Process_Asset_LotNumber( p_item_id =>l_update_assets_tbl(i).item_id, p_org_id =>l_update_assets_tbl(i).item_organization_id, p_lot_number =>l_update_assets_tbl(i).lot_number, x_return_status =>l_return_status, x_msg_count =>l_msg_count, x_msg_data =>l_msg_data );
      IF(l_return_status <>fnd_api.g_ret_sts_success) THEN
        UPDATE cse_assets_int
        SET interface_status_code                                 ='ERROR'
        WHERE interface_row_id                                    = l_update_assets_tbl(i).interface_row_id;
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_update_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'CSE_AS_INVALID_LOT';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'LOT_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'CSE_AS_INVALID_LOT';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'LOT_NUMBER';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_ERROR;
        l_int_errors_tbl_type(l_row_count).created_by            := fnd_global.who_user_name;
        l_int_errors_tbl_type(l_row_count).creation_date         := sysdate;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := fnd_global.who_user_name;
        l_int_errors_tbl_type(l_row_count).last_update_date      := sysdate;
        l_int_errors_tbl_type(l_row_count).last_update_login     := fnd_global.user_guid;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, 'inv_lot_numbers_pub.create_inv_lot', 'interface_row_id= '||l_update_assets_tbl(i).interface_row_id||' Inventory API Failed with Error '||x_error_message);
        cse_int_utils_pvt.log_errors( l_int_errors_tbl_type, x_return_status , x_error_message );
      END IF;
    END IF;
    IF (l_return_status =fnd_api.g_ret_sts_success AND l_update_assets_tbl(i).serial_number IS NOT NULL) THEN
      -- Call create_validate_serials to create validate serial in inventory
      l_end_serial_number := NULL;
      l_serial_qty        := 1;
      l_result            := inv_serial_number_pub.create_validate_serials( p_org_id => l_update_assets_tbl(i).item_organization_id, p_item_id => l_update_assets_tbl(i).item_id, p_qty => l_serial_qty, p_revision => NULL, p_lotnum => l_update_assets_tbl(i).lot_number, p_start_ser => l_update_assets_tbl(i).serial_number, p_trx_src_type_id => NULL, p_trx_action_id => NULL, p_sub_inventory => NULL, p_loc_id => NULL, p_wip_entity_id => NULL, p_group_mark_id => NULL, p_line_mark_id => NULL, p_issue_receipt => NULL, p_end_ser => l_end_serial_number, p_msg => x_error_message, p_check_grp_mark_id => 'N', p_rcv_validate => 'N', p_rcv_source_line_id => NULL, p_xfr_org_id => NULL, p_insert_yn => 'Y' );
      IF l_result          =1 THEN
        UPDATE cse_assets_int
        SET interface_status_code                                 ='ERROR'
        WHERE interface_row_id                                    = l_update_assets_tbl(i).interface_row_id;
        l_row_count                                              := l_int_errors_tbl_type.COUNT+1;
        l_int_errors_tbl_type(l_row_count).interface_error_id    := cse_int_s.NEXTVAL;
        l_int_errors_tbl_type(l_row_count).object_version_number := 1;
        l_int_errors_tbl_type(l_row_count).interface_row_id      := l_update_assets_tbl(i).interface_row_id;
        l_int_errors_tbl_type(l_row_count).interface_batch_id    := p_batch_id;
        l_int_errors_tbl_type(l_row_count).error_text            := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).error_language        := USERENV('LANG');
        l_int_errors_tbl_type(l_row_count).table_name            := 'CSE_ASSETS_INT';
        l_int_errors_tbl_type(l_row_count).column_name           := 'SERIAL_NUMBER';
        l_int_errors_tbl_type(l_row_count).message_name          := 'FND_CMN_INVALID_ATTRB_API_SERV';
        l_int_errors_tbl_type(l_row_count).message_token_names   := c_message_token_name;
        l_int_errors_tbl_type(l_row_count).message_token_values  := 'SERIAL_NUMBER';
        l_int_errors_tbl_type(l_row_count).program_name          := l_api_name;
        l_int_errors_tbl_type(l_row_count).message_severity      := C_SEVERITY_WARNING;
        l_int_errors_tbl_type(l_row_count).created_by            := fnd_global.who_user_name;
        l_int_errors_tbl_type(l_row_count).creation_date         := sysdate;
        l_int_errors_tbl_type(l_row_count).last_updated_by       := fnd_global.who_user_name;
        l_int_errors_tbl_type(l_row_count).last_update_date      := sysdate;
        l_int_errors_tbl_type(l_row_count).last_update_login     := fnd_global.user_guid;
        l_message_text                                           := cse_int_utils_pvt.get_message_details( p_prd_code => SUBSTR(l_int_errors_tbl_type(l_row_count).error_text,1,3), p_msg_name => l_int_errors_tbl_type(l_row_count).error_text, p_token_name => l_int_errors_tbl_type(l_row_count).message_token_names, p_token_value => l_int_errors_tbl_type(l_row_count).message_token_values );
        l_int_errors_tbl_type(l_row_count).error_text            := l_message_text;
        cse_int_utils_pvt.log_errors( l_int_errors_tbl_type, x_return_status , x_error_message );
        cse_int_utils_pvt.log_messages(fnd_log.level_severe, 'inv_serial_number_pub.create_validate_serials', ' Failed Update Asset Case for Serial = '||l_update_assets_tbl(i).serial_number||' Inventory API Failed with Error '||x_error_message);
      END IF;
    END IF;
  END LOOP;
  l_update_assets_tbl.DELETE;
  x_return_status := l_return_status;
  OPEN c_update_assets;
  LOOP
  FETCH c_update_assets BULK COLLECT INTO l_update_assets_tbl LIMIT c_max_buffer_size;
  EXIT
  WHEN l_update_assets_tbl.count=0;

FOR i IN l_update_assets_tbl.FIRST..l_update_assets_tbl.LAST
 LOOP

IF(l_update_assets_tbl(i).customer_account_site_id IS NOT NULL) THEN
  OPEN c_get_cust_bill_party_id(l_update_assets_tbl(i).customer_account_site_id);
  FETCH c_get_cust_bill_party_id INTO l_cust_bill_party_id;
  CLOSE c_get_cust_bill_party_id;
  END IF;

UPDATE cse_assets_b cseb
  SET asset_number               = NVL(l_update_assets_tbl(i).new_asset_number, NVL(l_update_assets_tbl(i).asset_number,cseb.asset_number)),
    location_organization_id     = DECODE(l_update_assets_tbl(i).current_location_context,'ORA_WORK_CENTER', NVL(l_update_assets_tbl(i).location_organization_id,cseb.location_organization_id),cseb.location_organization_id),
    quantity                     = NVL(l_update_assets_tbl(i).quantity,cseb.quantity),
    serial_number                = DECODE(l_update_assets_tbl(i).serial_number,C_NULL_STRING,NULL,NVL(l_update_assets_tbl(i).serial_number,cseb.serial_number)),
    lot_number                   = DECODE(l_update_assets_tbl(i).lot_number,C_NULL_STRING,NULL,NVL(l_update_assets_tbl(i).lot_number,cseb.lot_number)),
    work_center_id               = DECODE(l_update_assets_tbl(i).current_location_context,'ORA_WORK_CENTER', NVL(l_update_assets_tbl(i).work_center_id, cseb.work_center_id),cseb.work_center_id),
    current_location_context     = NVL(l_update_assets_tbl(i).current_location_context, cseb.current_location_context),
    dflt_wo_type                 = DECODE(l_update_assets_tbl(i).dflt_wo_type_code,C_NULL_STRING,NULL,NVL(l_update_assets_tbl(i).dflt_wo_type_code, cseb.dflt_wo_type)),
    dflt_wo_sub_type             = DECODE(l_update_assets_tbl(i).dflt_wo_sub_type_code,C_NULL_STRING,NULL,NVL(l_update_assets_tbl(i).dflt_wo_sub_type_code, cseb.dflt_wo_sub_type)),
    active_end_date              = DECODE(l_update_assets_tbl(i).active_end_date,FND_API.G_NULL_DATE,NULL,NVL(l_update_assets_tbl(i).active_end_date,cseb.active_end_date)),
    new_wo_allowed_flag          = NVL(l_update_assets_tbl(i).new_wo_allowed_flag,cseb.new_wo_allowed_flag),
    customer_id                  = NVL(l_update_assets_tbl(i).customer_id,cseb.customer_id),
    customer_site_id             = NVL(l_update_assets_tbl(i).customer_site_id,cseb.customer_site_id),
    customer_site_party_id       = NVL(l_update_assets_tbl(i).customer_site_party_id,cseb.customer_site_party_id),
    customer_account_id          = NVL(l_update_assets_tbl(i).customer_account_id,cseb.customer_account_id),
    customer_account_site_id     = NVL(l_update_assets_tbl(i).customer_account_site_id,cseb.customer_account_site_id),
    customer_account_site_use_id = NVL(l_update_assets_tbl(i).customer_account_site_use_id,cseb.customer_account_site_use_id),
    customer_billing_party_site_id = NVL(l_update_assets_tbl(i).customer_account_site_id,cseb.customer_billing_party_site_id),
    customer_billing_party_id      =NVL(l_cust_bill_party_id,cseb.customer_billing_party_id),
    sold_by_business_unit_id     = DECODE(l_update_assets_tbl(i).sold_by_business_unit_name,'#NULL',NULL,NVL(l_update_assets_tbl(i).sold_by_business_unit_id,cseb.sold_by_business_unit_id)),
    --sales_order_source_system_type = NVL(l_update_assets_tbl(i).sales_order_source_system_type,cseb.sales_order_source_system_type),
    attribute_category     = l_update_assets_tbl(i).attribute_category,
    attribute_char1        = l_update_assets_tbl(i).attribute_char1,
    attribute_char2        = l_update_assets_tbl(i).attribute_char2,
    attribute_char3        = l_update_assets_tbl(i).attribute_char3,
    attribute_char4        = l_update_assets_tbl(i).attribute_char4,
    attribute_char5        = l_update_assets_tbl(i).attribute_char5,
    attribute_char6        = l_update_assets_tbl(i).attribute_char6,
    attribute_char7        = l_update_assets_tbl(i).attribute_char7,
    attribute_char8        = l_update_assets_tbl(i).attribute_char8,
    attribute_char9        = l_update_assets_tbl(i).attribute_char9,
    attribute_char10       = l_update_assets_tbl(i).attribute_char10,
    attribute_char11       = l_update_assets_tbl(i).attribute_char11,
    attribute_char12       = l_update_assets_tbl(i).attribute_char12,
    attribute_char13       = l_update_assets_tbl(i).attribute_char13,
    attribute_char14       = l_update_assets_tbl(i).attribute_char14,
    attribute_char15       = l_update_assets_tbl(i).attribute_char15,
    attribute_char16       = l_update_assets_tbl(i).attribute_char16,
    attribute_char17       = l_update_assets_tbl(i).attribute_char17,
    attribute_char18       = l_update_assets_tbl(i).attribute_char18,
    attribute_char19       = l_update_assets_tbl(i).attribute_char19,
    attribute_char20       = l_update_assets_tbl(i).attribute_char20,
    attribute_number1      = l_update_assets_tbl(i).attribute_number1,
    attribute_number2      = l_update_assets_tbl(i).attribute_number2,
    attribute_number3      = l_update_assets_tbl(i).attribute_number3,
    attribute_number4      = l_update_assets_tbl(i).attribute_number4,
    attribute_number5      = l_update_assets_tbl(i).attribute_number5,
    attribute_number6      = l_update_assets_tbl(i).attribute_number6,
    attribute_number7      = l_update_assets_tbl(i).attribute_number7,
    attribute_number8      = l_update_assets_tbl(i).attribute_number8,
    attribute_number9      = l_update_assets_tbl(i).attribute_number9,
    attribute_number10     = l_update_assets_tbl(i).attribute_number10,
    attribute_date1        = l_update_assets_tbl(i).attribute_date1,
    attribute_date2        = l_update_assets_tbl(i).attribute_date2,
    attribute_date3        = l_update_assets_tbl(i).attribute_date3,
    attribute_date4        = l_update_assets_tbl(i).attribute_date4,
    attribute_date5        = l_update_assets_tbl(i).attribute_date5,
    attribute_timestamp1   = l_update_assets_tbl(i).attribute_timestamp1,
    attribute_timestamp2   = l_update_assets_tbl(i).attribute_timestamp2,
    attribute_timestamp3   = l_update_assets_tbl(i).attribute_timestamp3,
    attribute_timestamp4   = l_update_assets_tbl(i).attribute_timestamp4,
    attribute_timestamp5   = l_update_assets_tbl(i).attribute_timestamp5,
    last_updated_by        = l_update_assets_tbl(i).last_updated_by,
    last_update_date       = l_update_assets_tbl(i).last_update_date,
    last_update_login      = l_update_assets_tbl(i).last_update_login,
    request_id             = l_update_assets_tbl(i).request_id,
    job_definition_name    = l_update_assets_tbl(i).job_definition_name,
    job_definition_package = l_update_assets_tbl(i).job_definition_package
  WHERE cseb.asset_id      = l_update_assets_tbl(i).asset_id ;
 END LOOP;

END LOOP;
   CLOSE c_update_assets;
  OPEN c_asset_description;
  FETCH c_asset_description BULK COLLECT INTO l_asset_desc_tbl;
  CLOSE c_asset_description;
  FORALL i IN l_asset_desc_tbl.FIRST..l_asset_desc_tbl.LAST
  UPDATE cse_assets_tl csetl
  SET description = l_asset_desc_tbl(i).asset_description
  WHERE asset_id  = l_asset_desc_tbl(i).asset_id ;
  INSERT
  INTO cse_transacted_assets
    (
      transacted_asset_id,
      transaction_id,
      asset_id,
      transacted_quantity,
      location_context,
      organization_id,
      subinventory_code,
      inventory_locator_id,
      work_order_id,
      work_order_operation_id,
      work_center_id,
      split_from_asset_id,
      merged_to_asset_id,
      full_snapshot_flag,
      snapshot_qualified,
      created_by,
      creation_date,
      last_updated_by,
      last_update_date,
      last_update_login,
      request_id,
      job_definition_name,
      job_definition_package,
      gen_object_id
    )
    (SELECT cse_int_s.nextval transacted_asset_id,
        px_transaction_id,
        asset_id,
        quantity,
        current_location_context,
        item_organization_id,
        subinventory_code,
        NULL inventory_locator_id,
        NULL work_order_id,
        NULL work_order_operation_id,
        work_center_id,
        NULL split_from_asset_id,
        NULL merged_to_asset_id,
        NULL full_snapshot_flag,
        NULL snapshot_qualified,
        created_by,
        creation_date,
        last_updated_by,
        last_update_date,
        last_update_login,
        request_id,
        job_definition_name,
        job_definition_package,
        gen_object_id
      FROM cse_assets_int cseaint
      WHERE cseaint.interface_status_code = 'VALID'
      AND cseaint.partition_number        = p_partition_number
      AND cseaint.interface_batch_id      = p_batch_id
      AND cseaint.action_code             = C_UPDATE_ACTION_CODE
      AND cseaint.asset_id               IS NOT NULL
    );
  --Update relationship data and insert into relationship history and relationship txn
  update_valid_structure_rec(p_batch_id, p_batch_type, p_partition_number, px_transaction_id, px_transaction_date, x_error_message, x_return_status);
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Before Creating Item Log records.');
  INSERT
  INTO cse_item_attributes_audit
    (
      attribute_audit_id ,
      item_id ,
      organization_id ,
      enable_genealogy_tracking_flag ,
      asset_tracked_flag ,
      allow_maintenance_asset_flag ,
      effective_date ,
      created_by ,
      creation_date ,
      last_updated_by ,
      last_update_date ,
      last_update_login ,
      request_id
    )
    (SELECT S_ROW_ID_SEQ.NEXTVAL attribute_audit_id ,
        inventory_item_id ,
        organization_id ,
        enable_genealogy_tracking_flag ,
        asset_tracked_flag ,
        allow_maintenance_asset_flag ,
        last_update_date effective_date ,
        created_by ,
        creation_date ,
        last_updated_by ,
        last_update_date ,
        last_update_login ,
        p_batch_id request_id
      FROM egp_system_items_b egp
      WHERE (egp.inventory_item_id,egp.organization_id ) IN
        (SELECT item_id,
          item_organization_id
        FROM cse_assets_int cseaint
        WHERE cseaint.interface_status_code = 'VALID'
        AND cseaint.partition_number        = p_partition_number
        AND cseaint.interface_batch_id      = p_batch_id
        AND cseaint.item_id                IS NOT NULL
        AND cseaint.item_organization_id   IS NOT NULL
        AND cseaint.asset_id               IS NOT NULL
        AND NOT EXISTS
          (SELECT 1
          FROM cse_item_attributes_audit cseaudit
          WHERE cseaudit.item_id       = cseaint.item_id
          AND cseaudit.organization_id = cseaint.item_organization_id
          )
        )
    );
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, ' Created Item Log records, UPDATE case = '||SQL%ROWCOUNT);
  IF p_batch_type ='CA' THEN
    -- Update asset charge records with correct asset_id before deleting asset interface records
    Update_Asset_Charge_Records( p_partition_number => p_partition_number, p_batch_id => p_batch_id, p_operation_code => C_UPDATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
    /* This block is called only for those records/asset updates whose customers are updated or are transfered to a differnt customer*/
    FOR i IN 1..l_trsfr_assets.COUNT
    LOOP
      transfer_service_asset_records
      (
        p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_interface_row_id =>l_trsfr_assets(i).interface_row_id, px_transaction_id => px_transaction_id, px_transaction_date => px_transaction_date, x_error_message => x_error_message, x_return_status => l_return_status
      )
      ;
      IF (l_return_status<> fnd_api.g_ret_sts_success) THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_info,'Transfer_service_asset_records  Failed ', x_error_message);
      END IF;
    END LOOP;
    /*This block is executed for only those records whose active_end_date is set while update*/
    expire_service_asset_records( p_batch_id => p_batch_id, p_partition_number => p_partition_number, px_transaction_id => px_transaction_id, px_transaction_date => px_transaction_date, x_error_message => x_error_message, x_return_status => l_return_status);
    IF (l_return_status<> fnd_api.g_ret_sts_success) THEN
      cse_int_utils_pvt.log_messages(fnd_log.level_info,'Expire_service_asset_records  Failed ', x_error_message);
    END IF;
    /*This block is called for only those records/asset updates where there is a reinstate of the asset is done*/
    FOR i IN 1..l_rnst_assets.COUNT
    LOOP
      reinstate_service_asset
      (
        p_batch_id => p_batch_id, p_partition_number => p_partition_number, p_interface_row_id =>l_rnst_assets(i).interface_row_id, px_transaction_id => px_transaction_id, px_transaction_date => px_transaction_date, x_error_message => x_error_message, x_return_status => l_return_status
      )
      ;
      IF (l_return_status<> fnd_api.g_ret_sts_success) THEN
        cse_int_utils_pvt.log_messages(fnd_log.level_info,'Reinstate_service_asset_records  Failed ', x_error_message);
      END IF;
    END LOOP;
  END IF;

DELETE
  FROM cse_assets_int cseaint
  WHERE cseaint.interface_status_code = 'VALID'
  AND cseaint.partition_number        = p_partition_number
  AND cseaint.interface_batch_id      = p_batch_id
  AND cseaint.action_code             = C_UPDATE_ACTION_CODE
  AND cseaint.asset_id               IS NOT NULL;
  cse_int_utils_pvt.log_messages(fnd_log.level_info, l_api_name, 'End of procedure..');
EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  IF c_asset_description%ISOPEN THEN
    CLOSE c_asset_description;
  END IF;
  IF c_update_assets%ISOPEN THEN
    CLOSE c_update_assets;
  END IF;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, sqlerrm);

END update_valid_asset_records;

BEGIN

x_return_status        := fnd_api.g_ret_sts_success;
  IF(C_CREATE_ACTION_CODE = p_operation_code) THEN
    FOR get_asset_interface_rec IN get_asset_interface_rec_csr
    LOOP
      l_new_asset_event_rec                                                 := NULL;
      IF(NVL(get_asset_interface_rec.current_location_context,'ORA_UNKNOWN') = 'ORA_CUSTOMER') THEN
        l_new_asset_event_rec.asset_id                                      := get_asset_interface_rec.asset_id;
        l_new_asset_event_rec.asset_number                                  := NVL(get_asset_interface_rec.asset_number,get_asset_interface_rec.asset_id);
        l_new_asset_event_rec.item_id                                       := get_asset_interface_rec.item_id;
        l_new_asset_event_rec.item_organization_id                          := get_asset_interface_rec.item_organization_id ;
        l_new_asset_event_rec.serial_number                                 := get_asset_interface_rec.serial_number;
        l_new_asset_event_rec.lot_number                                    := get_asset_interface_rec.lot_number;
        l_new_asset_event_rec.quantity                                      := get_asset_interface_rec.quantity;
        l_new_asset_event_rec.customer_id                                   := get_asset_interface_rec.customer_id;
        l_new_asset_event_rec.customer_site_id                              := get_asset_interface_rec.customer_site_id;
        l_old_asset_event_rec                                               := NULL;
        -- raise create event here
        cse_int_utils_pvt.raise_customer_asset_event( p_old_asset_rec => NULL, p_new_asset_rec => l_new_asset_event_rec, p_event_type => C_CREATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
      END IF;
    END LOOP;
  ELSIF (C_UPDATE_ACTION_CODE = p_operation_code) THEN
    FOR get_asset_interface_rec IN get_asset_interface_rec_csr
    LOOP
      l_new_asset_event_rec := NULL;
      l_old_asset_event_rec := NULL;
      OPEN get_asset_table_rec_csr( get_asset_interface_rec.asset_id);
      FETCH get_asset_table_rec_csr INTO l_asset_table_rec;
      CLOSE get_asset_table_rec_csr;
      l_new_asset_event_rec.asset_id             := get_asset_interface_rec.asset_id;
      l_new_asset_event_rec.asset_number         := NVL(get_asset_interface_rec.asset_number,l_asset_table_rec.asset_number);
      l_new_asset_event_rec.item_id              := NVL(get_asset_interface_rec.item_id,l_asset_table_rec.item_id);
      l_new_asset_event_rec.item_organization_id := NVL(get_asset_interface_rec.item_organization_id,l_asset_table_rec.item_organization_id) ;
      l_new_asset_event_rec.serial_number        := NVL(get_asset_interface_rec.serial_number,l_asset_table_rec.serial_number);
      l_new_asset_event_rec.lot_number           := NVL(get_asset_interface_rec.lot_number,get_asset_interface_rec.lot_number);
      l_new_asset_event_rec.quantity             := NVL(get_asset_interface_rec.quantity,l_asset_table_rec.quantity);
      l_new_asset_event_rec.customer_id          := NVL(get_asset_interface_rec.customer_id,l_asset_table_rec.customer_id);
      l_new_asset_event_rec.customer_site_id     := NVL(get_asset_interface_rec.customer_site_id,l_asset_table_rec.customer_site_id);
      IF(get_asset_interface_rec.active_end_date  = FND_API.G_NULL_DATE)THEN
        l_new_asset_event_rec.active_end_date    := NULL;
      ELSE
        l_new_asset_event_rec.active_end_date := NVL(get_asset_interface_rec.active_end_date,l_asset_table_rec.active_end_date);
      END IF;
      l_old_asset_event_rec.asset_id             := l_asset_table_rec.asset_id;
      l_old_asset_event_rec.asset_number         := l_asset_table_rec.asset_number;
      l_old_asset_event_rec.item_id              := l_asset_table_rec.item_id;
      l_old_asset_event_rec.item_organization_id := l_asset_table_rec.item_organization_id;
      l_old_asset_event_rec.serial_number        := l_asset_table_rec.serial_number;
      l_old_asset_event_rec.lot_number           := l_asset_table_rec.lot_number;
      l_old_asset_event_rec.quantity             := l_asset_table_rec.quantity;
      l_old_asset_event_rec.active_end_date      := l_asset_table_rec.active_end_date;
      l_old_asset_event_rec.customer_id          := l_asset_table_rec.customer_id;
      l_old_asset_event_rec.customer_site_id     := l_asset_table_rec.customer_site_id;
      -- Asset is being converted to a customer asset
      IF(NVL(get_asset_interface_rec.current_location_context,l_asset_table_rec.current_location_context) = 'ORA_CUSTOMER' AND l_asset_table_rec.current_location_context <> 'ORA_CUSTOMER') THEN
        cse_int_utils_pvt.raise_customer_asset_event( p_old_asset_rec => l_old_asset_event_rec, p_new_asset_rec => l_new_asset_event_rec, p_event_type => C_CREATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
        -- asset is a customer asset and is being updated
      ELSIF(NVL(get_asset_interface_rec.current_location_context,l_asset_table_rec.current_location_context) = 'ORA_CUSTOMER' AND l_asset_table_rec.current_location_context = 'ORA_CUSTOMER') THEN
        -- raise update event here
        cse_int_utils_pvt.raise_customer_asset_event( p_old_asset_rec => l_old_asset_event_rec, p_new_asset_rec => l_new_asset_event_rec, p_event_type => C_UPDATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
        -- asset was a customer asset, but no longer will be a customer asset
      ELSIF(NVL(get_asset_interface_rec.current_location_context,l_asset_table_rec.current_location_context) <> 'ORA_CUSTOMER' AND l_asset_table_rec.current_location_context = 'ORA_CUSTOMER') THEN
        -- raise update event here
        cse_int_utils_pvt.raise_customer_asset_event( p_old_asset_rec => l_old_asset_event_rec, p_new_asset_rec => l_new_asset_event_rec, p_event_type => C_UPDATE_ACTION_CODE, x_error_message => x_error_message, x_return_status => x_return_status );
      END IF;
    END LOOP;
  END IF;
EXCEPTION
WHEN OTHERS THEN
  x_return_status := fnd_api.g_ret_sts_unexp_error;
  x_error_message := sqlerrm;
  cse_int_utils_pvt.log_messages(fnd_log.level_severe, l_api_name, 'Failed to trigger business events' || sqlerrm);
END trigger_customer_asset_events;

END CSE_BULK_IMPORT_PVT;