199: l_batch_header_rec.batch_id := x_batch_step_rec.batch_id;
200: l_calendar_code := gme_common_pvt.g_calendar_code;
201:
202: /* Initialize local batch header */
203: IF NOT (gme_batch_header_dbl.fetch_row (l_batch_header_rec
204: ,l_batch_header_rec) ) THEN
205: RAISE batch_header_fetch_error;
206: END IF;
207:
725: we want to fetch the row, so that the timestamps are most
726: current, which is what is used to make sure that someone
727: else has not updated this batch during processing of this
728: program execution. That is why l_batch_header_rec is introduced.*/
729: IF NOT (gme_batch_header_dbl.fetch_row (l_batch_header_rec
730: ,l_batch_header2_rec) ) THEN
731: RAISE batch_header_fetch_error;
732: END IF;
733:
735: l_batch_header_rec.plan_start_date;
736: l_batch_header2_rec.plan_cmplt_date :=
737: l_batch_header_rec.plan_cmplt_date;
738:
739: IF NOT (gme_batch_header_dbl.update_row (l_batch_header2_rec) ) THEN
740: RAISE save_data_error;
741: END IF;
742:
743: --Bug#5365527 added the validity rule check for LCF Batches
1121: /* Initialize return status to success */
1122: x_return_status := fnd_api.g_ret_sts_success;
1123: l_batch_header_rec.batch_id := p_batch_step_rec.batch_id;
1124:
1125: IF NOT (gme_batch_header_dbl.fetch_row (l_batch_header_rec
1126: ,x_batch_header_rec) ) THEN
1127: RAISE invalid_batch;
1128: END IF;
1129: