DBA Data[Home] [Help]

APPS.CSP_REPAIR_PO_GRP dependencies on FND_API

Line 16: ,p_Init_Msg_List IN VARCHAR2 DEFAULT FND_API.G_FALSE

12: G_FILE_NAME CONSTANT VARCHAR2(30) := 'cspvprqb.pls';
13:
14: PROCEDURE CREATE_REPAIR_PO
15: (p_api_version IN NUMBER
16: ,p_Init_Msg_List IN VARCHAR2 DEFAULT FND_API.G_FALSE
17: ,p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
18: ,P_repair_supplier_id IN NUMBER
19: ,P_repair_supplier_org_id IN NUMBER
20: ,P_repair_program IN VARCHAR2

Line 17: ,p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE

13:
14: PROCEDURE CREATE_REPAIR_PO
15: (p_api_version IN NUMBER
16: ,p_Init_Msg_List IN VARCHAR2 DEFAULT FND_API.G_FALSE
17: ,p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
18: ,P_repair_supplier_id IN NUMBER
19: ,P_repair_supplier_org_id IN NUMBER
20: ,P_repair_program IN VARCHAR2
21: ,P_dest_organization_id IN NUMBER

Line 35: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

31: )
32: IS
33: l_api_version_number CONSTANT NUMBER := 1.0;
34: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_REPAIR_PO';
35: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
36: l_msg_count NUMBER;
37: l_msg_data VARCHAR2(2000);
38: l_commit VARCHAR2(1) := FND_API.G_FALSE;
39: l_user_id NUMBER;

Line 38: l_commit VARCHAR2(1) := FND_API.G_FALSE;

34: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_REPAIR_PO';
35: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
36: l_msg_count NUMBER;
37: l_msg_data VARCHAR2(2000);
38: l_commit VARCHAR2(1) := FND_API.G_FALSE;
39: l_user_id NUMBER;
40: l_login_id NUMBER;
41: l_today DATE;
42: EXCP_USER_DEFINED EXCEPTION;

Line 98: IF fnd_api.to_boolean(P_Init_Msg_List) THEN

94:
95: SAVEPOINT CREATE_REPAIR_PO_PUB;
96:
97: /*----------- Initialize Message List ------------ */
98: IF fnd_api.to_boolean(P_Init_Msg_List) THEN
99: FND_MSG_PUB.initialize;
100: END IF;
101:
102: /*----------- Standard call to check for call compatibility --------- */

Line 103: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

99: FND_MSG_PUB.initialize;
100: END IF;
101:
102: /*----------- Standard call to check for call compatibility --------- */
103: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
104: p_api_version,
105: l_api_name,
106: G_PKG_NAME) THEN
107: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 107: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

103: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
104: p_api_version,
105: l_api_name,
106: G_PKG_NAME) THEN
107: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
108: END IF;
109:
110: /* ------- Initialize Return Status --------- */
111: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 111: x_return_status := FND_API.G_RET_STS_SUCCESS;

107: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
108: END IF;
109:
110: /* ------- Initialize Return Status --------- */
111: x_return_status := FND_API.G_RET_STS_SUCCESS;
112:
113: l_defective_parts_tbl := p_defective_parts_tbl;
114:
115: /* -------- User and Login Information -------- */

Line 148: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

144: ,x_return_status
145: ,x_msg_data
146: ,x_msg_count
147: );
148: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
149: L_SOURCE_ORGANIZATION_NAME := GET_ORGANIZATION_NAME(P_source_organization_id);
150: FND_MESSAGE.SET_NAME ('CSP','CSP_NO_DEFECTITEM_AT_DEFECTORG');
151: FND_MESSAGE.SET_TOKEN ('DEFECTIVE_ORG_NAME', L_SOURCE_ORGANIZATION_NAME,TRUE);
152: FND_MSG_PUB.ADD;

Line 166: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

162: ,x_return_status
163: ,x_msg_data
164: ,x_msg_count
165: );
166: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
167: L_REPAIR_ORGANIZATION_NAME := GET_ORGANIZATION_NAME(P_repair_supplier_org_id);
168: FND_MESSAGE.SET_NAME ('CSP','CSP_NO_DEFECTITEM_AT_REPAIRORG');
169: FND_MESSAGE.SET_TOKEN ('REPAIR_SUPPLIER_ORG_NAME', L_REPAIR_ORGANIZATION_NAME,TRUE);
170: FND_MSG_PUB.ADD;

Line 182: IF x_reservation_id = 0 OR l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

178: x_return_status => l_return_status,
179: x_msg_data => l_msg_data
180: );
181:
182: IF x_reservation_id = 0 OR l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
183: RAISE EXCP_USER_DEFINED;
184: Elsif l_return_status = FND_API.G_RET_STS_SUCCESS THEN
185:
186: /* This is for Insert the Reservation_id into CSP_REPAIR_PO_LINES table

Line 184: Elsif l_return_status = FND_API.G_RET_STS_SUCCESS THEN

180: );
181:
182: IF x_reservation_id = 0 OR l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
183: RAISE EXCP_USER_DEFINED;
184: Elsif l_return_status = FND_API.G_RET_STS_SUCCESS THEN
185:
186: /* This is for Insert the Reservation_id into CSP_REPAIR_PO_LINES table
187: all the reservation made for defective parts
188: */

Line 350: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

346: ,x_return_status
347: ,x_msg_data
348: ,x_msg_count
349: );
350: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
351: FND_MESSAGE.SET_NAME ('CSP','CSP_NO_REPAIRITEM_AT_REPAIRORG');
352: FND_MESSAGE.SET_TOKEN ('REPAIR_SUPPLIER_ORG_NAME', L_REPAIR_ORGANIZATION_NAME,TRUE);
353: FND_MSG_PUB.ADD;
354: RAISE EXCP_USER_DEFINED;

Line 394: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

390: ,x_return_status
391: ,x_msg_data
392: ,x_msg_count
393: );
394: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
395: FND_MESSAGE.SET_NAME ('CSP','CSP_NO_REPAIRITEM_AT_DESTORG');
396: FND_MESSAGE.SET_TOKEN ('DEST_ORG_NAME', L_DEST_ORGANIZATION_NAME,TRUE);
397: FND_MSG_PUB.ADD;
398: RAISE EXCP_USER_DEFINED;

Line 603: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

599: ,x_msg_count => l_msg_count
600: ,x_msg_data => l_msg_data
601: );
602:
603: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
604: RAISE FND_API.G_EXC_ERROR;
605: End if;
606:
607: /* Out values from the header record (l_header_rec) of PO Requisition Call */

Line 604: RAISE FND_API.G_EXC_ERROR;

600: ,x_msg_data => l_msg_data
601: );
602:
603: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
604: RAISE FND_API.G_EXC_ERROR;
605: End if;
606:
607: /* Out values from the header record (l_header_rec) of PO Requisition Call */
608:

Line 720: IF (p_commit = FND_API.G_TRUE) THEN

716: --P_need_by_date -------- Same as the need by date of Repair to item
717: );
718: END LOOP;
719: /*
720: IF (p_commit = FND_API.G_TRUE) THEN
721: COMMIT;
722: END IF;
723: */
724:

Line 725: IF FND_API.to_Boolean( p_commit ) THEN

721: COMMIT;
722: END IF;
723: */
724:
725: IF FND_API.to_Boolean( p_commit ) THEN
726: COMMIT WORK;
727: END IF;
728:
729:

Line 733: x_return_status := FND_API.G_RET_STS_ERROR;

729:
730: EXCEPTION
731: WHEN EXCP_USER_DEFINED THEN
732: Rollback to CREATE_REPAIR_PO_PUB;
733: x_return_status := FND_API.G_RET_STS_ERROR;
734: fnd_msg_pub.count_and_get
735: (p_count => x_msg_count
736: ,p_data => x_msg_data);
737: WHEN FND_API.G_EXC_ERROR THEN

Line 737: WHEN FND_API.G_EXC_ERROR THEN

733: x_return_status := FND_API.G_RET_STS_ERROR;
734: fnd_msg_pub.count_and_get
735: (p_count => x_msg_count
736: ,p_data => x_msg_data);
737: WHEN FND_API.G_EXC_ERROR THEN
738: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
739: P_API_NAME => L_API_NAME
740: ,P_PKG_NAME => G_PKG_NAME
741: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 746: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

742: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
743: ,X_MSG_COUNT => X_MSG_COUNT
744: ,X_MSG_DATA => X_MSG_DATA
745: ,X_RETURN_STATUS => X_RETURN_STATUS);
746: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
747: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
748: P_API_NAME => L_API_NAME
749: ,P_PKG_NAME => G_PKG_NAME
750: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 764: x_return_status := FND_API.G_RET_STS_ERROR;

760: FND_MSG_PUB.ADD;
761: fnd_msg_pub.count_and_get
762: (p_count => x_msg_count
763: ,p_data => x_msg_data);
764: x_return_status := FND_API.G_RET_STS_ERROR;
765: END;
766:
767: FUNCTION GET_ORGANIZATION_NAME
768: (P_dest_organization_id NUMBER

Line 815: x_return_status := FND_API.G_RET_STS_SUCCESS;

811:
812: l_api_name VARCHAR2(60) := 'CSP_REPAIR_PO_GRP.GET_ITEM_DETAILS';
813:
814: BEGIN
815: x_return_status := FND_API.G_RET_STS_SUCCESS;
816: OPEN item_cur(P_organization_id,P_inventory_item_id);
817: LOOP
818: FETCH item_cur INTO x_item_number,x_item_description,x_primary_uom_code;
819: EXIT WHEN item_cur%NOTFOUND;

Line 832: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

828: FND_MSG_PUB.ADD;
829: fnd_msg_pub.count_and_get
830: (p_count => x_msg_count
831: ,p_data => x_msg_data);
832: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
833: return;
834: END;
835:
836: