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 27: ,P_Shipping_method IN varchar2 DEFAULT FND_API.G_MISS_CHAR

23: ,P_repair_to_item_id IN NUMBER
24: ,P_quantity IN NUMBER
25: ,P_need_by_date IN DATE
26: ,P_defective_parts_tbl IN CSP_REPAIR_PO_GRP.defective_parts_tbl_Type
27: ,P_Shipping_method IN varchar2 DEFAULT FND_API.G_MISS_CHAR
28: ,x_requisition_header_id OUT NOCOPY NUMBER
29: ,x_return_status OUT NOCOPY VARCHAR2
30: ,x_msg_count OUT NOCOPY NUMBER
31: ,x_msg_data OUT NOCOPY VARCHAR2

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

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

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

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

Line 99: IF fnd_api.to_boolean(P_Init_Msg_List) THEN

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

Line 104: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

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

Line 108: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

Line 112: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

Line 151: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

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

Line 169: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

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

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

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

Line 187: Elsif l_return_status = FND_API.G_RET_STS_SUCCESS THEN

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

Line 355: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

351: ,x_return_status
352: ,x_msg_data
353: ,x_msg_count
354: );
355: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
356: FND_MESSAGE.SET_NAME ('CSP','CSP_NO_REPAIRITEM_AT_REPAIRORG');
357: FND_MESSAGE.SET_TOKEN ('REPAIR_SUPPLIER_ORG_NAME', L_REPAIR_ORGANIZATION_NAME,TRUE);
358: FND_MSG_PUB.ADD;
359: RAISE EXCP_USER_DEFINED;

Line 399: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

395: ,x_return_status
396: ,x_msg_data
397: ,x_msg_count
398: );
399: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
400: FND_MESSAGE.SET_NAME ('CSP','CSP_NO_REPAIRITEM_AT_DESTORG');
401: FND_MESSAGE.SET_TOKEN ('DEST_ORG_NAME', L_DEST_ORGANIZATION_NAME,TRUE);
402: FND_MSG_PUB.ADD;
403: RAISE EXCP_USER_DEFINED;

Line 421: if (p_shipping_method is null) or (p_shipping_method = fnd_api.g_miss_char) then

417: RAISE EXCP_USER_DEFINED;
418: End;
419: End if;
420: -------- No shipping network between Org's with Default shipping method assigned ---------
421: if (p_shipping_method is null) or (p_shipping_method = fnd_api.g_miss_char) then
422: Begin
423: SELECT SHIP_METHOD
424: INTO l_shipping_method_code
425: FROM MTL_INTERORG_SHIP_METHODS

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

606: ,x_msg_count => l_msg_count
607: ,x_msg_data => l_msg_data
608: );
609:
610: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
611: RAISE FND_API.G_EXC_ERROR;
612: End if;
613:
614: /* Out values from the header record (l_header_rec) of PO Requisition Call */

Line 611: RAISE FND_API.G_EXC_ERROR;

607: ,x_msg_data => l_msg_data
608: );
609:
610: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
611: RAISE FND_API.G_EXC_ERROR;
612: End if;
613:
614: /* Out values from the header record (l_header_rec) of PO Requisition Call */
615:

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

723: --P_need_by_date -------- Same as the need by date of Repair to item
724: );
725: END LOOP;
726: /*
727: IF (p_commit = FND_API.G_TRUE) THEN
728: COMMIT;
729: END IF;
730: */
731:

Line 732: IF FND_API.to_Boolean( p_commit ) THEN

728: COMMIT;
729: END IF;
730: */
731:
732: IF FND_API.to_Boolean( p_commit ) THEN
733: COMMIT WORK;
734: END IF;
735:
736:

Line 740: x_return_status := FND_API.G_RET_STS_ERROR;

736:
737: EXCEPTION
738: WHEN EXCP_USER_DEFINED THEN
739: Rollback to CREATE_REPAIR_PO_PUB;
740: x_return_status := FND_API.G_RET_STS_ERROR;
741: fnd_msg_pub.count_and_get
742: (p_count => x_msg_count
743: ,p_data => x_msg_data);
744: WHEN FND_API.G_EXC_ERROR THEN

Line 744: WHEN FND_API.G_EXC_ERROR THEN

740: x_return_status := FND_API.G_RET_STS_ERROR;
741: fnd_msg_pub.count_and_get
742: (p_count => x_msg_count
743: ,p_data => x_msg_data);
744: WHEN FND_API.G_EXC_ERROR THEN
745: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
746: P_API_NAME => L_API_NAME
747: ,P_PKG_NAME => G_PKG_NAME
748: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 753: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

749: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
750: ,X_MSG_COUNT => X_MSG_COUNT
751: ,X_MSG_DATA => X_MSG_DATA
752: ,X_RETURN_STATUS => X_RETURN_STATUS);
753: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
754: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
755: P_API_NAME => L_API_NAME
756: ,P_PKG_NAME => G_PKG_NAME
757: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 771: x_return_status := FND_API.G_RET_STS_ERROR;

767: FND_MSG_PUB.ADD;
768: fnd_msg_pub.count_and_get
769: (p_count => x_msg_count
770: ,p_data => x_msg_data);
771: x_return_status := FND_API.G_RET_STS_ERROR;
772: END;
773:
774: FUNCTION GET_ORGANIZATION_NAME
775: (P_dest_organization_id NUMBER

Line 822: x_return_status := FND_API.G_RET_STS_SUCCESS;

818:
819: l_api_name VARCHAR2(60) := 'CSP_REPAIR_PO_GRP.GET_ITEM_DETAILS';
820:
821: BEGIN
822: x_return_status := FND_API.G_RET_STS_SUCCESS;
823: OPEN item_cur(P_organization_id,P_inventory_item_id);
824: LOOP
825: FETCH item_cur INTO x_item_number,x_item_description,x_primary_uom_code;
826: EXIT WHEN item_cur%NOTFOUND;

Line 830: x_return_status := FND_API.G_RET_STS_ERROR;

826: EXIT WHEN item_cur%NOTFOUND;
827: END LOOP;
828: CLOSE item_cur;
829: IF x_item_number is NULL then
830: x_return_status := FND_API.G_RET_STS_ERROR;
831: END IF;
832: EXCEPTION
833: WHEN OTHERS THEN
834: FND_MESSAGE.SET_NAME('CSP','CSP_UNEXPECTED_EXEC_ERRORS');

Line 841: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

837: FND_MSG_PUB.ADD;
838: fnd_msg_pub.count_and_get
839: (p_count => x_msg_count
840: ,p_data => x_msg_data);
841: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
842: return;
843: END;
844:
845: