115: x_success := 0;
116: select 1 into x_success
117: from sys.dual
118: where Sub_Rec.substitution_type_id in (
119: select lookup_code from mfg_lookups
120: where lookup_type = 'WIP_SUBSTITUTION_TYPE') ;
121:
122: if (x_success = 0) then
123: