4116: --
4117: OPEN l_org_id_cur(l_search_visits_Rec.ORG_ID,l_search_visits_Rec.ORG_NAME);
4118: FETCH l_org_id_cur INTO l_search_visits_Rec.ORG_ID,l_search_visits_Rec.ORG_NAME;
4119: IF l_org_id_cur%NOTFOUND THEN
4120: Fnd_Message.set_name('AHL', 'AHL_LTP_INVALID_ORG');
4121: Fnd_Message.Set_Token('ORG',NVL(l_search_visits_Rec.ORG_NAME,l_search_visits_Rec.ORG_ID));
4122: Fnd_Msg_Pub.ADD;
4123: CLOSE l_org_id_cur;
4124: RAISE Fnd_Api.G_EXC_ERROR;
4117: OPEN l_org_id_cur(l_search_visits_Rec.ORG_ID,l_search_visits_Rec.ORG_NAME);
4118: FETCH l_org_id_cur INTO l_search_visits_Rec.ORG_ID,l_search_visits_Rec.ORG_NAME;
4119: IF l_org_id_cur%NOTFOUND THEN
4120: Fnd_Message.set_name('AHL', 'AHL_LTP_INVALID_ORG');
4121: Fnd_Message.Set_Token('ORG',NVL(l_search_visits_Rec.ORG_NAME,l_search_visits_Rec.ORG_ID));
4122: Fnd_Msg_Pub.ADD;
4123: CLOSE l_org_id_cur;
4124: RAISE Fnd_Api.G_EXC_ERROR;
4125: --
4140: x_return_status => l_return_status);
4141:
4142: IF NVL(l_return_status, 'X') <> 'S'
4143: THEN
4144: Fnd_Message.SET_NAME('AHL','AHL_LTP_SP_CATEGORY_NOT_EXIST');
4145: Fnd_Msg_Pub.ADD;
4146: RAISE Fnd_Api.G_EXC_ERROR;
4147: END IF;
4148: ELSE
4167: x_return_status => l_return_status);
4168:
4169: IF NVL(l_return_status, 'X') <> 'S'
4170: THEN
4171: Fnd_Message.SET_NAME('AHL','AHL_LTP_VISIT_TYPE_INVALID');
4172: Fnd_Msg_Pub.ADD;
4173: RAISE Fnd_Api.G_EXC_ERROR;
4174: END IF;
4175: ELSE
4187: THEN
4188: OPEN l_item_name_cur(l_search_visits_Rec.item_description);
4189: FETCH l_item_name_cur INTO l_search_visits_rec.item_id;
4190: IF l_item_name_cur%NOTFOUND THEN
4191: Fnd_Message.set_name('AHL', 'AHL_LTP_ITEM_NOT_EXIST');
4192: Fnd_Message.Set_Token('ITEM',NVL(l_search_visits_Rec.ITEM_DESCRIPTION,l_search_visits_Rec.ITEM_ID));
4193: Fnd_Msg_Pub.ADD;
4194: CLOSE l_item_name_cur;
4195: RAISE Fnd_Api.G_EXC_ERROR;
4188: OPEN l_item_name_cur(l_search_visits_Rec.item_description);
4189: FETCH l_item_name_cur INTO l_search_visits_rec.item_id;
4190: IF l_item_name_cur%NOTFOUND THEN
4191: Fnd_Message.set_name('AHL', 'AHL_LTP_ITEM_NOT_EXIST');
4192: Fnd_Message.Set_Token('ITEM',NVL(l_search_visits_Rec.ITEM_DESCRIPTION,l_search_visits_Rec.ITEM_ID));
4193: Fnd_Msg_Pub.ADD;
4194: CLOSE l_item_name_cur;
4195: RAISE Fnd_Api.G_EXC_ERROR;
4196: END IF;
4201: THEN
4202: OPEN l_item_id_cur (l_search_visits_Rec.item_id);
4203: FETCH l_item_id_cur INTO l_search_visits_rec.item_id;
4204: IF l_item_id_cur%NOTFOUND THEN
4205: Fnd_Message.set_name('AHL', 'AHL_LTP_ITEM_NOT_EXIST');
4206: Fnd_Message.Set_Token('ITEM',NVL(l_search_visits_Rec.ITEM_DESCRIPTION,l_search_visits_Rec.ITEM_ID));
4207: Fnd_Msg_Pub.ADD;
4208: CLOSE l_item_id_cur;
4209: RAISE Fnd_Api.G_EXC_ERROR;
4202: OPEN l_item_id_cur (l_search_visits_Rec.item_id);
4203: FETCH l_item_id_cur INTO l_search_visits_rec.item_id;
4204: IF l_item_id_cur%NOTFOUND THEN
4205: Fnd_Message.set_name('AHL', 'AHL_LTP_ITEM_NOT_EXIST');
4206: Fnd_Message.Set_Token('ITEM',NVL(l_search_visits_Rec.ITEM_DESCRIPTION,l_search_visits_Rec.ITEM_ID));
4207: Fnd_Msg_Pub.ADD;
4208: CLOSE l_item_id_cur;
4209: RAISE Fnd_Api.G_EXC_ERROR;
4210: END IF;
4225: x_return_status => l_return_status);
4226:
4227: IF NVL(l_return_status, 'X') <> 'S'
4228: THEN
4229: Fnd_Message.SET_NAME('AHL','AHL_LTP_DISPLAY_INVALID');
4230: Fnd_Msg_Pub.ADD;
4231: RAISE Fnd_Api.G_EXC_ERROR;
4232: END IF;
4233: ELSE
4248: --Get plan id
4249: OPEN get_plan_id_cur(l_search_visits_Rec.plan_id);
4250: FETCH get_plan_id_cur INTO l_simulation_plan_id,l_plan_flag;
4251: IF get_plan_id_cur%NOTFOUND THEN
4252: Fnd_Message.set_name('AHL', 'AHL_LTP_INVALID_PLAN');
4253: Fnd_Msg_Pub.ADD;
4254: CLOSE get_plan_id_cur;
4255: RAISE Fnd_Api.G_EXC_ERROR;
4256: END IF;
5525: --
5526: OPEN l_org_id_cur(l_search_visits_Rec.ORG_ID,l_search_visits_Rec.ORG_NAME);
5527: FETCH l_org_id_cur INTO l_search_visits_Rec.ORG_ID,l_search_visits_Rec.ORG_NAME;
5528: IF l_org_id_cur%NOTFOUND THEN
5529: Fnd_Message.set_name('AHL', 'AHL_LTP_INVALID_ORG');
5530: Fnd_Message.Set_Token('ORG',NVL(l_search_visits_Rec.ORG_NAME,l_search_visits_Rec.ORG_ID));
5531: Fnd_Msg_Pub.ADD;
5532: CLOSE l_org_id_cur;
5533: RAISE Fnd_Api.G_EXC_ERROR;
5526: OPEN l_org_id_cur(l_search_visits_Rec.ORG_ID,l_search_visits_Rec.ORG_NAME);
5527: FETCH l_org_id_cur INTO l_search_visits_Rec.ORG_ID,l_search_visits_Rec.ORG_NAME;
5528: IF l_org_id_cur%NOTFOUND THEN
5529: Fnd_Message.set_name('AHL', 'AHL_LTP_INVALID_ORG');
5530: Fnd_Message.Set_Token('ORG',NVL(l_search_visits_Rec.ORG_NAME,l_search_visits_Rec.ORG_ID));
5531: Fnd_Msg_Pub.ADD;
5532: CLOSE l_org_id_cur;
5533: RAISE Fnd_Api.G_EXC_ERROR;
5534: --
5555: FETCH l_dept_id_cur INTO l_search_visits_Rec.department_id,
5556: l_search_visits_Rec.department_code,
5557: l_search_visits_Rec.department_name;
5558: IF l_dept_id_cur%NOTFOUND THEN
5559: Fnd_Message.set_name('AHL', 'AHL_LTP_INVALID_DEPT');
5560: Fnd_Message.Set_Token('DEPT',NVL(l_search_visits_Rec.DEPARTMENT_NAME,l_search_visits_Rec.DEPARTMENT_ID));
5561: Fnd_Msg_Pub.ADD;
5562: CLOSE l_dept_id_cur;
5563: RAISE Fnd_Api.G_EXC_ERROR;
5556: l_search_visits_Rec.department_code,
5557: l_search_visits_Rec.department_name;
5558: IF l_dept_id_cur%NOTFOUND THEN
5559: Fnd_Message.set_name('AHL', 'AHL_LTP_INVALID_DEPT');
5560: Fnd_Message.Set_Token('DEPT',NVL(l_search_visits_Rec.DEPARTMENT_NAME,l_search_visits_Rec.DEPARTMENT_ID));
5561: Fnd_Msg_Pub.ADD;
5562: CLOSE l_dept_id_cur;
5563: RAISE Fnd_Api.G_EXC_ERROR;
5564: --
5580: x_return_status => l_return_status);
5581:
5582: IF NVL(l_return_status, 'X') <> 'S'
5583: THEN
5584: Fnd_Message.SET_NAME('AHL','AHL_LTP_SP_CATEGORY_NOT_EXIST');
5585: Fnd_Msg_Pub.ADD;
5586: RAISE Fnd_Api.G_EXC_ERROR;
5587: END IF;
5588: ELSE
5607: x_return_status => l_return_status);
5608:
5609: IF NVL(l_return_status, 'X') <> 'S'
5610: THEN
5611: Fnd_Message.SET_NAME('AHL','AHL_LTP_VISIT_TYPE_INVALID');
5612: Fnd_Msg_Pub.ADD;
5613: RAISE Fnd_Api.G_EXC_ERROR;
5614: END IF;
5615: ELSE
5634: x_return_status => l_return_status);
5635:
5636: IF NVL(l_return_status, 'X') <> 'S'
5637: THEN
5638: Fnd_Message.SET_NAME('AHL','AHL_LTP_DISPLAY_INVALID');
5639: Fnd_Msg_Pub.ADD;
5640: RAISE Fnd_Api.G_EXC_ERROR;
5641: END IF;
5642: ELSE
5658: OPEN l_space_id_cur(l_search_visits_Rec.SPACE_ID,l_search_visits_Rec.SPACE_NAME,
5659: l_search_visits_Rec.DEPARTMENT_ID);
5660: FETCH l_space_id_cur INTO l_search_visits_Rec.SPACE_ID,l_search_visits_Rec.SPACE_NAME;
5661: IF l_space_id_cur%NOTFOUND THEN
5662: Fnd_Message.set_name('AHL', 'AHL_LTP_INVALID_SPACE');
5663: Fnd_Message.Set_Token('SPACE',NVL(l_search_visits_Rec.SPACE_NAME,l_search_visits_Rec.SPACE_ID));
5664: Fnd_Msg_Pub.ADD;
5665: CLOSE l_space_id_cur;
5666: RAISE Fnd_Api.G_EXC_ERROR;
5659: l_search_visits_Rec.DEPARTMENT_ID);
5660: FETCH l_space_id_cur INTO l_search_visits_Rec.SPACE_ID,l_search_visits_Rec.SPACE_NAME;
5661: IF l_space_id_cur%NOTFOUND THEN
5662: Fnd_Message.set_name('AHL', 'AHL_LTP_INVALID_SPACE');
5663: Fnd_Message.Set_Token('SPACE',NVL(l_search_visits_Rec.SPACE_NAME,l_search_visits_Rec.SPACE_ID));
5664: Fnd_Msg_Pub.ADD;
5665: CLOSE l_space_id_cur;
5666: RAISE Fnd_Api.G_EXC_ERROR;
5667: --
5675: THEN
5676: OPEN l_item_name_cur(l_search_visits_Rec.item_description);
5677: FETCH l_item_name_cur INTO l_search_visits_rec.item_id,l_search_visits_rec.item_description;
5678: IF l_item_name_cur%NOTFOUND THEN
5679: Fnd_Message.set_name('AHL', 'AHL_LTP_ITEM_NOT_EXIST');
5680: Fnd_Message.Set_Token('ITEM',NVL(l_search_visits_Rec.ITEM_DESCRIPTION,l_search_visits_Rec.ITEM_ID));
5681: Fnd_Msg_Pub.ADD;
5682: CLOSE l_item_name_cur;
5683: RAISE Fnd_Api.G_EXC_ERROR;
5676: OPEN l_item_name_cur(l_search_visits_Rec.item_description);
5677: FETCH l_item_name_cur INTO l_search_visits_rec.item_id,l_search_visits_rec.item_description;
5678: IF l_item_name_cur%NOTFOUND THEN
5679: Fnd_Message.set_name('AHL', 'AHL_LTP_ITEM_NOT_EXIST');
5680: Fnd_Message.Set_Token('ITEM',NVL(l_search_visits_Rec.ITEM_DESCRIPTION,l_search_visits_Rec.ITEM_ID));
5681: Fnd_Msg_Pub.ADD;
5682: CLOSE l_item_name_cur;
5683: RAISE Fnd_Api.G_EXC_ERROR;
5684: END IF;
5689: THEN
5690: OPEN l_item_id_cur (l_search_visits_Rec.item_id);
5691: FETCH l_item_id_cur INTO l_search_visits_rec.item_id,l_search_visits_rec.item_description;
5692: IF l_item_id_cur%NOTFOUND THEN
5693: Fnd_Message.set_name('AHL', 'AHL_LTP_ITEM_NOT_EXIST');
5694: Fnd_Message.Set_Token('ITEM',NVL(l_search_visits_Rec.ITEM_DESCRIPTION,l_search_visits_Rec.ITEM_ID));
5695: Fnd_Msg_Pub.ADD;
5696: CLOSE l_item_id_cur;
5697: RAISE Fnd_Api.G_EXC_ERROR;
5690: OPEN l_item_id_cur (l_search_visits_Rec.item_id);
5691: FETCH l_item_id_cur INTO l_search_visits_rec.item_id,l_search_visits_rec.item_description;
5692: IF l_item_id_cur%NOTFOUND THEN
5693: Fnd_Message.set_name('AHL', 'AHL_LTP_ITEM_NOT_EXIST');
5694: Fnd_Message.Set_Token('ITEM',NVL(l_search_visits_Rec.ITEM_DESCRIPTION,l_search_visits_Rec.ITEM_ID));
5695: Fnd_Msg_Pub.ADD;
5696: CLOSE l_item_id_cur;
5697: RAISE Fnd_Api.G_EXC_ERROR;
5698: END IF;
5703: --Get plan id
5704: OPEN get_plan_id_cur(l_search_visits_Rec.plan_id);
5705: FETCH get_plan_id_cur INTO l_search_visits_Rec.plan_id,l_plan_flag;
5706: IF get_plan_id_cur%NOTFOUND THEN
5707: Fnd_Message.set_name('AHL', 'AHL_LTP_INVALID_PLAN');
5708: Fnd_Msg_Pub.ADD;
5709: CLOSE get_plan_id_cur;
5710: RAISE Fnd_Api.G_EXC_ERROR;
5711: END IF;