195: BEGIN
196: -- Get lot numbers for discrete
197: l_lot_status := p_lot_status;
198: IF (x_lot_number is NULL) THEN
199: l_field_name := 'GMI Migration Parameters';
200: l_field_value := NULL;
201: SELECT l_opm_lot.lot_no || DECODE (l_opm_lot.sublot_no, NULL, NULL,
202: (SELECT lot_sublot_delimiter FROM gmi_migration_parameters)) ||
203: l_opm_lot.sublot_no,
198: IF (x_lot_number is NULL) THEN
199: l_field_name := 'GMI Migration Parameters';
200: l_field_value := NULL;
201: SELECT l_opm_lot.lot_no || DECODE (l_opm_lot.sublot_no, NULL, NULL,
202: (SELECT lot_sublot_delimiter FROM gmi_migration_parameters)) ||
203: l_opm_lot.sublot_no,
204: DECODE(sublot_ctl, 1, DECODE(l_opm_lot.sublot_no, NULL, NULL,
205: l_opm_lot.lot_no)),
206: status_ctl, lot_status