eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.GMD_LINEAR_EVALUATE dependencies on FND_API

Line 46: X_status := FND_API.g_ret_sts_success;

42: X_sum NUMBER;
43: i BINARY_INTEGER;
44: BEGIN
45: /*Initialize return status to success */
46: X_status := FND_API.g_ret_sts_success;
47:
48: IF l_debug = 'Y' THEN
49: gmd_debug.put_line('In Substitute routine: Count:'||P_n);
50: END IF;

Line 57: RAISE FND_API.G_EXC_ERROR;

53: IF l_debug = 'Y' THEN
54: gmd_debug.put_line(' Cannot evaluate as the divisor is zero at i:'||P_n||' j:'||P_n);
55: END IF;
56: GMD_API_GRP.log_message('GMD_NO_SOLUTION');
57: RAISE FND_API.G_EXC_ERROR;
58: END IF;
59: /*P_mx(P_n)(P_n + 1) := ROUND(P_mx(P_n)(P_n+1)/P_mx(P_n)(P_n), 9);*/
60: P_mx(l_col*(P_n-1)+ P_n+1) := ROUND(P_mx(l_col*(P_n-1) + P_n+1)/P_mx(l_col*(P_n-1) + P_n), 9);
61: IF l_debug = 'Y' THEN

Line 84: RAISE FND_API.G_EXC_ERROR;

80: IF l_debug = 'Y' THEN
81: gmd_debug.put_line(' Cannot evaluate as the divisor is zero at i:'||i||' j:'||i);
82: END IF;
83: GMD_API_GRP.log_message('GMD_NO_SOLUTION');
84: RAISE FND_API.G_EXC_ERROR;
85: END IF;
86: P_mx(l_col*(i-1)+ P_n+1) := ROUND((P_mx(l_col*(i-1)+ P_n+1) - X_sum) / P_mx(l_col*(i-1) + i), 9);
87: i := i - 1;
88: END LOOP;

Line 90: WHEN FND_API.G_EXC_ERROR THEN

86: P_mx(l_col*(i-1)+ P_n+1) := ROUND((P_mx(l_col*(i-1)+ P_n+1) - X_sum) / P_mx(l_col*(i-1) + i), 9);
87: i := i - 1;
88: END LOOP;
89: EXCEPTION
90: WHEN FND_API.G_EXC_ERROR THEN
91: IF l_debug = 'Y' THEN
92: gmd_debug.put_line('Error in Substitute');
93: END IF;
94: X_status := FND_API.g_ret_sts_error;

Line 94: X_status := FND_API.g_ret_sts_error;

90: WHEN FND_API.G_EXC_ERROR THEN
91: IF l_debug = 'Y' THEN
92: gmd_debug.put_line('Error in Substitute');
93: END IF;
94: X_status := FND_API.g_ret_sts_error;
95: WHEN OTHERS THEN
96: X_status := FND_API.g_ret_sts_unexp_error;
97: FND_MSG_PUB.Add_Exc_Msg('GMD_LINEAR_EVALUATE', 'SUBSTITUTE');
98: IF l_debug = 'Y' THEN

Line 96: X_status := FND_API.g_ret_sts_unexp_error;

92: gmd_debug.put_line('Error in Substitute');
93: END IF;
94: X_status := FND_API.g_ret_sts_error;
95: WHEN OTHERS THEN
96: X_status := FND_API.g_ret_sts_unexp_error;
97: FND_MSG_PUB.Add_Exc_Msg('GMD_LINEAR_EVALUATE', 'SUBSTITUTE');
98: IF l_debug = 'Y' THEN
99: gmd_debug.put_line('Exception:'||sqlerrm);
100: END IF;

Line 126: X_status := FND_API.g_ret_sts_success;

122: ,X_row OUT NOCOPY Row
123: ,x_status OUT NOCOPY VARCHAR2) IS
124: BEGIN
125: /*Initialize return status to success */
126: X_status := FND_API.g_ret_sts_success;
127:
128: IF l_debug = 'Y' THEN
129: gmd_debug.put_line('In Calc Mags Routine: Count:'||P_count);
130: END IF;

Line 156: X_status := FND_API.g_ret_sts_unexp_error;

152: END LOOP;
153: END IF;
154: EXCEPTION
155: WHEN OTHERS THEN
156: X_status := FND_API.g_ret_sts_unexp_error;
157: FND_MSG_PUB.Add_Exc_Msg('GMD_LINEAR_EVALUATE', 'CALC_MAGS');
158: IF l_debug = 'Y' THEN
159: gmd_debug.put_line('Exception:'||sqlerrm);
160: END IF;

Line 192: X_status := FND_API.g_ret_sts_success;

188: X_single NUMBER;
189: X_current NUMBER;
190: BEGIN
191: /*Initialize return status to success */
192: X_status := FND_API.g_ret_sts_success;
193:
194: IF l_debug = 'Y' THEN
195: gmd_debug.put_line('In Find Max routine : P_j:'||P_j||' n:'||P_n);
196: END IF;

Line 234: X_status := FND_API.g_ret_sts_unexp_error;

230: END LOOP;
231: END IF;
232: EXCEPTION
233: WHEN OTHERS THEN
234: X_status := FND_API.g_ret_sts_unexp_error;
235: FND_MSG_PUB.Add_Exc_Msg('GMD_LINEAR_EVALUATE', 'FIND_MAX');
236: IF l_debug = 'Y' THEN
237: gmd_debug.put_line('Exception:'||sqlerrm);
238: END IF;

Line 270: X_status := FND_API.g_ret_sts_success;

266: X_n NUMBER;
267: X_row NUMBER;
268: BEGIN
269: /*Initialize return status to success */
270: X_status := FND_API.g_ret_sts_success;
271:
272: IF l_debug = 'Y' THEN
273: gmd_debug.put_line('In Gauss_Pivot routine: P_current:'||p_current);
274: END IF;

Line 282: IF X_status <> FND_API.g_ret_sts_success THEN

278: ,P_n => P_n - P_current
279: ,X_result => X_pivot
280: ,X_row => X_row
281: ,X_status => X_status);
282: IF X_status <> FND_API.g_ret_sts_success THEN
283: RAISE FND_API.G_EXC_ERROR;
284: END IF;
285:
286: i:=1;

Line 283: RAISE FND_API.G_EXC_ERROR;

279: ,X_result => X_pivot
280: ,X_row => X_row
281: ,X_status => X_status);
282: IF X_status <> FND_API.g_ret_sts_success THEN
283: RAISE FND_API.G_EXC_ERROR;
284: END IF;
285:
286: i:=1;
287:

Line 303: WHEN FND_API.G_EXC_ERROR THEN

299: P_mx(l_col*(X_row-1) + i) := X_dummy;
300: i := i + 1;
301: END LOOP;
302: EXCEPTION
303: WHEN FND_API.G_EXC_ERROR THEN
304: IF l_debug = 'Y' THEN
305: gmd_debug.put_line('Error in Gauss Pivot');
306: END IF;
307: X_status := FND_API.g_ret_sts_error;

Line 307: X_status := FND_API.g_ret_sts_error;

303: WHEN FND_API.G_EXC_ERROR THEN
304: IF l_debug = 'Y' THEN
305: gmd_debug.put_line('Error in Gauss Pivot');
306: END IF;
307: X_status := FND_API.g_ret_sts_error;
308: WHEN OTHERS THEN
309: X_status := FND_API.g_ret_sts_unexp_error;
310: FND_MSG_PUB.Add_Exc_Msg('GMD_LINEAR_EVALUATE', 'GAUSS_PIVOT');
311: IF l_debug = 'Y' THEN

Line 309: X_status := FND_API.g_ret_sts_unexp_error;

305: gmd_debug.put_line('Error in Gauss Pivot');
306: END IF;
307: X_status := FND_API.g_ret_sts_error;
308: WHEN OTHERS THEN
309: X_status := FND_API.g_ret_sts_unexp_error;
310: FND_MSG_PUB.Add_Exc_Msg('GMD_LINEAR_EVALUATE', 'GAUSS_PIVOT');
311: IF l_debug = 'Y' THEN
312: gmd_debug.put_line('Exception:'||sqlerrm);
313: END IF;

Line 346: X_status := FND_API.g_ret_sts_success;

342: X_mxk Row;
343: l_debug_row VARCHAR2(2000);
344: BEGIN
345: /*Initialize return status to success */
346: X_status := FND_API.g_ret_sts_success;
347:
348: IF l_debug = 'Y' THEN
349: gmd_debug.put_line('In Eliminate: P_n'||P_n);
350: END IF;

Line 358: IF X_status <> FND_API.g_ret_sts_success THEN

354: ,P_s => P_s
355: ,P_current => k
356: ,P_n => P_n
357: ,X_status => X_status);
358: IF X_status <> FND_API.g_ret_sts_success THEN
359: RAISE FND_API.G_EXC_ERROR;
360: END IF;
361:
362: IF l_debug = 'Y' THEN

Line 359: RAISE FND_API.G_EXC_ERROR;

355: ,P_current => k
356: ,P_n => P_n
357: ,X_status => X_status);
358: IF X_status <> FND_API.g_ret_sts_success THEN
359: RAISE FND_API.G_EXC_ERROR;
360: END IF;
361:
362: IF l_debug = 'Y' THEN
363: gmd_debug.put_line(' After Pivoting for :'||k);

Line 393: RAISE FND_API.G_EXC_ERROR;

389: IF l_debug = 'Y' THEN
390: gmd_debug.put_line(' Cannot evaluate as the divisor is zero at i:'||k||' j:'||k);
391: END IF;
392: GMD_API_GRP.log_message('GMD_NO_SOLUTION');
393: RAISE FND_API.G_EXC_ERROR;
394: END IF;
395: X_divisor := 1/X_mxk(k);
396: WHILE j <= P_n LOOP
397:

Line 440: WHEN FND_API.G_EXC_ERROR THEN

436: END IF;
437: k := k + 1;
438: END LOOP;
439: EXCEPTION
440: WHEN FND_API.G_EXC_ERROR THEN
441: X_status := FND_API.g_ret_sts_error;
442: IF l_debug = 'Y' THEN
443: gmd_debug.put_line('Error in Eliminate');
444: END IF;

Line 441: X_status := FND_API.g_ret_sts_error;

437: k := k + 1;
438: END LOOP;
439: EXCEPTION
440: WHEN FND_API.G_EXC_ERROR THEN
441: X_status := FND_API.g_ret_sts_error;
442: IF l_debug = 'Y' THEN
443: gmd_debug.put_line('Error in Eliminate');
444: END IF;
445: WHEN OTHERS THEN

Line 446: X_status := FND_API.g_ret_sts_unexp_error;

442: IF l_debug = 'Y' THEN
443: gmd_debug.put_line('Error in Eliminate');
444: END IF;
445: WHEN OTHERS THEN
446: X_status := FND_API.g_ret_sts_unexp_error;
447: FND_MSG_PUB.Add_Exc_Msg('GMD_LINEAR_EVALUATE', 'ELIMINATE');
448: IF l_debug = 'Y' THEN
449: gmd_debug.put_line('Exception:'||sqlerrm);
450: END IF;

Line 477: X_status := FND_API.g_ret_sts_success;

473: X_mags Row;
474: X_matrix Matrix;
475: BEGIN
476: /*Initialize return status to success */
477: X_status := FND_API.g_ret_sts_success;
478: /* Let us store the number of columns in the matrix */
479: l_col := P_n + 1;
480:
481: X_matrix := P_mx;

Line 486: IF X_status <> FND_API.g_ret_sts_success THEN

482: Calc_Mags (P_mx => X_matrix,
483: P_count => P_n,
484: X_row => X_mags,
485: X_status => X_status);
486: IF X_status <> FND_API.g_ret_sts_success THEN
487: RAISE FND_API.G_EXC_ERROR;
488: END IF;
489:
490: Eliminate (P_mx => X_matrix,

Line 487: RAISE FND_API.G_EXC_ERROR;

483: P_count => P_n,
484: X_row => X_mags,
485: X_status => X_status);
486: IF X_status <> FND_API.g_ret_sts_success THEN
487: RAISE FND_API.G_EXC_ERROR;
488: END IF;
489:
490: Eliminate (P_mx => X_matrix,
491: P_s => X_mags,

Line 494: IF X_status <> FND_API.g_ret_sts_success THEN

490: Eliminate (P_mx => X_matrix,
491: P_s => X_mags,
492: P_n => P_n,
493: X_status => X_status);
494: IF X_status <> FND_API.g_ret_sts_success THEN
495: RAISE FND_API.G_EXC_ERROR;
496: END IF;
497:
498: Substitute (P_mx => X_matrix,

Line 495: RAISE FND_API.G_EXC_ERROR;

491: P_s => X_mags,
492: P_n => P_n,
493: X_status => X_status);
494: IF X_status <> FND_API.g_ret_sts_success THEN
495: RAISE FND_API.G_EXC_ERROR;
496: END IF;
497:
498: Substitute (P_mx => X_matrix,
499: P_n => P_n,

Line 501: IF X_status <> FND_API.g_ret_sts_success THEN

497:
498: Substitute (P_mx => X_matrix,
499: P_n => P_n,
500: X_status => X_status);
501: IF X_status <> FND_API.g_ret_sts_success THEN
502: RAISE FND_API.G_EXC_ERROR;
503: END IF;
504:
505: FOR i IN 1..P_n LOOP

Line 502: RAISE FND_API.G_EXC_ERROR;

498: Substitute (P_mx => X_matrix,
499: P_n => P_n,
500: X_status => X_status);
501: IF X_status <> FND_API.g_ret_sts_success THEN
502: RAISE FND_API.G_EXC_ERROR;
503: END IF;
504:
505: FOR i IN 1..P_n LOOP
506: /*X_result(i) := X_matrix(i)(P_n+1);*/

Line 510: WHEN FND_API.G_EXC_ERROR THEN

506: /*X_result(i) := X_matrix(i)(P_n+1);*/
507: X_result(i) := X_matrix(l_col*(i-1) + P_n+1);
508: END LOOP;
509: EXCEPTION
510: WHEN FND_API.G_EXC_ERROR THEN
511: X_status := FND_API.g_ret_sts_error;
512: IF l_debug = 'Y' THEN
513: gmd_debug.put_line('Error in Gauss');
514: END IF;

Line 511: X_status := FND_API.g_ret_sts_error;

507: X_result(i) := X_matrix(l_col*(i-1) + P_n+1);
508: END LOOP;
509: EXCEPTION
510: WHEN FND_API.G_EXC_ERROR THEN
511: X_status := FND_API.g_ret_sts_error;
512: IF l_debug = 'Y' THEN
513: gmd_debug.put_line('Error in Gauss');
514: END IF;
515: WHEN OTHERS THEN

Line 519: X_status := FND_API.g_ret_sts_unexp_error;

515: WHEN OTHERS THEN
516: IF l_debug = 'Y' THEN
517: gmd_debug.put_line('Exception:'||sqlerrm);
518: END IF;
519: X_status := FND_API.g_ret_sts_unexp_error;
520: FND_MSG_PUB.Add_Exc_Msg('GMD_LINEAR_EVALUATE', 'GAUSS');
521: END Gauss;
522:
523: /*======================================================================

Line 638: IF X_status = FND_API.g_ret_sts_success THEN

634: Gauss(P_mx => X_matrix
635: ,X_result => X_result
636: ,P_n => 3
637: ,X_status => X_status);
638: IF X_status = FND_API.g_ret_sts_success THEN
639: FOR i IN 1..3 LOOP
640: gmd_debug.put_line(i||':'||X_result(i));
641: END LOOP;
642: END IF;