[Home] [Help]
1: PACKAGE BODY Bom_Import_Pub AS
2: /* $Header: BOMSIMPB.pls 120.94 2007/10/16 05:45:40 dikrishn ship $ */
3: /***************************************************************************
4: --
5: -- Copyright (c) 1996 Oracle Corporation, Redwood Shores, CA, USA
10: -- BOMSIMPB.pls
11: --
12: -- DESCRIPTION
13: --
14: -- Body of package Bom_Import_Pub
15: --
16: -- NOTES
17: --
18: --
31: BULKLOAD_PVT_PKG.PROCESS_BOM_INTERFACE_LINES
32: ***************************************************************************/
33: /* Package Globals */
34: pG_batch_options BATCH_OPTIONS;
35: pG_ouputFileName VARCHAR2(30) := 'BOM_IMPORT_PUB';
36:
37: /****************** Local functions/procedures Section ******************/
38:
39: FUNCTION Init_Debug RETURN BOOLEAN
2525: --dinu_log_message(l_src_query );
2526: --dinu_log_message(l_pdh_query );
2527: --dinu_log_message( ' WHERE attr.attr_group_type = '|| '''' || 'BOM_COMPONENT_BASE'||'''' );
2528: l_attr_sql := l_attr_sql || ' UNION ALL SELECT Bom_Globals.Retrieve_Message('|| '''' || 'BOM' || ''','||''''|| 'BOM_IMPORT_REF_DESGS'||'''),null,null, ' || p_batch_id || ' batch_identifier '
2529: ||',bom_import_pub.get_ref_desgs(:1,:2,:3,1,:5,:6,:7,:8),bom_import_pub.get_ref_desgs(:1,:2,:3,null,:5,:6,:7,:8) from dual' ;
2530:
2531: /*dinu_log_message(' UNION ALL SELECT Bom_Globals.Retrieve_Message('|| '''' || 'BOM' || ''','||''''|| 'BOM_IMPORT_REF_DESGS'||'''),null,' || p_batch_id || ' batch_identifier ,';
2532: ||'bom_import_pub.get_ref_desgs(:1,:2,:3,1,:5,:6,:7,:8),');*/
2533: --dinu_log_message(' bom_import_pub.get_ref_desgs(:1,:2,:3,null,:5,:6,:7,:8) from dual' );
2528: l_attr_sql := l_attr_sql || ' UNION ALL SELECT Bom_Globals.Retrieve_Message('|| '''' || 'BOM' || ''','||''''|| 'BOM_IMPORT_REF_DESGS'||'''),null,null, ' || p_batch_id || ' batch_identifier '
2529: ||',bom_import_pub.get_ref_desgs(:1,:2,:3,1,:5,:6,:7,:8),bom_import_pub.get_ref_desgs(:1,:2,:3,null,:5,:6,:7,:8) from dual' ;
2530:
2531: /*dinu_log_message(' UNION ALL SELECT Bom_Globals.Retrieve_Message('|| '''' || 'BOM' || ''','||''''|| 'BOM_IMPORT_REF_DESGS'||'''),null,' || p_batch_id || ' batch_identifier ,';
2532: ||'bom_import_pub.get_ref_desgs(:1,:2,:3,1,:5,:6,:7,:8),');*/
2533: --dinu_log_message(' bom_import_pub.get_ref_desgs(:1,:2,:3,null,:5,:6,:7,:8) from dual' );
2534:
2535:
2536: l_dummy := NULL;
2529: ||',bom_import_pub.get_ref_desgs(:1,:2,:3,1,:5,:6,:7,:8),bom_import_pub.get_ref_desgs(:1,:2,:3,null,:5,:6,:7,:8) from dual' ;
2530:
2531: /*dinu_log_message(' UNION ALL SELECT Bom_Globals.Retrieve_Message('|| '''' || 'BOM' || ''','||''''|| 'BOM_IMPORT_REF_DESGS'||'''),null,' || p_batch_id || ' batch_identifier ,';
2532: ||'bom_import_pub.get_ref_desgs(:1,:2,:3,1,:5,:6,:7,:8),');*/
2533: --dinu_log_message(' bom_import_pub.get_ref_desgs(:1,:2,:3,null,:5,:6,:7,:8) from dual' );
2534:
2535:
2536: l_dummy := NULL;
2537:
2589: IS
2590:
2591: BEGIN
2592:
2593: BOM_IMPORT_PUB.Matching_Complete
2594: (
2595: p_batch_id => p_batch_id
2596: , x_return_status => x_return_status
2597: , x_Error_Mesg => x_Error_Mesg
3089: , p_add_errors_to_fnd_stack => 'T'
3090: , p_commit => 'T'
3091: , p_default_view_privilege => 'EGO_VIEW_ITEM'
3092: , p_default_edit_privilege => l_edit_prvlg
3093: , p_privilege_predicate_api_name => 'Bom_Import_Pub.Get_Item_Security_Predicate'
3094: , p_validate => true
3095: , p_do_dml => true
3096: , x_return_status => l_return_status
3097: , x_errorcode => l_err_code
3140: , x_return_code OUT NOCOPY VARCHAR2
3141: )
3142: IS
3143: BEGIN
3144: BOM_IMPORT_PUB.DATA_UPLOAD_COMPLETE
3145: (
3146: p_batch_id => p_batch_id,
3147: x_Error_Mesg => x_error_message,
3148: p_init_msg_list => 'N',
3900:
3901: IF pG_batch_options.STRUCTURE_CONTENT <> 'A' THEN
3902:
3903:
3904: BOM_IMPORT_PUB.UPDATE_BILL_INFO
3905: (
3906: p_batch_id => p_batch_id
3907: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3908: , x_Return_Status => l_Return_Status
5591:
5592: END Get_Item_Matches;
5593:
5594:
5595: END Bom_Import_Pub;