121:
122: if (x_success = 0) then
123:
124:
125: fnd_message.set_name('WIP', 'WIP_ERROR_SUBST_TYPE');
126: fnd_message.set_token('ENTITY1',
127: to_char(sub_rec.operation_seq_num) );
128: p_err_mesg := fnd_message.get ;
129: return 0;
122: if (x_success = 0) then
123:
124:
125: fnd_message.set_name('WIP', 'WIP_ERROR_SUBST_TYPE');
126: fnd_message.set_token('ENTITY1',
127: to_char(sub_rec.operation_seq_num) );
128: p_err_mesg := fnd_message.get ;
129: return 0;
130:
124:
125: fnd_message.set_name('WIP', 'WIP_ERROR_SUBST_TYPE');
126: fnd_message.set_token('ENTITY1',
127: to_char(sub_rec.operation_seq_num) );
128: p_err_mesg := fnd_message.get ;
129: return 0;
130:
131: end if ;
132:
135: -- derive it later in Post_SubsMerge
136: --
137:
138: if( UPPER(NVL(Sub_Rec.flow_schedule,'Y')) = 'N' ) then
139: fnd_message.set_name('WIP', 'WIP_FLOW_FLAG_ERROR');
140: p_err_mesg := fnd_message.get ;
141: return 0;
142: end if;
143:
136: --
137:
138: if( UPPER(NVL(Sub_Rec.flow_schedule,'Y')) = 'N' ) then
139: fnd_message.set_name('WIP', 'WIP_FLOW_FLAG_ERROR');
140: p_err_mesg := fnd_message.get ;
141: return 0;
142: end if;
143:
144: x_success := 0; -- CFM Scrap
149: x_rout_rev_date,
150: Sub_Rec.operation_seq_num,
151: x_parent_op_seq,
152: 'N') <> 1 THEN
153: fnd_message.set_name('WIP', 'WIP_INVALID_COMP_OP_SEQ');
154: p_err_mesg := fnd_message.get ;
155: RETURN 0;
156: END IF;
157:
150: Sub_Rec.operation_seq_num,
151: x_parent_op_seq,
152: 'N') <> 1 THEN
153: fnd_message.set_name('WIP', 'WIP_INVALID_COMP_OP_SEQ');
154: p_err_mesg := fnd_message.get ;
155: RETURN 0;
156: END IF;
157:
158:
172: and bom_item_type = 4 ; -- Standard Type
173: if (x_success = 0) then
174:
175:
176: fnd_message.set_name('WIP', 'WIP_ERROR_SUBST_ASSEMBLY');
177: x_error := 'Original Item Id' ||to_char(Sub_Rec.inventory_item_id)
178: || ' at OP Seq :'
179: || to_char(sub_rec.operation_seq_num) || '.' ;
180: fnd_message.set_token('ENTITY1', x_error);
176: fnd_message.set_name('WIP', 'WIP_ERROR_SUBST_ASSEMBLY');
177: x_error := 'Original Item Id' ||to_char(Sub_Rec.inventory_item_id)
178: || ' at OP Seq :'
179: || to_char(sub_rec.operation_seq_num) || '.' ;
180: fnd_message.set_token('ENTITY1', x_error);
181: fnd_message.set_token('ENTITY2', 'Original Component');
182: p_err_mesg := fnd_message.get ;
183: return 0;
184:
177: x_error := 'Original Item Id' ||to_char(Sub_Rec.inventory_item_id)
178: || ' at OP Seq :'
179: || to_char(sub_rec.operation_seq_num) || '.' ;
180: fnd_message.set_token('ENTITY1', x_error);
181: fnd_message.set_token('ENTITY2', 'Original Component');
182: p_err_mesg := fnd_message.get ;
183: return 0;
184:
185: end if ;
178: || ' at OP Seq :'
179: || to_char(sub_rec.operation_seq_num) || '.' ;
180: fnd_message.set_token('ENTITY1', x_error);
181: fnd_message.set_token('ENTITY2', 'Original Component');
182: p_err_mesg := fnd_message.get ;
183: return 0;
184:
185: end if ;
186: end if ;
203:
204: if (x_success = 0) then
205:
206:
207: fnd_message.set_name('WIP', 'WIP_ERROR_SUBST_ASSEMBLY');
208: x_error := 'Substitution Item Id' ||to_char(Sub_Rec.substitution_item_id)
209: || ' at OP Seq :'
210: || to_char(sub_rec.operation_seq_num) || '.' ;
211: fnd_message.set_token('ENTITY1', x_error);
207: fnd_message.set_name('WIP', 'WIP_ERROR_SUBST_ASSEMBLY');
208: x_error := 'Substitution Item Id' ||to_char(Sub_Rec.substitution_item_id)
209: || ' at OP Seq :'
210: || to_char(sub_rec.operation_seq_num) || '.' ;
211: fnd_message.set_token('ENTITY1', x_error);
212: fnd_message.set_token('ENTITY2', 'Substitute Component');
213: p_err_mesg := fnd_message.get ;
214: return 0;
215:
208: x_error := 'Substitution Item Id' ||to_char(Sub_Rec.substitution_item_id)
209: || ' at OP Seq :'
210: || to_char(sub_rec.operation_seq_num) || '.' ;
211: fnd_message.set_token('ENTITY1', x_error);
212: fnd_message.set_token('ENTITY2', 'Substitute Component');
213: p_err_mesg := fnd_message.get ;
214: return 0;
215:
216: end if ;
209: || ' at OP Seq :'
210: || to_char(sub_rec.operation_seq_num) || '.' ;
211: fnd_message.set_token('ENTITY1', x_error);
212: fnd_message.set_token('ENTITY2', 'Substitute Component');
213: p_err_mesg := fnd_message.get ;
214: return 0;
215:
216: end if ;
217: end if ;
428: 2. I am reusing the "ML" messages instead of creating new ones because the message text fits this validation also.
429: */
430:
431: IF (Wip_Flow_Validation.primary_item_id(p_rowid => p_rowid) = 0 ) THEN
432: fnd_message.set_name('WIP', 'WIP_CANNOT_BUILD_ITEM');
433:
434: ELSIF (Wip_Flow_Validation.class_code(p_rowid => p_rowid) = 0 ) THEN
435: fnd_message.set_name('WIP', 'WIP_INTERFACE_INVALID_CLASS');
436:
431: IF (Wip_Flow_Validation.primary_item_id(p_rowid => p_rowid) = 0 ) THEN
432: fnd_message.set_name('WIP', 'WIP_CANNOT_BUILD_ITEM');
433:
434: ELSIF (Wip_Flow_Validation.class_code(p_rowid => p_rowid) = 0 ) THEN
435: fnd_message.set_name('WIP', 'WIP_INTERFACE_INVALID_CLASS');
436:
437: ELSIF (Wip_Flow_Validation.bom_rev_date(p_rowid => p_rowid) = 0 ) THEN
438: fnd_message.set_name('WIP', 'WIP_INVALID_BOM_REVISION_DATE');
439:
434: ELSIF (Wip_Flow_Validation.class_code(p_rowid => p_rowid) = 0 ) THEN
435: fnd_message.set_name('WIP', 'WIP_INTERFACE_INVALID_CLASS');
436:
437: ELSIF (Wip_Flow_Validation.bom_rev_date(p_rowid => p_rowid) = 0 ) THEN
438: fnd_message.set_name('WIP', 'WIP_INVALID_BOM_REVISION_DATE');
439:
440: ELSIF (Wip_Flow_Validation.bom_revision(p_rowid => p_rowid) = 0 ) THEN
441: fnd_message.set_name('WIP', 'WIP_INVALID_BOM_REVISION');
442:
437: ELSIF (Wip_Flow_Validation.bom_rev_date(p_rowid => p_rowid) = 0 ) THEN
438: fnd_message.set_name('WIP', 'WIP_INVALID_BOM_REVISION_DATE');
439:
440: ELSIF (Wip_Flow_Validation.bom_revision(p_rowid => p_rowid) = 0 ) THEN
441: fnd_message.set_name('WIP', 'WIP_INVALID_BOM_REVISION');
442:
443: ELSIF (Wip_Flow_Validation.rout_rev_date(p_rowid => p_rowid) = 0 ) THEN
444: fnd_message.set_name('WIP', 'WIP_INVALID_ROUT_REVISION_DATE');
445:
440: ELSIF (Wip_Flow_Validation.bom_revision(p_rowid => p_rowid) = 0 ) THEN
441: fnd_message.set_name('WIP', 'WIP_INVALID_BOM_REVISION');
442:
443: ELSIF (Wip_Flow_Validation.rout_rev_date(p_rowid => p_rowid) = 0 ) THEN
444: fnd_message.set_name('WIP', 'WIP_INVALID_ROUT_REVISION_DATE');
445:
446: ELSIF (Wip_Flow_Validation.routing_revision(p_rowid => p_rowid) = 0 ) THEN
447: fnd_message.set_name('WIP', 'WIP_INVALID_ROUT_REVISION');
448:
443: ELSIF (Wip_Flow_Validation.rout_rev_date(p_rowid => p_rowid) = 0 ) THEN
444: fnd_message.set_name('WIP', 'WIP_INVALID_ROUT_REVISION_DATE');
445:
446: ELSIF (Wip_Flow_Validation.routing_revision(p_rowid => p_rowid) = 0 ) THEN
447: fnd_message.set_name('WIP', 'WIP_INVALID_ROUT_REVISION');
448:
449: ELSIF (Wip_Flow_Validation.alt_bom_desg(p_rowid => p_rowid) = 0 ) THEN
450: fnd_message.set_name('WIP', 'WIP_ML_ALTERNATE_BOM');
451:
446: ELSIF (Wip_Flow_Validation.routing_revision(p_rowid => p_rowid) = 0 ) THEN
447: fnd_message.set_name('WIP', 'WIP_INVALID_ROUT_REVISION');
448:
449: ELSIF (Wip_Flow_Validation.alt_bom_desg(p_rowid => p_rowid) = 0 ) THEN
450: fnd_message.set_name('WIP', 'WIP_ML_ALTERNATE_BOM');
451:
452: ELSIF (Wip_Flow_Validation.alt_rout_desg(p_rowid => p_rowid) = 0 ) THEN
453: fnd_message.set_name('WIP', 'WIP_ML_ALTERNATE_ROUTING');
454:
449: ELSIF (Wip_Flow_Validation.alt_bom_desg(p_rowid => p_rowid) = 0 ) THEN
450: fnd_message.set_name('WIP', 'WIP_ML_ALTERNATE_BOM');
451:
452: ELSIF (Wip_Flow_Validation.alt_rout_desg(p_rowid => p_rowid) = 0 ) THEN
453: fnd_message.set_name('WIP', 'WIP_ML_ALTERNATE_ROUTING');
454:
455: ELSIF (Wip_Flow_Validation.completion_sub(p_rowid => p_rowid) = 0 ) THEN
456: fnd_message.set_name('WIP', 'WIP_INVALID_COMPLETION_SUB');
457:
452: ELSIF (Wip_Flow_Validation.alt_rout_desg(p_rowid => p_rowid) = 0 ) THEN
453: fnd_message.set_name('WIP', 'WIP_ML_ALTERNATE_ROUTING');
454:
455: ELSIF (Wip_Flow_Validation.completion_sub(p_rowid => p_rowid) = 0 ) THEN
456: fnd_message.set_name('WIP', 'WIP_INVALID_COMPLETION_SUB');
457:
458: ELSIF (Wip_Flow_Validation.completion_locator_id(p_rowid => p_rowid) = 0 ) THEN
459: fnd_message.set_name('WIP', 'WIP_INVALID_LOCATOR');
460:
455: ELSIF (Wip_Flow_Validation.completion_sub(p_rowid => p_rowid) = 0 ) THEN
456: fnd_message.set_name('WIP', 'WIP_INVALID_COMPLETION_SUB');
457:
458: ELSIF (Wip_Flow_Validation.completion_locator_id(p_rowid => p_rowid) = 0 ) THEN
459: fnd_message.set_name('WIP', 'WIP_INVALID_LOCATOR');
460:
461: ELSIF (Wip_Flow_Validation.demand_class(p_rowid => p_rowid) = 0 ) THEN
462: fnd_message.set_name('WIP', 'WIP_ML_DEMAND_CLASS');
463:
458: ELSIF (Wip_Flow_Validation.completion_locator_id(p_rowid => p_rowid) = 0 ) THEN
459: fnd_message.set_name('WIP', 'WIP_INVALID_LOCATOR');
460:
461: ELSIF (Wip_Flow_Validation.demand_class(p_rowid => p_rowid) = 0 ) THEN
462: fnd_message.set_name('WIP', 'WIP_ML_DEMAND_CLASS');
463:
464: ELSIF (Wip_Flow_Validation.schedule_group_id(p_rowid => p_rowid) = 0 ) THEN
465: fnd_message.set_name('WIP', 'WIP_ML_SCHEDULE_GROUP');
466:
461: ELSIF (Wip_Flow_Validation.demand_class(p_rowid => p_rowid) = 0 ) THEN
462: fnd_message.set_name('WIP', 'WIP_ML_DEMAND_CLASS');
463:
464: ELSIF (Wip_Flow_Validation.schedule_group_id(p_rowid => p_rowid) = 0 ) THEN
465: fnd_message.set_name('WIP', 'WIP_ML_SCHEDULE_GROUP');
466:
467: ELSIF (Wip_Flow_Validation.build_sequence(p_rowid => p_rowid) = 0 ) THEN
468: fnd_message.set_name('WIP', 'WIP_BUILD_SEQUENCE');
469:
464: ELSIF (Wip_Flow_Validation.schedule_group_id(p_rowid => p_rowid) = 0 ) THEN
465: fnd_message.set_name('WIP', 'WIP_ML_SCHEDULE_GROUP');
466:
467: ELSIF (Wip_Flow_Validation.build_sequence(p_rowid => p_rowid) = 0 ) THEN
468: fnd_message.set_name('WIP', 'WIP_BUILD_SEQUENCE');
469:
470: ELSIF (Wip_Flow_Validation.line_id(p_rowid => p_rowid) = 0 ) THEN
471: fnd_message.set_name('WIP', 'WIP_ML_LINE_ID');
472:
467: ELSIF (Wip_Flow_Validation.build_sequence(p_rowid => p_rowid) = 0 ) THEN
468: fnd_message.set_name('WIP', 'WIP_BUILD_SEQUENCE');
469:
470: ELSIF (Wip_Flow_Validation.line_id(p_rowid => p_rowid) = 0 ) THEN
471: fnd_message.set_name('WIP', 'WIP_ML_LINE_ID');
472:
473: ELSIF (Wip_Flow_Validation.project_id(p_rowid => p_rowid) = 0 ) THEN
474: fnd_message.set_name('WIP', 'WIP_INVALID_PROJECT');
475:
470: ELSIF (Wip_Flow_Validation.line_id(p_rowid => p_rowid) = 0 ) THEN
471: fnd_message.set_name('WIP', 'WIP_ML_LINE_ID');
472:
473: ELSIF (Wip_Flow_Validation.project_id(p_rowid => p_rowid) = 0 ) THEN
474: fnd_message.set_name('WIP', 'WIP_INVALID_PROJECT');
475:
476: ELSIF (Wip_Flow_Validation.task_id(p_rowid => p_rowid) = 0 ) THEN
477: fnd_message.set_name('WIP', 'WIP_INVALID_TASK');
478:
473: ELSIF (Wip_Flow_Validation.project_id(p_rowid => p_rowid) = 0 ) THEN
474: fnd_message.set_name('WIP', 'WIP_INVALID_PROJECT');
475:
476: ELSIF (Wip_Flow_Validation.task_id(p_rowid => p_rowid) = 0 ) THEN
477: fnd_message.set_name('WIP', 'WIP_INVALID_TASK');
478:
479: ELSIF (Wip_Flow_Validation.schedule_number(p_rowid => p_rowid) = 0 ) THEN
480: fnd_message.set_name('WIP', 'WIP_INVALID_SCHEDULE_NUMBER');
481:
476: ELSIF (Wip_Flow_Validation.task_id(p_rowid => p_rowid) = 0 ) THEN
477: fnd_message.set_name('WIP', 'WIP_INVALID_TASK');
478:
479: ELSIF (Wip_Flow_Validation.schedule_number(p_rowid => p_rowid) = 0 ) THEN
480: fnd_message.set_name('WIP', 'WIP_INVALID_SCHEDULE_NUMBER');
481:
482: ELSIF (Wip_Flow_Validation.scheduled_flag(p_rowid => p_rowid) = 0 ) THEN
483: fnd_message.set_name('WIP', 'WIP_INVALID_SCHEDULED_FLAG');
484:
479: ELSIF (Wip_Flow_Validation.schedule_number(p_rowid => p_rowid) = 0 ) THEN
480: fnd_message.set_name('WIP', 'WIP_INVALID_SCHEDULE_NUMBER');
481:
482: ELSIF (Wip_Flow_Validation.scheduled_flag(p_rowid => p_rowid) = 0 ) THEN
483: fnd_message.set_name('WIP', 'WIP_INVALID_SCHEDULED_FLAG');
484:
485: ELSIF (Wip_Flow_Validation.unit_number(p_rowid => p_rowid) = 0 ) THEN
486: fnd_message.set_name('WIP', 'UEFF-UNIT NUMBER INVALID');
487:
482: ELSIF (Wip_Flow_Validation.scheduled_flag(p_rowid => p_rowid) = 0 ) THEN
483: fnd_message.set_name('WIP', 'WIP_INVALID_SCHEDULED_FLAG');
484:
485: ELSIF (Wip_Flow_Validation.unit_number(p_rowid => p_rowid) = 0 ) THEN
486: fnd_message.set_name('WIP', 'UEFF-UNIT NUMBER INVALID');
487:
488: ELSE
489: RETURN 1;
490: END IF;
490: END IF;
491:
492: -- This is failure
493:
494: x_message := fnd_message.get ;
495:
496: UPDATE MTL_TRANSACTIONS_INTERFACE MTI
497: SET LAST_UPDATE_DATE = SYSDATE,
498: PROGRAM_UPDATE_DATE = SYSDATE,
507:
508: exception
509: when others then
510:
511: fnd_message.set_name('WIP', 'WIP_ERROR_FLOW_VALIDATION');
512: fnd_message.set_token('ENTITY1', p_schedule_number);
513: x_message := fnd_message.get ;
514:
515: UPDATE MTL_TRANSACTIONS_INTERFACE MTI
508: exception
509: when others then
510:
511: fnd_message.set_name('WIP', 'WIP_ERROR_FLOW_VALIDATION');
512: fnd_message.set_token('ENTITY1', p_schedule_number);
513: x_message := fnd_message.get ;
514:
515: UPDATE MTL_TRANSACTIONS_INTERFACE MTI
516: SET LAST_UPDATE_DATE = SYSDATE,
509: when others then
510:
511: fnd_message.set_name('WIP', 'WIP_ERROR_FLOW_VALIDATION');
512: fnd_message.set_token('ENTITY1', p_schedule_number);
513: x_message := fnd_message.get ;
514:
515: UPDATE MTL_TRANSACTIONS_INTERFACE MTI
516: SET LAST_UPDATE_DATE = SYSDATE,
517: PROGRAM_UPDATE_DATE = SYSDATE,
802: rowid = flow_rec.rowid ;
803:
804: else
805:
806: fnd_message.set_name('WIP', 'WIP_ERROR_FLOW_DEFAULTING');
807: fnd_message.set_token('ENTITY1',to_char(flow_rec.transaction_interface_id));
808:
809: x_message := fnd_message.get ;
810:
803:
804: else
805:
806: fnd_message.set_name('WIP', 'WIP_ERROR_FLOW_DEFAULTING');
807: fnd_message.set_token('ENTITY1',to_char(flow_rec.transaction_interface_id));
808:
809: x_message := fnd_message.get ;
810:
811: UPDATE MTL_TRANSACTIONS_INTERFACE MTI
805:
806: fnd_message.set_name('WIP', 'WIP_ERROR_FLOW_DEFAULTING');
807: fnd_message.set_token('ENTITY1',to_char(flow_rec.transaction_interface_id));
808:
809: x_message := fnd_message.get ;
810:
811: UPDATE MTL_TRANSACTIONS_INTERFACE MTI
812: SET LAST_UPDATE_DATE = SYSDATE,
813: PROGRAM_UPDATE_DATE = SYSDATE,
856:
857: if (wip_flow_validation.schedule_number(
858: p_rowid => flow_rec.rowid ) = 0 ) then
859:
860: fnd_message.set_name('WIP', 'WIP_INVALID_SCHEDULE_NUMBER');
861:
862: x_message := fnd_message.get ;
863:
864: UPDATE MTL_TRANSACTIONS_INTERFACE MTI
858: p_rowid => flow_rec.rowid ) = 0 ) then
859:
860: fnd_message.set_name('WIP', 'WIP_INVALID_SCHEDULE_NUMBER');
861:
862: x_message := fnd_message.get ;
863:
864: UPDATE MTL_TRANSACTIONS_INTERFACE MTI
865: SET LAST_UPDATE_DATE = SYSDATE,
866: PROGRAM_UPDATE_DATE = SYSDATE,
960: exception
961:
962: when others then
963: -- Error creating the wip flow schedule
964: fnd_message.set_name('WIP', 'WIP_ERROR_FLOW_CREATION');
965: fnd_message.set_token('ENTITY1',to_char(flow_rec.transaction_interface_id));
966:
967: x_message := fnd_message.get ;
968: x_sql_err_num := SQLCODE;
961:
962: when others then
963: -- Error creating the wip flow schedule
964: fnd_message.set_name('WIP', 'WIP_ERROR_FLOW_CREATION');
965: fnd_message.set_token('ENTITY1',to_char(flow_rec.transaction_interface_id));
966:
967: x_message := fnd_message.get ;
968: x_sql_err_num := SQLCODE;
969: x_sql_message := substr(SQLERRM,1,240);
963: -- Error creating the wip flow schedule
964: fnd_message.set_name('WIP', 'WIP_ERROR_FLOW_CREATION');
965: fnd_message.set_token('ENTITY1',to_char(flow_rec.transaction_interface_id));
966:
967: x_message := fnd_message.get ;
968: x_sql_err_num := SQLCODE;
969: x_sql_message := substr(SQLERRM,1,240);
970:
971: UPDATE MTL_TRANSACTIONS_INTERFACE MTI
986:
987: when others then
988:
989: -- Error creating the wip flow schedules
990: fnd_message.set_name('WIP', 'WIP_ERROR_FLOW_CREATION');
991: fnd_message.set_token('ENTITY1',to_char(p_header_id));
992: x_message := fnd_message.get ;
993:
994: x_sql_err_num := SQLCODE;
987: when others then
988:
989: -- Error creating the wip flow schedules
990: fnd_message.set_name('WIP', 'WIP_ERROR_FLOW_CREATION');
991: fnd_message.set_token('ENTITY1',to_char(p_header_id));
992: x_message := fnd_message.get ;
993:
994: x_sql_err_num := SQLCODE;
995: x_sql_message := substr(SQLERRM,1,240);
988:
989: -- Error creating the wip flow schedules
990: fnd_message.set_name('WIP', 'WIP_ERROR_FLOW_CREATION');
991: fnd_message.set_token('ENTITY1',to_char(p_header_id));
992: x_message := fnd_message.get ;
993:
994: x_sql_err_num := SQLCODE;
995: x_sql_message := substr(SQLERRM,1,240);
996:
1301:
1302: when others then
1303:
1304: -- Error deleting the wip flow schedules
1305: fnd_message.set_name('WIP', 'WIP_ERROR_FLOW_DELETION');
1306: fnd_message.set_token('ENTITY1',
1307: to_char(del_rec.transaction_interface_id) );
1308: x_message := fnd_message.get ;
1309:
1302: when others then
1303:
1304: -- Error deleting the wip flow schedules
1305: fnd_message.set_name('WIP', 'WIP_ERROR_FLOW_DELETION');
1306: fnd_message.set_token('ENTITY1',
1307: to_char(del_rec.transaction_interface_id) );
1308: x_message := fnd_message.get ;
1309:
1310: UPDATE MTL_TRANSACTIONS_INTERFACE MTI
1304: -- Error deleting the wip flow schedules
1305: fnd_message.set_name('WIP', 'WIP_ERROR_FLOW_DELETION');
1306: fnd_message.set_token('ENTITY1',
1307: to_char(del_rec.transaction_interface_id) );
1308: x_message := fnd_message.get ;
1309:
1310: UPDATE MTL_TRANSACTIONS_INTERFACE MTI
1311: SET LAST_UPDATE_DATE = SYSDATE,
1312: PROGRAM_UPDATE_DATE = SYSDATE,
1326:
1327: when others then
1328:
1329: -- Error deleting the wip flow schedules
1330: fnd_message.set_name('WIP', 'WIP_ERROR_FLOW_DELETION');
1331: fnd_message.set_token('ENTITY1',
1332: to_char(p_header_id) );
1333: x_message := fnd_message.get ;
1334:
1327: when others then
1328:
1329: -- Error deleting the wip flow schedules
1330: fnd_message.set_name('WIP', 'WIP_ERROR_FLOW_DELETION');
1331: fnd_message.set_token('ENTITY1',
1332: to_char(p_header_id) );
1333: x_message := fnd_message.get ;
1334:
1335:
1329: -- Error deleting the wip flow schedules
1330: fnd_message.set_name('WIP', 'WIP_ERROR_FLOW_DELETION');
1331: fnd_message.set_token('ENTITY1',
1332: to_char(p_header_id) );
1333: x_message := fnd_message.get ;
1334:
1335:
1336: UPDATE MTL_TRANSACTIONS_INTERFACE MTI
1337: SET LAST_UPDATE_DATE = SYSDATE,
1742: when no_data_found then
1743: return 1;
1744: when others then
1745: -- Error Deleting the wip flow schedules
1746: fnd_message.set_name('WIP', 'WIP_FLOW_CLEANUP_ERROR');
1747: p_err_mesg := fnd_message.get ;
1748: return 0;
1749:
1750: end Flow_Error_Cleanup;
1743: return 1;
1744: when others then
1745: -- Error Deleting the wip flow schedules
1746: fnd_message.set_name('WIP', 'WIP_FLOW_CLEANUP_ERROR');
1747: p_err_mesg := fnd_message.get ;
1748: return 0;
1749:
1750: end Flow_Error_Cleanup;
1751: