[Home] [Help]
30: x_Last_Update_Login NUMBER,
31: x_Registration_Type VARCHAR2)
32: -----------------------------------------------------------------------------
33: IS
34: CURSOR C IS SELECT rowid FROM ARI_REG_VERIFICATIONS
35: WHERE REGISTRATION_ID = x_REGISTRATION_ID;
36: CURSOR C2 IS SELECT ARI_REGISTRATIONS_S.nextval FROM sys.dual;
37: l_procedure_name VARCHAR2(31) := '.Insert_Row';
38: l_debug_info VARCHAR2(100);
53: l_debug_info := 'Close cursor C2';
54: CLOSE C2;
55: END IF;
56: -----------------------------------------------
57: l_debug_info := 'Insert into ARI_REG_VERIFICATIONS';
58: -----------------------------------------------
59:
60: INSERT INTO ARI_REG_VERIFICATIONS(
61: Registration_Id,
56: -----------------------------------------------
57: l_debug_info := 'Insert into ARI_REG_VERIFICATIONS';
58: -----------------------------------------------
59:
60: INSERT INTO ARI_REG_VERIFICATIONS(
61: Registration_Id,
62: Application_Code,
63: User_Email_Addr,
64: Access_Domain_Search_Type,
139: ----------------------------------------------------
140: IS
141: l_procedure_name VARCHAR2(31) := '.Delete_Row';
142: BEGIN
143: DELETE FROM ARI_REG_VERIFICATIONS
144: WHERE registration_id = x_registration_id;
145: If (SQL%NOTFOUND) then
146: RAISE NO_DATA_FOUND;
147: End If;
184: IS
185: l_procedure_name VARCHAR2(31) := '.Update_Row';
186: BEGIN
187:
188: UPDATE ARI_REG_VERIFICATIONS
189: SET
190: Application_Code = decode(x_Application_Code, FND_API.G_MISS_CHAR, Application_Code, x_Application_Code),
191: User_Email_Addr = decode(x_User_Email_Addr, FND_API.G_MISS_CHAR, User_Email_Addr, x_User_Email_Addr),
192: Access_Domain_Type = decode(x_Access_Domain_Type, FND_API.G_MISS_CHAR, Access_Domain_Type, x_Access_Domain_Type),