126: PVX_Utility_PVT.debug_message(l_full_name ||': validate');
127:
128: END IF;
129:
130: IF FND_GLOBAL.User_Id IS NULL THEN
131: FND_MESSAGE.set_name('PV', 'PV_API_USER_PROFILE_MISSING');
132: FND_MSG_PUB.add;
133: RAISE FND_API.G_EXC_ERROR;
134: END IF;
165: END IF;
166:
167: -- Populate the default required items
168: l_prgm_contracts_rec.last_update_date := SYSDATE;
169: l_prgm_contracts_rec.last_updated_by := FND_GLOBAL.user_id;
170: l_prgm_contracts_rec.creation_date := SYSDATE;
171: l_prgm_contracts_rec.created_by := FND_GLOBAL.user_id;
172: l_prgm_contracts_rec.last_update_login := FND_GLOBAL.conc_login_id;
173: l_prgm_contracts_rec.object_version_number := l_object_version_number;
167: -- Populate the default required items
168: l_prgm_contracts_rec.last_update_date := SYSDATE;
169: l_prgm_contracts_rec.last_updated_by := FND_GLOBAL.user_id;
170: l_prgm_contracts_rec.creation_date := SYSDATE;
171: l_prgm_contracts_rec.created_by := FND_GLOBAL.user_id;
172: l_prgm_contracts_rec.last_update_login := FND_GLOBAL.conc_login_id;
173: l_prgm_contracts_rec.object_version_number := l_object_version_number;
174:
175: -- Invoke validation procedures
168: l_prgm_contracts_rec.last_update_date := SYSDATE;
169: l_prgm_contracts_rec.last_updated_by := FND_GLOBAL.user_id;
170: l_prgm_contracts_rec.creation_date := SYSDATE;
171: l_prgm_contracts_rec.created_by := FND_GLOBAL.user_id;
172: l_prgm_contracts_rec.last_update_login := FND_GLOBAL.conc_login_id;
173: l_prgm_contracts_rec.object_version_number := l_object_version_number;
174:
175: -- Invoke validation procedures
176: Validate_Prgm_Contracts(
421: ,p_program_id => l_tar_prgm_contracts_rec.program_id
422: ,p_geo_hierarchy_id => l_tar_prgm_contracts_rec.geo_hierarchy_id
423: ,p_contract_id => l_tar_prgm_contracts_rec.contract_id
424: ,p_last_update_date => SYSDATE
425: ,p_last_updated_by => FND_GLOBAL.user_id
426: ,p_last_update_login => FND_GLOBAL.conc_login_id
427: ,p_object_version_number => l_tar_prgm_contracts_rec.object_version_number
428: ,p_member_type_code => l_tar_prgm_contracts_rec.member_type_code
429: );
422: ,p_geo_hierarchy_id => l_tar_prgm_contracts_rec.geo_hierarchy_id
423: ,p_contract_id => l_tar_prgm_contracts_rec.contract_id
424: ,p_last_update_date => SYSDATE
425: ,p_last_updated_by => FND_GLOBAL.user_id
426: ,p_last_update_login => FND_GLOBAL.conc_login_id
427: ,p_object_version_number => l_tar_prgm_contracts_rec.object_version_number
428: ,p_member_type_code => l_tar_prgm_contracts_rec.member_type_code
429: );
430: