134: /* Remove the actual completion date of the batch */
135: l_batch_header_rec.actual_cmplt_date := NULL;
136:
137: /* Update the batch header row to the database */
138: IF NOT GME_BATCH_HEADER_DBL.update_row(l_batch_header_rec) THEN
139: RAISE BATCH_HDR_UPDATE_ERROR;
140: END IF;
141: x_batch_header_rec := l_batch_header_rec ;
142: /* Update the row who columns */
240:
241: IF p_material_details_rec.line_type = -1 THEN
242: l_ph_batch_header_rec.batch_id := p_material_details_rec.phantom_id ;
243: /* Initialize output batch header */
244: IF NOT (GME_BATCH_HEADER_DBL.fetch_row(l_ph_batch_header_rec, l_ph_batch_header_rec)) THEN
245: RAISE BATCH_HEADER_FETCH_ERROR;
246: END IF;
247: -- revert_batch for phantom batch
248: IF (g_debug <= gme_debug.g_log_statement) THEN