DBA Data[Home] [Help]

APPS.GME_SCALE_BATCH_PVT dependencies on GME_DEBUG

Line 93: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

89: FETCH cur_get_batch_status
90: INTO l_batch_status;
91: CLOSE cur_get_batch_status;
92:
93: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
94: gme_debug.put_line ('Batch status is' || l_batch_status );
95: END IF;
96:
97: -- check if sum of total qty of prod or ing is 0

Line 94: gme_debug.put_line ('Batch status is' || l_batch_status );

90: INTO l_batch_status;
91: CLOSE cur_get_batch_status;
92:
93: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
94: gme_debug.put_line ('Batch status is' || l_batch_status );
95: END IF;
96:
97: -- check if sum of total qty of prod or ing is 0
98: OPEN cur_check_zero_qty_line (p_batch_header_rec.batch_id

Line 105: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

101: FETCH cur_check_zero_qty_line
102: INTO l_dummy;
103:
104: IF cur_check_zero_qty_line%FOUND THEN
105: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
106: gme_debug.put_line ('SCALE Batch : sum of either line type is 0');
107: END IF;
108:
109: gme_common_pvt.log_message ('GME_SUM_QTY_ZERO');

Line 106: gme_debug.put_line ('SCALE Batch : sum of either line type is 0');

102: INTO l_dummy;
103:
104: IF cur_check_zero_qty_line%FOUND THEN
105: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
106: gme_debug.put_line ('SCALE Batch : sum of either line type is 0');
107: END IF;
108:
109: gme_common_pvt.log_message ('GME_SUM_QTY_ZERO');
110:

Line 304: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

300: WHERE batch_id = v_batch_id);
301: BEGIN
302: x_return_status := fnd_api.g_ret_sts_success;
303:
304: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
305: gme_debug.put_line ('Scale factor is ' || p_scale_factor);
306: END IF;
307:
308: --Deleting the charges associated with the step on batch scaling.

Line 305: gme_debug.put_line ('Scale factor is ' || p_scale_factor);

301: BEGIN
302: x_return_status := fnd_api.g_ret_sts_success;
303:
304: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
305: gme_debug.put_line ('Scale factor is ' || p_scale_factor);
306: END IF;
307:
308: --Deleting the charges associated with the step on batch scaling.
309: OPEN cur_is_charge_associated (p_batch_header_rec.batch_id);

Line 317: IF NVL (g_debug, -1) = gme_debug.g_log_statement THEN

313:
314: IF cur_is_charge_associated%FOUND THEN
315: CLOSE cur_is_charge_associated;
316:
317: IF NVL (g_debug, -1) = gme_debug.g_log_statement THEN
318: gme_debug.put_line ( g_pkg_name
319: || '.'
320: || l_api_name
321: || 'before call to clear charges procedure');

Line 318: gme_debug.put_line ( g_pkg_name

314: IF cur_is_charge_associated%FOUND THEN
315: CLOSE cur_is_charge_associated;
316:
317: IF NVL (g_debug, -1) = gme_debug.g_log_statement THEN
318: gme_debug.put_line ( g_pkg_name
319: || '.'
320: || l_api_name
321: || 'before call to clear charges procedure');
322: END IF;

Line 353: IF g_debug <= gme_debug.g_log_statement THEN

349: ,pScale_multiple => p_material_tbl(i).scale_multiple
350: ,pDate => l_ingr_req_date
351: ,xFormulaDetail_tbl => l_formula_tbl);
352:
353: IF g_debug <= gme_debug.g_log_statement THEN
354: gme_debug.put_line('Orig '||p_material_tbl(i).formulaline_id||' '||p_material_tbl(i).inventory_item_id||' '||
355: p_material_tbl(i).plan_qty ||' '||p_material_tbl(i).dtl_um);
356:
357: gme_debug.put_line('New '||p_material_tbl(i).formulaline_id||' '||l_formula_tbl(1).item_id||' '||

Line 354: gme_debug.put_line('Orig '||p_material_tbl(i).formulaline_id||' '||p_material_tbl(i).inventory_item_id||' '||

350: ,pDate => l_ingr_req_date
351: ,xFormulaDetail_tbl => l_formula_tbl);
352:
353: IF g_debug <= gme_debug.g_log_statement THEN
354: gme_debug.put_line('Orig '||p_material_tbl(i).formulaline_id||' '||p_material_tbl(i).inventory_item_id||' '||
355: p_material_tbl(i).plan_qty ||' '||p_material_tbl(i).dtl_um);
356:
357: gme_debug.put_line('New '||p_material_tbl(i).formulaline_id||' '||l_formula_tbl(1).item_id||' '||
358: l_formula_tbl(1).qty ||' '||l_formula_tbl(1).item_um);

Line 357: gme_debug.put_line('New '||p_material_tbl(i).formulaline_id||' '||l_formula_tbl(1).item_id||' '||

353: IF g_debug <= gme_debug.g_log_statement THEN
354: gme_debug.put_line('Orig '||p_material_tbl(i).formulaline_id||' '||p_material_tbl(i).inventory_item_id||' '||
355: p_material_tbl(i).plan_qty ||' '||p_material_tbl(i).dtl_um);
356:
357: gme_debug.put_line('New '||p_material_tbl(i).formulaline_id||' '||l_formula_tbl(1).item_id||' '||
358: l_formula_tbl(1).qty ||' '||l_formula_tbl(1).item_um);
359: END IF;
360:
361: IF p_material_tbl(i).inventory_item_id <> l_formula_tbl(1).inventory_item_id THEN

Line 435: IF NVL (g_debug, -1) = gme_debug.g_log_statement THEN

431: /* LCF Changes */
432: l_validity_rule_id :=
433: NVL (p_batch_header_rec.recipe_validity_rule_id, p_validity_rule_id);
434:
435: IF NVL (g_debug, -1) = gme_debug.g_log_statement THEN
436: gme_debug.put_line ( g_pkg_name
437: || '.'
438: || l_api_name
439: || 'Validity Rule ID '

Line 436: gme_debug.put_line ( g_pkg_name

432: l_validity_rule_id :=
433: NVL (p_batch_header_rec.recipe_validity_rule_id, p_validity_rule_id);
434:
435: IF NVL (g_debug, -1) = gme_debug.g_log_statement THEN
436: gme_debug.put_line ( g_pkg_name
437: || '.'
438: || l_api_name
439: || 'Validity Rule ID '
440: || l_validity_rule_id);

Line 486: IF NVL (g_debug, -1) = gme_debug.g_log_statement THEN

482: END IF;
483: ELSE
484: l_enforce_vldt_check := 'F';
485:
486: IF NVL (g_debug, -1) = gme_debug.g_log_statement THEN
487: gme_debug.put_line
488: ( g_pkg_name
489: || '.'
490: || l_api_name

Line 487: gme_debug.put_line

483: ELSE
484: l_enforce_vldt_check := 'F';
485:
486: IF NVL (g_debug, -1) = gme_debug.g_log_statement THEN
487: gme_debug.put_line
488: ( g_pkg_name
489: || '.'
490: || l_api_name
491: || 'Validity Rule ID NOT FOUND. This must be LCF batch');

Line 537: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

533: ,NULL
534: ,NULL);
535:
536: IF l_temp_qty < 0 THEN
537: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
538: gme_debug.put_line
539: ('Failed in UOM Conv from formula product UOM to routing UOM');
540: END IF;
541:

Line 538: gme_debug.put_line

534: ,NULL);
535:
536: IF l_temp_qty < 0 THEN
537: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
538: gme_debug.put_line
539: ('Failed in UOM Conv from formula product UOM to routing UOM');
540: END IF;
541:
542: l_item_id :=

Line 579: IF nvl(g_debug, gme_debug.g_log_procedure + 1) <= gme_debug.g_log_procedure THEN

575: -- then reservations associated to this supply
576: -- need to be decreased proportionately
577: -- ============================================
578: IF x_material_tbl(l_row_number).line_type <> -1 THEN
579: IF nvl(g_debug, gme_debug.g_log_procedure + 1) <= gme_debug.g_log_procedure THEN
580: gme_debug.put_line(g_pkg_name||'.'||l_api_name||' Invoking relieve_prod_supply_resv ');
581: END IF;
582: gme_supply_res_pvt.relieve_prod_supply_resv
583: (p_matl_dtl_rec => x_material_tbl(l_row_number)

Line 580: gme_debug.put_line(g_pkg_name||'.'||l_api_name||' Invoking relieve_prod_supply_resv ');

576: -- need to be decreased proportionately
577: -- ============================================
578: IF x_material_tbl(l_row_number).line_type <> -1 THEN
579: IF nvl(g_debug, gme_debug.g_log_procedure + 1) <= gme_debug.g_log_procedure THEN
580: gme_debug.put_line(g_pkg_name||'.'||l_api_name||' Invoking relieve_prod_supply_resv ');
581: END IF;
582: gme_supply_res_pvt.relieve_prod_supply_resv
583: (p_matl_dtl_rec => x_material_tbl(l_row_number)
584: ,x_msg_count => l_count

Line 588: IF nvl(g_debug, gme_debug.g_log_procedure + 1) <= gme_debug.g_log_procedure THEN

584: ,x_msg_count => l_count
585: ,x_msg_data => l_list
586: ,x_return_status => x_return_status);
587:
588: IF nvl(g_debug, gme_debug.g_log_procedure + 1) <= gme_debug.g_log_procedure THEN
589: gme_debug.put_line(g_pkg_name||'.'||l_api_name||' Relieve_Prod_Supply_Resv returns '||x_return_status);
590: END IF;
591:
592: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

Line 589: gme_debug.put_line(g_pkg_name||'.'||l_api_name||' Relieve_Prod_Supply_Resv returns '||x_return_status);

585: ,x_msg_data => l_list
586: ,x_return_status => x_return_status);
587:
588: IF nvl(g_debug, gme_debug.g_log_procedure + 1) <= gme_debug.g_log_procedure THEN
589: gme_debug.put_line(g_pkg_name||'.'||l_api_name||' Relieve_Prod_Supply_Resv returns '||x_return_status);
590: END IF;
591:
592: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
593: RAISE reduce_reservation_fail;

Line 737: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

733: x_material_tbl (line_index).plan_qty
734: / p_material_tbl (line_index).plan_qty;
735: END IF;
736:
737: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
738: gme_debug.put_line
739: ( 'Calling scale phantom with Scale factor '
740: || l_scale_factor);
741: END IF;

Line 738: gme_debug.put_line

734: / p_material_tbl (line_index).plan_qty;
735: END IF;
736:
737: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
738: gme_debug.put_line
739: ( 'Calling scale phantom with Scale factor '
740: || l_scale_factor);
741: END IF;
742:

Line 796: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

792: -- Navin: PENDING: NEW MESSAGE TO BE REGISTERED. Workday calendar is not associated to the organization.
793: l_use_workday_cal := fnd_api.g_false;
794: -- workday_cal cannot be used.
795: END IF;
796: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
797: gme_debug.put_line('calling reschedule_batch'||p_batch_header_rec.batch_id);
798: END IF;
799:
800: -- Call reschedule_batch for plan_start_date for the batch.

Line 797: gme_debug.put_line('calling reschedule_batch'||p_batch_header_rec.batch_id);

793: l_use_workday_cal := fnd_api.g_false;
794: -- workday_cal cannot be used.
795: END IF;
796: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
797: gme_debug.put_line('calling reschedule_batch'||p_batch_header_rec.batch_id);
798: END IF;
799:
800: -- Call reschedule_batch for plan_start_date for the batch.
801: -- Pass the p_use_workday_cal and p_contiguity_override to it.

Line 841: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

837: ELSIF p_batch_header_rec.batch_status = 2 /* WIP */ THEN
838: l_material_details_qty :=
839: NVL (x_material_tbl (mtl_dtl_index).wip_plan_qty, 0);
840: END IF;
841: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
842: gme_debug.put_line('calling scale for mat'||to_char(x_material_tbl.COUNT));
843: END IF;
844: -- In case of scale down the batch, the user will be informed for the excess actual_qty
845: -- or reserved _qty compared to plan_qty or wip_plan_qty.

Line 842: gme_debug.put_line('calling scale for mat'||to_char(x_material_tbl.COUNT));

838: l_material_details_qty :=
839: NVL (x_material_tbl (mtl_dtl_index).wip_plan_qty, 0);
840: END IF;
841: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
842: gme_debug.put_line('calling scale for mat'||to_char(x_material_tbl.COUNT));
843: END IF;
844: -- In case of scale down the batch, the user will be informed for the excess actual_qty
845: -- or reserved _qty compared to plan_qty or wip_plan_qty.
846: -- The return staus to be assigned in such case is: T- if actual_qty is in excess

Line 921: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

917:
918: -- Check return_status and populate the error message.
919: IF NVL (l_return_status_1, '*') = 'T' THEN
920: x_return_status := 'W';
921: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
922: gme_debug.put_line('l_return_status_1'||to_char(l_return_status_1));
923: gme_debug.put_line('x_return_status'||to_char(x_return_status));
924: END IF;
925: gme_common_pvt.log_message ('GME_ACTUAL_QTY_IS_IN_EXCESS');

Line 922: gme_debug.put_line('l_return_status_1'||to_char(l_return_status_1));

918: -- Check return_status and populate the error message.
919: IF NVL (l_return_status_1, '*') = 'T' THEN
920: x_return_status := 'W';
921: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
922: gme_debug.put_line('l_return_status_1'||to_char(l_return_status_1));
923: gme_debug.put_line('x_return_status'||to_char(x_return_status));
924: END IF;
925: gme_common_pvt.log_message ('GME_ACTUAL_QTY_IS_IN_EXCESS');
926: -- Navin: PENDING: NEW MESSAGE TO BE REGISTERED.: Actual quantity is in excess.

Line 923: gme_debug.put_line('x_return_status'||to_char(x_return_status));

919: IF NVL (l_return_status_1, '*') = 'T' THEN
920: x_return_status := 'W';
921: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
922: gme_debug.put_line('l_return_status_1'||to_char(l_return_status_1));
923: gme_debug.put_line('x_return_status'||to_char(x_return_status));
924: END IF;
925: gme_common_pvt.log_message ('GME_ACTUAL_QTY_IS_IN_EXCESS');
926: -- Navin: PENDING: NEW MESSAGE TO BE REGISTERED.: Actual quantity is in excess.
927: END IF;

Line 931: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

927: END IF;
928:
929: IF NVL (l_return_status_2, '*') = 'N' THEN
930: x_return_status := 'W';
931: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
932: gme_debug.put_line('l_return_status_2'||to_char(l_return_status_1));
933: gme_debug.put_line('x_return_status'||to_char(x_return_status));
934: END IF;
935: gme_common_pvt.log_message ('GME_RESERVED_QTY_IS_IN_EXCESS');

Line 932: gme_debug.put_line('l_return_status_2'||to_char(l_return_status_1));

928:
929: IF NVL (l_return_status_2, '*') = 'N' THEN
930: x_return_status := 'W';
931: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
932: gme_debug.put_line('l_return_status_2'||to_char(l_return_status_1));
933: gme_debug.put_line('x_return_status'||to_char(x_return_status));
934: END IF;
935: gme_common_pvt.log_message ('GME_RESERVED_QTY_IS_IN_EXCESS');
936: -- Navin: PENDING: NEW MESSAGE TO BE REGISTERED.: Reserved quantity is in excess.

Line 933: gme_debug.put_line('x_return_status'||to_char(x_return_status));

929: IF NVL (l_return_status_2, '*') = 'N' THEN
930: x_return_status := 'W';
931: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
932: gme_debug.put_line('l_return_status_2'||to_char(l_return_status_1));
933: gme_debug.put_line('x_return_status'||to_char(x_return_status));
934: END IF;
935: gme_common_pvt.log_message ('GME_RESERVED_QTY_IS_IN_EXCESS');
936: -- Navin: PENDING: NEW MESSAGE TO BE REGISTERED.: Reserved quantity is in excess.
937: END IF;

Line 1157: IF nvl(g_debug, gme_debug.g_log_procedure + 1) <= gme_debug.g_log_procedure THEN

1153: -- then reservations associated to this supply
1154: -- need to be decreased
1155: -- ===========================================
1156: IF x_material_details(i).line_type <> -1 THEN
1157: IF nvl(g_debug, gme_debug.g_log_procedure + 1) <= gme_debug.g_log_procedure THEN
1158: gme_debug.put_line(g_pkg_name||'.'||l_api_name||' Invoking relieve_prod_supply_resv ');
1159: END IF;
1160: gme_supply_res_pvt.relieve_prod_supply_resv
1161: (p_matl_dtl_rec => x_material_details(i)

Line 1158: gme_debug.put_line(g_pkg_name||'.'||l_api_name||' Invoking relieve_prod_supply_resv ');

1154: -- need to be decreased
1155: -- ===========================================
1156: IF x_material_details(i).line_type <> -1 THEN
1157: IF nvl(g_debug, gme_debug.g_log_procedure + 1) <= gme_debug.g_log_procedure THEN
1158: gme_debug.put_line(g_pkg_name||'.'||l_api_name||' Invoking relieve_prod_supply_resv ');
1159: END IF;
1160: gme_supply_res_pvt.relieve_prod_supply_resv
1161: (p_matl_dtl_rec => x_material_details(i)
1162: ,x_msg_count => l_message_count

Line 1181: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

1177: END IF;
1178:
1179: IF l_batch_header.batch_status <> 0 AND l_batch_header.poc_ind = 'Y' THEN
1180: IF l_batch_header.automatic_step_calculation = 1 THEN
1181: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1182: gme_debug.put_line ('GME:THEOR: Batch has ASQC');
1183: END IF;
1184:
1185: FOR l_cur_item_step_asso IN

Line 1182: gme_debug.put_line ('GME:THEOR: Batch has ASQC');

1178:
1179: IF l_batch_header.batch_status <> 0 AND l_batch_header.poc_ind = 'Y' THEN
1180: IF l_batch_header.automatic_step_calculation = 1 THEN
1181: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1182: gme_debug.put_line ('GME:THEOR: Batch has ASQC');
1183: END IF;
1184:
1185: FOR l_cur_item_step_asso IN
1186: cur_item_step_asso (l_batch_header.batch_id) LOOP

Line 1214: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

1210: ELSE
1211: l_routing_scale_factor := 1;
1212: END IF;
1213:
1214: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1215: gme_debug.put_line
1216: ( 'GME_THEOR:NOT ASQC:Routing scale factor '
1217: || l_routing_scale_factor);
1218: END IF;

Line 1215: gme_debug.put_line

1211: l_routing_scale_factor := 1;
1212: END IF;
1213:
1214: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1215: gme_debug.put_line
1216: ( 'GME_THEOR:NOT ASQC:Routing scale factor '
1217: || l_routing_scale_factor);
1218: END IF;
1219:

Line 1283: IF nvl(g_debug, gme_debug.g_log_procedure + 1) <= gme_debug.g_log_procedure THEN

1279: x_return_status := fnd_api.g_ret_sts_error;
1280: WHEN trans_qty_err THEN
1281: gme_common_pvt.log_message ('GME_THEOYLD_UNMATCH_ALLOC');
1282: WHEN reduce_reservation_fail THEN -- 4944024
1283: IF nvl(g_debug, gme_debug.g_log_procedure + 1) <= gme_debug.g_log_procedure THEN
1284: gme_debug.put_line(g_pkg_name||'.'||l_api_name||' Failure after relieve_prod_supply_resv ');
1285: END IF;
1286: WHEN OTHERS THEN
1287: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);

Line 1284: gme_debug.put_line(g_pkg_name||'.'||l_api_name||' Failure after relieve_prod_supply_resv ');

1280: WHEN trans_qty_err THEN
1281: gme_common_pvt.log_message ('GME_THEOYLD_UNMATCH_ALLOC');
1282: WHEN reduce_reservation_fail THEN -- 4944024
1283: IF nvl(g_debug, gme_debug.g_log_procedure + 1) <= gme_debug.g_log_procedure THEN
1284: gme_debug.put_line(g_pkg_name||'.'||l_api_name||' Failure after relieve_prod_supply_resv ');
1285: END IF;
1286: WHEN OTHERS THEN
1287: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1288: x_return_status := fnd_api.g_ret_sts_unexp_error;

Line 1389: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

1385: fnd_message.set_token ('FROM_UOM', l_from_uom);
1386: fnd_message.set_token ('TO_UOM', l_to_uom);
1387: fnd_msg_pub.ADD;
1388:
1389: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1390: gme_debug.put_line
1391: ( 'SCALE BATCH:Get_total_qty:Conversion error for '
1392: || l_item_no
1393: || ' From '

Line 1390: gme_debug.put_line

1386: fnd_message.set_token ('TO_UOM', l_to_uom);
1387: fnd_msg_pub.ADD;
1388:
1389: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1390: gme_debug.put_line
1391: ( 'SCALE BATCH:Get_total_qty:Conversion error for '
1392: || l_item_no
1393: || ' From '
1394: || l_from_uom

Line 1401: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

1397: END IF;
1398: WHEN OTHERS THEN
1399: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1400:
1401: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1402: gme_debug.put_line (SQLERRM);
1403: END IF;
1404:
1405: x_return_status := 'U';

Line 1402: gme_debug.put_line (SQLERRM);

1398: WHEN OTHERS THEN
1399: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1400:
1401: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1402: gme_debug.put_line (SQLERRM);
1403: END IF;
1404:
1405: x_return_status := 'U';
1406: END get_total_qty;

Line 1611: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

1607: x_return_status := l_return_status;
1608: WHEN OTHERS THEN
1609: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1610:
1611: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1612: gme_debug.put_line (SQLERRM);
1613: END IF;
1614:
1615: x_return_status := fnd_api.g_ret_sts_unexp_error;

Line 1612: gme_debug.put_line (SQLERRM);

1608: WHEN OTHERS THEN
1609: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1610:
1611: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
1612: gme_debug.put_line (SQLERRM);
1613: END IF;
1614:
1615: x_return_status := fnd_api.g_ret_sts_unexp_error;
1616: END scale_step_and_rsrc;