The following lines contain the word 'select', 'insert', 'update' or 'delete':
l_message_tbl.delete;
l_message_tbl.delete;
l_message_tbl.delete;
l_message_tbl(l_message_tbl.count+1) := 'Split has update assy [' || p_resulting_jobs_tbl(l_index).split_has_update_assy || '] ' ;
l_message_tbl.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
/* Is it Update Assembly ?? If yes, go ahead */
elsif l_txn_header_rec.transaction_type_id = WSMPCNST.UPDATE_ASSEMBLY then
if l_starting_jobs_tbl.count <> 1 then
/* error out... */
IF G_LOG_LEVEL_ERROR >= l_log_level OR FND_MSG_PUB.check_msg_level(g_msg_lvl_error) THEN
l_msg_tokens.delete;
l_msg_tokens.delete;
UPDATE_ASSEMBLY_TXN ( p_api_version => 1.0,
p_commit => FND_API.G_FALSE,
p_init_msg_list => FND_API.G_TRUE,
p_validation_level => 0,
p_calling_mode => p_calling_mode,
p_wltx_header => l_txn_header_rec,
p_wltx_starting_job_rec => l_starting_jobs_tbl(l_starting_jobs_tbl.first),
p_wltx_resulting_job_rec => l_resulting_jobs_tbl(l_resulting_jobs_tbl.first),
p_wltx_secondary_qty_tbl => l_secondary_qty_tbl,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_error_msg
);
l_msg_tokens.delete;
p_msg_text => 'Update Assembly Txn procedure failed.' ,
p_stmt_num => l_stmt_num ,
p_msg_tokens => l_msg_tokens,
p_fnd_msg_level => G_MSG_LVL_ERROR ,
p_fnd_log_level => G_LOG_LEVEL_ERROR ,
p_run_log_level => l_log_level
);
/* Is it Update Routing ?? If yes, go ahead */
elsif l_txn_header_rec.transaction_type_id = WSMPCNST.UPDATE_ROUTING then
if l_starting_jobs_tbl.count <> 1 then
/* error out... */
IF G_LOG_LEVEL_ERROR >= l_log_level OR FND_MSG_PUB.check_msg_level(g_msg_lvl_error) THEN
l_msg_tokens.delete;
l_msg_tokens.delete;
UPDATE_ROUTING_TXN( p_api_version => 1.0,
p_commit => FND_API.G_FALSE,
p_init_msg_list => FND_API.G_TRUE,
p_validation_level => 0,
p_calling_mode => p_calling_mode,
p_wltx_header => l_txn_header_rec,
p_wltx_starting_job_rec => l_starting_jobs_tbl(l_starting_jobs_tbl.first),
p_wltx_resulting_job_rec => l_resulting_jobs_tbl(l_resulting_jobs_tbl.first),
p_wltx_secondary_qty_tbl => l_secondary_qty_tbl,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_error_msg
);
l_msg_tokens.delete;
p_msg_text => 'Update Routing Txn procedure failed.',
p_stmt_num => l_stmt_num ,
p_msg_tokens => l_msg_tokens,
p_fnd_msg_level => G_MSG_LVL_ERROR ,
p_fnd_log_level => G_LOG_LEVEL_ERROR ,
p_run_log_level => l_log_level
);
/* Is it Update Qty ?? If yes, go ahead */
elsif l_txn_header_rec.transaction_type_id = WSMPCNST.UPDATE_QUANTITY then
if l_starting_jobs_tbl.count <> 1 then
/* error out... */
IF G_LOG_LEVEL_ERROR >= l_log_level OR FND_MSG_PUB.check_msg_level(g_msg_lvl_error) THEN
l_msg_tokens.delete;
l_msg_tokens.delete;
UPDATE_QUANTITY_TXN( p_api_version => 1.0,
p_commit => FND_API.G_FALSE,
p_init_msg_list => FND_API.G_TRUE,
p_validation_level => 0,
p_calling_mode => p_calling_mode,
p_wltx_header => l_txn_header_rec,
p_wltx_starting_job_rec => l_starting_jobs_tbl(l_starting_jobs_tbl.first),
p_wltx_resulting_job_rec => l_resulting_jobs_tbl(l_resulting_jobs_tbl.first),
p_wltx_secondary_qty_tbl => l_secondary_qty_tbl,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_error_msg
);
l_msg_tokens.delete;
p_msg_text => 'Update Quantity Txn procedure failed.',
p_stmt_num => l_stmt_num ,
p_msg_tokens => l_msg_tokens,
p_fnd_msg_level => G_MSG_LVL_ERROR ,
p_fnd_log_level => G_LOG_LEVEL_STATEMENT ,
p_run_log_level => l_log_level
);
/* Is it Update Lot Name ?? If yes, go ahead */
elsif l_txn_header_rec.transaction_type_id = WSMPCNST.UPDATE_LOT_NAME then
if l_starting_jobs_tbl.count <> 1 then
/* error out... */
IF G_LOG_LEVEL_ERROR >= l_log_level OR FND_MSG_PUB.check_msg_level(g_msg_lvl_error) THEN
l_msg_tokens.delete;
l_msg_tokens.delete;
UPDATE_LOTNAME_TXN( p_api_version => 1.0,
p_commit => FND_API.G_FALSE,
p_init_msg_list => FND_API.G_TRUE,
p_validation_level => 0,
p_calling_mode => p_calling_mode,
p_wltx_header => l_txn_header_rec,
p_wltx_starting_job_rec => l_starting_jobs_tbl(l_starting_jobs_tbl.first),
p_wltx_resulting_job_rec => l_resulting_jobs_tbl(l_resulting_jobs_tbl.first),
p_wltx_secondary_qty_tbl => l_secondary_qty_tbl,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_error_msg
);
l_msg_tokens.delete;
p_msg_text => 'Update Lot Name Txn procedure failed.',
p_stmt_num => l_stmt_num ,
p_msg_tokens => l_msg_tokens,
p_fnd_msg_level => G_MSG_LVL_ERROR ,
p_fnd_log_level => G_LOG_LEVEL_ERROR ,
p_run_log_level => l_log_level
);
l_msg_tokens.delete;
l_msg_tokens.delete;
WSM_WLT_VALIDATE_PVT.insert_txn_data ( p_transaction_id => l_txn_header_rec.transaction_id,
p_wltx_header => l_txn_header_rec,
p_wltx_starting_jobs_tbl => l_starting_jobs_tbl,
p_wltx_resulting_jobs_tbl => l_resulting_jobs_tbl,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_error_msg
);
l_msg_tokens.delete;
p_msg_text => 'WSM_WLT_VALIDATE_PVT.insert_txn_data failed',
p_stmt_num => l_stmt_num ,
p_msg_tokens => l_msg_tokens,
p_fnd_msg_level => G_MSG_LVL_ERROR ,
p_fnd_log_level => G_LOG_LEVEL_ERROR ,
p_run_log_level => l_log_level
);
update wsm_sm_resulting_jobs
set wip_entity_id = l_resulting_jobs_tbl(l_index).wip_entity_id,
job_operation_seq_num = l_resulting_jobs_tbl(l_index).job_operation_seq_num
where transaction_id = l_txn_header_rec.transaction_id
and wip_entity_name = l_resulting_jobs_tbl(l_index).wip_entity_name;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
/* API for Update Assembly transaction.... */
Procedure UPDATE_ASSEMBLY_TXN ( p_api_version IN NUMBER,
p_commit IN VARCHAR2 DEFAULT NULL,
p_init_msg_list IN VARCHAR2 DEFAULT NULL,
p_validation_level IN NUMBER DEFAULT NULL,
p_calling_mode IN NUMBER,
p_wltx_header IN OUT NOCOPY WLTX_TRANSACTIONS_REC_TYPE,
p_wltx_starting_job_rec IN OUT NOCOPY WLTX_STARTING_JOBS_REC_TYPE,
p_wltx_resulting_job_rec IN OUT NOCOPY WLTX_RESULTING_JOBS_REC_TYPE,
p_wltx_secondary_qty_tbl IN OUT NOCOPY WSM_JOB_SECONDARY_QTY_TBL_TYPE ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
/* API version stored locally */
l_api_version NUMBER := 1.0;
l_api_name VARCHAR2(20) := 'UPDATE_ASSEMBLY_TXN';
l_module VARCHAR2(100) := 'wsm.plsql.WSM_WIP_LOT_TXN_PVT.UPDATE_ASSEMBLY_TXN';
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
fnd_file.put_line(fnd_file.log,' WSM_WIP_LOT_TXN_PVT.update_assembly_txn : ' || l_stmt_num || ' Error : ');
fnd_file.put_line(fnd_file.log,' WSM_WIP_LOT_TXN_PVT.update_assembly_txn : ' || l_stmt_num || ' Un Exp Error : ');
fnd_file.put_line(fnd_file.log,' WSM_WIP_LOT_TXN_PVT.update_assembly_txn : ' || l_stmt_num || ' Other Error : ');
/* API for Update Routing transaction.... */
Procedure UPDATE_ROUTING_TXN ( p_api_version IN NUMBER,
p_commit IN VARCHAR2 DEFAULT NULL,
p_init_msg_list IN VARCHAR2 DEFAULT NULL,
p_validation_level IN NUMBER DEFAULT NULL,
p_calling_mode IN NUMBER,
p_wltx_header IN OUT NOCOPY WLTX_TRANSACTIONS_REC_TYPE,
p_wltx_starting_job_rec IN OUT NOCOPY WLTX_STARTING_JOBS_REC_TYPE,
p_wltx_resulting_job_rec IN OUT NOCOPY WLTX_RESULTING_JOBS_REC_TYPE,
p_wltx_secondary_qty_tbl IN OUT NOCOPY WSM_JOB_SECONDARY_QTY_TBL_TYPE ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
/* API version stored locally */
l_api_version NUMBER := 1.0;
l_api_name VARCHAR2(20) := 'UPDATE_ROUTING_TXN';
l_module VARCHAR2(100) := 'wsm.plsql.WSM_WIP_LOT_TXN_PVT.UPDATE_ROUTING_TXN';
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
/* API for Update Quantity transaction.... */
Procedure UPDATE_QUANTITY_TXN ( p_api_version IN NUMBER,
p_commit IN VARCHAR2 DEFAULT NULL,
p_init_msg_list IN VARCHAR2 DEFAULT NULL,
p_validation_level IN NUMBER DEFAULT NULL,
p_calling_mode IN NUMBER,
p_wltx_header IN OUT NOCOPY WLTX_TRANSACTIONS_REC_TYPE,
p_wltx_starting_job_rec IN OUT NOCOPY WLTX_STARTING_JOBS_REC_TYPE,
p_wltx_resulting_job_rec IN OUT NOCOPY WLTX_RESULTING_JOBS_REC_TYPE,
p_wltx_secondary_qty_tbl IN OUT NOCOPY WSM_JOB_SECONDARY_QTY_TBL_TYPE ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
/* API version stored locally */
l_api_version NUMBER := 1.0;
l_api_name VARCHAR2(20) := 'UPDATE_QUANTITY_TXN';
l_module VARCHAR2(100) := 'wsm.plsql.WSM_WIP_LOT_TXN_PVT.UPDATE_QUANTITY_TXN';
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
/* API for Update Lot name transaction.... */
Procedure UPDATE_LOTNAME_TXN ( p_api_version IN NUMBER,
p_commit IN VARCHAR2 DEFAULT NULL,
p_init_msg_list IN VARCHAR2 DEFAULT NULL,
p_validation_level IN NUMBER DEFAULT NULL,
p_calling_mode IN NUMBER,
p_wltx_header IN OUT NOCOPY WLTX_TRANSACTIONS_REC_TYPE,
p_wltx_starting_job_rec IN OUT NOCOPY WLTX_STARTING_JOBS_REC_TYPE,
p_wltx_resulting_job_rec IN OUT NOCOPY WLTX_RESULTING_JOBS_REC_TYPE,
p_wltx_secondary_qty_tbl IN OUT NOCOPY WSM_JOB_SECONDARY_QTY_TBL_TYPE ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
/* API version stored locally */
l_api_version NUMBER := 1.0;
l_api_name VARCHAR2(20) := 'UPDATE_LOTNAME_TXN';
l_module VARCHAR2(100) :='wsm.plsql.WSM_WIP_LOT_TXN_PVT.UPDATE_LOTNAME_TXN';
l_msg_tokens.delete;
p_msg_text => 'Entering the Update Lotname Txn API',
p_stmt_num => l_stmt_num ,
p_msg_tokens => l_msg_tokens,
p_fnd_log_level => g_log_level_statement,
p_run_log_level => l_log_level
);
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
l_msg_tokens.delete;
PROCEDURE UPDATE_BOM ( p_api_version IN VARCHAR2,
p_commit IN VARCHAR2 DEFAULT NULL,
p_init_msg_list IN VARCHAR2 DEFAULT NULL,
p_validation_level IN NUMBER DEFAULT NULL,
p_wltx_header IN OUT NOCOPY WLTX_TRANSACTIONS_REC_TYPE,
p_wltx_starting_job_rec IN OUT NOCOPY WLTX_STARTING_JOBS_REC_TYPE,
p_wltx_resulting_job_rec IN OUT NOCOPY WLTX_RESULTING_JOBS_REC_TYPE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
BEGIN
null;
PROCEDURE UPDATE_STATUS ( p_api_version IN VARCHAR2,
p_commit IN VARCHAR2 DEFAULT NULL,
p_init_msg_list IN VARCHAR2 DEFAULT NULL,
p_validation_level IN NUMBER DEFAULT NULL,
p_wltx_header IN OUT NOCOPY WLTX_TRANSACTIONS_REC_TYPE,
p_wltx_starting_job_rec IN OUT NOCOPY WLTX_STARTING_JOBS_REC_TYPE,
p_wltx_resulting_job_rec IN OUT NOCOPY WLTX_RESULTING_JOBS_REC_TYPE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
BEGIN
null;
PROCEDURE UPDATE_COMP_SUBINV_LOC( p_api_version IN VARCHAR2,
p_commit IN VARCHAR2 DEFAULT NULL,
p_init_msg_list IN VARCHAR2 DEFAULT NULL,
p_validation_level IN NUMBER DEFAULT NULL,
p_wltx_header IN OUT NOCOPY WLTX_TRANSACTIONS_REC_TYPE,
p_wltx_starting_job_rec IN OUT NOCOPY WLTX_STARTING_JOBS_REC_TYPE,
p_wltx_resulting_job_rec IN OUT NOCOPY WLTX_RESULTING_JOBS_REC_TYPE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
BEGIN
null;