DBA Data[Home] [Help]

APPS.GMF_VIB dependencies on FND_API

Line 66: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

62: --+==========================================================================+
63: */
64: PROCEDURE Create_Batch_Requirements
65: ( p_api_version IN NUMBER,
66: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
67: p_batch_id IN NUMBER,
68: x_return_status OUT NOCOPY VARCHAR2,
69: x_msg_count OUT NOCOPY NUMBER,
70: x_msg_data OUT NOCOPY VARCHAR2) IS

Line 75: x_return_status := FND_API.G_RET_STS_SUCCESS ;

71:
72: l_count PLS_INTEGER;
73: l_api_name VARCHAR2(30) := 'Create_Batch_Requirements';
74: BEGIN
75: x_return_status := FND_API.G_RET_STS_SUCCESS ;
76:
77: IF g_debug <= gme_debug.g_log_procedure THEN
78: gme_debug.put_line ('Entering api ' || g_pkg_name || '.' || l_api_name);
79: END IF;

Line 92: x_return_status := FND_API.G_RET_STS_SUCCESS;

88: delete_mark = 0;
89:
90: IF l_count > 0 THEN
91: dbms_output.put_line ('Batch requirement already exist for the batch');
92: x_return_status := FND_API.G_RET_STS_SUCCESS;
93: FND_MESSAGE.SET_NAME('GMF', 'GMF_BATCH_REQ_EXISTS');
94: FND_MSG_PUB.Add;
95: RETURN;
96: END IF;

Line 116: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN

112: gme_debug.put_line ('after Create_Temp_Batch_Requirements status/msg: ' || x_return_status ||'/'||x_msg_data);
113: END IF;
114:
115:
116: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
117:
118: -- Copy the temp table to the actual table
119: IF g_debug <= gme_debug.g_log_statement THEN
120: gme_debug.put_line ('inserting into req table from gtmp table');

Line 182: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

178: FND_MESSAGE.SET_NAME('GMI','GMF_SQL_ERROR');
179: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
180: FND_MESSAGE.SET_TOKEN('ERRM',SQLERRM);
181: FND_MSG_PUB.Add;
182: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
183: END Create_Batch_Requirements;
184:
185: /*
186: --+==========================================================================+

Line 209: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

205: --+==========================================================================+
206: */
207: PROCEDURE Update_Batch_Requirements
208: ( p_api_version IN NUMBER,
209: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
210: p_batch_id IN NUMBER,
211: x_return_status OUT NOCOPY VARCHAR2,
212: x_msg_count OUT NOCOPY NUMBER,
213: x_msg_data OUT NOCOPY VARCHAR2) IS

Line 219: x_return_status := FND_API.G_RET_STS_SUCCESS ;

215: l_count PLS_INTEGER;
216: l_api_name VARCHAR2(30) := 'Update_Batch_Requirements';
217: BEGIN
218:
219: x_return_status := FND_API.G_RET_STS_SUCCESS ;
220:
221: IF g_debug <= gme_debug.g_log_procedure THEN
222: gme_debug.put_line ('Entering api ' || g_pkg_name || '.' || l_api_name);
223: END IF;

Line 241: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN

237: IF g_debug <= gme_debug.g_log_procedure THEN
238: gme_debug.put_line ('after Create_Temp_Batch_Requirements status/msg: ' || x_return_status ||'/'||x_msg_data);
239: END IF;
240:
241: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
242:
243: UPDATE gmf_batch_requirements
244: SET delete_mark = 1
245: WHERE

Line 311: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

307: FND_MESSAGE.SET_NAME('GMI','GMF_SQL_ERROR');
308: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
309: FND_MESSAGE.SET_TOKEN('ERRM',SQLERRM);
310: FND_MSG_PUB.Add;
311: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
312: END Update_Batch_Requirements;
313:
314: /*
315: --+==========================================================================+

Line 338: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

334: --+==========================================================================+
335: */
336: PROCEDURE Delete_Batch_Requirements
337: ( p_api_version IN NUMBER,
338: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
339: p_batch_id IN NUMBER,
340: x_return_status OUT NOCOPY VARCHAR2,
341: x_msg_count OUT NOCOPY NUMBER,
342: x_msg_data OUT NOCOPY VARCHAR2) IS

Line 347: x_return_status := FND_API.G_RET_STS_SUCCESS ;

343:
344: l_batch_status gme_batch_header.batch_status%TYPE;
345: l_api_name VARCHAR2(30) := 'Delete_Batch_Requirements';
346: BEGIN
347: x_return_status := FND_API.G_RET_STS_SUCCESS ;
348:
349: IF g_debug <= gme_debug.g_log_procedure THEN
350: gme_debug.put_line ('Entering api ' || g_pkg_name || '.' || l_api_name);
351: END IF;

Line 361: x_return_status := FND_API.G_RET_STS_ERROR ;

357: FROM gme_batch_header
358: WHERE batch_id = p_batch_id;
359:
360: IF l_batch_status <> 1 THEN
361: x_return_status := FND_API.G_RET_STS_ERROR ;
362: dbms_output.put_line ('Batch is not in PENDING Status');
363: FND_MESSAGE.SET_NAME('GMF', 'GMF_BATCH_NOT_PENDING');
364: FND_MSG_PUB.Add;
365: RETURN;

Line 369: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

365: RETURN;
366: END IF;
367: EXCEPTION
368: WHEN OTHERS THEN
369: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
370: FND_MESSAGE.SET_NAME('GMF', 'G_RET_STS_UNEXP_ERROR');
371: FND_MSG_PUB.Add;
372: RAISE;
373: END;

Line 389: x_return_status := FND_API.G_RET_STS_SUCCESS;

385: IF g_debug <= gme_debug.g_log_statement THEN
386: gme_debug.put_line (sql%ROWCOUNT || ' rows deleted');
387: END IF;
388:
389: x_return_status := FND_API.G_RET_STS_SUCCESS;
390:
391: IF g_debug <= gme_debug.g_log_procedure THEN
392: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
393: END IF;

Line 402: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

398: FND_MESSAGE.SET_NAME('GMI','GMF_SQL_ERROR');
399: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
400: FND_MESSAGE.SET_TOKEN('ERRM',SQLERRM);
401: FND_MSG_PUB.Add;
402: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
403: END;
404:
405: /*
406: --+==========================================================================+

Line 440: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

436: --+==========================================================================+
437: */
438: PROCEDURE Create_Temp_Batch_Requirements
439: ( p_api_version IN NUMBER,
440: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
441: p_batch_id IN NUMBER,
442: x_return_status OUT NOCOPY VARCHAR2,
443: x_msg_count OUT NOCOPY NUMBER,
444: x_msg_data OUT NOCOPY VARCHAR2) IS

Line 482: x_return_status := FND_API.G_RET_STS_SUCCESS ;

478: l_use_item_step_dep VARCHAR2(30);
479: l_vib_profile_value VARCHAR2(30);
480: l_api_name VARCHAR2(30) := 'Create_Temp_Batch_Requirements';
481: BEGIN
482: x_return_status := FND_API.G_RET_STS_SUCCESS ;
483:
484: IF g_debug <= gme_debug.g_log_procedure THEN
485: gme_debug.put_line ('Entering api ' || g_pkg_name || '.' || l_api_name);
486: END IF;

Line 499: -- x_return_status := FND_API.G_RET_STS_ERROR ;

495: /* Bug 5491419. Added status 4.
496: IF l_batch_status not in (2, 3) THEN
497: */
498: IF l_batch_status not in (2, 3, 4) THEN
499: -- x_return_status := FND_API.G_RET_STS_ERROR ;
500: dbms_output.put_line ('Batch is not in WIP/Cert/Close Status');
501: -- FND_MESSAGE.SET_NAME('GMF', 'GMF_BATCH_NOT_WIP');
502: -- FND_MSG_PUB.Add;
503: x_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 503: x_return_status := FND_API.G_RET_STS_SUCCESS ;

499: -- x_return_status := FND_API.G_RET_STS_ERROR ;
500: dbms_output.put_line ('Batch is not in WIP/Cert/Close Status');
501: -- FND_MESSAGE.SET_NAME('GMF', 'GMF_BATCH_NOT_WIP');
502: -- FND_MSG_PUB.Add;
503: x_return_status := FND_API.G_RET_STS_SUCCESS ;
504: RETURN;
505: END IF;
506:
507: /* Bug 6125370 - Start: Validate product lines*/

Line 518: x_return_status := FND_API.G_RET_STS_ERROR;

514: decode(m.plan_qty, 0, m.wip_plan_qty, m.plan_qty) <> 0 AND
515: nvl(m.cost_alloc,0) <> 0;
516:
517: IF l_count = 0 THEN
518: x_return_status := FND_API.G_RET_STS_ERROR;
519: FND_MESSAGE.SET_NAME('GMF', 'GMF_INVALID_BATCH');
520: FND_MSG_PUB.Add;
521: RETURN;
522: END IF;

Line 526: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

522: END IF;
523: /* Bug 6125370 - End */
524: EXCEPTION
525: WHEN OTHERS THEN
526: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
527: dbms_output.put_line ('Invalid Batch ID');
528: FND_MESSAGE.SET_NAME('GMF', 'G_RET_STS_UNEXP_ERROR');
529: FND_MSG_PUB.Add;
530: RAISE;

Line 922: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

918: dbms_output.put_line( sql%rowcount || ' rows inserted');
919: EXCEPTION
920: WHEN OTHERS THEN
921: dbms_output.put_line ('Error updating batch requirements');
922: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
923: RAISE;
924: END;
925: END LOOP;
926:

Line 931: x_return_status := FND_API.G_RET_STS_SUCCESS ;

927: IF g_debug <= gme_debug.g_log_statement THEN
928: gme_debug.put_line ('Done updating the derived cost alloc and required doc qty ...');
929: END IF;
930:
931: x_return_status := FND_API.G_RET_STS_SUCCESS ;
932:
933: IF g_debug <= gme_debug.g_log_procedure THEN
934: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
935: END IF;

Line 944: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

940: FND_MESSAGE.SET_NAME('GMI','GMF_SQL_ERROR');
941: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
942: FND_MESSAGE.SET_TOKEN('ERRM',SQLERRM);
943: FND_MSG_PUB.Add;
944: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
945: End Create_Temp_Batch_Requirements;
946:
947:
948: /*

Line 987: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

983: --+==========================================================================+
984: */
985: PROCEDURE Create_VIB_Details
986: ( p_api_version IN NUMBER,
987: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
988: p_tran_rec IN GMF_LAYERS.trans_rec_type,
989: p_layer_rec IN gmf_incoming_material_layers%ROWTYPE,
990: x_return_status OUT NOCOPY VARCHAR2,
991: x_msg_count OUT NOCOPY NUMBER,

Line 1126: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1122:
1123: l_api_name VARCHAR2(30) := 'Create_VIB_Details';
1124:
1125: BEGIN
1126: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1127:
1128: IF g_debug <= gme_debug.g_log_procedure THEN
1129: gme_debug.put_line ('Entering api ' || g_pkg_name || '.' || l_api_name);
1130: END IF;

Line 1140: x_return_status := FND_API.G_RET_STS_ERROR ;

1136: WHERE
1137: prod_layer_id = p_layer_rec.layer_id;
1138:
1139: IF l_count > 0 THEN
1140: x_return_status := FND_API.G_RET_STS_ERROR ;
1141: x_msg_data := 'VIB Details already exist';
1142: dbms_output.put_line ('VIB Details already exist');
1143: FND_MESSAGE.SET_NAME('GMF', 'GMF_BATCH_VIB_EXIST');
1144: FND_MSG_PUB.Add;

Line 1748: x_return_status := FND_API.G_RET_STS_SUCCESS;

1744: NULL;
1745: END;
1746: END LOOP; -- c_batch_req
1747:
1748: x_return_status := FND_API.G_RET_STS_SUCCESS;
1749:
1750: IF g_debug <= gme_debug.g_log_procedure THEN
1751: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
1752: END IF;

Line 1761: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1757: FND_MESSAGE.SET_NAME('GMI','GMF_SQL_ERROR');
1758: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
1759: FND_MESSAGE.SET_TOKEN('ERRM',SQLERRM);
1760: FND_MSG_PUB.Add;
1761: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1762: END;
1763:
1764: /*
1765: --+==========================================================================+

Line 1798: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1794: --+==========================================================================+
1795: */
1796: PROCEDURE Finalize_VIB_Details
1797: ( p_api_version IN NUMBER,
1798: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1799: p_batch_id IN NUMBER,
1800: x_return_status OUT NOCOPY VARCHAR2,
1801: x_msg_count OUT NOCOPY NUMBER,
1802: x_msg_data OUT NOCOPY VARCHAR2) IS

Line 1912: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1908:
1909: l_prev_prod_layer_id NUMBER;
1910:
1911: BEGIN
1912: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1913:
1914: IF g_debug <= gme_debug.g_log_procedure THEN
1915: gme_debug.put_line ('Entering api ' || g_pkg_name || '.' || l_api_name);
1916: END IF;

Line 1926: x_return_status := FND_API.G_RET_STS_ERROR ;

1922: FROM gme_batch_header
1923: WHERE batch_id = p_batch_id;
1924:
1925: IF l_batch_status <> 4 THEN
1926: x_return_status := FND_API.G_RET_STS_ERROR ;
1927: --dbms_output.put_line ('Batch is not in CLOSE Status');
1928: FND_MESSAGE.SET_NAME('GMF', 'GMF_BATCH_NOT_CLOSE');
1929: FND_MSG_PUB.Add;
1930: RETURN;

Line 1934: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1930: RETURN;
1931: END IF;
1932: EXCEPTION
1933: WHEN OTHERS THEN
1934: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1935: FND_MESSAGE.SET_NAME('GMF', 'G_RET_STS_UNEXP_ERROR');
1936: FND_MSG_PUB.Add;
1937: RAISE;
1938: END;

Line 1952: x_return_status := FND_API.G_RET_STS_ERROR ;

1948: r.requirement_id = v.requirement_id and
1949: v.finalize_ind = 1;
1950:
1951: IF l_count > 0 THEN
1952: x_return_status := FND_API.G_RET_STS_ERROR ;
1953: --dbms_output.put_line ('VIB details already exist for this batch');
1954: FND_MESSAGE.SET_NAME('GMF', 'GMF_BATCH_FINAL_VIB_EXIST');
1955: FND_MSG_PUB.Add;
1956: RETURN;

Line 1960: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1956: RETURN;
1957: END IF;
1958: EXCEPTION
1959: WHEN OTHERS THEN
1960: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1961: FND_MESSAGE.SET_NAME('GMF', 'G_RET_STS_UNEXP_ERROR');
1962: FND_MSG_PUB.Add;
1963: RAISE;
1964: END;

Line 2492: x_return_status := FND_API.G_RET_STS_SUCCESS;

2488: END IF;
2489: END;
2490: END LOOP;
2491:
2492: x_return_status := FND_API.G_RET_STS_SUCCESS;
2493:
2494: IF g_debug <= gme_debug.g_log_procedure THEN
2495: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
2496: END IF;

Line 2505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2501: FND_MESSAGE.SET_NAME('GMI','GMF_SQL_ERROR');
2502: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
2503: FND_MESSAGE.SET_TOKEN('ERRM',SQLERRM);
2504: FND_MSG_PUB.Add;
2505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2506: END;
2507:
2508: /*
2509: --+==========================================================================+

Line 2532: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

2528: --+==========================================================================+
2529: */
2530: PROCEDURE Revert_Finalization
2531: ( p_api_version IN NUMBER,
2532: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2533: p_batch_id IN NUMBER,
2534: x_return_status OUT NOCOPY VARCHAR2,
2535: x_msg_count OUT NOCOPY NUMBER,
2536: x_msg_data OUT NOCOPY VARCHAR2) IS

Line 2551: x_return_status := FND_API.G_RET_STS_SUCCESS ;

2547: l_batch_status PLS_INTEGER;
2548: l_api_name VARCHAR2(30) := 'Revert_Finalization';
2549: BEGIN
2550:
2551: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2552:
2553: IF g_debug <= gme_debug.g_log_procedure THEN
2554: gme_debug.put_line ('Entering api ' || g_pkg_name || '.' || l_api_name);
2555: END IF;

Line 2565: x_return_status := FND_API.G_RET_STS_ERROR ;

2561: FROM gme_batch_header
2562: WHERE batch_id = p_batch_id;
2563:
2564: IF l_batch_status = 4 THEN
2565: x_return_status := FND_API.G_RET_STS_ERROR ;
2566: --dbms_output.put_line ('Cannot revert finalization of a closed batch ');
2567: FND_MESSAGE.SET_NAME('GMF', 'GMF_BATCH_CLOSED');
2568: FND_MSG_PUB.Add;
2569: RETURN;

Line 2573: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2569: RETURN;
2570: END IF;
2571: EXCEPTION
2572: WHEN OTHERS THEN
2573: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2574: FND_MESSAGE.SET_NAME('GMF', 'G_RET_STS_UNEXP_ERROR');
2575: FND_MSG_PUB.Add;
2576: RAISE;
2577: END;

Line 2649: x_return_status := FND_API.G_RET_STS_SUCCESS;

2645:
2646: END;
2647: END LOOP;
2648:
2649: x_return_status := FND_API.G_RET_STS_SUCCESS;
2650:
2651: IF g_debug <= gme_debug.g_log_procedure THEN
2652: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
2653: END IF;

Line 2662: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2658: FND_MESSAGE.SET_NAME('GMI','GMF_SQL_ERROR');
2659: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
2660: FND_MESSAGE.SET_TOKEN('ERRM',SQLERRM);
2661: FND_MSG_PUB.Add;
2662: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2663: END;
2664:
2665: /*
2666: PROCEDURE allocate_ingredients

Line 2718: x_return_status := FND_API.G_RET_STS_SUCCESS ; --xxxremove

2714: l_trans_rec ic_tran_pnd%ROWTYPE;
2715:
2716: BEGIN
2717:
2718: x_return_status := FND_API.G_RET_STS_SUCCESS ; --xxxremove
2719:
2720: SELECT hdr.co_code, dtl.start_date, dtl.end_date
2721: INTO l_co_code, l_start_date, l_end_date
2722: FROM cm_acpr_ctl acpr, cm_cldr_dtl dtl, cm_cldr_hdr hdr

Line 2752: FND_API.G_TRUE,

2748:
2749: -- Now generate the VIB details for this product transaction.
2750: GMF_VIB.Create_VIB_Details (
2751: 1.0,
2752: FND_API.G_TRUE,
2753: l_trans_rec,
2754: l_layer_rec,
2755: x_return_status,
2756: x_msg_count,