DBA Data[Home] [Help]

APPS.FLM_RECEIPT_PUB dependencies on FND_API

Line 137: x_ret_status := FND_API.G_RET_STS_SUCCESS;

133: 'p_quantity = ' || p_quantity);
134: END IF;
135:
136: -- Initialize return status to success
137: x_ret_status := FND_API.G_RET_STS_SUCCESS;
138:
139: -- Validate kanban card
140: OPEN c_kanban_details(p_kanban_card_id);
141: FETCH c_kanban_details INTO l_kanban_details_rec;

Line 146: x_ret_status := FND_API.G_RET_STS_ERROR;

142: CLOSE c_kanban_details;
143:
144: IF l_kanban_details_rec.kanban_card_id IS NULL THEN
145:
146: x_ret_status := FND_API.G_RET_STS_ERROR;
147:
148: fnd_message.set_name('FLM', 'FLM_INVALID_KANBAN');
149: x_err_msg := fnd_message.get;
150:

Line 158: x_ret_status := FND_API.G_RET_STS_ERROR;

154:
155: -- Validate quantity
156: IF p_quantity IS NULL OR p_quantity <= 0 THEN
157:
158: x_ret_status := FND_API.G_RET_STS_ERROR;
159:
160: fnd_message.set_name('FLM', 'FLM_ATTRIBUTE_INVALID');
161: fnd_message.set_token('ATTRIBUTE', 'Receipt Quantity');
162: x_err_msg := x_err_msg || fnd_message.get || FND_CONST.NEWLINE;

Line 170: x_ret_status := FND_API.G_RET_STS_ERROR;

166:
167: -- Validate card status for 'Active'
168: IF l_kanban_details_rec.card_status <> INV_KANBAN_PVT.G_Card_Status_Active THEN
169:
170: x_ret_status := FND_API.G_RET_STS_ERROR;
171:
172: fnd_message.set_name('FLM', 'FLM_INVALID_CARD_STATUS');
173: x_err_msg := x_err_msg || fnd_message.get || FND_CONST.NEWLINE;
174:

Line 180: x_ret_status := FND_API.G_RET_STS_ERROR;

176:
177: -- Validate source type for supplier / inter org
178: IF l_kanban_details_rec.source_type NOT IN (INV_KANBAN_PVT.G_Source_Type_InterOrg, INV_KANBAN_PVT.G_Source_Type_Supplier) THEN
179:
180: x_ret_status := FND_API.G_RET_STS_ERROR;
181:
182: fnd_message.set_name('FLM', 'FLM_RCV_SRC_TYPE_ERR');
183: x_err_msg := x_err_msg || fnd_message.get || FND_CONST.NEWLINE;
184:

Line 190: x_ret_status := FND_API.G_RET_STS_ERROR;

186:
187: -- Validate supply status for In Process
188: IF TRUNC(l_kanban_details_rec.supply_status) <> INV_KANBAN_PVT.G_Supply_Status_InProcess THEN
189:
190: x_ret_status := FND_API.G_RET_STS_ERROR;
191:
192: fnd_message.set_name('FLM', 'FLM_INVALID_KANBAN_STATUS');
193: x_err_msg := x_err_msg || fnd_message.get || FND_CONST.NEWLINE;
194:

Line 206: x_ret_status := FND_API.G_RET_STS_ERROR;

202: CLOSE c_item_details;
203:
204: IF l_item_details_rec.lot_control_code <> 1 OR l_item_details_rec.serial_number_control_code <> 1 THEN
205:
206: x_ret_status := FND_API.G_RET_STS_ERROR;
207:
208: fnd_message.set_name('FLM', 'FLM_EKB_LOT_SERIAL_ERR');
209: x_err_msg := x_err_msg || fnd_message.get || FND_CONST.NEWLINE;
210:

Line 222: x_ret_status := FND_API.G_RET_STS_ERROR;

218: CLOSE c_po_details;
219:
220: IF l_po_details_rec.po_header_id IS NULL THEN
221:
222: x_ret_status := FND_API.G_RET_STS_ERROR;
223:
224: fnd_message.set_name ('FLM', 'FLM_EKB_PO_NOT_EXISTS');
225: x_err_msg := x_err_msg || fnd_message.get || FND_CONST.NEWLINE;
226:

Line 232: x_ret_status := FND_API.G_RET_STS_ERROR;

228:
229: -- Check for Approved PO
230: IF l_po_details_rec.approved_flag <> 'Y' THEN
231:
232: x_ret_status := FND_API.G_RET_STS_ERROR;
233:
234: fnd_message.set_name('FLM', 'FLM_EKB_APPROVED_PO');
235: x_err_msg := x_err_msg || fnd_message.get || FND_CONST.NEWLINE;
236:

Line 254: x_ret_status := FND_API.G_RET_STS_ERROR;

250: CLOSE c_ship_totals;
251:
252: IF l_ship_totals_rec.num_of_ship_lines = 0 THEN
253:
254: x_ret_status := FND_API.G_RET_STS_ERROR;
255:
256: fnd_message.set_name('FLM', 'FLM_EKB_SHIP_NOT_EXISTS');
257: x_err_msg := x_err_msg || fnd_message.get || FND_CONST.NEWLINE;
258:

Line 270: x_ret_status := FND_API.G_RET_STS_ERROR;

266:
267:
268: IF p_quantity > l_receivable_quantity THEN
269:
270: x_ret_status := FND_API.G_RET_STS_ERROR;
271:
272: fnd_message.set_name('FLM', 'FLM_RECEIVE_QTY_ERR');
273: x_err_msg := x_err_msg || fnd_message.get || FND_CONST.NEWLINE;
274:

Line 287: x_ret_status := FND_API.G_RET_STS_UNEXP_ERROR;

283: END IF;
284:
285: EXCEPTION
286: WHEN OTHERS THEN
287: x_ret_status := FND_API.G_RET_STS_UNEXP_ERROR;
288: x_err_msg := SQLERRM;
289:
290: END validate;
291:

Line 371: x_ret_status := FND_API.G_RET_STS_SUCCESS;

367: END IF;
368:
369: IF (l_status = fnd_transaction.E_SUCCESS AND (l_outcome NOT IN ('WARNING', 'ERROR'))) THEN
370:
371: x_ret_status := FND_API.G_RET_STS_SUCCESS;
372:
373: ELSIF (l_status = fnd_transaction.E_TIMEOUT) THEN
374:
375: x_ret_status := FND_API.G_RET_STS_ERROR;

Line 375: x_ret_status := FND_API.G_RET_STS_ERROR;

371: x_ret_status := FND_API.G_RET_STS_SUCCESS;
372:
373: ELSIF (l_status = fnd_transaction.E_TIMEOUT) THEN
374:
375: x_ret_status := FND_API.G_RET_STS_ERROR;
376: x_err_msg := 'RCVTM timeout';
377:
378: l_delete_rows := TRUE;
379:

Line 382: x_ret_status := FND_API.G_RET_STS_ERROR;

378: l_delete_rows := TRUE;
379:
380: ELSIF (l_status = fnd_transaction.E_NOMGR) THEN
381:
382: x_ret_status := FND_API.G_RET_STS_ERROR;
383: x_err_msg := 'RCV Manager not available';
384:
385: l_delete_rows := TRUE;
386:

Line 389: x_ret_status := FND_API.G_RET_STS_ERROR;

385: l_delete_rows := TRUE;
386:
387: ELSIF (l_status = fnd_transaction.E_OTHER OR (l_outcome IN ('WARNING', 'ERROR'))) THEN
388:
389: x_ret_status := FND_API.G_RET_STS_ERROR;
390:
391: l_status := fnd_transaction.get_values
392: ( l_val1, l_val2, l_val3, l_val4, l_val5,
393: l_val6, l_val7, l_val8, l_val9, l_val10,

Line 549: x_ret_status := FND_API.G_RET_STS_SUCCESS;

545: 'p_receipt_quantity = ' || p_receipt_quantity);
546: END IF;
547:
548: -- Initialize return status to success
549: x_ret_status := FND_API.G_RET_STS_SUCCESS;
550:
551:
552: IF FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
553: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

Line 563: x_ret_status := FND_API.G_RET_STS_UNEXP_ERROR;

559: FETCH c_rcv_details INTO l_rcv_details_rec;
560: CLOSE c_rcv_details;
561:
562: IF (l_rcv_details_rec.po_header_id IS NULL) THEN
563: x_ret_status := FND_API.G_RET_STS_UNEXP_ERROR;
564: x_err_msg := 'Receiving details can not be found';
565: RETURN;
566: END IF;
567:

Line 829: IF x_ret_status <> FND_API.G_RET_STS_SUCCESS THEN

825: 'x_ret_status = ' || x_ret_status || ', ' ||
826: 'x_err_msg = ' || x_err_msg);
827: END IF;
828:
829: IF x_ret_status <> FND_API.G_RET_STS_SUCCESS THEN
830: RETURN;
831: END IF;
832:
833:

Line 1016: x_ret_status := FND_API.G_RET_STS_SUCCESS;

1012: 'p_receipt_quantity = ' || p_receipt_quantity);
1013: END IF;
1014:
1015: -- Initialize return status to success
1016: x_ret_status := FND_API.G_RET_STS_SUCCESS;
1017:
1018: -- When there are multiple shipment lines, need to keep track of the
1019: -- remaining receipt quantity to carry over to subsequent shipment lines
1020: l_remaining_quantity := p_receipt_quantity;

Line 1050: x_ret_status := FND_API.G_RET_STS_UNEXP_ERROR;

1046: FETCH c_shipment_header INTO l_ship_header_rec;
1047: CLOSE c_shipment_header;
1048:
1049: IF (l_ship_header_rec.shipment_header_id IS NULL) THEN
1050: x_ret_status := FND_API.G_RET_STS_UNEXP_ERROR;
1051: x_err_msg := 'Shipment header can not be found';
1052: RETURN;
1053: END IF;
1054:

Line 1361: IF x_ret_status <> FND_API.G_RET_STS_SUCCESS THEN

1357: 'x_ret_status = ' || x_ret_status || ', ' ||
1358: 'x_err_msg = ' || x_err_msg);
1359: END IF;
1360:
1361: IF x_ret_status <> FND_API.G_RET_STS_SUCCESS THEN
1362: RETURN;
1363: END IF;
1364:
1365:

Line 1455: IF x_ret_status <> FND_API.G_RET_STS_SUCCESS THEN

1451: 'x_ret_status = ' || x_ret_status || ', ' ||
1452: 'x_err_msg = ' || x_err_msg);
1453: END IF;
1454:
1455: IF x_ret_status <> FND_API.G_RET_STS_SUCCESS THEN
1456: RETURN;
1457: END IF;
1458:
1459: IF p_process_flag = 'Y' THEN

Line 1526: x_ret_status := FND_API.G_RET_STS_UNEXP_ERROR;

1522:
1523: EXCEPTION
1524: WHEN OTHERS THEN
1525: ROLLBACK TO kanban_receive;
1526: x_ret_status := FND_API.G_RET_STS_UNEXP_ERROR;
1527: x_err_msg := SQLERRM;
1528:
1529: END kanban_receive;
1530: