DBA Data[Home] [Help]

APPS.JG_ZZ_TA_RULE_LINES_PKG dependencies on JG_ZZ_TA_RULE_LINES

Line 1: PACKAGE BODY JG_ZZ_TA_RULE_LINES_PKG AS

1: PACKAGE BODY JG_ZZ_TA_RULE_LINES_PKG AS
2: /* $Header: jgzztaib.pls 120.1 2006/02/21 15:23:12 farishol ship $ */
3: --
4: -- PUBLIC FUNCTIONS
5: --

Line 36: FROM JG_ZZ_TA_RULE_LINES

32: ,X_attribute14 VARCHAR2
33: ,X_attribute15 VARCHAR2 ) IS
34:
35: CURSOR C IS SELECT rowid
36: FROM JG_ZZ_TA_RULE_LINES
37: WHERE X_rule_line_id = rule_line_id;
38: CURSOR C2 IS SELECT JG_ZZ_TA_RULE_LINES_S.nextval FROM sys.dual;
39: BEGIN
40: IF (X_rule_line_id IS NULL) THEN

Line 38: CURSOR C2 IS SELECT JG_ZZ_TA_RULE_LINES_S.nextval FROM sys.dual;

34:
35: CURSOR C IS SELECT rowid
36: FROM JG_ZZ_TA_RULE_LINES
37: WHERE X_rule_line_id = rule_line_id;
38: CURSOR C2 IS SELECT JG_ZZ_TA_RULE_LINES_S.nextval FROM sys.dual;
39: BEGIN
40: IF (X_rule_line_id IS NULL) THEN
41: OPEN C2;
42: FETCH C2 INTO X_rule_line_id;

Line 45: INSERT INTO JG_ZZ_TA_RULE_LINES

41: OPEN C2;
42: FETCH C2 INTO X_rule_line_id;
43: CLOSE C2;
44: END IF;
45: INSERT INTO JG_ZZ_TA_RULE_LINES
46: (
47: rule_line_id
48: ,account_range_id
49: ,natural_account

Line 144: UPDATE JG_ZZ_TA_RULE_LINES

140: BEGIN
141: --
142: -- Standard ON-UPDATE routine
143: --
144: UPDATE JG_ZZ_TA_RULE_LINES
145: SET
146: rule_line_id = X_rule_line_id
147: ,account_range_id = X_account_range_id
148: ,natural_account = X_natural_account

Line 181: DELETE FROM JG_ZZ_TA_RULE_LINES

177: END Update_Row;
178:
179: PROCEDURE Delete_Row( X_rowid VARCHAR2 ) IS
180: BEGIN
181: DELETE FROM JG_ZZ_TA_RULE_LINES
182: WHERE
183: ROWID = X_rowid;
184: IF (SQL%NOTFOUND) THEN
185: RAISE NO_DATA_FOUND;

Line 219: FROM JG_ZZ_TA_RULE_LINES

215: ,X_attribute15 VARCHAR2 )
216: IS
217: CURSOR C IS
218: SELECT *
219: FROM JG_ZZ_TA_RULE_LINES
220: WHERE rowid = X_Rowid
221: FOR UPDATE of rule_line_id NOWAIT;
222: Recinfo C%ROWTYPE;
223: BEGIN

Line 304: END JG_ZZ_TA_RULE_LINES_PKG;

300: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
301: APP_EXCEPTION.RAISE_EXCEPTION;
302: END IF;
303: END Lock_Row;
304: END JG_ZZ_TA_RULE_LINES_PKG;