APPS.HZ_CUST_PROFILE_AMTS_PKG dependencies on HZ_CUST_PROFILE_AMTS

Line 1: PACKAGE BODY HZ_CUST_PROFILE_AMTS_PKG AS

1: PACKAGE BODY HZ_CUST_PROFILE_AMTS_PKG AS
2: /*$Header: ARHCPMTB.pls 120.4 2006/03/22 01:13:25 baianand ship $ */
3:
4: PROCEDURE Insert_Row (
5: X_CUST_ACCT_PROFILE_AMT_ID IN OUT NOCOPY NUMBER,

Line 98: INSERT INTO HZ_CUST_PROFILE_AMTS (

94: BEGIN
95:
96: WHILE l_success = 'N' LOOP
97: BEGIN
98: INSERT INTO HZ_CUST_PROFILE_AMTS (
99: CUST_ACCT_PROFILE_AMT_ID,
100: LAST_UPDATED_BY,
101: LAST_UPDATE_DATE,
102: CREATED_BY,

Line 195: DECODE( X_CUST_ACCT_PROFILE_AMT_ID, FND_API.G_MISS_NUM, HZ_CUST_PROFILE_AMTS_S.NEXTVAL, NULL, HZ_CUST_PROFILE_AMTS_S.NEXTVAL, X_CUST_ACCT_PROFILE_AMT_ID ),

191: PENALTY_FIXED_AMOUNT,
192: PENALTY_SCHEDULE_ID
193: )
194: VALUES (
195: DECODE( X_CUST_ACCT_PROFILE_AMT_ID, FND_API.G_MISS_NUM, HZ_CUST_PROFILE_AMTS_S.NEXTVAL, NULL, HZ_CUST_PROFILE_AMTS_S.NEXTVAL, X_CUST_ACCT_PROFILE_AMT_ID ),
196: HZ_UTILITY_V2PUB.LAST_UPDATED_BY,
197: HZ_UTILITY_V2PUB.LAST_UPDATE_DATE,
198: HZ_UTILITY_V2PUB.CREATED_BY,
199: HZ_UTILITY_V2PUB.CREATION_DATE,

Line 298: IF INSTRB( SQLERRM, 'HZ_CUST_PROFILE_AMTS_U1' ) <> 0 OR

294: l_success := 'Y';
295:
296: EXCEPTION
297: WHEN DUP_VAL_ON_INDEX THEN
298: IF INSTRB( SQLERRM, 'HZ_CUST_PROFILE_AMTS_U1' ) <> 0 OR
299: INSTRB( SQLERRM, 'HZ_CUST_PROFILE_AMTS_PK' ) <> 0
300: THEN
301: DECLARE
302: l_count NUMBER;

Line 299: INSTRB( SQLERRM, 'HZ_CUST_PROFILE_AMTS_PK' ) <> 0

295:
296: EXCEPTION
297: WHEN DUP_VAL_ON_INDEX THEN
298: IF INSTRB( SQLERRM, 'HZ_CUST_PROFILE_AMTS_U1' ) <> 0 OR
299: INSTRB( SQLERRM, 'HZ_CUST_PROFILE_AMTS_PK' ) <> 0
300: THEN
301: DECLARE
302: l_count NUMBER;
303: l_dummy VARCHAR2(1);

Line 307: SELECT HZ_CUST_PROFILE_AMTS_S.NEXTVAL

303: l_dummy VARCHAR2(1);
304: BEGIN
305: l_count := 1;
306: WHILE l_count > 0 LOOP
307: SELECT HZ_CUST_PROFILE_AMTS_S.NEXTVAL
308: INTO X_CUST_ACCT_PROFILE_AMT_ID FROM dual;
309: BEGIN
310: SELECT 'Y' INTO l_dummy
311: FROM HZ_CUST_PROFILE_AMTS

Line 311: FROM HZ_CUST_PROFILE_AMTS

307: SELECT HZ_CUST_PROFILE_AMTS_S.NEXTVAL
308: INTO X_CUST_ACCT_PROFILE_AMT_ID FROM dual;
309: BEGIN
310: SELECT 'Y' INTO l_dummy
311: FROM HZ_CUST_PROFILE_AMTS
312: WHERE CUST_ACCT_PROFILE_AMT_ID = X_CUST_ACCT_PROFILE_AMT_ID;
313: l_count := 1;
314: EXCEPTION
315: WHEN NO_DATA_FOUND THEN

Line 420: UPDATE HZ_CUST_PROFILE_AMTS SET

416: ) IS
417:
418: BEGIN
419:
420: UPDATE HZ_CUST_PROFILE_AMTS SET
421: CUST_ACCT_PROFILE_AMT_ID = DECODE( X_CUST_ACCT_PROFILE_AMT_ID, NULL, CUST_ACCT_PROFILE_AMT_ID, FND_API.G_MISS_NUM, NULL, X_CUST_ACCT_PROFILE_AMT_ID ),
422: LAST_UPDATED_BY = HZ_UTILITY_V2PUB.LAST_UPDATED_BY,
423: LAST_UPDATE_DATE = HZ_UTILITY_V2PUB.LAST_UPDATE_DATE,
424: CREATED_BY = CREATED_BY,

Line 623: SELECT * FROM HZ_CUST_PROFILE_AMTS

619: X_PENALTY_SCHEDULE_ID IN NUMBER
620: ) IS
621:
622: CURSOR C IS
623: SELECT * FROM HZ_CUST_PROFILE_AMTS
624: WHERE ROWID = x_Rowid
625: FOR UPDATE NOWAIT;
626: Recinfo C%ROWTYPE;
627:

Line 1190: FROM HZ_CUST_PROFILE_AMTS

1186: X_PENALTY_RATE,
1187: X_MIN_INTEREST_CHARGE,
1188: X_PENALTY_FIXED_AMOUNT,
1189: X_PENALTY_SCHEDULE_ID
1190: FROM HZ_CUST_PROFILE_AMTS
1191: WHERE CUST_ACCT_PROFILE_AMT_ID = X_CUST_ACCT_PROFILE_AMT_ID;
1192:
1193: EXCEPTION
1194: WHEN NO_DATA_FOUND THEN

Line 1209: DELETE FROM HZ_CUST_PROFILE_AMTS

1205: ) IS
1206:
1207: BEGIN
1208:
1209: DELETE FROM HZ_CUST_PROFILE_AMTS
1210: WHERE CUST_ACCT_PROFILE_AMT_ID = X_CUST_ACCT_PROFILE_AMT_ID;
1211:
1212: IF ( SQL%NOTFOUND ) THEN
1213: RAISE NO_DATA_FOUND;

Line 1218: END HZ_CUST_PROFILE_AMTS_PKG;

1214: END IF;
1215:
1216: END Delete_Row;
1217:
1218: END HZ_CUST_PROFILE_AMTS_PKG;