DBA Data[Home] [Help]

APPS.GMD_OUTBOUND_APIS_PUB dependencies on GME_DEBUG

Line 79: gme_debug.log_initialize('GMD_OUTBOUND_API');

75: AND SYSDATE BETWEEN start_date AND NVL(end_date,sysdate+1);
76:
77: FND_GLOBAL.apps_initialize(l_user_id, NULL, NULL, 0);
78:
79: gme_debug.log_initialize('GMD_OUTBOUND_API');
80:
81: RETURN TRUE;
82:
83: EXCEPTION

Line 134: gme_debug.put_line('Starting FETCH_TESTS');

130: OR NOT initialized_ok(p_user_name)
131: THEN
132: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
133: ELSE
134: gme_debug.put_line('Starting FETCH_TESTS');
135:
136: /* Initialize message list if p_int_msg_list is set TRUE. */
137:
138: IF FND_API.to_boolean(p_init_msg_list)

Line 145: gme_debug.put_line('Constructing select statement');

141: END IF;
142:
143: -- Start construction the select.
144:
145: gme_debug.put_line('Constructing select statement');
146:
147: sql_statement := 'SELECT ';
148:
149: column_list := 'system.gmd_test_method_rec_type( gtm.test_method_id, gtm.test_method_code, ' -- 5284242

Line 258: gme_debug.put_line('The sql statement is:');

254: ||into_clause
255: ||using_clause
256: ||'; END;';
257:
258: gme_debug.put_line('The sql statement is:');
259: i:= 1;
260: LOOP
261: gme_debug.put_line(substr(execution_string, i, 100));
262: EXIT WHEN i> LENGTH(execution_string);

Line 261: gme_debug.put_line(substr(execution_string, i, 100));

257:
258: gme_debug.put_line('The sql statement is:');
259: i:= 1;
260: LOOP
261: gme_debug.put_line(substr(execution_string, i, 100));
262: EXIT WHEN i> LENGTH(execution_string);
263: i := i+100;
264: END LOOP;
265: gme_debug.put_line('Executing string');

Line 265: gme_debug.put_line('Executing string');

261: gme_debug.put_line(substr(execution_string, i, 100));
262: EXIT WHEN i> LENGTH(execution_string);
263: i := i+100;
264: END LOOP;
265: gme_debug.put_line('Executing string');
266:
267: EXECUTE IMMEDIATE execution_string;
268:
269: -- Main retrieval done, now just fill in any blanks

Line 277: gme_debug.put_line('Retrieving test kit organization for test kit organization id:'

273: FOR i in 1.. g_test_methods_table.count
274: LOOP
275:
276: IF g_test_methods_table(i).test_kit_organization_id IS NOT NULL THEN --INVCONV
277: gme_debug.put_line('Retrieving test kit organization for test kit organization id:'
278: ||to_char(g_test_methods_table(i).test_kit_organization_id));
279: SELECT organization_code INTO g_test_methods_table(i).test_kit_organization_code
280: FROM mtl_parameters
281: WHERE organization_id = g_test_methods_table(i).test_kit_organization_id;

Line 285: gme_debug.put_line('Retrieving test kit item for test kit inv item id:'

281: WHERE organization_id = g_test_methods_table(i).test_kit_organization_id;
282: END IF;
283:
284: IF g_test_methods_table(i).test_kit_inv_item_id IS NOT NULL THEN --INVCONV
285: gme_debug.put_line('Retrieving test kit item for test kit inv item id:'
286: ||to_char(g_test_methods_table(i).test_kit_inv_item_id));
287: SELECT concatenated_segments INTO g_test_methods_table(i).test_kit_item_number
288: FROM mtl_system_items_b_kfv
289: WHERE organization_id = g_test_methods_table(i).test_kit_organization_id

Line 296: gme_debug.put_line('Returning table to caller');

292:
293: END LOOP;
294: END IF;
295:
296: gme_debug.put_line('Returning table to caller');
297: x_test_methods_table := gmd_outbound_apis_pub.g_test_methods_table;
298: x_return_status := FND_API.G_RET_STS_SUCCESS;
299:
300: END IF;

Line 303: gme_debug.put_line('Finished');

299:
300: END IF;
301:
302: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
303: gme_debug.put_line('Finished');
304: EXCEPTION
305: WHEN OTHERS
306: THEN
307: gme_debug.put_line('EXCEPTION : '||substr(SQLERRM,1,100));

Line 307: gme_debug.put_line('EXCEPTION : '||substr(SQLERRM,1,100));

303: gme_debug.put_line('Finished');
304: EXCEPTION
305: WHEN OTHERS
306: THEN
307: gme_debug.put_line('EXCEPTION : '||substr(SQLERRM,1,100));
308: gmd_api_pub.log_message('GMD_API_ERROR','Fetch_Test_Methods', 'Exception',substr(SQLERRM,1,100));
309: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
310: x_return_status := FND_API.G_RET_STS_ERROR;
311:

Line 2689: gme_debug.put_line('The sql statement is:');

2685: ||main_using_clause
2686: ||'; END;';
2687:
2688:
2689: gme_debug.put_line('The sql statement is:');
2690: i:= 1;
2691: LOOP
2692: gme_debug.put_line(substr(main_execution_string, i, 100));
2693: EXIT WHEN i> LENGTH(main_execution_string);

Line 2692: gme_debug.put_line(substr(main_execution_string, i, 100));

2688:
2689: gme_debug.put_line('The sql statement is:');
2690: i:= 1;
2691: LOOP
2692: gme_debug.put_line(substr(main_execution_string, i, 100));
2693: EXIT WHEN i> LENGTH(main_execution_string);
2694: i := i+100;
2695: END LOOP;
2696: gme_debug.put_line('Executing string');

Line 2696: gme_debug.put_line('Executing string');

2692: gme_debug.put_line(substr(main_execution_string, i, 100));
2693: EXIT WHEN i> LENGTH(main_execution_string);
2694: i := i+100;
2695: END LOOP;
2696: gme_debug.put_line('Executing string');
2697:
2698: -- problem here
2699: -- check the s=rec type on d/b with the list here
2700:

Line 2702: gme_debug.put_line('SQL string execution comleted');

2698: -- problem here
2699: -- check the s=rec type on d/b with the list here
2700:
2701: EXECUTE IMMEDIATE main_execution_string;
2702: gme_debug.put_line('SQL string execution comleted');
2703: -- Main retrieval done, now just fill in any blanks
2704:
2705: IF g_specifications_table.count > 0
2706: THEN

Line 2791: gme_debug.put_line('Enter GMD_OUTBOUND_APIS_PUB.FETCH_RESULTS API');

2787: l_api_name VARCHAR2(100) := 'fetch_results';
2788:
2789: BEGIN
2790:
2791: gme_debug.put_line('Enter GMD_OUTBOUND_APIS_PUB.FETCH_RESULTS API');
2792:
2793: IF NOT FND_API.Compatible_API_CALL
2794: (gmd_outbound_apis_pub.api_version, p_api_version, l_api_name,'GMD_OUTBOUND_APIS_PUB')
2795: OR NOT initialized_ok(p_user_name)

Line 2799: gme_debug.put_line('Starting FETCH_RESULTS processing');

2795: OR NOT initialized_ok(p_user_name)
2796: THEN
2797: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
2798: ELSE
2799: gme_debug.put_line('Starting FETCH_RESULTS processing');
2800: /* Initialize message list if p_int_msg_list is set TRUE. */
2801: IF FND_API.to_boolean(p_init_msg_list)
2802: THEN
2803: FND_MSG_PUB.Initialize;

Line 2808: gme_debug.put_line('Begin constructing SELECT statement');

2804: END IF;
2805:
2806: -- Start construction the select.
2807:
2808: gme_debug.put_line('Begin constructing SELECT statement');
2809: sql_statement := 'SELECT ';
2810:
2811:
2812: column_list := 'system.gmd_results_rec_type( r.update_instance_id, r.result_id, ' -- 5346480 add system.

Line 3055: gme_debug.put_line('The sql statement is:');

3051: ||into_clause
3052: ||using_clause
3053: ||'; END;';
3054:
3055: gme_debug.put_line('The sql statement is:');
3056: i:= 1;
3057: LOOP
3058: gme_debug.put_line(substr(execution_string, i, 100));
3059: EXIT WHEN i> LENGTH(execution_string);

Line 3058: gme_debug.put_line(substr(execution_string, i, 100));

3054:
3055: gme_debug.put_line('The sql statement is:');
3056: i:= 1;
3057: LOOP
3058: gme_debug.put_line(substr(execution_string, i, 100));
3059: EXIT WHEN i> LENGTH(execution_string);
3060: i := i+100;
3061: END LOOP;
3062: gme_debug.put_line('Executing string');

Line 3062: gme_debug.put_line('Executing string');

3058: gme_debug.put_line(substr(execution_string, i, 100));
3059: EXIT WHEN i> LENGTH(execution_string);
3060: i := i+100;
3061: END LOOP;
3062: gme_debug.put_line('Executing string');
3063:
3064: EXECUTE IMMEDIATE execution_string;
3065:
3066: FOR i IN 1..g_results_table.COUNT

Line 3071: gme_debug.put_line('select from mtl_system_items_kfv using inventory_item_id of '|| g_results_table(i).test_kit_inv_item_id);

3067: LOOP
3068:
3069: IF g_results_table(i).test_kit_inv_item_id IS NOT NULL
3070: THEN
3071: gme_debug.put_line('select from mtl_system_items_kfv using inventory_item_id of '|| g_results_table(i).test_kit_inv_item_id);
3072: SELECT concatenated_segments
3073: INTO g_results_table(i).test_kit_inv_item_number
3074: FROM mtl_system_items_kfv
3075: WHERE inventory_item_id = g_results_table(i).test_kit_inv_item_id

Line 3082: gme_debug.put_line('select from fnd_user using user_id of '

3078:
3079: -- BUG 3078568 - populate tester from tester_id
3080: IF g_results_table(i).tester_id IS NOT NULL
3081: THEN
3082: gme_debug.put_line('select from fnd_user using user_id of '
3083: || g_results_table(i).tester_id);
3084: SELECT user_name
3085: INTO g_results_table(i).tester
3086: FROM fnd_user

Line 3093: gme_debug.put_line('Returning table to caller');

3089:
3090: END LOOP;
3091:
3092:
3093: gme_debug.put_line('Returning table to caller');
3094: x_results_table := gmd_outbound_apis_pub.g_results_table;
3095: x_return_status := FND_API.G_RET_STS_SUCCESS;
3096:
3097: END IF;

Line 3100: gme_debug.put_line('Finished FETCH_RESULTS');

3096:
3097: END IF;
3098:
3099: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
3100: gme_debug.put_line('Finished FETCH_RESULTS');
3101:
3102: EXCEPTION
3103: WHEN OTHERS
3104: THEN

Line 3148: gme_debug.put_line('Enter GMD_OUTBOUND_APIS_PUB.FETCH_COMPOSITE_RESULTS API');

3144: l_api_name VARCHAR2(100) := 'fetch_composite_results';
3145:
3146: BEGIN
3147:
3148: gme_debug.put_line('Enter GMD_OUTBOUND_APIS_PUB.FETCH_COMPOSITE_RESULTS API');
3149:
3150: IF NOT FND_API.Compatible_API_CALL
3151: (gmd_outbound_apis_pub.api_version, p_api_version, l_api_name,'GMD_OUTBOUND_APIS_PUB')
3152: OR NOT initialized_ok(p_user_name)

Line 3157: gme_debug.put_line('Starting FETCH_COMPOSITE_RESULTS processing');

3153: THEN
3154: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
3155: ELSE
3156:
3157: gme_debug.put_line('Starting FETCH_COMPOSITE_RESULTS processing');
3158: /* Initialize message list if p_int_msg_list is set TRUE. */
3159: IF FND_API.to_boolean(p_init_msg_list)
3160: THEN
3161: FND_MSG_PUB.Initialize;

Line 3166: gme_debug.put_line('Begin constructing SELECT statement');

3162: END IF;
3163:
3164: -- Start construction the select.
3165:
3166: gme_debug.put_line('Begin constructing SELECT statement');
3167: sql_statement := 'SELECT ';
3168:
3169: IF (p_from_item_number IS NOT NULL OR p_to_item_number IS NOT NULL or p_inventory_item_id is NOT NULL) AND
3170: (p_lot_number is NOT NULL)

Line 3405: gme_debug.put_line('The sql statement is:');

3401: ||into_clause
3402: ||using_clause
3403: ||'; END;';
3404:
3405: gme_debug.put_line('The sql statement is:');
3406: i:= 1;
3407: LOOP
3408: gme_debug.put_line(substr(execution_string, i, 100));
3409: EXIT WHEN i> LENGTH(execution_string);

Line 3408: gme_debug.put_line(substr(execution_string, i, 100));

3404:
3405: gme_debug.put_line('The sql statement is:');
3406: i:= 1;
3407: LOOP
3408: gme_debug.put_line(substr(execution_string, i, 100));
3409: EXIT WHEN i> LENGTH(execution_string);
3410: i := i+100;
3411: END LOOP;
3412: gme_debug.put_line('Executing string');

Line 3412: gme_debug.put_line('Executing string');

3408: gme_debug.put_line(substr(execution_string, i, 100));
3409: EXIT WHEN i> LENGTH(execution_string);
3410: i := i+100;
3411: END LOOP;
3412: gme_debug.put_line('Executing string');
3413:
3414: EXECUTE IMMEDIATE execution_string;
3415: -- gme_debug.put_line('here 1 ');
3416: FOR i IN 1..g_composite_results_table.count

Line 3415: -- gme_debug.put_line('here 1 ');

3411: END LOOP;
3412: gme_debug.put_line('Executing string');
3413:
3414: EXECUTE IMMEDIATE execution_string;
3415: -- gme_debug.put_line('here 1 ');
3416: FOR i IN 1..g_composite_results_table.count
3417: LOOP
3418: --gme_debug.put_line('inside internal loop i = ' || i);
3419: IF g_composite_results_table(i).inventory_item_id IS NOT NULL AND g_composite_results_table(i).item_number IS NULL

Line 3418: --gme_debug.put_line('inside internal loop i = ' || i);

3414: EXECUTE IMMEDIATE execution_string;
3415: -- gme_debug.put_line('here 1 ');
3416: FOR i IN 1..g_composite_results_table.count
3417: LOOP
3418: --gme_debug.put_line('inside internal loop i = ' || i);
3419: IF g_composite_results_table(i).inventory_item_id IS NOT NULL AND g_composite_results_table(i).item_number IS NULL
3420: THEN
3421: gme_debug.put_line('select from mtl_system_items_kfv using '|| g_composite_results_table(i).inventory_item_id);
3422: SELECT concatenated_segments INTO g_composite_results_table(i).item_number

Line 3421: gme_debug.put_line('select from mtl_system_items_kfv using '|| g_composite_results_table(i).inventory_item_id);

3417: LOOP
3418: --gme_debug.put_line('inside internal loop i = ' || i);
3419: IF g_composite_results_table(i).inventory_item_id IS NOT NULL AND g_composite_results_table(i).item_number IS NULL
3420: THEN
3421: gme_debug.put_line('select from mtl_system_items_kfv using '|| g_composite_results_table(i).inventory_item_id);
3422: SELECT concatenated_segments INTO g_composite_results_table(i).item_number
3423: FROM mtl_system_items_kfv msi
3424: WHERE inventory_item_id = g_composite_results_table(i).inventory_item_id
3425: and rownum = 1 ; -- 5346713 rework

Line 3430: gme_debug.put_line('select from mtl_lot_numbers using '|| g_composite_results_table(i).lot_number);

3426: END IF;
3427:
3428: /*IF g_composite_results_table(i).lot_number IS NOT NULL
3429: THEN
3430: gme_debug.put_line('select from mtl_lot_numbers using '|| g_composite_results_table(i).lot_number);
3431: SELECT lot_number INTO g_composite_results_table(i).lot_number
3432: FROM mtl_lot_numbers
3433: WHERE lot_number = g_composite_results_table(i).lot_number;
3434: END IF;*/

Line 3440: gme_debug.put_line('Returning table to caller');

3436:
3437: END LOOP;
3438:
3439:
3440: gme_debug.put_line('Returning table to caller');
3441: x_composite_results_table := gmd_outbound_apis_pub.g_composite_results_table;
3442: x_return_status := FND_API.G_RET_STS_SUCCESS;
3443:
3444: END IF;

Line 3448: gme_debug.put_line('Finished FETCH_COMPOSITE_RESULTS');

3444: END IF;
3445:
3446:
3447: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
3448: gme_debug.put_line('Finished FETCH_COMPOSITE_RESULTS');
3449:
3450: EXCEPTION
3451: WHEN OTHERS
3452: THEN

Line 3598: gme_debug.put_line('Starting FETCH_SAMPLES processing');

3594: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
3595: ELSE
3596:
3597: -- dbms_output.put_line('Starting FETCH_SAMPLES processing');
3598: gme_debug.put_line('Starting FETCH_SAMPLES processing');
3599: /* Initialize message list if p_int_msg_list is set TRUE. */
3600: IF FND_API.to_boolean(p_init_msg_list)
3601: THEN
3602: FND_MSG_PUB.Initialize;

Line 3608: gme_debug.put_line('Begin constructing SELECT statement');

3604:
3605: -- Start construction for the select.
3606:
3607: -- dbms_output.put_line('Begin constructing SELECT statement');
3608: gme_debug.put_line('Begin constructing SELECT statement');
3609: sql_statement := 'SELECT ';
3610:
3611: -- BUG 3077905 Retrieve sample_disposition from gmd_sample_spec_disp not gmd_samples
3612:

Line 4434: gme_debug.put_line(substr(execution_string, i, 100));

4430: -- dbms_output.put_line('The sql statement is:');
4431: i:= 1;
4432: LOOP
4433: -- dbms_output.put_line(substr(execution_string, i, 100));
4434: gme_debug.put_line(substr(execution_string, i, 100));
4435: EXIT WHEN i> LENGTH(execution_string);
4436: i := i+100;
4437: END LOOP;
4438:

Line 4440: gme_debug.put_line('Executing string');

4436: i := i+100;
4437: END LOOP;
4438:
4439: -- dbms_output.put_line('Executing stringxxx');
4440: gme_debug.put_line('Executing string');
4441: EXECUTE IMMEDIATE execution_string;
4442:
4443: -- Now fill in any missing data
4444:

Line 4448: gme_debug.put_line('sample no=' || g_samples_table(i).sample_no);

4444:
4445: -- dbms_output.put_line('filling in missing data');
4446: FOR i IN 1..g_samples_table.count
4447: LOOP
4448: gme_debug.put_line('sample no=' || g_samples_table(i).sample_no);
4449: IF g_samples_table(i).spec_id is not NULL
4450: THEN
4451: gme_debug.put_line('select from gmd_specifications_b using spec_id of '
4452: || g_samples_table(i).spec_id);

Line 4451: gme_debug.put_line('select from gmd_specifications_b using spec_id of '

4447: LOOP
4448: gme_debug.put_line('sample no=' || g_samples_table(i).sample_no);
4449: IF g_samples_table(i).spec_id is not NULL
4450: THEN
4451: gme_debug.put_line('select from gmd_specifications_b using spec_id of '
4452: || g_samples_table(i).spec_id);
4453: select spec_name, spec_vers into g_samples_table(i).spec_name,g_samples_table(i).spec_vers
4454: from gmd_specifications_b
4455: where spec_id = g_samples_table(i).spec_id;