65: l_stmt_num := 0;
66: l_err_num := 0;
67: l_err_code := '';
68: l_err_msg := '';
69: l_debug := FND_PROFILE.VALUE('MRP_DEBUG');
70:
71: if (l_debug = 'Y') then
72: FND_FILE.PUT_LINE(FND_FILE.LOG,'Compute layer actual cost ...');
73: FND_FILE.PUT_LINE(FND_FILE.LOG,'layer ID : ' || to_char(i_layer_id));
220: l_stmt_num := 0;
221: l_err_num := 0;
222: l_err_code := '';
223: l_err_msg := '';
224: l_debug := FND_PROFILE.VALUE('MRP_DEBUG');
225:
226: if (l_debug = 'Y') then
227: FND_FILE.PUT_LINE(FND_FILE.LOG,'Consume/Create Layers...');
228: end if;
451: l_src_number VARCHAR2(240);
452: l_debug VARCHAR2(80);
453:
454: Begin
455: l_debug := FND_PROFILE.VALUE('MRP_DEBUG');
456: if (i_txn_src_type = 1) then
457: /* Purchase Order, use RCV transaction ID */
458: /* Bug 3291126, we should use PO number */
459: select po.segment1
620: l_stmt_num := 0;
621: l_err_num := 0;
622: l_err_code := '';
623: l_err_msg := '';
624: l_debug := FND_PROFILE.VALUE('MRP_DEBUG');
625:
626: select transaction_type_id
627: into l_txn_type_id
628: from mtl_material_transactions
1386: l_err_num := 0;
1387: l_err_code := '';
1388: l_err_msg := '';
1389: l_from_org := 0;
1390: l_debug := FND_PROFILE.VALUE('MRP_DEBUG');
1391: l_create := 1;
1392:
1393: /* If expense item, then insert into MCACD using current costs. No inventory layer created */
1394: IF (i_exp_flag = 1) THEN
2321: l_err_num := 0;
2322: l_err_code := '';
2323: l_err_msg := '';
2324: l_layers_exist := 0;
2325: l_debug := FND_PROFILE.VALUE('MRP_DEBUG');
2326:
2327: l_stmt_num := 5;
2328: if (l_debug = 'Y') then
2329: FND_FILE.PUT_LINE(FND_FILE.LOG,'Consuming inventory layers from CG layer : ' || to_char(i_layer_id));
2936: l_err_msg VARCHAR2(240);
2937: process_error EXCEPTION;
2938: BEGIN
2939: l_stmt_num := 0;
2940: l_debug := FND_PROFILE.VALUE('MRP_DEBUG');
2941: l_debug := 'Y';
2942: l_required_qty := ABS(i_txn_qty);
2943: l_custom_layer := NVL(i_layer_hook,-1);
2944: l_source_id := NVL(i_src_id,-1);
3600: -- initialize local variables
3601: l_err_num := 0;
3602: l_err_code := '';
3603: l_err_msg := '';
3604: l_debug := FND_PROFILE.VALUE('MRP_DEBUG');
3605: l_earn_moh := 1;
3606: l_return_status := fnd_api.g_ret_sts_success;
3607: l_msg_count := 0;
3608:
5952: if (l_alt_curr is not NULL and l_conv_rate = -1) then
5953: if (l_alt_curr <> l_pri_curr) then
5954:
5955: if (l_conv_type is NULL) then
5956: FND_PROFILE.get('CURRENCY_CONVERSION_TYPE', l_conv_type);
5957: end if;
5958:
5959: l_stmt_num := 7;
5960: