DBA Data[Home] [Help]

APPS.CTO_MSUTIL_PUB dependencies on CTO_MSUTIL_PUB

Line 1: package body CTO_MSUTIL_PUB as

1: package body CTO_MSUTIL_PUB as
2: /* $Header: CTOMSUTB.pls 120.11.12010000.2 2008/08/14 12:43:41 ntungare ship $*/
3:
4: /*----------------------------------------------------------------------------+
5: | Copyright (c) 1993 Oracle Corporation Belmont, California, USA

Line 71: G_PKG_NAME CONSTANT VARCHAR2(30) := 'CTO_MSUTIL_PUB';

67: | Modified : 05-Jul-2005 Renga Kannan
68: | Modified for MOAC project
69: +-----------------------------------------------------------------------------*/
70:
71: G_PKG_NAME CONSTANT VARCHAR2(30) := 'CTO_MSUTIL_PUB';
72: TYPE TAB_BCOL is TABLE of bom_cto_order_lines%rowtype index by binary_integer ;
73: gMrpAssignmentSet number ;
74:
75: gUserId number := nvl(fnd_global.user_id, -1);

Line 188: v_t_org_list CTO_MSUTIL_PUB.org_list;

184: and ato_line_id = pTopAtoLineId order by plan_level ;
185:
186:
187:
188: v_t_org_list CTO_MSUTIL_PUB.org_list;
189:
190: v_current_model_line_id number ;
191: v_current_model_item_id number ;
192: v_config_creation bom_cto_order_lines.config_creation%type ;

Line 197: x_orgs_list CTO_MSUTIL_PUB.org_list;

193:
194:
195: v_group_reference_id number ;
196: v_orgs_list cto_oss_source_pk.orgs_list ;
197: x_orgs_list CTO_MSUTIL_PUB.org_list;
198:
199: BEGIN
200:
201: IF PG_DEBUG <> 0 THEN

Line 329: CTO_MSUTIL_PUB.insert_type3_bcso( pTopAtoLineId

325:
326:
327: oe_debug_pub.add( '$$$$$$$$ GOING TO CALL insert_type3_bcso ' || v_model_lines.line_id , 1 ) ;
328:
329: CTO_MSUTIL_PUB.insert_type3_bcso( pTopAtoLineId
330: , v_model_lines.line_id
331: , v_model_lines.inventory_item_id ) ;
332:
333: elsif( v_model_lines.perform_match in ( 'Y' , 'C' ) ) then

Line 338: CTO_MSUTIL_PUB.insert_type3_referenced_bcso( pTopAtoLineId

334:
335:
336: oe_debug_pub.add( '$$$$$$$$ GOING TO CALL insert_type3_referenced_bcso ' || v_model_lines.line_id , 1 ) ;
337:
338: CTO_MSUTIL_PUB.insert_type3_referenced_bcso( pTopAtoLineId
339: , v_model_lines.line_id
340: , v_model_lines.inventory_item_id
341: , v_model_lines.config_item_id) ;
342:

Line 351: CTO_MSUTIL_PUB.insert_type3_bcmo_bcso( pTopAtoLineId

347:
348:
349: oe_debug_pub.add( '$$$$$$$$ GOING TO CALL insert_type3_bcmo_bcso ' || v_model_lines.line_id , 1 ) ;
350:
351: CTO_MSUTIL_PUB.insert_type3_bcmo_bcso( pTopAtoLineId
352: , v_model_lines.line_id
353: , v_model_lines.inventory_item_id ) ;
354:
355: end if ;

Line 540: CTO_MSUTIL_PUB.get_other_orgs( pmodellineid => v_current_model_line_id ,

536: if( v_config_creation = 1) then
537:
538: oe_debug_pub.add( '$$$$$$$$ TYPE 1 model line ' || v_current_model_line_id , 1 ) ;
539:
540: CTO_MSUTIL_PUB.get_other_orgs( pmodellineid => v_current_model_line_id ,
541: xorglst => v_t_org_list ,
542: x_return_status => x_return_status ,
543: x_msg_count => x_msg_count ,
544: x_msg_data => x_msg_data );

Line 570: CTO_MSUTIL_PUB.insert_val_into_bcso( pTopAtoLineId, v_current_model_line_id, v_current_model_item_id, v_t_org_list ) ;

566:
567: oe_debug_pub.add( '$$$$$$$$ ORg List for model line ' || v_current_model_line_id , 1 ) ;
568:
569:
570: CTO_MSUTIL_PUB.insert_val_into_bcso( pTopAtoLineId, v_current_model_line_id, v_current_model_item_id, v_t_org_list ) ;
571:
572:
573: oe_debug_pub.add( '$$$$$$$$ ORg List DONE for model line ' || v_current_model_line_id , 1 ) ;
574:

Line 578: CTO_MSUTIL_PUB.Get_Master_orgs(

574:
575: -- Added by Renga Kannan on 15-Sep-2005
576: -- Added for ATG performance Project
577:
578: CTO_MSUTIL_PUB.Get_Master_orgs(
579: p_model_line_id => v_current_model_line_id ,
580: x_orgs_list => x_orgs_list,
581: x_return_status => x_return_status,
582: x_msg_count => x_msg_count,

Line 603: CTO_MSUTIL_PUB.insert_val_into_bcso( pTopAtoLineId,

599: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
600:
601: end if;
602: If x_orgs_list.count <> 0 then
603: CTO_MSUTIL_PUB.insert_val_into_bcso( pTopAtoLineId,
604: v_current_model_line_id,
605: v_current_model_item_id,
606: x_orgs_list ) ;
607: End if;

Line 613: CTO_MSUTIL_PUB.insert_all_into_bcso( pTopAtoLineId, v_current_model_line_id, v_current_model_item_id ) ;

609: elsif( v_config_creation = 2 ) then
610:
611: oe_debug_pub.add( '$$$$$$$$ TYPE 2 model line ' || v_current_model_line_id , 1 ) ;
612:
613: CTO_MSUTIL_PUB.insert_all_into_bcso( pTopAtoLineId, v_current_model_line_id, v_current_model_item_id ) ;
614:
615: end if;
616:
617:

Line 773: v_t_org_list CTO_MSUTIL_PUB.org_list;

769: and ato_line_id = pTopAtoLineId order by plan_level ;
770:
771:
772:
773: v_t_org_list CTO_MSUTIL_PUB.org_list;
774:
775: v_current_model_line_id number ;
776: v_current_model_item_id number ;
777: v_current_config_item_id number;

Line 785: x_orgs_list CTO_MSUTIL_PUB.org_list;

781: v_group_reference_id number ;
782: v_orgs_list cto_oss_source_pk.orgs_list ;
783: -- Added by Renga Kannan on 15-Sep-2005
784: -- For ATG performance Project
785: x_orgs_list CTO_MSUTIL_PUB.org_list;
786:
787: BEGIN
788:
789: IF PG_DEBUG <> 0 THEN

Line 914: CTO_MSUTIL_PUB.insert_type3_referenced_bcso( pTopAtoLineId

910: oe_debug_pub.add( '$$$$$$$$ TYPE 3 model line ' || v_model_lines.line_id , 1 ) ;
911:
912: /* Fixed bug 3472654 */
913: if( v_model_lines.perform_match in ( 'Y' , 'U') ) then
914: CTO_MSUTIL_PUB.insert_type3_referenced_bcso( pTopAtoLineId
915: , v_model_lines.line_id
916: , v_model_lines.inventory_item_id
917: , v_model_lines.config_item_id) ;
918:

Line 923: CTO_MSUTIL_PUB.insert_type3_bcso( pTopAtoLineId

919:
920: else
921:
922:
923: CTO_MSUTIL_PUB.insert_type3_bcso( pTopAtoLineId
924: , v_model_lines.line_id
925: , v_model_lines.inventory_item_id
926: , v_model_lines.config_item_id) ;
927:

Line 1147: CTO_MSUTIL_PUB.get_other_orgs( pmodellineid => v_current_model_line_id ,

1143: if( v_config_creation = 1) then
1144:
1145: oe_debug_pub.add( '$$$$$$$$ TYPE 1 model line ' || v_current_model_line_id , 1 ) ;
1146:
1147: CTO_MSUTIL_PUB.get_other_orgs( pmodellineid => v_current_model_line_id ,
1148: p_mode => 'UPG',
1149: xorglst => v_t_org_list ,
1150: x_return_status => x_return_status ,
1151: x_msg_count => x_msg_count ,

Line 1178: CTO_MSUTIL_PUB.insert_val_into_bcso( pTopAtoLineId, v_current_model_line_id, v_current_model_item_id, v_t_org_list , v_current_config_item_id) ;

1174:
1175: oe_debug_pub.add( '$$$$$$$$ ORg List for model line ' || v_current_model_line_id , 1 ) ;
1176:
1177:
1178: CTO_MSUTIL_PUB.insert_val_into_bcso( pTopAtoLineId, v_current_model_line_id, v_current_model_item_id, v_t_org_list , v_current_config_item_id) ;
1179:
1180:
1181: oe_debug_pub.add( '$$$$$$$$ ORg List DONE for model line ' || v_current_model_line_id , 1 ) ;
1182: -- Added by Renga Kannan on 15-Sep-2005

Line 1185: CTO_MSUTIL_PUB.Get_Master_orgs(

1181: oe_debug_pub.add( '$$$$$$$$ ORg List DONE for model line ' || v_current_model_line_id , 1 ) ;
1182: -- Added by Renga Kannan on 15-Sep-2005
1183: -- Added for ATG performance Project
1184:
1185: CTO_MSUTIL_PUB.Get_Master_orgs(
1186: p_model_line_id => v_current_model_line_id ,
1187: x_orgs_list => x_orgs_list,
1188: x_return_status => x_return_status,
1189: x_msg_count => x_msg_count,

Line 1210: CTO_MSUTIL_PUB.insert_val_into_bcso( pTopAtoLineId,

1206: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1207:
1208: end if;
1209: If x_orgs_list.count <> 0 then
1210: CTO_MSUTIL_PUB.insert_val_into_bcso( pTopAtoLineId,
1211: v_current_model_line_id,
1212: v_current_model_item_id,
1213: x_orgs_list ) ;
1214: End if;

Line 1221: CTO_MSUTIL_PUB.insert_all_into_bcso( pTopAtoLineId, v_current_model_line_id, v_current_model_item_id , v_current_config_item_id) ;

1217: elsif( v_config_creation = 2 ) then
1218:
1219: oe_debug_pub.add( '$$$$$$$$ TYPE 2 model line ' || v_current_model_line_id , 1 ) ;
1220:
1221: CTO_MSUTIL_PUB.insert_all_into_bcso( pTopAtoLineId, v_current_model_line_id, v_current_model_item_id , v_current_config_item_id) ;
1222:
1223: end if;
1224:
1225:

Line 2942: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'Default assignment set is null, returning from create_sourcing_rules procedure',1);

2938:
2939:
2940: IF lMrpAssignmentSet is null THEN
2941: IF PG_DEBUG <> 0 THEN
2942: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'Default assignment set is null, returning from create_sourcing_rules procedure',1);
2943: END IF;
2944: return;
2945: ELSE
2946: IF PG_DEBUG <> 0 THEN

Line 2947: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'Default assignment set is '||to_char(lMrpAssignmentSet),2);

2943: END IF;
2944: return;
2945: ELSE
2946: IF PG_DEBUG <> 0 THEN
2947: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'Default assignment set is '||to_char(lMrpAssignmentSet),2);
2948: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'Upgrade assignment set is '||to_char(lUPGAssignmentSet),2);
2949: END IF;
2950: END IF;
2951:

Line 2948: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'Upgrade assignment set is '||to_char(lUPGAssignmentSet),2);

2944: return;
2945: ELSE
2946: IF PG_DEBUG <> 0 THEN
2947: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'Default assignment set is '||to_char(lMrpAssignmentSet),2);
2948: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'Upgrade assignment set is '||to_char(lUPGAssignmentSet),2);
2949: END IF;
2950: END IF;
2951:
2952: --

Line 2999: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'There is no sourcing rule defined ',1);

2995: EXCEPTION
2996: WHEN NO_DATA_FOUND THEN
2997:
2998: IF PG_DEBUG <> 0 THEN
2999: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'There is no sourcing rule defined ',1);
3000: END IF;
3001: raise no_sourcing_defined;
3002:
3003: END;

Line 3007: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'lAssnType::'||to_char(lAssignmentType)||'::lAssnId::'||to_char(lAssignmentId),2);

3003: END;
3004:
3005:
3006: IF PG_DEBUG <> 0 THEN
3007: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'lAssnType::'||to_char(lAssignmentType)||'::lAssnId::'||to_char(lAssignmentId),2);
3008: END IF;
3009:
3010: --
3011: -- copy assignment into lAssignmentRec

Line 3105: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'after query row',2);

3101: FROM MRP_SR_ASSIGNMENTS
3102: WHERE ASSIGNMENT_ID = lAssignmentId;
3103:
3104: IF PG_DEBUG <> 0 THEN
3105: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'after query row',2);
3106: END IF;
3107:
3108: --
3109: -- check if this assignment already exists for config item

Line 3115: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'assignment_set_id::'||to_char(lAssignmentRec.assignment_set_id),2);

3111: lStmtNum := 35;
3112: BEGIN
3113:
3114: IF PG_DEBUG <> 0 THEN
3115: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'assignment_set_id::'||to_char(lAssignmentRec.assignment_set_id),2);
3116:
3117: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'assignment_type::'||to_char(lAssignmentRec.assignment_type),2);
3118:
3119: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'organization_id::'||to_char(lAssignmentRec.organization_id),2);

Line 3117: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'assignment_type::'||to_char(lAssignmentRec.assignment_type),2);

3113:
3114: IF PG_DEBUG <> 0 THEN
3115: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'assignment_set_id::'||to_char(lAssignmentRec.assignment_set_id),2);
3116:
3117: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'assignment_type::'||to_char(lAssignmentRec.assignment_type),2);
3118:
3119: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'organization_id::'||to_char(lAssignmentRec.organization_id),2);
3120:
3121: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'customer_id::'||to_char(lAssignmentRec.customer_id),2);

Line 3119: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'organization_id::'||to_char(lAssignmentRec.organization_id),2);

3115: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'assignment_set_id::'||to_char(lAssignmentRec.assignment_set_id),2);
3116:
3117: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'assignment_type::'||to_char(lAssignmentRec.assignment_type),2);
3118:
3119: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'organization_id::'||to_char(lAssignmentRec.organization_id),2);
3120:
3121: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'customer_id::'||to_char(lAssignmentRec.customer_id),2);
3122:
3123: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'ship_to_site_id::'||to_char(lAssignmentRec.ship_to_site_id),2);

Line 3121: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'customer_id::'||to_char(lAssignmentRec.customer_id),2);

3117: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'assignment_type::'||to_char(lAssignmentRec.assignment_type),2);
3118:
3119: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'organization_id::'||to_char(lAssignmentRec.organization_id),2);
3120:
3121: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'customer_id::'||to_char(lAssignmentRec.customer_id),2);
3122:
3123: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'ship_to_site_id::'||to_char(lAssignmentRec.ship_to_site_id),2);
3124:
3125: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'sourcing_rule_type::'||to_char(lAssignmentRec.sourcing_rule_type),2);

Line 3123: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'ship_to_site_id::'||to_char(lAssignmentRec.ship_to_site_id),2);

3119: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'organization_id::'||to_char(lAssignmentRec.organization_id),2);
3120:
3121: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'customer_id::'||to_char(lAssignmentRec.customer_id),2);
3122:
3123: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'ship_to_site_id::'||to_char(lAssignmentRec.ship_to_site_id),2);
3124:
3125: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'sourcing_rule_type::'||to_char(lAssignmentRec.sourcing_rule_type),2);
3126:
3127: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'inventory_item_id:: '||to_char(pConfigId),2);

Line 3125: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'sourcing_rule_type::'||to_char(lAssignmentRec.sourcing_rule_type),2);

3121: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'customer_id::'||to_char(lAssignmentRec.customer_id),2);
3122:
3123: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'ship_to_site_id::'||to_char(lAssignmentRec.ship_to_site_id),2);
3124:
3125: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'sourcing_rule_type::'||to_char(lAssignmentRec.sourcing_rule_type),2);
3126:
3127: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'inventory_item_id:: '||to_char(pConfigId),2);
3128:
3129: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'category_id:: '||to_char(lAssignmentRec.category_id),2);

Line 3127: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'inventory_item_id:: '||to_char(pConfigId),2);

3123: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'ship_to_site_id::'||to_char(lAssignmentRec.ship_to_site_id),2);
3124:
3125: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'sourcing_rule_type::'||to_char(lAssignmentRec.sourcing_rule_type),2);
3126:
3127: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'inventory_item_id:: '||to_char(pConfigId),2);
3128:
3129: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'category_id:: '||to_char(lAssignmentRec.category_id),2);
3130: END IF;
3131:

Line 3129: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'category_id:: '||to_char(lAssignmentRec.category_id),2);

3125: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'sourcing_rule_type::'||to_char(lAssignmentRec.sourcing_rule_type),2);
3126:
3127: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'inventory_item_id:: '||to_char(pConfigId),2);
3128:
3129: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'category_id:: '||to_char(lAssignmentRec.category_id),2);
3130: END IF;
3131:
3132: -- bug 6617686
3133: IF pConfigId IS NOT NULL THEN

Line 3162: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'assignment exists already, do not recreate',2);

3158: -- end: bug 6617686
3159:
3160: IF lAssignmentExists = 1 THEN
3161: IF PG_DEBUG <> 0 THEN
3162: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'assignment exists already, do not recreate',2);
3163: END IF;
3164: return;
3165: END IF;
3166:

Line 3170: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'assignment does not exist, create it',2);

3166:
3167: EXCEPTION
3168: when NO_DATA_FOUND then
3169: IF PG_DEBUG <> 0 THEN
3170: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'assignment does not exist, create it',2);
3171: END IF;
3172: when OTHERS then
3173: IF PG_DEBUG <> 0 THEN
3174: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'others exception while checking ifassignment exists, not handling, creating assignment:: '||sqlerrm,2);

Line 3174: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'others exception while checking ifassignment exists, not handling, creating assignment:: '||sqlerrm,2);

3170: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'assignment does not exist, create it',2);
3171: END IF;
3172: when OTHERS then
3173: IF PG_DEBUG <> 0 THEN
3174: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'others exception while checking ifassignment exists, not handling, creating assignment:: '||sqlerrm,2);
3175: END IF;
3176: END;
3177:
3178: --

Line 3231: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'after forming lAssignmentTbl',2);

3227: lAssignmentTbl(1).db_flag := NULL;
3228: lAssignmentTbl(1).operation := MRP_Globals.G_OPR_CREATE;
3229:
3230: IF PG_DEBUG <> 0 THEN
3231: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'after forming lAssignmentTbl',2);
3232: END IF;
3233:
3234: --
3235: -- form lAssignmentSetRec

Line 3240: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'after forming lAssignmentSetRec',2);

3236: --
3237: lStmtNum := 50;
3238: lAssignmentSetRec.operation := MRP_Globals.G_OPR_NONE;
3239: IF PG_DEBUG <> 0 THEN
3240: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'after forming lAssignmentSetRec',2);
3241: END IF;
3242:
3243: --
3244: -- call mrp API to insert rec into assignment set

Line 3248: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'before Process_Assignment',2);

3244: -- call mrp API to insert rec into assignment set
3245: --
3246: lStmtNum := 60;
3247: IF PG_DEBUG <> 0 THEN
3248: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'before Process_Assignment',2);
3249: END IF;
3250:
3251: -- currently, not passing commented out parameters, need to
3252: -- confirm with raghu, confirmed with stupe

Line 3274: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'unexp error in process_assignment::'||sqlerrm,1);

3270: );
3271:
3272: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3273: IF PG_DEBUG <> 0 THEN
3274: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'unexp error in process_assignment::'||sqlerrm,1);
3275: END IF;
3276: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3277:
3278: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

Line 3280: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'error in process_assignment::'||sqlerrm,1);

3276: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3277:
3278: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
3279: IF PG_DEBUG <> 0 THEN
3280: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'error in process_assignment::'||sqlerrm,1);
3281: END IF;
3282:
3283: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: count:'||l_msg_count , 1 );
3284:

Line 3283: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: count:'||l_msg_count , 1 );

3279: IF PG_DEBUG <> 0 THEN
3280: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'error in process_assignment::'||sqlerrm,1);
3281: END IF;
3282:
3283: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: count:'||l_msg_count , 1 );
3284:
3285: IF l_msg_count > 0 THEN
3286: FOR l_index IN 1..l_msg_count LOOP
3287: l_msg_data := fnd_msg_pub.get(

Line 3291: oe_debug_pub.add( 'CTO_MSUTIL_PUB.create_sourcing_rule: ' || substr(l_msg_data,1,250) , 1 );

3287: l_msg_data := fnd_msg_pub.get(
3288: p_msg_index => l_index,
3289: p_encoded => FND_API.G_FALSE);
3290:
3291: oe_debug_pub.add( 'CTO_MSUTIL_PUB.create_sourcing_rule: ' || substr(l_msg_data,1,250) , 1 );
3292: END LOOP;
3293:
3294: oe_debug_pub.add(' CTO_MSUTIL_PUB.create_sourcing_rules: MSG:'|| xAssignmentSetRec.return_status);
3295: END IF;

Line 3294: oe_debug_pub.add(' CTO_MSUTIL_PUB.create_sourcing_rules: MSG:'|| xAssignmentSetRec.return_status);

3290:
3291: oe_debug_pub.add( 'CTO_MSUTIL_PUB.create_sourcing_rule: ' || substr(l_msg_data,1,250) , 1 );
3292: END LOOP;
3293:
3294: oe_debug_pub.add(' CTO_MSUTIL_PUB.create_sourcing_rules: MSG:'|| xAssignmentSetRec.return_status);
3295: END IF;
3296:
3297: oe_debug_pub.add('Failure!' , 1 );
3298:

Line 3304: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'success in process_assignment',2);

3300: raise FND_API.G_EXC_ERROR;
3301:
3302: END IF;
3303: IF PG_DEBUG <> 0 THEN
3304: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'success in process_assignment',2);
3305: END IF;
3306:
3307: EXCEPTION
3308: When NO_sourcing_defined THEN

Line 3313: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'Create_Src_Rules::exp error::'||to_char(lStmtNum)||'::'||sqlerrm,1);

3309: null;
3310:
3311: when FND_API.G_EXC_ERROR then
3312: IF PG_DEBUG <> 0 THEN
3313: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'Create_Src_Rules::exp error::'||to_char(lStmtNum)||'::'||sqlerrm,1);
3314: END IF;
3315: x_return_status := FND_API.G_RET_STS_ERROR;
3316: CTO_MSG_PUB.Count_And_Get
3317: (p_msg_count => x_msg_count

Line 3323: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'Create_Src_Rules::unexp error::'||to_char(lStmtNum)||'::'||sqlerrm,1);

3319: );
3320:
3321: when FND_API.G_EXC_UNEXPECTED_ERROR then
3322: IF PG_DEBUG <> 0 THEN
3323: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'Create_Src_Rules::unexp error::'||to_char(lStmtNum)||'::'||sqlerrm,1);
3324: END IF;
3325: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3326: CTO_MSG_PUB.Count_And_Get
3327: (p_msg_count => x_msg_count

Line 3333: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'Create_Src_Rules::others::'||to_char(lStmtNum)||'::'||sqlerrm,1);

3329: );
3330:
3331: when OTHERS then
3332: IF PG_DEBUG <> 0 THEN
3333: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: ' || 'Create_Src_Rules::others::'||to_char(lStmtNum)||'::'||sqlerrm,1);
3334: END IF;
3335: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3336: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3337: FND_MSG_PUB.Add_Exc_Msg

Line 3448: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'Default assignment set is null, returning from create_sourcing_rules procedure',1);

3444:
3445:
3446: IF lMrpAssignmentSet is null THEN
3447: IF PG_DEBUG <> 0 THEN
3448: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'Default assignment set is null, returning from create_sourcing_rules procedure',1);
3449: END IF;
3450: return;
3451: ELSE
3452: IF PG_DEBUG <> 0 THEN

Line 3453: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'Default assignment set is '||to_char(lMrpAssignmentSet),2);

3449: END IF;
3450: return;
3451: ELSE
3452: IF PG_DEBUG <> 0 THEN
3453: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'Default assignment set is '||to_char(lMrpAssignmentSet),2);
3454: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'UPG assignment set is '||to_char(lUPGAssignmentSet),2);
3455: END IF;
3456: END IF;
3457:

Line 3454: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'UPG assignment set is '||to_char(lUPGAssignmentSet),2);

3450: return;
3451: ELSE
3452: IF PG_DEBUG <> 0 THEN
3453: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'Default assignment set is '||to_char(lMrpAssignmentSet),2);
3454: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'UPG assignment set is '||to_char(lUPGAssignmentSet),2);
3455: END IF;
3456: END IF;
3457:
3458: --

Line 3500: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'There is no sourcing rule defined ',1);

3496: EXCEPTION
3497: WHEN NO_DATA_FOUND THEN
3498:
3499: IF PG_DEBUG <> 0 THEN
3500: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'There is no sourcing rule defined ',1);
3501: END IF;
3502: raise no_sourcing_defined;
3503:
3504: END;

Line 3528: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'lAssnType::'||to_char(lAssignmentType)||'::lAssnId::'||to_char(lAssignmentId),2);

3524: exit when c_type3_assignments%notfound ;
3525:
3526:
3527: IF PG_DEBUG <> 0 THEN
3528: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'lAssnType::'||to_char(lAssignmentType)||'::lAssnId::'||to_char(lAssignmentId),2);
3529: END IF;
3530:
3531: --
3532: -- copy assignment into lAssignmentRec

Line 3626: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'after query row',2);

3622: FROM MRP_SR_ASSIGNMENTS
3623: WHERE ASSIGNMENT_ID = lAssignmentId;
3624:
3625: IF PG_DEBUG <> 0 THEN
3626: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'after query row',2);
3627: END IF;
3628:
3629: --
3630: -- check if this assignment already exists for config item

Line 3636: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'assignment_set_id::'||to_char(lAssignmentRec.assignment_set_id),2);

3632: lStmtNum := 35;
3633: BEGIN
3634:
3635: IF PG_DEBUG <> 0 THEN
3636: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'assignment_set_id::'||to_char(lAssignmentRec.assignment_set_id),2);
3637:
3638: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'Source assignment_set_id::'||to_char(lMrpAssignmentSet),2);
3639: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'Destination assignment_set_id::'||to_char(lUPGAssignmentSet),2);
3640:

Line 3638: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'Source assignment_set_id::'||to_char(lMrpAssignmentSet),2);

3634:
3635: IF PG_DEBUG <> 0 THEN
3636: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'assignment_set_id::'||to_char(lAssignmentRec.assignment_set_id),2);
3637:
3638: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'Source assignment_set_id::'||to_char(lMrpAssignmentSet),2);
3639: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'Destination assignment_set_id::'||to_char(lUPGAssignmentSet),2);
3640:
3641: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'assignment_type::'||to_char(lAssignmentRec.assignment_type),2);
3642:

Line 3639: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'Destination assignment_set_id::'||to_char(lUPGAssignmentSet),2);

3635: IF PG_DEBUG <> 0 THEN
3636: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'assignment_set_id::'||to_char(lAssignmentRec.assignment_set_id),2);
3637:
3638: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'Source assignment_set_id::'||to_char(lMrpAssignmentSet),2);
3639: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'Destination assignment_set_id::'||to_char(lUPGAssignmentSet),2);
3640:
3641: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'assignment_type::'||to_char(lAssignmentRec.assignment_type),2);
3642:
3643: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'organization_id::'||to_char(lAssignmentRec.organization_id),2);

Line 3641: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'assignment_type::'||to_char(lAssignmentRec.assignment_type),2);

3637:
3638: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'Source assignment_set_id::'||to_char(lMrpAssignmentSet),2);
3639: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'Destination assignment_set_id::'||to_char(lUPGAssignmentSet),2);
3640:
3641: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'assignment_type::'||to_char(lAssignmentRec.assignment_type),2);
3642:
3643: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'organization_id::'||to_char(lAssignmentRec.organization_id),2);
3644:
3645: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'customer_id::'||to_char(lAssignmentRec.customer_id),2);

Line 3643: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'organization_id::'||to_char(lAssignmentRec.organization_id),2);

3639: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'Destination assignment_set_id::'||to_char(lUPGAssignmentSet),2);
3640:
3641: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'assignment_type::'||to_char(lAssignmentRec.assignment_type),2);
3642:
3643: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'organization_id::'||to_char(lAssignmentRec.organization_id),2);
3644:
3645: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'customer_id::'||to_char(lAssignmentRec.customer_id),2);
3646:
3647: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'ship_to_site_id::'||to_char(lAssignmentRec.ship_to_site_id),2);

Line 3645: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'customer_id::'||to_char(lAssignmentRec.customer_id),2);

3641: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'assignment_type::'||to_char(lAssignmentRec.assignment_type),2);
3642:
3643: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'organization_id::'||to_char(lAssignmentRec.organization_id),2);
3644:
3645: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'customer_id::'||to_char(lAssignmentRec.customer_id),2);
3646:
3647: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'ship_to_site_id::'||to_char(lAssignmentRec.ship_to_site_id),2);
3648:
3649: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'sourcing_rule_type::'||to_char(lAssignmentRec.sourcing_rule_type),2);

Line 3647: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'ship_to_site_id::'||to_char(lAssignmentRec.ship_to_site_id),2);

3643: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'organization_id::'||to_char(lAssignmentRec.organization_id),2);
3644:
3645: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'customer_id::'||to_char(lAssignmentRec.customer_id),2);
3646:
3647: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'ship_to_site_id::'||to_char(lAssignmentRec.ship_to_site_id),2);
3648:
3649: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'sourcing_rule_type::'||to_char(lAssignmentRec.sourcing_rule_type),2);
3650:
3651: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'inventory_item_id:: '||to_char(pConfigId),2);

Line 3649: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'sourcing_rule_type::'||to_char(lAssignmentRec.sourcing_rule_type),2);

3645: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'customer_id::'||to_char(lAssignmentRec.customer_id),2);
3646:
3647: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'ship_to_site_id::'||to_char(lAssignmentRec.ship_to_site_id),2);
3648:
3649: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'sourcing_rule_type::'||to_char(lAssignmentRec.sourcing_rule_type),2);
3650:
3651: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'inventory_item_id:: '||to_char(pConfigId),2);
3652:
3653: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'category_id:: '||to_char(lAssignmentRec.category_id),2);

Line 3651: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'inventory_item_id:: '||to_char(pConfigId),2);

3647: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'ship_to_site_id::'||to_char(lAssignmentRec.ship_to_site_id),2);
3648:
3649: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'sourcing_rule_type::'||to_char(lAssignmentRec.sourcing_rule_type),2);
3650:
3651: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'inventory_item_id:: '||to_char(pConfigId),2);
3652:
3653: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'category_id:: '||to_char(lAssignmentRec.category_id),2);
3654: END IF;
3655:

Line 3653: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'category_id:: '||to_char(lAssignmentRec.category_id),2);

3649: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'sourcing_rule_type::'||to_char(lAssignmentRec.sourcing_rule_type),2);
3650:
3651: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'inventory_item_id:: '||to_char(pConfigId),2);
3652:
3653: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'category_id:: '||to_char(lAssignmentRec.category_id),2);
3654: END IF;
3655:
3656: -- bug 6617686
3657: IF pConfigId IS NOT NULL THEN

Line 3686: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'assignment exists already, do not recreate',2);

3682: -- end : bug 6617686
3683:
3684: IF lAssignmentExists = 1 THEN
3685: IF PG_DEBUG <> 0 THEN
3686: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'assignment exists already, do not recreate',2);
3687: END IF;
3688:
3689:
3690:

Line 3699: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'assignment does not exist, create it',2);

3695:
3696: EXCEPTION
3697: when NO_DATA_FOUND then
3698: IF PG_DEBUG <> 0 THEN
3699: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'assignment does not exist, create it',2);
3700: END IF;
3701: when OTHERS then
3702: IF PG_DEBUG <> 0 THEN
3703: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' ||

Line 3703: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' ||

3699: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'assignment does not exist, create it',2);
3700: END IF;
3701: when OTHERS then
3702: IF PG_DEBUG <> 0 THEN
3703: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' ||
3704: 'others exception while checking ifassignment exists, not handling, creating assignment:: '||sqlerrm,2);
3705: END IF;
3706: END;
3707:

Line 3764: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'after forming lAssignmentTbl',2);

3760: lAssignmentTbl(1).db_flag := NULL;
3761: lAssignmentTbl(1).operation := MRP_Globals.G_OPR_CREATE;
3762:
3763: IF PG_DEBUG <> 0 THEN
3764: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'after forming lAssignmentTbl',2);
3765: END IF;
3766:
3767: --
3768: -- form lAssignmentSetRec

Line 3773: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'after forming lAssignmentSetRec',2);

3769: --
3770: lStmtNum := 50;
3771: lAssignmentSetRec.operation := MRP_Globals.G_OPR_NONE;
3772: IF PG_DEBUG <> 0 THEN
3773: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'after forming lAssignmentSetRec',2);
3774: END IF;
3775:
3776: --
3777: -- call mrp API to insert rec into assignment set

Line 3781: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'before Process_Assignment',2);

3777: -- call mrp API to insert rec into assignment set
3778: --
3779: lStmtNum := 60;
3780: IF PG_DEBUG <> 0 THEN
3781: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'before Process_Assignment',2);
3782: END IF;
3783:
3784: -- currently, not passing commented out parameters, need to
3785: -- confirm with raghu, confirmed with stupe

Line 3807: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'unexp error in process_assignment::'||sqlerrm,1);

3803: );
3804:
3805: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3806: IF PG_DEBUG <> 0 THEN
3807: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'unexp error in process_assignment::'||sqlerrm,1);
3808: END IF;
3809: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3810:
3811: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

Line 3813: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'error in process_assignment::'||sqlerrm,1);

3809: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3810:
3811: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
3812: IF PG_DEBUG <> 0 THEN
3813: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'error in process_assignment::'||sqlerrm,1);
3814: END IF;
3815:
3816:
3817: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: count:'||l_msg_count , 1 );

Line 3817: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: count:'||l_msg_count , 1 );

3813: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'error in process_assignment::'||sqlerrm,1);
3814: END IF;
3815:
3816:
3817: oe_debug_pub.add('CTO_MSUTIL_PUB.create_sourcing_rules: count:'||l_msg_count , 1 );
3818:
3819: IF l_msg_count > 0 THEN
3820: FOR l_index IN 1..l_msg_count LOOP
3821: l_msg_data := fnd_msg_pub.get(

Line 3825: oe_debug_pub.add( 'CTO_MSUTIL_PUB.create_sourcing_rule: ' || substr(l_msg_data,1,250) , 1 );

3821: l_msg_data := fnd_msg_pub.get(
3822: p_msg_index => l_index,
3823: p_encoded => FND_API.G_FALSE);
3824:
3825: oe_debug_pub.add( 'CTO_MSUTIL_PUB.create_sourcing_rule: ' || substr(l_msg_data,1,250) , 1 );
3826: END LOOP;
3827:
3828: oe_debug_pub.add(' CTO_MSUTIL_PUB.create_sourcing_rules: MSG:'|| xAssignmentSetRec.return_status);
3829: END IF;

Line 3828: oe_debug_pub.add(' CTO_MSUTIL_PUB.create_sourcing_rules: MSG:'|| xAssignmentSetRec.return_status);

3824:
3825: oe_debug_pub.add( 'CTO_MSUTIL_PUB.create_sourcing_rule: ' || substr(l_msg_data,1,250) , 1 );
3826: END LOOP;
3827:
3828: oe_debug_pub.add(' CTO_MSUTIL_PUB.create_sourcing_rules: MSG:'|| xAssignmentSetRec.return_status);
3829: END IF;
3830:
3831: oe_debug_pub.add('Failure!' , 1 );
3832:

Line 3838: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'success in process_assignment',2);

3834: raise FND_API.G_EXC_ERROR;
3835:
3836: END IF;
3837: IF PG_DEBUG <> 0 THEN
3838: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'success in process_assignment',2);
3839: END IF;
3840:
3841:
3842: lStmtNum := 70;

Line 3844: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'before end_of_loop',2);

3840:
3841:
3842: lStmtNum := 70;
3843:
3844: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'before end_of_loop',2);
3845: <>
3846: null ;
3847: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'after end_of_loop',2);
3848: END LOOP;

Line 3847: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'after end_of_loop',2);

3843:
3844: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'before end_of_loop',2);
3845: <>
3846: null ;
3847: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'after end_of_loop',2);
3848: END LOOP;
3849:
3850:
3851: if( c_type3_assignments%rowcount = 0 ) then

Line 3853: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'no sourcing assignments ',2);

3849:
3850:
3851: if( c_type3_assignments%rowcount = 0 ) then
3852:
3853: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'no sourcing assignments ',2);
3854:
3855: end if;
3856:
3857: lStmtNum := 80;

Line 3859: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'before close c_type3_assignments ',2);

3855: end if;
3856:
3857: lStmtNum := 80;
3858:
3859: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || 'before close c_type3_assignments ',2);
3860:
3861: close c_type3_assignments ;
3862:
3863:

Line 3876: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || '::exp error::'||to_char(lStmtNum)||'::'||sqlerrm,1);

3872: null;
3873:
3874: when FND_API.G_EXC_ERROR then
3875: IF PG_DEBUG <> 0 THEN
3876: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || '::exp error::'||to_char(lStmtNum)||'::'||sqlerrm,1);
3877: END IF;
3878: x_return_status := FND_API.G_RET_STS_ERROR;
3879: CTO_MSG_PUB.Count_And_Get
3880: (p_msg_count => x_msg_count

Line 3886: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || '::unexp error::'||to_char(lStmtNum)||'::'||sqlerrm,1);

3882: );
3883:
3884: when FND_API.G_EXC_UNEXPECTED_ERROR then
3885: IF PG_DEBUG <> 0 THEN
3886: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || '::unexp error::'||to_char(lStmtNum)||'::'||sqlerrm,1);
3887: END IF;
3888: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3889: CTO_MSG_PUB.Count_And_Get
3890: (p_msg_count => x_msg_count

Line 3896: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || '::others::'||to_char(lStmtNum)||'::'||sqlerrm,1);

3892: );
3893:
3894: when OTHERS then
3895: IF PG_DEBUG <> 0 THEN
3896: oe_debug_pub.add('CTO_MSUTIL_PUB.create_type3_sourcing_rules: ' || '::others::'||to_char(lStmtNum)||'::'||sqlerrm,1);
3897: END IF;
3898: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3899: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3900: FND_MSG_PUB.Add_Exc_Msg

Line 4015: , p_t_org_list in CTO_MSUTIL_PUB.org_list

4011:
4012: procedure insert_val_into_bcso( p_top_ato_line_id in NUMBER
4013: , p_model_line_id in NUMBER
4014: , p_model_item_id in NUMBER
4015: , p_t_org_list in CTO_MSUTIL_PUB.org_list
4016: , p_config_item_id in number default null)
4017: is
4018: i number ;
4019: v_source_type_code varchar2(20) ;

Line 4583: xOrgLst OUT NOCOPY CTO_MSUTIL_PUB.Org_list,

4579:
4580: Procedure get_other_orgs (
4581: pModelLineId IN NUMBER,
4582: p_mode IN VARCHAR2 default 'ACC',
4583: xOrgLst OUT NOCOPY CTO_MSUTIL_PUB.Org_list,
4584: x_return_status OUT NOCOPY VARCHAR2,
4585: x_msg_count OUT NOCOPY NUMBER,
4586: x_msg_data OUT NOCOPY VARCHAR2
4587: ) IS

Line 4622: xOrgLst_copy CTO_MSUTIL_PUB.Org_list;

4618: select organization_id bcso_org_id
4619: from bom_cto_src_orgs
4620: where line_id = pModelLineId;
4621:
4622: xOrgLst_copy CTO_MSUTIL_PUB.Org_list;
4623: begin
4624:
4625: /* Clear OrgList array if any element exist */
4626:

Line 5221: x_orgs_list OUT NOCOPY CTO_MSUTIL_PUB.org_list,

5217: +-------------------------------------------------------------------------*/
5218:
5219: PROCEDURE Get_Master_Orgs(
5220: p_model_line_id IN Number,
5221: x_orgs_list OUT NOCOPY CTO_MSUTIL_PUB.org_list,
5222: x_msg_count OUT NOCOPY Number,
5223: x_msg_data OUT NOCOPY varchar2,
5224: x_return_status OUT NOCOPY varchar2) is
5225: LSTMT_NUM Number :=10;

Line 5425: END CTO_MSUTIL_PUB ;

5421: End if;
5422:
5423: End Switch_context_back;
5424:
5425: END CTO_MSUTIL_PUB ;