159: FND_MESSAGE.SET_TOKEN('PARAMETERS','CONSOLIDATED_INVOICE_ID = ' ||
160: X_Consolidated_Invoice_Id);
161: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
162: END IF;
163: APP_EXCEPTION.RAISE_EXCEPTION;
164:
165: END Insert_Row;
166:
167: PROCEDURE Lock_Row(X_Rowid VARCHAR2,
228: if (C%NOTFOUND) then
229: debug_info := 'Close cursor C - DATA NOTFOUND';
230: CLOSE C;
231: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
232: APP_EXCEPTION.Raise_Exception;
233: end if;
234: debug_info := 'Close cursor C';
235: CLOSE C;
236: if (
332: ) then
333: return;
334: else
335: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
336: APP_EXCEPTION.Raise_Exception;
337: end if;
338:
339: EXCEPTION
340: WHEN OTHERS THEN
349: X_Consolidated_Invoice_Id);
350: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
351: END IF;
352: END IF;
353: APP_EXCEPTION.RAISE_EXCEPTION;
354:
355: END Lock_Row;
356:
357:
462: FND_MESSAGE.SET_TOKEN('PARAMETERS','CONSOLIDATED_INVOICE_ID = ' ||
463: X_Consolidated_Invoice_Id);
464: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
465: END IF;
466: APP_EXCEPTION.RAISE_EXCEPTION;
467:
468: END Update_Row;
469:
470: PROCEDURE Delete_Row(X_Rowid VARCHAR2,
493: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
494: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
495: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
496: END IF;
497: APP_EXCEPTION.RAISE_EXCEPTION;
498:
499: END Delete_Row;
500:
501: