DBA Data[Home] [Help]

APPS.GMD_OUTBOUND_APIS_PUB dependencies on GME_DEBUG

Line 79: --gme_debug.log_initialize('PAL_GMD_OUTBOUND_API');

75: WHERE user_name = UPPER(p_user_name)
76: AND SYSDATE BETWEEN start_date AND NVL(end_date,sysdate+1);
77:
78: FND_GLOBAL.apps_initialize(l_user_id, NULL, NULL, 0);
79: --gme_debug.log_initialize('PAL_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 3581: gme_debug.put_line('Starting FETCH_SAMPLES');

3577:
3578: G_PKG_NAME CONSTANT VARCHAR2(30):='GMD_OUTBOUND_APIS_PUB';
3579:
3580: BEGIN
3581: gme_debug.put_line('Starting FETCH_SAMPLES');
3582: -- dbms_output.put_line('Enter GMD_OUTBOUND_APIS_PUB.FETCH_SAMPLES API');
3583: -- (gmd_outbound_apis_pub.api_version, p_api_version, l_api_name,'GMD_OUTBOUND_APIS_PUB')
3584: IF NOT FND_API.Compatible_API_CALL
3585: (gmd_outbound_apis_pub.api_version, p_api_version , l_api_name , G_PKG_NAME)

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

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

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

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

Line 4435: gme_debug.put_line('in IF p_lpn IS NOT NULL ');

4431:
4432: gmd_outbound_apis_pub.g_lpn := p_lpn;
4433: where_clause := where_clause||'AND lpn.license_plate_number = :lpn ';
4434: using_clause := using_clause||', gmd_outbound_apis_pub.g_lpn ';
4435: gme_debug.put_line('in IF p_lpn IS NOT NULL ');
4436:
4437:
4438: END IF;
4439:

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

4450: ||into_clause
4451: ||using_clause
4452: ||'; END;';
4453:
4454: gme_debug.put_line('The sql statement is:');
4455:
4456:
4457: -- dbms_output.put_line('The sql statement is:');
4458: i:= 1;

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

4457: -- dbms_output.put_line('The sql statement is:');
4458: i:= 1;
4459: LOOP
4460: -- dbms_output.put_line(substr(execution_string, i, 100));
4461: gme_debug.put_line(substr(execution_string, i, 100));
4462: EXIT WHEN i> LENGTH(execution_string);
4463: i := i+100;
4464: END LOOP;
4465:

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

4463: i := i+100;
4464: END LOOP;
4465:
4466: -- dbms_output.put_line('Executing stringxxx');
4467: gme_debug.put_line('Executing string');
4468: EXECUTE IMMEDIATE execution_string;
4469: gme_debug.put_line('out of executing string ');
4470: -- Now fill in any missing data
4471:

Line 4469: gme_debug.put_line('out of executing string ');

4465:
4466: -- dbms_output.put_line('Executing stringxxx');
4467: gme_debug.put_line('Executing string');
4468: EXECUTE IMMEDIATE execution_string;
4469: gme_debug.put_line('out of executing string ');
4470: -- Now fill in any missing data
4471:
4472: -- dbms_output.put_line('filling in missing data');
4473: FOR i IN 1..g_samples_table.count

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

4471:
4472: -- dbms_output.put_line('filling in missing data');
4473: FOR i IN 1..g_samples_table.count
4474: LOOP
4475: gme_debug.put_line('sample no=' || g_samples_table(i).sample_no);
4476: IF g_samples_table(i).spec_id is not NULL
4477: THEN
4478: gme_debug.put_line('select from gmd_specifications_b using spec_id of '
4479: || g_samples_table(i).spec_id);

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

4474: LOOP
4475: gme_debug.put_line('sample no=' || g_samples_table(i).sample_no);
4476: IF g_samples_table(i).spec_id is not NULL
4477: THEN
4478: gme_debug.put_line('select from gmd_specifications_b using spec_id of '
4479: || g_samples_table(i).spec_id);
4480: select spec_name, spec_vers into g_samples_table(i).spec_name,g_samples_table(i).spec_vers
4481: from gmd_specifications_b
4482: where spec_id = g_samples_table(i).spec_id;

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

4671: x_samples_table := gmd_outbound_apis_pub.g_samples_table;
4672: x_return_status := FND_API.G_RET_STS_SUCCESS;
4673: -- dbms_output.put_line('Returning table to caller');
4674:
4675: gme_debug.put_line('Returning table to caller');
4676:
4677:
4678:
4679:

Line 4694: gme_debug.put_line('exception sqlcode = '

4690:
4691: FND_MESSAGE.SET_NAME('GMD',SQLCODE);
4692: FND_MSG_PUB.Add;
4693: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
4694: gme_debug.put_line('exception sqlcode = '
4695: || SQLCODE );
4696: x_return_status := FND_API.G_RET_STS_ERROR;
4697:
4698: