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 483: x_return_status := FND_API.G_RET_STS_SUCCESS ;

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

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

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

Line 505: x_return_status := FND_API.G_RET_STS_SUCCESS ;

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

Line 520: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 528: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

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

Line 937: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

933: dbms_output.put_line( sql%rowcount || ' rows inserted');
934: EXCEPTION
935: WHEN OTHERS THEN
936: dbms_output.put_line ('Error updating batch requirements');
937: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
938: RAISE;
939: END;
940: END LOOP;
941:

Line 946: x_return_status := FND_API.G_RET_STS_SUCCESS ;

942: IF g_debug <= gme_debug.g_log_statement THEN
943: gme_debug.put_line ('Done updating the derived cost alloc and required doc qty ...');
944: END IF;
945:
946: x_return_status := FND_API.G_RET_STS_SUCCESS ;
947:
948: IF g_debug <= gme_debug.g_log_procedure THEN
949: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
950: END IF;

Line 959: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

955: FND_MESSAGE.SET_NAME('GMI','GMF_SQL_ERROR');
956: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
957: FND_MESSAGE.SET_TOKEN('ERRM',SQLERRM);
958: FND_MSG_PUB.Add;
959: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
960: End Create_Temp_Batch_Requirements;
961:
962:
963: /*

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

998: --+==========================================================================+
999: */
1000: PROCEDURE Create_VIB_Details
1001: ( p_api_version IN NUMBER,
1002: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1003: p_tran_rec IN GMF_LAYERS.trans_rec_type,
1004: p_layer_rec IN gmf_incoming_material_layers%ROWTYPE,
1005: x_return_status OUT NOCOPY VARCHAR2,
1006: x_msg_count OUT NOCOPY NUMBER,

Line 1163: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1159:
1160: l_api_name VARCHAR2(30) := 'Create_VIB_Details';
1161:
1162: BEGIN
1163: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1164:
1165: IF g_debug <= gme_debug.g_log_procedure THEN
1166: gme_debug.put_line ('Entering api ' || g_pkg_name || '.' || l_api_name);
1167: END IF;

Line 1177: x_return_status := FND_API.G_RET_STS_ERROR ;

1173: WHERE
1174: prod_layer_id = p_layer_rec.layer_id;
1175:
1176: IF l_count > 0 THEN
1177: x_return_status := FND_API.G_RET_STS_ERROR ;
1178: x_msg_data := 'VIB Details already exist';
1179: dbms_output.put_line ('VIB Details already exist');
1180: FND_MESSAGE.SET_NAME('GMF', 'GMF_BATCH_VIB_EXIST');
1181: FND_MSG_PUB.Add;

Line 1808: x_return_status := FND_API.G_RET_STS_SUCCESS;

1804: NULL;
1805: END;
1806: END LOOP; -- c_batch_req
1807:
1808: x_return_status := FND_API.G_RET_STS_SUCCESS;
1809:
1810: IF g_debug <= gme_debug.g_log_procedure THEN
1811: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
1812: END IF;

Line 1821: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1817: FND_MESSAGE.SET_NAME('GMI','GMF_SQL_ERROR');
1818: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
1819: FND_MESSAGE.SET_TOKEN('ERRM',SQLERRM);
1820: FND_MSG_PUB.Add;
1821: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1822: END;
1823:
1824: /*
1825: --+==========================================================================+

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

1854: --+==========================================================================+
1855: */
1856: PROCEDURE Finalize_VIB_Details
1857: ( p_api_version IN NUMBER,
1858: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1859: p_batch_id IN NUMBER,
1860: x_return_status OUT NOCOPY VARCHAR2,
1861: x_msg_count OUT NOCOPY NUMBER,
1862: x_msg_data OUT NOCOPY VARCHAR2) IS

Line 1975: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1971:
1972: l_prev_prod_layer_id NUMBER;
1973:
1974: BEGIN
1975: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1976:
1977: IF g_debug <= gme_debug.g_log_procedure THEN
1978: gme_debug.put_line ('Entering api ' || g_pkg_name || '.' || l_api_name);
1979: END IF;

Line 1989: x_return_status := FND_API.G_RET_STS_ERROR ;

1985: FROM gme_batch_header
1986: WHERE batch_id = p_batch_id;
1987:
1988: IF l_batch_status <> 4 THEN
1989: x_return_status := FND_API.G_RET_STS_ERROR ;
1990: --dbms_output.put_line ('Batch is not in CLOSE Status');
1991: FND_MESSAGE.SET_NAME('GMF', 'GMF_BATCH_NOT_CLOSE');
1992: FND_MSG_PUB.Add;
1993: RETURN;

Line 1997: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1993: RETURN;
1994: END IF;
1995: EXCEPTION
1996: WHEN OTHERS THEN
1997: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1998: FND_MESSAGE.SET_NAME('GMF', 'G_RET_STS_UNEXP_ERROR');
1999: FND_MSG_PUB.Add;
2000: RAISE;
2001: END;

Line 2015: x_return_status := FND_API.G_RET_STS_ERROR ;

2011: r.requirement_id = v.requirement_id and
2012: v.finalize_ind = 1;
2013:
2014: IF l_count > 0 THEN
2015: x_return_status := FND_API.G_RET_STS_ERROR ;
2016: --dbms_output.put_line ('VIB details already exist for this batch');
2017: FND_MESSAGE.SET_NAME('GMF', 'GMF_BATCH_FINAL_VIB_EXIST');
2018: FND_MSG_PUB.Add;
2019: RETURN;

Line 2023: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2019: RETURN;
2020: END IF;
2021: EXCEPTION
2022: WHEN OTHERS THEN
2023: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2024: FND_MESSAGE.SET_NAME('GMF', 'G_RET_STS_UNEXP_ERROR');
2025: FND_MSG_PUB.Add;
2026: RAISE;
2027: END;

Line 2555: x_return_status := FND_API.G_RET_STS_SUCCESS;

2551: END IF;
2552: END;
2553: END LOOP;
2554:
2555: x_return_status := FND_API.G_RET_STS_SUCCESS;
2556:
2557: IF g_debug <= gme_debug.g_log_procedure THEN
2558: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
2559: END IF;

Line 2568: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2564: FND_MESSAGE.SET_NAME('GMI','GMF_SQL_ERROR');
2565: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
2566: FND_MESSAGE.SET_TOKEN('ERRM',SQLERRM);
2567: FND_MSG_PUB.Add;
2568: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2569: END;
2570:
2571: /*
2572: --+==========================================================================+

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

2595: --+==========================================================================+
2596: */
2597: PROCEDURE Revert_Finalization
2598: ( p_api_version IN NUMBER,
2599: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2600: p_batch_id IN NUMBER,
2601: x_return_status OUT NOCOPY VARCHAR2,
2602: x_msg_count OUT NOCOPY NUMBER,
2603: x_msg_data OUT NOCOPY VARCHAR2) IS

Line 2635: x_return_status := FND_API.G_RET_STS_SUCCESS ;

2631: l_batch_status PLS_INTEGER;
2632: l_api_name VARCHAR2(30) := 'Revert_Finalization';
2633: BEGIN
2634:
2635: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2636:
2637: IF g_debug <= gme_debug.g_log_procedure THEN
2638: gme_debug.put_line ('Entering api ' || g_pkg_name || '.' || l_api_name);
2639: END IF;

Line 2649: x_return_status := FND_API.G_RET_STS_ERROR ;

2645: FROM gme_batch_header
2646: WHERE batch_id = p_batch_id;
2647:
2648: IF l_batch_status = 4 THEN
2649: x_return_status := FND_API.G_RET_STS_ERROR ;
2650: --dbms_output.put_line ('Cannot revert finalization of a closed batch ');
2651: FND_MESSAGE.SET_NAME('GMF', 'GMF_BATCH_CLOSED');
2652: FND_MSG_PUB.Add;
2653: RETURN;

Line 2669: x_return_status := FND_API.G_RET_STS_ERROR ;

2665: p_parameters => p_batch_id,
2666: p_message => l_posted_count||' Posted events exist. Batch Can not be Reopened.',
2667: p_error_type => 'E');
2668:
2669: x_return_status := FND_API.G_RET_STS_ERROR ;
2670: FND_MESSAGE.SET_NAME('GMF', 'GMF_BATCH_CLOSED');
2671: FND_MSG_PUB.Add;
2672: RETURN;
2673: END IF;

Line 2678: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2674:
2675:
2676: EXCEPTION
2677: WHEN OTHERS THEN
2678: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2679: FND_MESSAGE.SET_NAME('GMF', 'G_RET_STS_UNEXP_ERROR');
2680: FND_MSG_PUB.Add;
2681: RAISE;
2682: END;

Line 2824: x_return_status := FND_API.G_RET_STS_SUCCESS;

2820:
2821: END;
2822: END LOOP;
2823:
2824: x_return_status := FND_API.G_RET_STS_SUCCESS;
2825:
2826: IF g_debug <= gme_debug.g_log_procedure THEN
2827: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
2828: END IF;

Line 2837: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2833: FND_MESSAGE.SET_NAME('GMI','GMF_SQL_ERROR');
2834: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
2835: FND_MESSAGE.SET_TOKEN('ERRM',SQLERRM);
2836: FND_MSG_PUB.Add;
2837: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2838: END;
2839:
2840: /*
2841: PROCEDURE allocate_ingredients

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

2889: l_trans_rec ic_tran_pnd%ROWTYPE;
2890:
2891: BEGIN
2892:
2893: x_return_status := FND_API.G_RET_STS_SUCCESS ; --xxxremove
2894:
2895: SELECT hdr.co_code, dtl.start_date, dtl.end_date
2896: INTO l_co_code, l_start_date, l_end_date
2897: FROM cm_acpr_ctl acpr, cm_cldr_dtl dtl, cm_cldr_hdr hdr

Line 2927: FND_API.G_TRUE,

2923:
2924: -- Now generate the VIB details for this product transaction.
2925: GMF_VIB.Create_VIB_Details (
2926: 1.0,
2927: FND_API.G_TRUE,
2928: l_trans_rec,
2929: l_layer_rec,
2930: x_return_status,
2931: x_msg_count,