DBA Data[Home] [Help]

APPS.AHL_PRD_LOV_SERVICE_PVT dependencies on FND_API

Line 37: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

33: IF get_user_id_csr%NOTFOUND THEN
34: FND_MESSAGE.set_name('AHL','AHL_PRD_INV_BPEL_USR');
35: FND_MESSAGE.SET_TOKEN('USER_NAME',p_user_id);
36: FND_MSG_PUB.ADD;
37: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
38: END IF;
39: CLOSE get_user_id_csr;
40:
41: OPEN get_resp_id_csr;

Line 47: return Fnd_Api.G_RET_STS_SUCCESS;

43: CLOSE get_resp_id_csr;
44:
45: FND_GLOBAL.apps_initialize(l_user_id,l_resp_id,867);
46: mo_global.init('AHL');
47: return Fnd_Api.G_RET_STS_SUCCESS;
48:
49: END init_user_and_role;
50:
51: ---------------------------------------------------------------------

Line 74: x_return_status := FND_API.G_RET_STS_SUCCESS;

70: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
71:
72: BEGIN
73:
74: x_return_status := FND_API.G_RET_STS_SUCCESS;
75:
76: -- Create Attributes Table
77: -- Visit ID
78: l_Meta_Attribute_Rec.AttributeName := 'VisitId';

Line 199: x_return_status := FND_API.G_RET_STS_SUCCESS;

195: l_unit ahl_unit_config_headers.name%type;
196:
197: BEGIN
198:
199: x_return_status := FND_API.G_RET_STS_SUCCESS;
200:
201: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
202: l_sql_string := 'SELECT * FROM ( SELECT DISTINCT Rownum RN, vst.visit_id,';
203: l_sql_string := l_sql_string || ' vst.visit_number,fndvt.meaning visit_type_mean, ';

Line 409: x_return_status := FND_API.G_RET_STS_SUCCESS;

405: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
406:
407: BEGIN
408:
409: x_return_status := FND_API.G_RET_STS_SUCCESS;
410:
411: -- Create Attributes Table
412: -- Unit Config Header ID
413: l_Meta_Attribute_Rec.AttributeName := 'UnitConfigHeaderId';

Line 504: x_return_status := FND_API.G_RET_STS_SUCCESS;

500: l_item MTL_SYSTEM_ITEMS_KFV.CONCATENATED_SEGMENTS%type;
501:
502: BEGIN
503:
504: x_return_status := FND_API.G_RET_STS_SUCCESS;
505:
506: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
507: l_sql_string := 'SELECT * FROM ( SELECT DISTINCT Rownum RN, U.UNIT_CONFIG_HEADER_ID UC_HEADER_ID,';
508: l_sql_string := l_sql_string || ' U.NAME UC_NAME,C.INSTANCE_NUMBER , ';

Line 660: x_return_status := FND_API.G_RET_STS_SUCCESS;

656: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
657:
658: BEGIN
659:
660: x_return_status := FND_API.G_RET_STS_SUCCESS;
661:
662: -- Create Attributes Table
663: l_Meta_Attribute_Rec.AttributeName := 'EmployeeNumber';
664: l_Meta_Attribute_Rec.Prompt := 'Employee Number';

Line 772: x_return_status := FND_API.G_RET_STS_SUCCESS;

768: l_emp_id NUMBER;
769:
770: BEGIN
771:
772: x_return_status := FND_API.G_RET_STS_SUCCESS;
773:
774: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
775: l_sql_string := 'SELECT * FROM ( SELECT DISTINCT Rownum RN, PF.EMPLOYEE_NUM EMPLOYEE_NUMBER,';
776: l_sql_string := l_sql_string || ' PF.FULL_NAME EMP_NAME, BRE.EFFECTIVE_START_DATE , ';

Line 952: x_return_status := FND_API.G_RET_STS_SUCCESS;

948: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
949:
950: BEGIN
951:
952: x_return_status := FND_API.G_RET_STS_SUCCESS;
953:
954: -- Create Attributes Table
955: l_Meta_Attribute_Rec.AttributeName := 'EmpName';
956: l_Meta_Attribute_Rec.Prompt := 'Name';

Line 1061: x_return_status := FND_API.G_RET_STS_SUCCESS;

1057:
1058:
1059: BEGIN
1060:
1061: x_return_status := FND_API.G_RET_STS_SUCCESS;
1062:
1063: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
1064: l_sql_string := 'SELECT * FROM ( SELECT rownum RN, bdri.resource_id ,pf.employee_num,pf.full_name, bdri.department_id,pf.employee_id ';
1065: l_sql_string := l_sql_string || ' FROM mtl_employees_current_view pf, bom_resource_employees bre, bom_dept_res_instances bdri ';

Line 1213: x_return_status := FND_API.G_RET_STS_SUCCESS;

1209: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
1210:
1211: BEGIN
1212:
1213: x_return_status := FND_API.G_RET_STS_SUCCESS;
1214:
1215: -- Create Attributes Table
1216: l_Meta_Attribute_Rec.AttributeName := 'Code';
1217: l_Meta_Attribute_Rec.Prompt := 'Code';

Line 1282: x_return_status := FND_API.G_RET_STS_SUCCESS;

1278: l_rownum NUMBER;
1279:
1280: BEGIN
1281:
1282: x_return_status := FND_API.G_RET_STS_SUCCESS;
1283:
1284: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
1285: l_sql_string := 'SELECT rownum , meaning,STATUS_CODE FROM ( select DISTINCT FND.MEANING meaning, SOR.NEXT_STATUS_CODE STATUS_CODE ';
1286: l_sql_string := l_sql_string || ' FROM AHL_STATUS_ORDER_RULES SOR, FND_LOOKUP_VALUES_VL FND ';

Line 1392: x_return_status := FND_API.G_RET_STS_SUCCESS;

1388: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
1389:
1390: BEGIN
1391:
1392: x_return_status := FND_API.G_RET_STS_SUCCESS;
1393:
1394: -- Create Attributes Table
1395: l_Meta_Attribute_Rec.AttributeName := 'WorkorderOperationId';
1396: l_Meta_Attribute_Rec.Prompt := null;

Line 1511: x_return_status := FND_API.G_RET_STS_SUCCESS;

1507: l_dept_id NUMBER;
1508:
1509: BEGIN
1510:
1511: x_return_status := FND_API.G_RET_STS_SUCCESS;
1512:
1513: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
1514: l_sql_string := 'SELECT * FROM ( SELECT Rownum RN, WORKORDER_OPERATION_ID, ';
1515: l_sql_string := l_sql_string || ' ORGANIZATION_ID, OPERATION_SEQUENCE_NUM, ';

Line 1690: x_return_status := FND_API.G_RET_STS_SUCCESS;

1686: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
1687:
1688: BEGIN
1689:
1690: x_return_status := FND_API.G_RET_STS_SUCCESS;
1691:
1692: -- Create Attributes Table
1693: l_Meta_Attribute_Rec.AttributeName := 'ResCodeLovResCode';
1694: l_Meta_Attribute_Rec.Prompt := 'Resource';

Line 1799: x_return_status := FND_API.G_RET_STS_SUCCESS;

1795: l_dept_id NUMBER;
1796:
1797: BEGIN
1798:
1799: x_return_status := FND_API.G_RET_STS_SUCCESS;
1800:
1801: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
1802: l_sql_string := 'SELECT * FROM ( SELECT Rownum RN, ';
1803: l_sql_string := l_sql_string || ' BR.RESOURCE_ID ,BR.RESOURCE_CODE, BR.description , ';

Line 1970: x_return_status := FND_API.G_RET_STS_SUCCESS;

1966: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
1967:
1968: BEGIN
1969:
1970: x_return_status := FND_API.G_RET_STS_SUCCESS;
1971:
1972: -- Create Attributes Table
1973: l_Meta_Attribute_Rec.AttributeName := 'ATACode';
1974: l_Meta_Attribute_Rec.Prompt := 'ATA Code';

Line 2069: x_return_status := FND_API.G_RET_STS_SUCCESS;

2065: l_position ahl_mc_relationships_v.position_ref_meaning%type;
2066:
2067: BEGIN
2068:
2069: x_return_status := FND_API.G_RET_STS_SUCCESS;
2070:
2071: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
2072: l_sql_string := 'SELECT * FROM ( SELECT DISTINCT Rownum RN, ATA_meaning, ATA_Desc, position_ref_meaning, position_key,uc.name ';
2073: l_sql_string := l_sql_string || ' from ahl_mc_relationships_v mc, ahl_unit_config_headers uc ';

Line 2203: x_return_status := FND_API.G_RET_STS_SUCCESS;

2199: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
2200:
2201: BEGIN
2202:
2203: x_return_status := FND_API.G_RET_STS_SUCCESS;
2204:
2205: ----
2206: l_Meta_Attribute_Rec.AttributeName := 'Position';
2207: l_Meta_Attribute_Rec.Prompt := 'Position';

Line 2301: x_return_status := FND_API.G_RET_STS_SUCCESS;

2297: l_position ahl_mc_relationships_v.position_ref_meaning%type;
2298:
2299: BEGIN
2300:
2301: x_return_status := FND_API.G_RET_STS_SUCCESS;
2302:
2303: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
2304: l_sql_string := 'SELECT * FROM ( SELECT DISTINCT Rownum RN, ATA_meaning, position_ref_desc, position_ref_meaning, position_key,uc.name ';
2305: l_sql_string := l_sql_string || ' from ahl_mc_relationships_v mc, ahl_unit_config_headers uc ';

Line 2431: x_return_status := FND_API.G_RET_STS_SUCCESS;

2427: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
2428:
2429: BEGIN
2430:
2431: x_return_status := FND_API.G_RET_STS_SUCCESS;
2432:
2433: -- Create Attributes Table
2434: l_Meta_Attribute_Rec.AttributeName := 'SerNumLovSerNum';
2435: l_Meta_Attribute_Rec.Prompt := 'Serial Number';

Line 2520: x_return_status := FND_API.G_RET_STS_SUCCESS;

2516: l_res_id NUMBER;
2517:
2518: BEGIN
2519:
2520: x_return_status := FND_API.G_RET_STS_SUCCESS;
2521:
2522: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
2523: l_sql_string := 'SELECT * FROM ( SELECT DISTINCT Rownum RN, bdri.SERIAL_NUMBER,';
2524: l_sql_string := l_sql_string || ' bdri.instance_id, bdri.department_id, bdri.resource_id ';

Line 2661: x_return_status := FND_API.G_RET_STS_SUCCESS;

2657: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
2658:
2659: BEGIN
2660:
2661: x_return_status := FND_API.G_RET_STS_SUCCESS;
2662:
2663: -- Create Attributes Table
2664: l_Meta_Attribute_Rec.AttributeName := 'SerNumLovSerNum';
2665: l_Meta_Attribute_Rec.Prompt := 'Serial Number';

Line 2750: x_return_status := FND_API.G_RET_STS_SUCCESS;

2746: l_res_id NUMBER;
2747:
2748: BEGIN
2749:
2750: x_return_status := FND_API.G_RET_STS_SUCCESS;
2751:
2752: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
2753: l_sql_string := 'SELECT * FROM ( SELECT DISTINCT Rownum RN, bdri.SERIAL_NUMBER,';
2754: l_sql_string := l_sql_string || ' bdri.instance_id, bdri.department_id, bdri.resource_id ';

Line 2891: x_return_status := FND_API.G_RET_STS_SUCCESS;

2887: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
2888:
2889: BEGIN
2890:
2891: x_return_status := FND_API.G_RET_STS_SUCCESS;
2892:
2893: -- Create Attributes Table
2894: l_Meta_Attribute_Rec.AttributeName := 'ItemNum';
2895: l_Meta_Attribute_Rec.Prompt := 'Item';

Line 2989: x_return_status := FND_API.G_RET_STS_SUCCESS;

2985: l_res_id NUMBER;
2986:
2987: BEGIN
2988:
2989: x_return_status := FND_API.G_RET_STS_SUCCESS;
2990:
2991: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
2992: l_sql_string := 'SELECT * FROM ( SELECT DISTINCT Rownum RN, bdri.SERIAL_NUMBER,';
2993: l_sql_string := l_sql_string || ' bdri.instance_id, bdri.department_id, bdri.resource_id ';

Line 3130: x_return_status := FND_API.G_RET_STS_SUCCESS;

3126: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
3127:
3128: BEGIN
3129:
3130: x_return_status := FND_API.G_RET_STS_SUCCESS;
3131:
3132: -- Create Attributes Table
3133: l_Meta_Attribute_Rec.AttributeName := 'Condition';
3134: l_Meta_Attribute_Rec.Prompt := 'Condition';

Line 3209: x_return_status := FND_API.G_RET_STS_SUCCESS;

3205: l_status_desc mtl_material_statuses.description%type;
3206:
3207: BEGIN
3208:
3209: x_return_status := FND_API.G_RET_STS_SUCCESS;
3210:
3211: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
3212: l_sql_string := 'SELECT * FROM ( SELECT Rownum RN, status_id,';
3213: l_sql_string := l_sql_string || ' status_code, description ';

Line 3337: x_return_status := FND_API.G_RET_STS_SUCCESS;

3333: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
3334:
3335: BEGIN
3336:
3337: x_return_status := FND_API.G_RET_STS_SUCCESS;
3338:
3339: -- Create Attributes Table
3340: l_Meta_Attribute_Rec.AttributeName := 'RemovalLovReason';
3341: l_Meta_Attribute_Rec.Prompt := 'Removal Reason';

Line 3416: x_return_status := FND_API.G_RET_STS_SUCCESS;

3412: l_reason_desc mtl_transaction_reasons.description%type;
3413:
3414: BEGIN
3415:
3416: x_return_status := FND_API.G_RET_STS_SUCCESS;
3417:
3418: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
3419: l_sql_string := 'SELECT * FROM ( SELECT Rownum RN, reason_name,';
3420: l_sql_string := l_sql_string || ' reason_id, description ';

Line 3544: x_return_status := FND_API.G_RET_STS_SUCCESS;

3540: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
3541:
3542: BEGIN
3543:
3544: x_return_status := FND_API.G_RET_STS_SUCCESS;
3545:
3546: -- Create Attributes Table
3547: l_Meta_Attribute_Rec.AttributeName := 'RemovalLovCode';
3548: l_Meta_Attribute_Rec.Prompt := 'Removal Code';

Line 3613: x_return_status := FND_API.G_RET_STS_SUCCESS;

3609: l_mean FND_LOOKUP_VALUES_VL.meaning%type;
3610:
3611: BEGIN
3612:
3613: x_return_status := FND_API.G_RET_STS_SUCCESS;
3614:
3615: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
3616: l_sql_string := 'SELECT * FROM ( SELECT Rownum RN, meaning,';
3617: l_sql_string := l_sql_string || ' lookup_code ';

Line 3728: x_return_status := FND_API.G_RET_STS_SUCCESS;

3724: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
3725:
3726: BEGIN
3727:
3728: x_return_status := FND_API.G_RET_STS_SUCCESS;
3729:
3730: -- Create Attributes Table
3731: l_Meta_Attribute_Rec.AttributeName := 'ResolutionLovCode';
3732: l_Meta_Attribute_Rec.Prompt := 'Resolution Code';

Line 3797: x_return_status := FND_API.G_RET_STS_SUCCESS;

3793: l_mean FND_LOOKUP_VALUES_VL.meaning%type;
3794:
3795: BEGIN
3796:
3797: x_return_status := FND_API.G_RET_STS_SUCCESS;
3798:
3799: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
3800: l_sql_string := 'SELECT * FROM ( SELECT Rownum RN, meaning,';
3801: l_sql_string := l_sql_string || ' lookup_code ';

Line 3912: x_return_status := FND_API.G_RET_STS_SUCCESS;

3908: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
3909:
3910: BEGIN
3911:
3912: x_return_status := FND_API.G_RET_STS_SUCCESS;
3913:
3914: -- Create Attributes Table
3915: l_Meta_Attribute_Rec.AttributeName := 'ProblemLovCode';
3916: l_Meta_Attribute_Rec.Prompt := 'Problem Code';

Line 3981: x_return_status := FND_API.G_RET_STS_SUCCESS;

3977: l_mean FND_LOOKUP_VALUES_VL.meaning%type;
3978:
3979: BEGIN
3980:
3981: x_return_status := FND_API.G_RET_STS_SUCCESS;
3982:
3983: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
3984: l_sql_string := 'SELECT * FROM ( SELECT Rownum RN, description,';
3985: l_sql_string := l_sql_string || ' lookup_code ';

Line 4101: x_return_status := FND_API.G_RET_STS_SUCCESS;

4097: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
4098:
4099: BEGIN
4100:
4101: x_return_status := FND_API.G_RET_STS_SUCCESS;
4102:
4103: -- Create Attributes Table
4104: l_Meta_Attribute_Rec.AttributeName := 'SeverityLovName';
4105: l_Meta_Attribute_Rec.Prompt := 'Severity';

Line 4180: x_return_status := FND_API.G_RET_STS_SUCCESS;

4176: l_desc cs_incident_severities_vl.description%type;
4177:
4178: BEGIN
4179:
4180: x_return_status := FND_API.G_RET_STS_SUCCESS;
4181:
4182: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
4183: l_sql_string := 'SELECT * FROM ( SELECT Rownum RN, name,';
4184: l_sql_string := l_sql_string || ' incident_severity_id, description ';

Line 4310: x_return_status := FND_API.G_RET_STS_SUCCESS;

4306: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
4307:
4308: BEGIN
4309:
4310: x_return_status := FND_API.G_RET_STS_SUCCESS;
4311:
4312: -- Create Attributes Table
4313: l_Meta_Attribute_Rec.AttributeName := 'InstanceNum';
4314: l_Meta_Attribute_Rec.Prompt := 'Instance Number';

Line 4399: x_return_status := FND_API.G_RET_STS_SUCCESS;

4395: l_item mtl_system_items_kfv.concatenated_segments%type;
4396:
4397: BEGIN
4398:
4399: x_return_status := FND_API.G_RET_STS_SUCCESS;
4400:
4401: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS
4402: l_sql_string := 'SELECT * FROM ( SELECT Rownum RN, csi1.instance_number, csi1.lot_number,';
4403: l_sql_string := l_sql_string || ' csi1.serial_number, ahl1.concatenated_segments ';

Line 4532: x_return_status := FND_API.G_RET_STS_SUCCESS;

4528: l_Meta_Attribute_Tbl LovMetaAttribute_Tbl_Type;
4529:
4530: BEGIN
4531:
4532: x_return_status := FND_API.G_RET_STS_SUCCESS;
4533:
4534: -- Create Attributes Table
4535: l_Meta_Attribute_Rec.AttributeName := 'ItemNum';
4536: l_Meta_Attribute_Rec.Prompt := 'Item';

Line 4634: x_return_status := FND_API.G_RET_STS_SUCCESS;

4630: l_wo_id_input BOOLEAN;
4631:
4632: BEGIN
4633:
4634: x_return_status := FND_API.G_RET_STS_SUCCESS;
4635: l_wo_id_input := FALSE;
4636:
4637: -- SELECT CLAUSE AND BASIC WHERE CONDITIONS when wo_id is not null
4638: l_sql_string1 := 'SELECT * FROM ( SELECT Rownum RN, mtl.concatenated_segments , mtl.description , mtl.primary_unit_of_measure, WO.workorder_id, mtl.inventory_item_id ';

Line 4780: x_return_status := FND_API.G_RET_STS_SUCCESS;

4776: x_msg_data OUT NOCOPY VARCHAR2)
4777: IS
4778: BEGIN
4779:
4780: x_return_status := FND_API.G_RET_STS_SUCCESS;
4781:
4782: CASE upper(p_lov_input_rec.lovID)
4783:
4784: WHEN 'AHL_PRD_VISITNUM_LOV' THEN

Line 4966: RAISE FND_API.G_EXC_ERROR;

4962: ELSE
4963: --throw exception;
4964: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_LOV_NOT_FOUND');
4965: FND_MSG_PUB.ADD;
4966: RAISE FND_API.G_EXC_ERROR;
4967: END CASE;
4968:
4969: END getLOVMetaData;
4970:

Line 4990: x_return_status := FND_API.G_RET_STS_SUCCESS;

4986: x_msg_data OUT NOCOPY VARCHAR2)
4987: IS
4988: BEGIN
4989:
4990: x_return_status := FND_API.G_RET_STS_SUCCESS;
4991:
4992: CASE upper(p_lov_input_rec.lovID)
4993:
4994: WHEN 'AHL_PRD_VISITNUM_LOV' THEN

Line 5175: RAISE FND_API.G_EXC_ERROR;

5171: ELSE
5172: --throw exception;
5173: FND_MESSAGE.SET_NAME('AHL','AHL_PRD_LOV_NOT_FOUND');
5174: FND_MSG_PUB.ADD;
5175: RAISE FND_API.G_EXC_ERROR;
5176:
5177: END CASE;
5178:
5179: END getLOVResults;

Line 5194: p_init_msg_list IN VARCHAR2 :=Fnd_Api.g_false,

5190: ---------------------------------------------------------------------
5191:
5192: PROCEDURE Call_LOV_Services (
5193: p_api_version IN NUMBER :=1.0,
5194: p_init_msg_list IN VARCHAR2 :=Fnd_Api.g_false,
5195: p_commit IN VARCHAR2 :=Fnd_Api.g_false,
5196: p_validation_level IN NUMBER :=Fnd_Api.g_valid_level_full,
5197: p_module_type IN VARCHAR2 :=null,
5198: p_userid IN VARCHAR2 := NULL,

Line 5195: p_commit IN VARCHAR2 :=Fnd_Api.g_false,

5191:
5192: PROCEDURE Call_LOV_Services (
5193: p_api_version IN NUMBER :=1.0,
5194: p_init_msg_list IN VARCHAR2 :=Fnd_Api.g_false,
5195: p_commit IN VARCHAR2 :=Fnd_Api.g_false,
5196: p_validation_level IN NUMBER :=Fnd_Api.g_valid_level_full,
5197: p_module_type IN VARCHAR2 :=null,
5198: p_userid IN VARCHAR2 := NULL,
5199: p_lov_input_rec IN LOV_Input_Rec_Type,

Line 5196: p_validation_level IN NUMBER :=Fnd_Api.g_valid_level_full,

5192: PROCEDURE Call_LOV_Services (
5193: p_api_version IN NUMBER :=1.0,
5194: p_init_msg_list IN VARCHAR2 :=Fnd_Api.g_false,
5195: p_commit IN VARCHAR2 :=Fnd_Api.g_false,
5196: p_validation_level IN NUMBER :=Fnd_Api.g_valid_level_full,
5197: p_module_type IN VARCHAR2 :=null,
5198: p_userid IN VARCHAR2 := NULL,
5199: p_lov_input_rec IN LOV_Input_Rec_Type,
5200: x_lov_result_output_rec OUT NOCOPY LovOutput_Rec_Type,

Line 5217: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version,l_api_name, G_PKG_NAME ) THEN

5213: --mo_global.init('AHL');
5214: x_return_status := init_user_and_role(p_userid);
5215:
5216: -- Standard call to check for call compatibility
5217: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version,l_api_name, G_PKG_NAME ) THEN
5218: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5219: END IF;
5220:
5221: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 5218: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5214: x_return_status := init_user_and_role(p_userid);
5215:
5216: -- Standard call to check for call compatibility
5217: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version,l_api_name, G_PKG_NAME ) THEN
5218: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5219: END IF;
5220:
5221: IF FND_API.To_Boolean(p_init_msg_list) THEN
5222: FND_MSG_PUB.Initialize;

Line 5221: IF FND_API.To_Boolean(p_init_msg_list) THEN

5217: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version,l_api_name, G_PKG_NAME ) THEN
5218: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5219: END IF;
5220:
5221: IF FND_API.To_Boolean(p_init_msg_list) THEN
5222: FND_MSG_PUB.Initialize;
5223: END IF;
5224:
5225: -- Initialize output variables

Line 5229: x_return_status := FND_API.G_RET_STS_SUCCESS;

5225: -- Initialize output variables
5226: x_lov_meta_output_rec.LovMetaAttributeTbl(0).AttributeName := null;
5227: x_lov_result_output_rec.LovResultTbl(0)(0).AttributeName := null;
5228:
5229: x_return_status := FND_API.G_RET_STS_SUCCESS;
5230:
5231: IF p_lov_input_rec.getMetaData is not null and
5232: upper(p_lov_input_rec.getMetaData) = 'T' THEN
5233:

Line 5255: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS)THEN

5251: END IF;
5252: IF(x_lov_result_output_rec.NumberOfRows IS NULL OR x_lov_result_output_rec.NumberOfRows < 1)THEN
5253: x_lov_result_output_rec.LovResultTbl(0)(0).AttributeName := NULL;
5254: END IF;
5255: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS)THEN
5256: RAISE FND_API.G_EXC_ERROR;
5257: END IF;
5258: EXCEPTION
5259: WHEN FND_API.G_EXC_ERROR THEN

Line 5256: RAISE FND_API.G_EXC_ERROR;

5252: IF(x_lov_result_output_rec.NumberOfRows IS NULL OR x_lov_result_output_rec.NumberOfRows < 1)THEN
5253: x_lov_result_output_rec.LovResultTbl(0)(0).AttributeName := NULL;
5254: END IF;
5255: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS)THEN
5256: RAISE FND_API.G_EXC_ERROR;
5257: END IF;
5258: EXCEPTION
5259: WHEN FND_API.G_EXC_ERROR THEN
5260: x_return_status := FND_API.G_RET_STS_ERROR;

Line 5259: WHEN FND_API.G_EXC_ERROR THEN

5255: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS)THEN
5256: RAISE FND_API.G_EXC_ERROR;
5257: END IF;
5258: EXCEPTION
5259: WHEN FND_API.G_EXC_ERROR THEN
5260: x_return_status := FND_API.G_RET_STS_ERROR;
5261: x_msg_count := FND_MSG_PUB.count_msg;
5262: x_msg_data := AHL_PRD_WO_PUB.GET_MSG_DATA(x_msg_count);
5263: /*FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 5260: x_return_status := FND_API.G_RET_STS_ERROR;

5256: RAISE FND_API.G_EXC_ERROR;
5257: END IF;
5258: EXCEPTION
5259: WHEN FND_API.G_EXC_ERROR THEN
5260: x_return_status := FND_API.G_RET_STS_ERROR;
5261: x_msg_count := FND_MSG_PUB.count_msg;
5262: x_msg_data := AHL_PRD_WO_PUB.GET_MSG_DATA(x_msg_count);
5263: /*FND_MSG_PUB.count_and_get( p_count => x_msg_count,
5264: p_data => x_msg_data,

Line 5265: p_encoded => fnd_api.g_false);*/

5261: x_msg_count := FND_MSG_PUB.count_msg;
5262: x_msg_data := AHL_PRD_WO_PUB.GET_MSG_DATA(x_msg_count);
5263: /*FND_MSG_PUB.count_and_get( p_count => x_msg_count,
5264: p_data => x_msg_data,
5265: p_encoded => fnd_api.g_false);*/
5266:
5267:
5268:
5269: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 5269: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5265: p_encoded => fnd_api.g_false);*/
5266:
5267:
5268:
5269: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5270: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5271: x_msg_count := FND_MSG_PUB.count_msg;
5272: x_msg_data := AHL_PRD_WO_PUB.GET_MSG_DATA(x_msg_count);
5273: /*FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 5270: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5266:
5267:
5268:
5269: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5270: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5271: x_msg_count := FND_MSG_PUB.count_msg;
5272: x_msg_data := AHL_PRD_WO_PUB.GET_MSG_DATA(x_msg_count);
5273: /*FND_MSG_PUB.count_and_get( p_count => x_msg_count,
5274: p_data => x_msg_data,

Line 5275: p_encoded => fnd_api.g_false);*/

5271: x_msg_count := FND_MSG_PUB.count_msg;
5272: x_msg_data := AHL_PRD_WO_PUB.GET_MSG_DATA(x_msg_count);
5273: /*FND_MSG_PUB.count_and_get( p_count => x_msg_count,
5274: p_data => x_msg_data,
5275: p_encoded => fnd_api.g_false);*/
5276:
5277:
5278: WHEN OTHERS THEN
5279: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 5279: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5275: p_encoded => fnd_api.g_false);*/
5276:
5277:
5278: WHEN OTHERS THEN
5279: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5280: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5281: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
5282: p_procedure_name => l_api_name,
5283: p_error_text => SUBSTR(SQLERRM,1,500));

Line 5289: p_encoded => fnd_api.g_false);*/

5285: x_msg_count := FND_MSG_PUB.count_msg;
5286: x_msg_data := AHL_PRD_WO_PUB.GET_MSG_DATA(x_msg_count);
5287: /*FND_MSG_PUB.count_and_get( p_count => x_msg_count,
5288: p_data => x_msg_data,
5289: p_encoded => fnd_api.g_false);*/
5290: END Call_LOV_Services;
5291:
5292: END AHL_PRD_LOV_SERVICE_PVT;