25: ,p_module IN VARCHAR2
26: ,p_message IN VARCHAR2
27: ) IS
28: BEGIN
29: IF (p_log_level >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
30: fnd_log.string(log_level => p_log_level
31: ,module => 'fnd.plsql.ego.EGO_ITEM_AML_PUB.'||p_module
32: ,message => p_message
33: );
26: ,p_message IN VARCHAR2
27: ) IS
28: BEGIN
29: IF (p_log_level >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
30: fnd_log.string(log_level => p_log_level
31: ,module => 'fnd.plsql.ego.EGO_ITEM_AML_PUB.'||p_module
32: ,message => p_message
33: );
34: END IF;
185: AND manufacturer_id = cp_manufacturer_id
186: AND mfg_part_num = cp_mfg_part_num;
187:
188: BEGIN
189: log_now (p_log_level => FND_LOG.LEVEL_PROCEDURE
190: ,p_module => l_api_name
191: ,p_message => 'p_api_version:'||p_api_version||'-'||
192: 'p_init_msg_list:'||p_init_msg_list||'-'||
193: 'p_commit'||p_commit||'-'||
229: AND implmentation_date IS NULL
230: AND acd_type IN
231: (G_ADD_ACD_TYPE, G_CHANGE_ACD_TYPE, G_DELETE_ACD_TYPE);
232: l_pending_row_count := SQL%ROWCOUNT;
233: log_now (p_log_level => FND_LOG.LEVEL_STATEMENT
234: ,p_module => l_api_name
235: ,p_message => ' no of rows to process '||l_pending_row_count);
236: EXCEPTION
237: WHEN NO_DATA_FOUND THEN
234: ,p_module => l_api_name
235: ,p_message => ' no of rows to process '||l_pending_row_count);
236: EXCEPTION
237: WHEN NO_DATA_FOUND THEN
238: log_now (p_log_level => FND_LOG.LEVEL_PROCEDURE
239: ,p_module => l_api_name
240: ,p_message => ' no rows to process - returning ');
241: RETURN;
242: END;
255: FND_MSG_PUB.Initialize;
256: END IF;
257:
258: FOR l_pend_index IN 1..l_pending_row_count LOOP
259: log_now (p_log_level => FND_LOG.LEVEL_STATEMENT
260: ,p_module => l_api_name
261: ,p_message => ' started changes for item id:'||l_inventory_item_id_tbl(l_pend_index)||'-'
262: ||' org id:'||l_organization_id_tbl(l_pend_index)||'-'
263: ||' mfg id:'||l_manufacturer_id_tbl(l_pend_index)||'-'
344: ,l_prod_data_row.attribute15
345: ,NULL
346: ,l_prod_data_row.start_date
347: ,l_prod_data_row.end_date);
348: log_now (p_log_level => FND_LOG.LEVEL_STATEMENT
349: ,p_module => l_api_name
350: ,p_message => 'successfully created a history record in ego_mfg_part_num_chgs'
351: );
352: IF l_acd_type_tbl(l_pend_index) = G_CHANGE_ACD_TYPE THEN
387: WHERE manufacturer_id = l_manufacturer_id_tbl(l_pend_index)
388: AND inventory_item_id = l_inventory_item_id_tbl(l_pend_index)
389: AND organization_id = l_organization_id_tbl(l_pend_index)
390: AND mfg_part_num = l_mfg_part_num_tbl(l_pend_index);
391: log_now (p_log_level => FND_LOG.LEVEL_STATEMENT
392: ,p_module => l_api_name
393: ,p_message => 'successfully updated production row'
394: );
395: event_dml_Type := 'UPDATE';
399: WHERE manufacturer_id = l_manufacturer_id_tbl(l_pend_index)
400: AND inventory_item_id = l_inventory_item_id_tbl(l_pend_index)
401: AND organization_id = l_organization_id_tbl(l_pend_index)
402: AND mfg_part_num = l_mfg_part_num_tbl(l_pend_index);
403: log_now (p_log_level => FND_LOG.LEVEL_STATEMENT
404: ,p_module => l_api_name
405: ,p_message => 'successfully deleted production row'
406: );
407: event_dml_Type := 'DELETE';
417: AND organization_id = l_organization_id_tbl(l_pend_index)
418: AND mfg_part_num = l_mfg_part_num_tbl(l_pend_index)
419: AND change_line_id = l_change_line_id_tbl(l_pend_index)
420: AND acd_type = l_acd_type_tbl(l_pend_index);
421: log_now (p_log_level => FND_LOG.LEVEL_STATEMENT
422: ,p_module => l_api_name
423: ,p_message => 'successfully updated pending row as implemented'
424: );
425: END IF;
500: ,l_pend_data_row.first_article_status
501: ,l_pend_data_row.approval_status
502: ,l_pend_data_row.start_date
503: ,l_pend_data_row.end_date);
504: log_now (p_log_level => FND_LOG.LEVEL_STATEMENT
505: ,p_module => l_api_name
506: ,p_message => 'successfully created a record in production table'
507: );
508:
518: AND organization_id = l_organization_id_tbl(l_pend_index)
519: AND mfg_part_num = l_mfg_part_num_tbl(l_pend_index)
520: AND change_line_id = l_change_line_id_tbl(l_pend_index)
521: AND acd_type = l_acd_type_tbl(l_pend_index);
522: log_now (p_log_level => FND_LOG.LEVEL_STATEMENT
523: ,p_module => l_api_name
524: ,p_message => 'successfully updated pending row as implemented'
525: );
526: END IF; -- acd_type
526: END IF; -- acd_type
527:
528: --Start 4105841 : Business Event Enhancement
529: IF event_dml_type IN( 'CREATE', 'DELETE', 'UPDATE') THEN
530: log_now (p_log_level => FND_LOG.LEVEL_STATEMENT
531: ,p_module => l_api_name
532: ,p_message => ' calling Business Event '
533: );
534: EGO_WF_WRAPPER_PVT.Raise_AML_Event
540: ,p_Mfg_Part_Num => l_mfg_part_num_tbl(l_pend_index)
541: ,x_msg_data => l_msg_data
542: ,x_return_status => l_return_status
543: );
544: log_now (p_log_level => FND_LOG.LEVEL_STATEMENT
545: ,p_module => l_api_name
546: ,p_message => ' calling Business Event done'
547: );
548: event_dml_type := ' ';
547: );
548: event_dml_type := ' ';
549: END IF;
550: --End 4105841 : Business Event Enhancement
551: log_now (p_log_level => FND_LOG.LEVEL_STATEMENT
552: ,p_module => l_api_name
553: ,p_message => ' completed changes for item id:'||l_inventory_item_id_tbl(l_pend_index)||'-'
554: ||' org id:'||l_organization_id_tbl(l_pend_index)||'-'
555: ||' mfg id:'||l_manufacturer_id_tbl(l_pend_index)||'-'
562: COMMIT WORK;
563: --calling the Sync Index only if the work is committed.
564: --if needed else where before commit or if the commit is
565: --called else where before this commit pls call the same method.
566: log_now (p_log_level => FND_LOG.LEVEL_PROCEDURE
567: ,p_module => l_api_name
568: ,p_message => ' calling EGO_ITEM_TEXT_UTIL.Sync_Index '
569: );
570: EGO_ITEM_TEXT_UTIL.Sync_Index();
567: ,p_module => l_api_name
568: ,p_message => ' calling EGO_ITEM_TEXT_UTIL.Sync_Index '
569: );
570: EGO_ITEM_TEXT_UTIL.Sync_Index();
571: log_now (p_log_level => FND_LOG.LEVEL_PROCEDURE
572: ,p_module => l_api_name
573: ,p_message => ' returning from EGO_ITEM_TEXT_UTIL.Sync_Index '
574: );
575: END IF;
573: ,p_message => ' returning from EGO_ITEM_TEXT_UTIL.Sync_Index '
574: );
575: END IF;
576: x_return_status := G_RET_STS_SUCCESS;
577: log_now (p_log_level => FND_LOG.LEVEL_PROCEDURE
578: ,p_module => l_api_name
579: ,p_message => ' returning with status '||x_return_status
580: );
581:
587: x_return_status := G_RET_STS_ERROR;
588: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
589: ,p_count => x_msg_count
590: ,p_data => x_msg_data);
591: log_now (p_log_level => FND_LOG.LEVEL_EXCEPTION
592: ,p_module => l_api_name
593: ,p_message => 'Expected Error as Exception '||x_msg_count ||'-'|| x_msg_data
594: );
595: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
599: x_RETURN_STATUS := G_RET_STS_UNEXP_ERROR;
600: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
601: ,p_count => x_msg_count
602: ,p_data => x_msg_data);
603: log_now (p_log_level => FND_LOG.LEVEL_EXCEPTION
604: ,p_module => l_api_name
605: ,p_message => 'Unexpected Error as Exception '||x_msg_count ||'-'|| x_msg_data
606: );
607: WHEN OTHERS THEN
613: END IF;
614: IF c_get_production_data%ISOPEN THEN
615: CLOSE c_get_production_data;
616: END IF;
617: log_now (p_log_level => FND_LOG.LEVEL_EXCEPTION
618: ,p_module => l_api_name
619: ,p_message => 'Exception '||SQLERRM
620: );
621: x_return_status := G_RET_STS_UNEXP_ERROR;
733: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
734: ,p_count => x_msg_count
735: ,p_data => x_msg_data);
736: WHEN OTHERS THEN
737: log_now (p_log_level => FND_LOG.LEVEL_EXCEPTION
738: ,p_module => l_api_name
739: ,p_message => 'Exception '||SQLERRM
740: );
741: IF FND_API.To_Boolean(p_commit) THEN
1079: l_api_name,
1080: G_PKG_NAME) THEN
1081: RETURN l_return_status;
1082: END IF;
1083: log_now (p_log_level => FND_LOG.LEVEL_PROCEDURE
1084: ,p_module => l_api_name
1085: ,p_message => 'p_inventory_item_id '||to_char(p_inventory_item_id)
1086: ||' - p_org_id '||to_char(p_organization_id)
1087: ||' - p_priv_name '|| p_privilege_name
1109: ,l_ss_item_xref_edit_priv
1110: )
1111: )
1112: ) THEN
1113: log_now (p_log_level => FND_LOG.LEVEL_STATEMENT
1114: ,p_module => l_api_name
1115: ,p_message => ' returning status :'||l_return_status||': for invalid params '
1116: );
1117: RETURN l_return_status;
1116: );
1117: RETURN l_return_status;
1118: END IF;
1119:
1120: log_now (p_log_level => FND_LOG.LEVEL_STATEMENT
1121: ,p_module => l_api_name
1122: ,p_message => ' params are valid '
1123: );
1124: -- Checking whether EGO product is installed.
1126: FETCH c_product_check INTO l_temp_status;
1127: CLOSE c_product_check;
1128: IF (l_temp_status <> 'I') THEN
1129: -- EGO does not exist
1130: log_now (p_log_level => FND_LOG.LEVEL_STATEMENT
1131: ,p_module => l_api_name
1132: ,p_message => ' returning status :'||G_EGO_SHORT_NO||': for product not existing '
1133: );
1134: RETURN G_EGO_SHORT_NO;
1133: );
1134: RETURN G_EGO_SHORT_NO;
1135: END IF;
1136:
1137: log_now (p_log_level => FND_LOG.LEVEL_STATEMENT
1138: ,p_module => l_api_name
1139: ,p_message => ' EGO is installed '
1140: );
1141: l_party_id := p_party_id;
1172: IN l_null,
1173: IN l_null,
1174: IN l_null,
1175: IN l_party_key;
1176: log_now (p_log_level => FND_LOG.LEVEL_STATEMENT
1177: ,p_module => l_api_name
1178: ,p_message => ' return value from data security check :'||l_temp_status
1179: );
1180: IF l_temp_status = 'T' THEN
1191: ,l_item_xref_edit_priv
1192: ,l_ss_item_xref_view_priv
1193: ,l_ss_item_xref_edit_priv
1194: ) THEN
1195: log_now (p_log_level => FND_LOG.LEVEL_STATEMENT
1196: ,p_module => l_api_name
1197: ,p_message => ' returrning status without policy check :'||G_EGO_SHORT_NO
1198: );
1199: RETURN G_EGO_SHORT_NO;
1210: ,x_policy_name => l_dummy_msg
1211: ,x_item_number => l_dummy_msg
1212: ,x_org_name => l_dummy_msg
1213: );
1214: log_now (p_log_level => FND_LOG.LEVEL_STATEMENT
1215: ,p_module => l_api_name
1216: ,p_message => ' return status from policy check :'||l_temp_status
1217: );
1218: IF (l_temp_status = G_EGO_SHORT_YES) THEN
1227: END IF;
1228: return l_return_status;
1229: EXCEPTION
1230: WHEN OTHERS THEN
1231: log_now (p_log_level => FND_LOG.LEVEL_EXCEPTION
1232: ,p_module => l_api_name
1233: ,p_message => 'Exception '||SQLERRM
1234: );
1235: IF c_product_check%ISOPEN THEN