616: and budget_type_code = x_budget_type_code
617: and budget_status_code = 'B';
618:
619: -- get the dest version id
620: select gms_budget_versions_s.nextval
621: into x_dest_version_id
622: from sys.dual;
623:
624: -- populate gms_budget_versions
1258:
1259: x_err_stage := 'create budget version <' || to_char(x_dest_project_id)
1260: || '><' || x_dest_budget_type_code || '>' ;
1261:
1262: select gms_budget_versions_s.nextval
1263: into x_dest_version_id
1264: from sys.dual;
1265:
1266: insert into gms_budget_versions(