Texte vergleichen

Finden Sie den Unterschied zwischen zwei Textdateien

Real-time diff

Unified diff

Collapse lines

Highlight change

Syntax highlighting

Onlinewerkzeuge

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

578 lines

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

Gespeicherten Diffs

Original text

Datei öffnen

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;

Geänderter text

Datei öffnen

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;

Words removed	11
Total words	1891
Words removed (%)	0.58

Words added	7
Total words	1887
Words added (%)	0.37