54: WHERE DEDUCTION_ID = X_DEDUCTION_ID;
55:
56: BEGIN
57:
58: PNP_DEBUG_PKG.debug ('PN_VAR_DEDUCTIONS_PKG.INSERT_ROW (+)');
59:
60: -------------------------------------------------------
61: -- We need to generate the deductions number
62: -------------------------------------------------------
165: RAISE NO_DATA_FOUND;
166: END IF;
167: CLOSE c;
168:
169: PNP_DEBUG_PKG.debug ('PN_VAR_DEDUCTIONS_PKG.INSERT_ROW (-)');
170:
171: END INSERT_ROW;
172:
173: -------------------------------------------------------------------------------
219: tlinfo c1%rowtype;
220:
221: BEGIN
222:
223: PNP_DEBUG_PKG.debug ('PN_VAR_DEDUCTIONS_PKG.LOCK_ROW (+)');
224:
225: OPEN c1;
226: FETCH c1 INTO tlinfo;
227: IF (c1%notfound) THEN
433: PN_VAR_RENT_PKG.LOCK_ROW_EXCEPTION('DEDUCTION_AMOUNT',to_char(tlinfo.DEDUCTION_AMOUNT));
434: end if;
435:
436:
437: PNP_DEBUG_PKG.debug ('PN_VAR_DEDUCTIONS_PKG.LOCK_ROW (-)');
438:
439: END;
440:
441: -------------------------------------------------------------------------------
483: )
484: IS
485: BEGIN
486:
487: PNP_DEBUG_PKG.debug ('PN_VAR_DEDUCTIONS_PKG.UPDATE_ROW (+)');
488:
489: UPDATE PN_VAR_DEDUCTIONS_ALL
490: SET
491: DEDUCTION_ID = X_DEDUCTION_ID,
525: IF (sql%notfound) THEN
526: RAISE NO_DATA_FOUND;
527: END IF;
528:
529: PNP_DEBUG_PKG.debug ('PN_VAR_DEDUCTIONS_PKG.UPDATE_ROW (-)');
530:
531: END UPDATE_ROW;
532:
533:
543: )
544: IS
545: BEGIN
546:
547: PNP_DEBUG_PKG.debug ('PN_VAR_DEDUCTIONS_PKG.DELETE_ROW (+)');
548:
549: DELETE FROM PN_VAR_DEDUCTIONS_ALL
550: WHERE DEDUCTION_ID = X_DEDUCTION_ID;
551:
552: IF (sql%notfound) THEN
553: RAISE NO_DATA_FOUND;
554: END IF;
555:
556: PNP_DEBUG_PKG.debug ('PN_VAR_DEDUCTIONS_PKG.DELETE_ROW (-)');
557:
558: END DELETE_ROW;
559:
560: