[Home] [Help]
1: Package Body CSD_UPDATE_PROGRAMS_PVT as
2: /* $Header: csddrclb.pls 120.21.12020000.9 2013/04/14 00:44:40 takwong ship $ */
3:
4: /* --------------------------------------*/
5: /* Define global variables */
4: /* --------------------------------------*/
5: /* Define global variables */
6: /* --------------------------------------*/
7:
8: G_PKG_NAME CONSTANT VARCHAR2(30) := 'CSD_UPDATE_PROGRAMS_PVT';
9: G_FILE_NAME CONSTANT VARCHAR2(30) := 'csddrclb.pls';
10:
11: -- Global variable for storing the debug level
12: G_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
242: /* Change Hist : */
243: /* 09/20/03 vlakaman Initial Creation. */
244: /*-------------------------------------------------------------------------------------*/
245:
246: Function INIT_ACTIVITY_REC RETURN csd_update_programs_pvt.activity_rec_type IS
247: l_activity_rec activity_rec_type;
248: BEGIN
249: -- Initialize all the in the activity record
250: l_activity_rec.REPAIR_HISTORY_ID := NULL;
354: l_from_uom_code mtl_units_of_measure.uom_code%type;
355:
356: -- Variables used in FND Log
357: l_error_level number := FND_LOG.LEVEL_ERROR;
358: l_mod_name varchar2(2000) := 'csd.plsql.csd_update_programs_pvt.convert_to_ro_uom';
359:
360: BEGIN
361: -- Standard Start of API savepoint
362: SAVEPOINT CONV_TO_RO_UOM;
491: l_rep_hist_id NUMBER;
492:
493: -- Variable used in FND log
494: l_error_level number := FND_LOG.LEVEL_ERROR;
495: l_mod_name varchar2(2000) := 'csd.plsql.csd_update_programs_pvt.log_activity';
496:
497: BEGIN
498: -- Standard Start of API savepoint
499: SAVEPOINT LOG_ACTIVITY;
720: l_activity_rec activity_rec_type;
721:
722: -- Variable used in FND log
723: l_error_level number := FND_LOG.LEVEL_ERROR;
724: l_mod_name varchar2(2000) := 'csd.plsql.csd_update_programs_pvt.job_completion_update';
725:
726: -- User defined exception
727: SKIP_RECORD EXCEPTION;
728:
1551: l_activity_rec activity_rec_type;
1552:
1553: -- Variable used in FND log
1554: l_error_level number := FND_LOG.LEVEL_ERROR;
1555: l_mod_name varchar2(2000) := 'csd.plsql.csd_update_programs_pvt.job_creation_update';
1556:
1557: -- This cursor gets all the records in csd_repair_job_xref
1558: -- that does not have wip_entity_id.
1559: --Cursor split into two to remove OR condition
1870: l_api_version CONSTANT NUMBER := 1.0;
1871:
1872: -- Variable used in FND log
1873: l_error_level number := FND_LOG.LEVEL_ERROR;
1874: l_mod_name varchar2(2000) := 'csd.plsql.csd_update_programs_pvt.receipts_update';
1875:
1876: --bug#8261344
1877: l_return_status varchar2(1);
1878: l_msg_data_warning VARCHAR2(30000);
2154: l_TO_Date Date;
2155:
2156: -- Variables for FND Log
2157: l_error_level number := FND_LOG.LEVEL_ERROR;
2158: l_mod_name varchar2(2000) := 'csd.plsql.csd_update_programs_pvt.rma_rcv_update';
2159:
2160: -- User defined exceptions
2161: SKIP_RECORD EXCEPTION;
2162:
3276: l_activity_rec activity_rec_type;
3277:
3278: -- Variable for the FND log file
3279: l_error_level number := FND_LOG.LEVEL_ERROR;
3280: l_mod_name varchar2(2000) := 'csd.plsql.csd_update_programs_pvt.io_rcv_update';
3281:
3282: -- User defined exception
3283: SKIP_RECORD EXCEPTION;
3284: PROCESS_ERROR EXCEPTION;
4690: l_activity_rec activity_rec_type;
4691:
4692: -- Variable for the FND log file
4693: l_error_level number := FND_LOG.LEVEL_ERROR;
4694: l_mod_name varchar2(2000) := 'csd.plsql.csd_update_programs_pvt.io_rcv_update_move_out';
4695:
4696: -- User defined exception
4697: SKIP_RECORD EXCEPTION;
4698: PROCESS_ERROR EXCEPTION;
6105: l_api_version CONSTANT NUMBER := 1.0;
6106:
6107: -- Variables in FND log
6108: l_error_level number := FND_LOG.LEVEL_ERROR;
6109: l_mod_name varchar2(2000) := 'csd.plsql.csd_update_programs_pvt.ship_update';
6110:
6111: --bug#8261344
6112: l_return_status varchar2(1);
6113: l_msg_data_warning VARCHAR2(30000);
6628: l_TO_Date Date;
6629:
6630: -- Variables used for FND Log
6631: l_error_level number := FND_LOG.LEVEL_ERROR;
6632: l_mod_name varchar2(2000) := 'csd.plsql.csd_update_programs_pvt.so_ship_update';
6633:
6634: --bug#8261344
6635: l_skip_record BOOLEAN := FALSE;
6636: l_warning_return BOOLEAN := FALSE;
7480: l_activity_rec activity_rec_type;
7481:
7482: -- Variables for the FND Log
7483: l_error_level number := FND_LOG.LEVEL_ERROR;
7484: l_mod_name varchar2(2000) := 'csd.plsql.csd_update_programs_pvt.io_ship_update';
7485:
7486: -- User defined exception
7487: PROCESS_ERROR EXCEPTION;
7488: SKIP_RECORD EXCEPTION;
8823: l_dummy varchar2(30);
8824:
8825: -- Variables used for FND log
8826: l_error_level number := FND_LOG.LEVEL_ERROR;
8827: l_mod_name varchar2(2000) := 'csd.plsql.csd_update_programs_pvt.wip_update';
8828:
8829: BEGIN
8830: -- Standard Start of API savepoint
8831: SAVEPOINT WIP_UPDATE;
9025: l_msg_text VARCHAR2(2000); -- swai: bug 12547701
9026:
9027: -- Variables for FND Log
9028: l_error_level number := FND_LOG.LEVEL_ERROR;
9029: l_mod_name varchar2(2000) := 'csd.plsql.csd_update_programs_pvt.receipts_update_conc_prog';
9030:
9031: BEGIN
9032: -- Initialize API return status to success
9033: l_return_status := FND_API.G_RET_STS_SUCCESS;
9159: l_error_status CONSTANT VARCHAR2(1) := '2';
9160:
9161: -- Variables for FND log
9162: l_error_level number := FND_LOG.LEVEL_ERROR;
9163: l_mod_name varchar2(2000) := 'csd.plsql.csd_update_programs_pvt.wip_update_conc_prog';
9164:
9165: BEGIN
9166: -- Initialize API return status to success
9167: l_return_status := FND_API.G_RET_STS_SUCCESS;
9264: l_error_status CONSTANT VARCHAR2(1) := '2';
9265:
9266: -- Variables for the FND Log
9267: l_error_level number := FND_LOG.LEVEL_ERROR;
9268: l_mod_name varchar2(2000) := 'csd.plsql.csd_update_programs_pvt.ship_update_conc_prog';
9269:
9270: Begin
9271: -- Initialize API return status to success
9272: l_return_status := FND_API.G_RET_STS_SUCCESS;
9458: l_task_status VARCHAR2(240);
9459:
9460: -- Variables for FND Log
9461: l_error_level number := FND_LOG.LEVEL_ERROR;
9462: l_mod_name varchar2(2000) := 'csd.plsql.csd_update_programs_pvt.task_update_conc_prog';
9463:
9464: BEGIN
9465:
9466: -- Initialize API return status to success
9903: IF ( l_line_category_code = 'RETURN') THEN
9904:
9905: l_module_name := 'LOGISTICS_RECEIPTS_UPDATE';
9906:
9907: CSD_UPDATE_PROGRAMS_PVT.RECEIPTS_UPDATE
9908: ( p_api_version => 1.0,
9909: p_commit => 'T',
9910: p_init_msg_list => 'T',
9911: p_validation_level => CSD_PROCESS_UTIL.G_VALID_LEVEL_FULL,
9925: ELSIF ( l_line_category_code = 'ORDER') THEN
9926:
9927: l_module_name := 'LOGISTICS_SHIP_UPDATE';
9928:
9929: CSD_UPDATE_PROGRAMS_PVT.SHIP_UPDATE
9930: ( p_api_version => 1.0,
9931: p_commit => 'T',
9932: p_init_msg_list => 'T',
9933: p_validation_level => CSD_PROCESS_UTIL.G_VALID_LEVEL_FULL,
9968:
9969:
9970: EXCEPTION
9971: WHEN OTHERS THEN
9972: WF_CORE.CONTEXT('CSD_UPDATE_PROGRAMS_PVT','UPDATE_LOGISTICS_WF',itemtype,
9973: itemkey,to_char(actid),funcmode);
9974: raise;
9975: END;
9976:
9973: itemkey,to_char(actid),funcmode);
9974: raise;
9975: END;
9976:
9977: END CSD_UPDATE_PROGRAMS_PVT;