52: l_return_status VARCHAR2(30) := NULL;
53:
54: begin
55:
56: PNP_DEBUG_PKG.debug ('PN_VAR_CONSTR_DEFAULTS_PKG.INSERT_ROW (+)');
57:
58: -------------------------------------------------------
59: -- We need to generate the line number
60: -------------------------------------------------------
166: raise no_data_found;
167: end if;
168: close c;
169:
170: PNP_DEBUG_PKG.debug ('PN_CONSTR_DEFAULTS_PKG.INSERT_ROW (-)');
171:
172: end INSERT_ROW;
173:
174: -------------------------------------------------------------------------------
213: for update of CONSTR_DEFAULT_ID nowait;
214:
215: begin
216:
217: PNP_DEBUG_PKG.debug ('PN_CONSTR_DEFAULTS_PKG.LOCK_ROW (+)');
218:
219: for tlinfo in c1 loop
220: if ( (tlinfo.CONSTR_DEFAULT_ID = X_CONSTR_DEFAULT_ID)
221: AND (tlinfo.CONSTR_DEFAULT_NUM = X_CONSTR_DEFAULT_NUM)
275: end if;
276: end loop;
277: return;
278:
279: PNP_DEBUG_PKG.debug ('PN_CONSTR_DEFAULTS_PKG.LOCK_ROW (-)');
280:
281: end LOCK_ROW;
282:
283: -------------------------------------------------------------------------------
322: l_return_status VARCHAR2(30) := NULL;
323:
324: begin
325:
326: PNP_DEBUG_PKG.debug ('PN_CONSTR_DEFAULTS_PKG.UPDATE_ROW (+)');
327:
328: -- Check for constraint range
329: /*l_return_status := NULL;
330: PN_VAR_CONSTR_DEFAULTS_PKG.CHECK_MAX_CONSTR
376: if (sql%notfound) then
377: raise no_data_found;
378: end if;
379:
380: PNP_DEBUG_PKG.debug ('PN_CONSTR_DEFAULTS_PKG.UPDATE_ROW (-)');
381:
382: end UPDATE_ROW;
383:
384: -----------------------------------------------------------------------
390: ) is
391:
392: begin
393:
394: PNP_DEBUG_PKG.debug ('PN_CONSTR_DEFAULTS_PKG.DELETE_ROW (+)');
395:
396: delete from PN_VAR_CONSTR_DEFAULTS_ALL
397: where CONSTR_DEFAULT_ID = X_CONSTR_DEFAULT_ID;
398:
399: if (sql%notfound) then
400: raise no_data_found;
401: end if;
402:
403: PNP_DEBUG_PKG.debug ('PN_CONSTR_DEFAULTS_PKG.DELETE_ROW (-)');
404:
405: end DELETE_ROW;
406:
407:
420: )
421: IS
422: l_dummy NUMBER;
423: BEGIN
424: PNP_DEBUG_PKG.debug ('PN_VAR_RENTS_PKG.CHECK_MAX_CONSTR (+)');
425:
426: IF x_type_code = 'MIN' THEN
427:
428: select 1
441: );
442:
443: END IF;
444:
445: PNP_DEBUG_PKG.debug ('PN_VAR_RENTS_PKG.CHECK_MAX_CONSTR (-)');
446:
447: EXCEPTION
448: when NO_DATA_FOUND then
449: fnd_message.set_name ('PN','PN_VAR_WRONG_RANGE');