DBA Data[Home] [Help]

APPS.HZ_CUSTOMER_PROFILES_PKG dependencies on HZ_CUSTOMER_PROFILES

Line 1: PACKAGE BODY HZ_CUSTOMER_PROFILES_PKG AS

1: PACKAGE BODY HZ_CUSTOMER_PROFILES_PKG AS
2: /*$Header: ARHCPFTB.pls 120.13.12010000.8 2009/12/11 11:00:55 rgokavar ship $ */
3:
4: PROCEDURE Insert_Row (
5: X_CUST_ACCOUNT_PROFILE_ID IN OUT NOCOPY NUMBER,

Line 132: INSERT INTO HZ_CUSTOMER_PROFILES (

128:
129: WHILE l_success = 'N' LOOP
130: BEGIN
131:
132: INSERT INTO HZ_CUSTOMER_PROFILES (
133: CUST_ACCOUNT_PROFILE_ID,
134: LAST_UPDATED_BY,
135: LAST_UPDATE_DATE,
136: LAST_UPDATE_LOGIN,

Line 253: DECODE( X_CUST_ACCOUNT_PROFILE_ID, FND_API.G_MISS_NUM, HZ_CUSTOMER_PROFILES_S.NEXTVAL, NULL, HZ_CUSTOMER_PROFILES_S.NEXTVAL, X_CUST_ACCOUNT_PROFILE_ID ),

249: CHARGE_BEGIN_DATE,
250: AUTOMATCH_SET_ID
251: )
252: VALUES (
253: DECODE( X_CUST_ACCOUNT_PROFILE_ID, FND_API.G_MISS_NUM, HZ_CUSTOMER_PROFILES_S.NEXTVAL, NULL, HZ_CUSTOMER_PROFILES_S.NEXTVAL, X_CUST_ACCOUNT_PROFILE_ID ),
254: HZ_UTILITY_V2PUB.LAST_UPDATED_BY,
255: HZ_UTILITY_V2PUB.LAST_UPDATE_DATE,
256: HZ_UTILITY_V2PUB.LAST_UPDATE_LOGIN,
257: HZ_UTILITY_V2PUB.CREATED_BY,

Line 388: IF INSTRB( SQLERRM, 'HZ_CUSTOMER_PROFILES_U1' ) <> 0 OR

384: l_success := 'Y';
385:
386: EXCEPTION
387: WHEN DUP_VAL_ON_INDEX THEN
388: IF INSTRB( SQLERRM, 'HZ_CUSTOMER_PROFILES_U1' ) <> 0 OR
389: INSTRB( SQLERRM, 'HZ_CUSTOMER_PROFILES_PK' ) <> 0
390: THEN
391: DECLARE
392: l_count NUMBER;

Line 389: INSTRB( SQLERRM, 'HZ_CUSTOMER_PROFILES_PK' ) <> 0

385:
386: EXCEPTION
387: WHEN DUP_VAL_ON_INDEX THEN
388: IF INSTRB( SQLERRM, 'HZ_CUSTOMER_PROFILES_U1' ) <> 0 OR
389: INSTRB( SQLERRM, 'HZ_CUSTOMER_PROFILES_PK' ) <> 0
390: THEN
391: DECLARE
392: l_count NUMBER;
393: l_dummy VARCHAR2(1);

Line 397: SELECT HZ_CUSTOMER_PROFILES_S.NEXTVAL

393: l_dummy VARCHAR2(1);
394: BEGIN
395: l_count := 1;
396: WHILE l_count > 0 LOOP
397: SELECT HZ_CUSTOMER_PROFILES_S.NEXTVAL
398: INTO X_CUST_ACCOUNT_PROFILE_ID FROM dual;
399: BEGIN
400: SELECT 'Y' INTO l_dummy
401: FROM HZ_CUSTOMER_PROFILES

Line 401: FROM HZ_CUSTOMER_PROFILES

397: SELECT HZ_CUSTOMER_PROFILES_S.NEXTVAL
398: INTO X_CUST_ACCOUNT_PROFILE_ID FROM dual;
399: BEGIN
400: SELECT 'Y' INTO l_dummy
401: FROM HZ_CUSTOMER_PROFILES
402: WHERE CUST_ACCOUNT_PROFILE_ID = X_CUST_ACCOUNT_PROFILE_ID;
403: l_count := 1;
404: EXCEPTION
405: WHEN NO_DATA_FOUND THEN

Line 547: UPDATE HZ_CUSTOMER_PROFILES SET

543: FROM HZ_CUST_PROFILE_CLASSES
544: WHERE PROFILE_CLASS_ID = X_PROFILE_CLASS_ID;
545: END IF;
546:
547: UPDATE HZ_CUSTOMER_PROFILES SET
548: CUST_ACCOUNT_PROFILE_ID = DECODE( X_CUST_ACCOUNT_PROFILE_ID, NULL, CUST_ACCOUNT_PROFILE_ID, FND_API.G_MISS_NUM, NULL, X_CUST_ACCOUNT_PROFILE_ID ),
549: LAST_UPDATED_BY = HZ_UTILITY_V2PUB.LAST_UPDATED_BY,
550: LAST_UPDATE_DATE = HZ_UTILITY_V2PUB.LAST_UPDATE_DATE,
551: LAST_UPDATE_LOGIN = HZ_UTILITY_V2PUB.LAST_UPDATE_LOGIN,

Line 812: SELECT * FROM HZ_CUSTOMER_PROFILES

808: X_AUTOMATCH_SET_ID IN NUMBER
809: ) IS
810:
811: CURSOR C IS
812: SELECT * FROM HZ_CUSTOMER_PROFILES
813: WHERE ROWID = x_Rowid
814: FOR UPDATE NOWAIT;
815: Recinfo C%ROWTYPE;
816:

Line 1523: FROM HZ_CUSTOMER_PROFILES

1519: X_MESSAGE_TEXT_ID,
1520: X_MULTIPLE_INTEREST_RATES_FLAG,
1521: X_CHARGE_BEGIN_DATE,
1522: X_AUTOMATCH_SET_ID
1523: FROM HZ_CUSTOMER_PROFILES
1524: WHERE CUST_ACCOUNT_PROFILE_ID = X_CUST_ACCOUNT_PROFILE_ID;
1525:
1526: EXCEPTION
1527: WHEN NO_DATA_FOUND THEN

Line 1542: DELETE FROM HZ_CUSTOMER_PROFILES

1538: ) IS
1539:
1540: BEGIN
1541:
1542: DELETE FROM HZ_CUSTOMER_PROFILES
1543: WHERE CUST_ACCOUNT_PROFILE_ID = X_CUST_ACCOUNT_PROFILE_ID;
1544:
1545: IF ( SQL%NOTFOUND ) THEN
1546: RAISE NO_DATA_FOUND;

Line 1551: END HZ_CUSTOMER_PROFILES_PKG;

1547: END IF;
1548:
1549: END Delete_Row;
1550:
1551: END HZ_CUSTOMER_PROFILES_PKG;