200: close c;
201:
202: EXCEPTION
203: WHEN OTHERS THEN
204: APP_EXCEPTION.RAISE_EXCEPTION;
205:
206: end INSERT_ROW;
207:
208: procedure LOCK_ROW (
318: fetch c into recinfo;
319: if (c%notfound) then
320: close c;
321: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
322: app_exception.raise_exception;
323: end if;
324: close c;
325:
326: if ( (recinfo.Formula_Type_Code = X_Formula_Type_Code)
412: ) then
413: null;
414: else
415: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
416: app_exception.raise_exception;
417: end if;
418: for tlinfo in c1 loop
419: if (tlinfo.BASELANG = 'Y') then
420: if ( (tlinfo.FORMULA_NAME = X_FORMULA_NAME)
423: ) then
424: null;
425: else
426: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
427: app_exception.raise_exception;
428: end if;
429: end if;
430: end loop;
431: return;
431: return;
432:
433: EXCEPTION
434: WHEN OTHERS THEN
435: APP_EXCEPTION.RAISE_EXCEPTION;
436:
437: end LOCK_ROW;
438:
439: procedure UPDATE_ROW (
656: end if;
657:
658: EXCEPTION
659: WHEN OTHERS THEN
660: APP_EXCEPTION.RAISE_EXCEPTION;
661:
662: end UPDATE_ROW;
663:
664: procedure DELETE_ROW (
681: end if;
682:
683: EXCEPTION
684: WHEN OTHERS THEN
685: APP_EXCEPTION.RAISE_EXCEPTION;
686:
687: end DELETE_ROW;
688:
689: procedure ADD_LANGUAGE
743: and T.LANGUAGE = L.LANGUAGE_CODE);
744:
745: EXCEPTION
746: WHEN OTHERS THEN
747: APP_EXCEPTION.RAISE_EXCEPTION;
748:
749: end ADD_LANGUAGE;
750:
751:
928: end if;
929:
930: EXCEPTION
931: WHEN OTHERS THEN
932: APP_EXCEPTION.RAISE_EXCEPTION;
933:
934: end bulk_insert_formula;
935:
936: end ZX_FORMULA_PKG;