DBA Data[Home] [Help]

APPS.CSTPAPPR dependencies on FND_FILE

Line 131: fnd_file.put_line(fnd_file.log,'Create_Acct_Lines <<< ');

127: BEGIN
128:
129: l_stmt_num := 10;
130: IF l_debug_flag = 'Y' THEN
131: fnd_file.put_line(fnd_file.log,'Create_Acct_Lines <<< ');
132: END IF;
133: ------------------------------------------------------------------------------
134: -- Determine the transaction type (Period end or on Receipt) based on the event type
135: -- the event type is a concatenated string of the form

Line 152: fnd_file.put_line(fnd_file.log,'Event type: '||(l_ae_txn_rec.txn_type_flag));

148: caet.event_type = i_event_type_id;
149: */
150:
151: IF l_debug_flag = 'Y' THEN
152: fnd_file.put_line(fnd_file.log,'Event type: '||(l_ae_txn_rec.txn_type_flag));
153: END IF;
154:
155: IF (l_ae_txn_rec.txn_type_flag in ('RCV','ACR')) THEN
156:

Line 276: FND_FILE.PUT_LINE(FND_FILE.LOG, 'RetroActive Price Adjust Event');

272:
273: --- Retro Changes ---------------------------------------------------------------
274: ELSIF l_ae_txn_rec.txn_type_flag = 'ADJ' THEN
275: IF l_debug_flag = 'Y' THEN
276: FND_FILE.PUT_LINE(FND_FILE.LOG, 'RetroActive Price Adjust Event');
277: END IF;
278: -- Populate the transaction details from RCV_ACCOUNTING_EVENTS
279: l_ae_txn_rec.source_table := 'RAE';
280: l_ae_txn_rec.source_id := i_transaction_id;

Line 446: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Landed Cost Adjust Event');

442: l_ae_txn_rec.description := l_ae_txn_rec.txn_type;
443:
444: ELSIF l_ae_txn_rec.txn_type_flag = 'LC ADJ' THEN
445: IF l_debug_flag = 'Y' THEN
446: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Landed Cost Adjust Event');
447: END IF;
448: -- Populate the transaction details from RCV_ACCOUNTING_EVENTS
449: l_ae_txn_rec.source_table := 'RAE';
450: l_ae_txn_rec.source_id := i_transaction_id;

Line 635: fnd_file.put_line(fnd_file.log,'Create_Acct_Lines >>> ');

631: END IF;
632: END IF;
633:
634: IF l_debug_flag = 'Y' THEN
635: fnd_file.put_line(fnd_file.log,'Create_Acct_Lines >>> ');
636: END IF;
637: EXCEPTION
638: WHEN CST_DIST_PKG_ERROR THEN
639: o_err_num := 30001;

Line 702: fnd_file.put_line(fnd_file.log,'Create_Rae_Ae_Lines <<< ');

698:
699: BEGIN
700:
701: if (l_debug_flag = 'Y') then
702: fnd_file.put_line(fnd_file.log,'Create_Rae_Ae_Lines <<< ');
703: end if;
704:
705: l_ae_line_tbl := CSTPALTY.cst_ae_line_tbl_type();
706:

Line 768: fnd_file.put_line(fnd_file.log, 'DR Clearing: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

764: l_curr_rec.currency_conv_type := i_ae_txn_rec.currency_conv_type;
765:
766: if (l_debug_flag = 'Y') then
767: if (l_rae_event = 9) then
768: fnd_file.put_line(fnd_file.log, 'DR Clearing: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
769: elsif (l_rae_event = 10) then
770: fnd_file.put_line(fnd_file.log, 'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
771: end if;
772: end if;

Line 770: fnd_file.put_line(fnd_file.log, 'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

766: if (l_debug_flag = 'Y') then
767: if (l_rae_event = 9) then
768: fnd_file.put_line(fnd_file.log, 'DR Clearing: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
769: elsif (l_rae_event = 10) then
770: fnd_file.put_line(fnd_file.log, 'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
771: end if;
772: end if;
773:
774: IF ( i_ae_txn_rec.primary_quantity = 0 ) THEN

Line 819: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

815:
816: l_stmt_num := 50;
817: if (l_debug_flag = 'Y') then
818: if (l_rae_event = 9) then
819: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
820: ELSE
821: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
822: END IF;
823: end if;

Line 821: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

817: if (l_debug_flag = 'Y') then
818: if (l_rae_event = 9) then
819: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
820: ELSE
821: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
822: END IF;
823: end if;
824:
825: IF ( i_ae_txn_rec.primary_quantity = 0) THEN

Line 860: fnd_file.put_line(fnd_file.log,'Create_Rae_Ae_Lines >>>');

856: l_stmt_num := 90;
857: o_ae_line_rec_tbl := l_ae_line_tbl;
858:
859: if (l_debug_flag = 'Y') then
860: fnd_file.put_line(fnd_file.log,'Create_Rae_Ae_Lines >>>');
861: end if;
862:
863: EXCEPTION
864:

Line 950: fnd_file.put_line(fnd_file.log,'Create_Rcv_Ae_Lines <<< ');

946: l_uom_ratio NUMBER;
947: BEGIN
948:
949: IF l_debug_flag = 'Y' THEN
950: fnd_file.put_line(fnd_file.log,'Create_Rcv_Ae_Lines <<< ');
951: END IF;
952: l_ae_line_tbl := CSTPALTY.cst_ae_line_tbl_type();
953:
954: -- Initialize local variables.

Line 1012: fnd_file.put_line(fnd_file.log,'Parent Receive Txn: '||to_char(l_par_rcv_txn));

1008: rt6.transaction_id = prior rt6.parent_transaction_id;
1009:
1010:
1011: IF l_debug_flag = 'Y' THEN
1012: fnd_file.put_line(fnd_file.log,'Parent Receive Txn: '||to_char(l_par_rcv_txn));
1013: END IF;
1014:
1015: END IF; /*end if receipt or match*/
1016:

Line 1054: fnd_file.put_line(fnd_file.log, 'The Net Quantity Received is Zero');

1050: crac.cost_group_id = i_ae_txn_rec.cost_group_id;
1051:
1052: IF (l_nqr = 0 AND nvl(i_ae_txn_rec.lcm_flag,'N') = 'N' ) THEN
1053: IF l_debug_flag = 'Y' THEN
1054: fnd_file.put_line(fnd_file.log, 'The Net Quantity Received is Zero');
1055: END IF;
1056: return;
1057: END IF;
1058:

Line 1121: fnd_file.put_line(fnd_file.log,'Error: No Acquisition Rate');

1117: and rt.po_line_location_id = poll.line_location_id
1118: and cracd.source_type = 'PO';
1119: IF (l_acq_cost_ent_po < 0) THEN
1120: IF l_debug_flag = 'Y' THEN
1121: fnd_file.put_line(fnd_file.log,'Error: No Acquisition Rate');
1122: END IF;
1123: l_err_rec.l_err_num := 999;
1124: raise process_error;
1125: END IF;

Line 1134: fnd_file.put_line(fnd_file.log,'No Acquisition Cost');

1130: l_acq_cost_ent := 0;
1131: END IF;
1132: ELSE
1133: IF l_debug_flag = 'Y' THEN
1134: fnd_file.put_line(fnd_file.log,'No Acquisition Cost');
1135: END IF;
1136: return;
1137: END IF;
1138:

Line 1210: fnd_file.put_line(fnd_file.log,'Parent of Correct: '||l_par_txn_type);

1206: ------------------------------------------------------------------------------
1207:
1208: IF (i_ae_txn_rec.txn_type = l_correct) THEN
1209: IF l_debug_flag = 'Y' THEN
1210: fnd_file.put_line(fnd_file.log,'Parent of Correct: '||l_par_txn_type);
1211: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));
1212: END IF;
1213:
1214: IF (l_par_txn_type in (l_receive,l_match,l_rtv)) THEN

Line 1211: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));

1207:
1208: IF (i_ae_txn_rec.txn_type = l_correct) THEN
1209: IF l_debug_flag = 'Y' THEN
1210: fnd_file.put_line(fnd_file.log,'Parent of Correct: '||l_par_txn_type);
1211: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));
1212: END IF;
1213:
1214: IF (l_par_txn_type in (l_receive,l_match,l_rtv)) THEN
1215: l_stage := 1;

Line 1236: fnd_file.put_line(fnd_file.log,'Net Receipt or Return: '||to_char(l_net_receipt));

1232: ELSE
1233: l_net_receipt := 1;
1234: END IF;
1235: IF l_debug_flag = 'Y' THEN
1236: fnd_file.put_line(fnd_file.log,'Net Receipt or Return: '||to_char(l_net_receipt));
1237: END IF;
1238: ------------------------------------------------------------
1239: -- A receipt can be at the shipment level or the distribution level:
1240: -- When receiving and delivering in one step, it is at the distribution level

Line 1268: fnd_file.put_line(fnd_file.log,'Document Level: '||l_doc_level);

1264: WHERE
1265: rt.transaction_id = i_ae_txn_rec.transaction_id;
1266:
1267: IF l_debug_flag = 'Y' THEN
1268: fnd_file.put_line(fnd_file.log,'Document Level: '||l_doc_level);
1269: fnd_file.put_line(fnd_file.log,'Document ID: '||to_char(l_doc_id));
1270: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));
1271: END IF;
1272:

Line 1269: fnd_file.put_line(fnd_file.log,'Document ID: '||to_char(l_doc_id));

1265: rt.transaction_id = i_ae_txn_rec.transaction_id;
1266:
1267: IF l_debug_flag = 'Y' THEN
1268: fnd_file.put_line(fnd_file.log,'Document Level: '||l_doc_level);
1269: fnd_file.put_line(fnd_file.log,'Document ID: '||to_char(l_doc_id));
1270: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));
1271: END IF;
1272:
1273: SELECT

Line 1270: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));

1266:
1267: IF l_debug_flag = 'Y' THEN
1268: fnd_file.put_line(fnd_file.log,'Document Level: '||l_doc_level);
1269: fnd_file.put_line(fnd_file.log,'Document ID: '||to_char(l_doc_id));
1270: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));
1271: END IF;
1272:
1273: SELECT
1274: count(*)

Line 1290: fnd_file.put_line(fnd_file.log,'Error: No Distributions for Document: '||to_char(l_doc_id));

1286: -- end fix for perf bug 2581067. replaced the following:
1287:
1288: IF (l_dist_count = 0) THEN
1289: IF l_debug_flag = 'Y' THEN
1290: fnd_file.put_line(fnd_file.log,'Error: No Distributions for Document: '||to_char(l_doc_id));
1291: END IF;
1292: RAISE CST_NO_PO_DIST;
1293: END IF;
1294:

Line 1442: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

1438:
1439:
1440: IF l_debug_flag = 'Y' THEN
1441: IF (l_dr_flag) THEN
1442: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1443: ELSE
1444: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1445: END IF;
1446: END IF;

Line 1444: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

1440: IF l_debug_flag = 'Y' THEN
1441: IF (l_dr_flag) THEN
1442: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1443: ELSE
1444: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1445: END IF;
1446: END IF;
1447:
1448: IF ( c_receipts_rec.dist_quantity = 0 ) THEN

Line 1502: fnd_file.put_line(fnd_file.log,'DR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

1498: l_curr_rec.alt_currency);
1499:
1500: IF l_debug_flag = 'Y' THEN
1501: IF (l_dr_flag) THEN
1502: fnd_file.put_line(fnd_file.log,'DR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1503: ELSE
1504: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1505: END IF;
1506: END IF;

Line 1504: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

1500: IF l_debug_flag = 'Y' THEN
1501: IF (l_dr_flag) THEN
1502: fnd_file.put_line(fnd_file.log,'DR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1503: ELSE
1504: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1505: END IF;
1506: END IF;
1507:
1508: IF ( c_receipts_rec.dist_quantity = 0 ) THEN

Line 1555: fnd_file.put_line(fnd_file.log,'DR Landed Cost Abs: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

1551: l_curr_rec.alt_currency);
1552:
1553: IF l_debug_flag = 'Y' THEN
1554: IF (l_dr_flag) THEN
1555: fnd_file.put_line(fnd_file.log,'DR Landed Cost Abs: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1556: ELSE
1557: fnd_file.put_line(fnd_file.log,'CR Landed Cost Abs: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1558: END IF;
1559: END IF;

Line 1557: fnd_file.put_line(fnd_file.log,'CR Landed Cost Abs: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

1553: IF l_debug_flag = 'Y' THEN
1554: IF (l_dr_flag) THEN
1555: fnd_file.put_line(fnd_file.log,'DR Landed Cost Abs: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1556: ELSE
1557: fnd_file.put_line(fnd_file.log,'CR Landed Cost Abs: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1558: END IF;
1559: END IF;
1560:
1561: IF ( c_receipts_rec.dist_quantity = 0 ) THEN

Line 1668: fnd_file.put_line(fnd_file.log,'DR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

1664: --acq cost is a combination of po and invoice rate and is in functional currency
1665:
1666: IF l_debug_flag = 'Y' THEN
1667: IF (l_dr_flag) THEN
1668: fnd_file.put_line(fnd_file.log,'DR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1669: ELSE
1670: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1671: END IF;
1672: END IF;

Line 1670: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

1666: IF l_debug_flag = 'Y' THEN
1667: IF (l_dr_flag) THEN
1668: fnd_file.put_line(fnd_file.log,'DR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1669: ELSE
1670: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1671: END IF;
1672: END IF;
1673:
1674: /* Bug 2686598. Use the quantity in the po_distribution to calcualte rate_or_amount

Line 1755: fnd_file.put_line(fnd_file.log,'PO OU / Rcv OU '|| l_po_ou_id ||' / '|| l_rcv_ou_id);

1751:
1752: l_stmt_num := 752;
1753:
1754: IF l_debug_flag = 'Y' THEN
1755: fnd_file.put_line(fnd_file.log,'PO OU / Rcv OU '|| l_po_ou_id ||' / '|| l_rcv_ou_id);
1756: END IF;
1757:
1758: l_stmt_num := 753;
1759:

Line 1767: fnd_file.put_line(fnd_file.log,'GP scenario. Trxn val: '||to_char(c_receipts_rec.dist_quantity * l_acq_cost_ent));

1763:
1764: l_stmt_num := 754;
1765:
1766: IF l_debug_flag = 'Y' THEN
1767: fnd_file.put_line(fnd_file.log,'GP scenario. Trxn val: '||to_char(c_receipts_rec.dist_quantity * l_acq_cost_ent));
1768: END IF;
1769:
1770: l_ae_line_rec.transaction_value := c_receipts_rec.dist_quantity * l_acq_cost_ent;
1771:

Line 1787: fnd_file.put_line(fnd_file.log,'Normal Receipt. Trxn val: '||to_char(c_receipts_rec.dist_quantity * (l_po_price + c_receipts_rec.tax)));

1783:
1784: l_stmt_num := 755;
1785:
1786: IF l_debug_flag = 'Y' THEN
1787: fnd_file.put_line(fnd_file.log,'Normal Receipt. Trxn val: '||to_char(c_receipts_rec.dist_quantity * (l_po_price + c_receipts_rec.tax)));
1788: END IF;
1789:
1790: l_ae_line_rec.transaction_value := c_receipts_rec.dist_quantity * (l_po_price + c_receipts_rec.tax);
1791:

Line 1802: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

1798: l_stmt_num := 756;
1799:
1800: IF l_debug_flag = 'Y' THEN
1801: IF (l_dr_flag) THEN
1802: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1803: ELSE
1804: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1805: END IF;
1806: END IF;

Line 1804: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

1800: IF l_debug_flag = 'Y' THEN
1801: IF (l_dr_flag) THEN
1802: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1803: ELSE
1804: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1805: END IF;
1806: END IF;
1807:
1808: /* Bug 2686598. Use the quantity in the po_distribution to calcualte rate_or_amount

Line 1984: fnd_file.put_line(fnd_file.log,'DR Special Charges: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

1980: l_curr_rec.currency_conv_type := c_chg_rec.exchange_rate_type;
1981:
1982: IF l_debug_flag = 'Y' THEN
1983: IF (l_dr_flag) THEN
1984: fnd_file.put_line(fnd_file.log,'DR Special Charges: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1985: ELSE
1986: fnd_file.put_line(fnd_file.log,'CR Special Charges: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1987: END IF;
1988: END IF;

Line 1986: fnd_file.put_line(fnd_file.log,'CR Special Charges: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

1982: IF l_debug_flag = 'Y' THEN
1983: IF (l_dr_flag) THEN
1984: fnd_file.put_line(fnd_file.log,'DR Special Charges: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1985: ELSE
1986: fnd_file.put_line(fnd_file.log,'CR Special Charges: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1987: END IF;
1988: END IF;
1989:
1990: /* Bug 2686598. Use the quantity in the po_distribution to calcualte rate_or_amount

Line 2179: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Original IPV: '||to_char(c_ipv_rec.invoice_price_variance));

2175: l_correct_ipv_amount := 0;
2176: END;
2177:
2178: IF l_debug_flag = 'Y' THEN
2179: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Original IPV: '||to_char(c_ipv_rec.invoice_price_variance));
2180: FND_FILE.PUT_LINE(FND_FILE.LOG, 'IPV - Price Correction Invoice: '||to_char(l_correct_ipv_amount));
2181: END IF;
2182:
2183: l_total_ipv := c_ipv_rec.invoice_price_variance + l_correct_ipv_amount;

Line 2180: FND_FILE.PUT_LINE(FND_FILE.LOG, 'IPV - Price Correction Invoice: '||to_char(l_correct_ipv_amount));

2176: END;
2177:
2178: IF l_debug_flag = 'Y' THEN
2179: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Original IPV: '||to_char(c_ipv_rec.invoice_price_variance));
2180: FND_FILE.PUT_LINE(FND_FILE.LOG, 'IPV - Price Correction Invoice: '||to_char(l_correct_ipv_amount));
2181: END IF;
2182:
2183: l_total_ipv := c_ipv_rec.invoice_price_variance + l_correct_ipv_amount;
2184:

Line 2199: fnd_file.put_line(fnd_file.log,'DR IPV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

2195: l_curr_rec.currency_conv_type := c_ipv_rec.exchange_rate_type;
2196:
2197: IF l_debug_flag = 'Y' THEN
2198: IF (l_dr_flag) THEN
2199: fnd_file.put_line(fnd_file.log,'DR IPV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2200: ELSE
2201: fnd_file.put_line(fnd_file.log,'CR IPV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2202: END IF;
2203: END IF;

Line 2201: fnd_file.put_line(fnd_file.log,'CR IPV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

2197: IF l_debug_flag = 'Y' THEN
2198: IF (l_dr_flag) THEN
2199: fnd_file.put_line(fnd_file.log,'DR IPV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2200: ELSE
2201: fnd_file.put_line(fnd_file.log,'CR IPV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2202: END IF;
2203: END IF;
2204:
2205: /* Bug 2686598. Use the quantity in the po_distribution to calcualte rate_or_amount

Line 2356: fnd_file.put_line(fnd_file.log,'DR ERV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

2352: l_curr_rec.currency_conv_type := null;
2353:
2354: IF l_debug_flag = 'Y' THEN
2355: IF (l_dr_flag) THEN
2356: fnd_file.put_line(fnd_file.log,'DR ERV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2357: ELSE
2358: fnd_file.put_line(fnd_file.log,'CR ERV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2359: END IF;
2360: END IF;

Line 2358: fnd_file.put_line(fnd_file.log,'CR ERV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

2354: IF l_debug_flag = 'Y' THEN
2355: IF (l_dr_flag) THEN
2356: fnd_file.put_line(fnd_file.log,'DR ERV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2357: ELSE
2358: fnd_file.put_line(fnd_file.log,'CR ERV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2359: END IF;
2360: END IF;
2361:
2362: /* Bug 2686598. Use the quantity in the po_distribution to calcualte rate_or_amount

Line 2530: fnd_file.put_line(fnd_file.log,'DR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

2526: l_ae_line_rec.ae_line_type := 5;
2527:
2528: IF l_debug_flag = 'Y' THEN
2529: IF (l_dr_flag) THEN
2530: fnd_file.put_line(fnd_file.log,'DR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2531: ELSE
2532: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2533: END IF;
2534: END IF;

Line 2532: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

2528: IF l_debug_flag = 'Y' THEN
2529: IF (l_dr_flag) THEN
2530: fnd_file.put_line(fnd_file.log,'DR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2531: ELSE
2532: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2533: END IF;
2534: END IF;
2535:
2536: /* Bug 2686598. Use the quantity in the po_distribution to calcualte rate_or_amount

Line 2594: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

2590: l_ae_line_rec.ae_line_type := 16;
2591:
2592: IF l_debug_flag = 'Y' THEN
2593: IF (l_dr_flag) THEN
2594: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2595: ELSE
2596: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2597: END IF;
2598: END IF;

Line 2596: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

2592: IF l_debug_flag = 'Y' THEN
2593: IF (l_dr_flag) THEN
2594: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2595: ELSE
2596: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2597: END IF;
2598: END IF;
2599:
2600: /* Bug 2686598. Use the quantity in the po_distribution to calcualte rate_or_amount

Line 2686: fnd_file.put_line(fnd_file.log,'DR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

2682: END IF;
2683:
2684: IF l_debug_flag = 'Y' THEN
2685: IF (l_dr_flag) THEN
2686: fnd_file.put_line(fnd_file.log,'DR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2687: ELSE
2688: fnd_file.put_line(fnd_file.log,'CR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2689: END IF;
2690: END IF;

Line 2688: fnd_file.put_line(fnd_file.log,'CR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

2684: IF l_debug_flag = 'Y' THEN
2685: IF (l_dr_flag) THEN
2686: fnd_file.put_line(fnd_file.log,'DR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2687: ELSE
2688: fnd_file.put_line(fnd_file.log,'CR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2689: END IF;
2690: END IF;
2691:
2692:

Line 2716: fnd_file.put_line(fnd_file.log,'DR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

2712: END IF;
2713:
2714: IF l_debug_flag = 'Y' THEN
2715: IF (l_dr_flag) THEN
2716: fnd_file.put_line(fnd_file.log,'DR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2717: ELSE
2718: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2719: END IF;
2720: END IF;

Line 2718: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

2714: IF l_debug_flag = 'Y' THEN
2715: IF (l_dr_flag) THEN
2716: fnd_file.put_line(fnd_file.log,'DR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2717: ELSE
2718: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2719: END IF;
2720: END IF;
2721:
2722: CSTPAPPR.insert_account (i_ae_txn_rec,

Line 2756: fnd_file.put_line(fnd_file.log,'No Encumbrance account at PO level');

2752: -- no encumbrance reversal is necessary
2753:
2754: IF (c_receipts_rec.encumbrance_account_id = -1) THEN
2755: IF l_debug_flag = 'Y' THEN
2756: fnd_file.put_line(fnd_file.log,'No Encumbrance account at PO level');
2757: END IF;
2758: ELSE
2759:
2760: CSTPAPPR.check_encumbrance(

Line 2797: fnd_file.put_line(fnd_file.log,'Delivered Quantity: '||to_char(l_quantity_delivered));

2793: l_quantity_delivered := CSTPAPPR.get_net_del_qty(
2794: c_receipts_rec.po_distribution_id,
2795: i_ae_txn_rec.transaction_id);
2796: IF l_debug_flag = 'Y' THEN
2797: fnd_file.put_line(fnd_file.log,'Delivered Quantity: '||to_char(l_quantity_delivered));
2798: END IF;
2799:
2800: l_stmt_num := 86;
2801:

Line 2917: fnd_file.put_line(fnd_file.log,'DR Enc: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

2913: l_ae_line_rec.encum_type_id := l_purch_encumbrance_type_id;
2914:
2915: IF l_debug_flag = 'Y' THEN
2916: IF (l_dr_flag) THEN
2917: fnd_file.put_line(fnd_file.log,'DR Enc: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2918: ELSE
2919: fnd_file.put_line(fnd_file.log,'CR Enc: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2920: END IF;
2921: END IF;

Line 2919: fnd_file.put_line(fnd_file.log,'CR Enc: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

2915: IF l_debug_flag = 'Y' THEN
2916: IF (l_dr_flag) THEN
2917: fnd_file.put_line(fnd_file.log,'DR Enc: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2918: ELSE
2919: fnd_file.put_line(fnd_file.log,'CR Enc: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2920: END IF;
2921: END IF;
2922: /* Bug 2686598. Use the quantity in the po_distribution to calcualte rate_or_amount
2923: not the primary quantity on the transaction */

Line 2963: fnd_file.put_line(fnd_file.log,'Create_Rcv_Ae_Lines >>> ');

2959: -- ------------------------------
2960: l_stmt_num := 90;
2961: o_ae_line_rec_tbl := l_ae_line_tbl;
2962: IF l_debug_flag = 'Y' THEN
2963: fnd_file.put_line(fnd_file.log,'Create_Rcv_Ae_Lines >>> ');
2964: END IF;
2965:
2966: EXCEPTION
2967:

Line 3019: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Create_Adj_Ae_Lines <<<');

3015:
3016: BEGIN
3017:
3018: IF l_debug_flag = 'Y' THEN
3019: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Create_Adj_Ae_Lines <<<');
3020: END IF;
3021:
3022: -- Initialize the collection
3023: l_ae_line_tbl := CSTPALTY.cst_ae_line_tbl_type();

Line 3046: FND_FILE.PUT_LINE(FND_FILE.LOG, l_curr_rec.pri_currency || ' '||l_curr_rec.alt_currency);

3042: l_curr_rec.currency_conv_rate := p_ae_txn_rec.currency_conv_rate;
3043:
3044:
3045: IF l_debug_flag = 'Y' THEN
3046: FND_FILE.PUT_LINE(FND_FILE.LOG, l_curr_rec.pri_currency || ' '||l_curr_rec.alt_currency);
3047: END IF;
3048:
3049: -- Populate the Accounting Line Record
3050:

Line 3070: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Debit Account: '||to_char(l_debit_account));

3066: AND COST_TYPE_ID = P_AE_TXN_REC.COST_TYPE_ID
3067: AND COST_GROUP_ID = P_AE_TXN_REC.COST_GROUP_ID;
3068:
3069: IF l_debug_flag = 'Y' THEN
3070: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Debit Account: '||to_char(l_debit_account));
3071: END IF;
3072:
3073: IF l_debit_account = -1 THEN
3074: RAISE INVALID_RETRO_ADJ_ACCOUNT;

Line 3137: FND_FILE.PUT_LINE(FND_FILE.log, 'l_ae_line_rec.accounted_value: '||to_char(l_ae_line_rec.accounted_value));

3133:
3134: l_ae_line_rec.transaction_value := l_ae_line_rec.accounted_value;
3135:
3136: IF l_debug_flag = 'Y' THEN
3137: FND_FILE.PUT_LINE(FND_FILE.log, 'l_ae_line_rec.accounted_value: '||to_char(l_ae_line_rec.accounted_value));
3138: END IF;
3139:
3140: l_ae_line_rec.source_table := 'RAE';
3141: l_ae_line_rec.source_id := p_ae_txn_rec.transaction_id;

Line 3174: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Credit Account: '||to_char(l_ae_line_rec.account));

3170:
3171: l_ae_line_rec.account := p_ae_txn_rec.credit_account;
3172: l_ae_line_rec.ae_line_type := 16;
3173: IF l_debug_flag = 'Y' THEN
3174: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Credit Account: '||to_char(l_ae_line_rec.account));
3175: END IF;
3176:
3177: l_stmt_num := 70;
3178:

Line 3194: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Create_Adj_Ae_Lines >>>');

3190: -- Copy the local structure to the Output
3191: x_ae_line_rec_tbl := l_ae_line_tbl;
3192:
3193: IF l_debug_flag = 'Y' THEN
3194: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Create_Adj_Ae_Lines >>>');
3195: END IF;
3196:
3197: EXCEPTION
3198: WHEN INVALID_RETRO_ADJ_ACCOUNT THEN

Line 3203: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);

3199: l_err_rec.l_err_num := SQLCODE;
3200: l_err_rec.l_err_code := 'No Periodic Retroactive Adjustment Account Specified';
3201: l_err_rec.l_err_msg := 'CSTPAPPR:( '||to_char(l_stmt_num)||' ): ' || l_err_rec.l_err_code;
3202: x_ae_err_rec := l_err_rec;
3203: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);
3204:
3205: WHEN PROCESS_ERROR THEN
3206: x_ae_err_rec := l_err_rec;
3207: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);

Line 3207: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);

3203: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);
3204:
3205: WHEN PROCESS_ERROR THEN
3206: x_ae_err_rec := l_err_rec;
3207: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);
3208:
3209: WHEN OTHERS THEN
3210: l_err_rec.l_err_num := SQLCODE;
3211: l_err_rec.l_err_code := '';

Line 3214: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);

3210: l_err_rec.l_err_num := SQLCODE;
3211: l_err_rec.l_err_code := '';
3212: l_err_rec.l_err_msg := 'CSTPAPPR:( '||to_char(l_stmt_num)||' ): ' || to_char(SQLCODE);
3213: x_ae_err_rec := l_err_rec;
3214: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);
3215:
3216: END create_adj_ae_lines;
3217:
3218: /*LCM CHANGES */

Line 3241: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Create_LC_Adj_Ae_Lines <<<');

3237:
3238: BEGIN
3239:
3240: IF l_debug_flag = 'Y' THEN
3241: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Create_LC_Adj_Ae_Lines <<<');
3242: END IF;
3243:
3244: -- Initialize the collection
3245: l_ae_line_tbl := CSTPALTY.cst_ae_line_tbl_type();

Line 3268: FND_FILE.PUT_LINE(FND_FILE.LOG, l_curr_rec.pri_currency || ' '||l_curr_rec.alt_currency);

3264: l_curr_rec.currency_conv_rate := p_ae_txn_rec.currency_conv_rate;
3265:
3266:
3267: IF l_debug_flag = 'Y' THEN
3268: FND_FILE.PUT_LINE(FND_FILE.LOG, l_curr_rec.pri_currency || ' '||l_curr_rec.alt_currency);
3269: END IF;
3270:
3271: l_stmt_num := 30;
3272:

Line 3300: FND_FILE.PUT_LINE(FND_FILE.log, 'l_ae_line_rec.accounted_value: '||to_char(l_ae_line_rec.accounted_value));

3296: END IF;
3297:
3298:
3299: IF l_debug_flag = 'Y' THEN
3300: FND_FILE.PUT_LINE(FND_FILE.log, 'l_ae_line_rec.accounted_value: '||to_char(l_ae_line_rec.accounted_value));
3301: END IF;
3302:
3303: l_ae_line_rec.source_table := 'RAE';
3304: l_ae_line_rec.source_id := p_ae_txn_rec.transaction_id;

Line 3353: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Credit Account: '||to_char(l_ae_line_rec.account));

3349: END IF;
3350: END IF;
3351:
3352: IF l_debug_flag = 'Y' THEN
3353: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Credit Account: '||to_char(l_ae_line_rec.account));
3354: END IF;
3355:
3356: l_stmt_num := 70;
3357:

Line 3373: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Create_LC_Adj_Ae_Lines >>>');

3369: -- Copy the local structure to the Output
3370: x_ae_line_rec_tbl := l_ae_line_tbl;
3371:
3372: IF l_debug_flag = 'Y' THEN
3373: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Create_LC_Adj_Ae_Lines >>>');
3374: END IF;
3375:
3376: EXCEPTION
3377: WHEN PROCESS_ERROR THEN

Line 3379: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);

3375:
3376: EXCEPTION
3377: WHEN PROCESS_ERROR THEN
3378: x_ae_err_rec := l_err_rec;
3379: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);
3380:
3381: WHEN OTHERS THEN
3382: l_err_rec.l_err_num := SQLCODE;
3383: l_err_rec.l_err_code := '';

Line 3386: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);

3382: l_err_rec.l_err_num := SQLCODE;
3383: l_err_rec.l_err_code := '';
3384: l_err_rec.l_err_msg := 'CSTPAPPR:( '||to_char(l_stmt_num)||' ): ' || to_char(SQLCODE);
3385: x_ae_err_rec := l_err_rec;
3386: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);
3387:
3388: END create_lc_adj_ae_lines;
3389: /*============================================================================+
3390: | This procedure processes the transaction data and creates accounting entry |

Line 3433: fnd_file.put_line(fnd_file.log,'Create_Per_End_Ae_Lines <<<');

3429:
3430: BEGIN
3431:
3432: IF l_debug_flag = 'Y' THEN
3433: fnd_file.put_line(fnd_file.log,'Create_Per_End_Ae_Lines <<<');
3434: END IF;
3435:
3436: -- Initialize API return status to success
3437: l_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3484: fnd_file.put_line(fnd_file.log,'Document Level: '||l_doc_level);

3480: WHERE
3481: rt.transaction_id = i_ae_txn_rec.transaction_id;
3482:
3483: IF l_debug_flag = 'Y' THEN
3484: fnd_file.put_line(fnd_file.log,'Document Level: '||l_doc_level);
3485: fnd_file.put_line(fnd_file.log,'Document ID: '||to_char(l_doc_id));
3486: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));
3487: END IF;
3488:

Line 3485: fnd_file.put_line(fnd_file.log,'Document ID: '||to_char(l_doc_id));

3481: rt.transaction_id = i_ae_txn_rec.transaction_id;
3482:
3483: IF l_debug_flag = 'Y' THEN
3484: fnd_file.put_line(fnd_file.log,'Document Level: '||l_doc_level);
3485: fnd_file.put_line(fnd_file.log,'Document ID: '||to_char(l_doc_id));
3486: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));
3487: END IF;
3488:
3489: SELECT

Line 3486: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));

3482:
3483: IF l_debug_flag = 'Y' THEN
3484: fnd_file.put_line(fnd_file.log,'Document Level: '||l_doc_level);
3485: fnd_file.put_line(fnd_file.log,'Document ID: '||to_char(l_doc_id));
3486: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));
3487: END IF;
3488:
3489: SELECT
3490: count(*)

Line 3504: fnd_file.put_line(fnd_file.log,'Error: No distributions for the Document: '||to_char(l_doc_id));

3500: AND rownum <= 1;
3501:
3502: IF (l_dist_count = 0) THEN
3503: IF l_debug_flag = 'Y' THEN
3504: fnd_file.put_line(fnd_file.log,'Error: No distributions for the Document: '||to_char(l_doc_id));
3505: END IF;
3506: RAISE CST_NO_PO_DIST;
3507: END IF;
3508:

Line 3632: fnd_file.put_line(fnd_file.log,'DR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

3628: l_ae_line_rec.account := c_receipts_rec.expense_account_id;
3629: l_ae_line_rec.ae_line_type := 20;
3630: IF l_debug_flag = 'Y' THEN
3631: IF (l_dr_flag) THEN
3632: fnd_file.put_line(fnd_file.log,'DR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3633: ELSE
3634: fnd_file.put_line(fnd_file.log,'CR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3635: END IF;
3636: END IF;

Line 3634: fnd_file.put_line(fnd_file.log,'CR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

3630: IF l_debug_flag = 'Y' THEN
3631: IF (l_dr_flag) THEN
3632: fnd_file.put_line(fnd_file.log,'DR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3633: ELSE
3634: fnd_file.put_line(fnd_file.log,'CR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3635: END IF;
3636: END IF;
3637:
3638: CSTPAPPR.insert_account (i_ae_txn_rec,

Line 3656: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

3652: l_ae_line_rec.ae_line_type := 16;
3653:
3654: IF l_debug_flag = 'Y' THEN
3655: IF (l_dr_flag) THEN
3656: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3657: ELSE
3658: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3659: END IF;
3660: END IF;

Line 3658: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

3654: IF l_debug_flag = 'Y' THEN
3655: IF (l_dr_flag) THEN
3656: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3657: ELSE
3658: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3659: END IF;
3660: END IF;
3661: CSTPAPPR.insert_account (i_ae_txn_rec,
3662: l_curr_rec,

Line 3692: fnd_file.put_line(fnd_file.log,'No Encumbrance account at PO level');

3688: -- no encumbrance reversal is necessary
3689:
3690: IF (c_receipts_rec.encumbrance_account_id = -1) THEN
3691: IF l_debug_flag = 'Y' THEN
3692: fnd_file.put_line(fnd_file.log,'No Encumbrance account at PO level');
3693: END IF;
3694: ELSE
3695:
3696: CSTPAPPR.check_encumbrance(

Line 3727: fnd_file.put_line(fnd_file.log,'DR Encumbrance: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

3723: l_ae_line_rec.encum_type_id := l_purch_encumbrance_type_id;
3724:
3725: IF l_debug_flag = 'Y' THEN
3726: IF (l_dr_flag) THEN
3727: fnd_file.put_line(fnd_file.log,'DR Encumbrance: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3728: ELSE
3729: fnd_file.put_line(fnd_file.log,'CR Encumbrance: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3730: END IF;
3731: END IF;

Line 3729: fnd_file.put_line(fnd_file.log,'CR Encumbrance: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));

3725: IF l_debug_flag = 'Y' THEN
3726: IF (l_dr_flag) THEN
3727: fnd_file.put_line(fnd_file.log,'DR Encumbrance: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3728: ELSE
3729: fnd_file.put_line(fnd_file.log,'CR Encumbrance: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3730: END IF;
3731: END IF;
3732: CSTPAPPR.insert_account (i_ae_txn_rec,
3733: l_curr_rec,

Line 3759: fnd_file.put_line(fnd_file.log,'Create_Per_End_Ae_Lines >>>');

3755: -- ------------------------------
3756: l_stmt_num := 90;
3757: o_ae_line_rec_tbl := l_ae_line_tbl;
3758: IF l_debug_flag = 'Y' THEN
3759: fnd_file.put_line(fnd_file.log,'Create_Per_End_Ae_Lines >>>');
3760: END IF;
3761:
3762: EXCEPTION
3763:

Line 3804: fnd_file.put_line(fnd_file.log,'Check_Encumbrance <<<');

3800: cst_no_enc_account exception;
3801:
3802: BEGIN
3803: IF l_debug_flag = 'Y' THEN
3804: fnd_file.put_line(fnd_file.log,'Check_Encumbrance <<<');
3805: fnd_file.put_line(fnd_file.log,'Encumbrance Account: '||to_char(i_encumbrance_account_id));
3806: END IF;
3807:
3808: l_stmt_num := 10;

Line 3805: fnd_file.put_line(fnd_file.log,'Encumbrance Account: '||to_char(i_encumbrance_account_id));

3801:
3802: BEGIN
3803: IF l_debug_flag = 'Y' THEN
3804: fnd_file.put_line(fnd_file.log,'Check_Encumbrance <<<');
3805: fnd_file.put_line(fnd_file.log,'Encumbrance Account: '||to_char(i_encumbrance_account_id));
3806: END IF;
3807:
3808: l_stmt_num := 10;
3809: SELECT

Line 3872: fnd_file.put_line(fnd_file.log,'Check_Encumbrance >>>');

3868: END IF;
3869: */
3870:
3871: IF l_debug_flag = 'Y' THEN
3872: fnd_file.put_line(fnd_file.log,'Check_Encumbrance >>>');
3873: END IF;
3874: EXCEPTION
3875: WHEN CST_NO_ENC_ACCOUNT THEN
3876: o_ae_err_rec.l_err_num := 30010;

Line 3910: fnd_file.put_line(fnd_file.log,'Insert_Account <<< ');

3906:
3907: BEGIN
3908:
3909: IF l_debug_flag = 'Y' THEN
3910: fnd_file.put_line(fnd_file.log,'Insert_Account <<< ');
3911: END IF;
3912: -- Initialize variables.
3913: -- ---------------------
3914: l_err_rec.l_err_num := 0;

Line 3942: fnd_file.put_line(fnd_file.log,'Alt Currency : '||i_ae_curr_rec.alt_currency);

3938:
3939: l_stmt_num := 30;
3940:
3941: IF l_debug_flag = 'Y' THEN
3942: fnd_file.put_line(fnd_file.log,'Alt Currency : '||i_ae_curr_rec.alt_currency);
3943: fnd_file.put_line(fnd_file.log,'Pri Currency : '||i_ae_curr_rec.pri_currency);
3944: fnd_file.put_line(fnd_file.log,'Currency Rate: '||to_char(i_ae_curr_rec.currency_conv_rate));
3945: END IF;
3946:

Line 3943: fnd_file.put_line(fnd_file.log,'Pri Currency : '||i_ae_curr_rec.pri_currency);

3939: l_stmt_num := 30;
3940:
3941: IF l_debug_flag = 'Y' THEN
3942: fnd_file.put_line(fnd_file.log,'Alt Currency : '||i_ae_curr_rec.alt_currency);
3943: fnd_file.put_line(fnd_file.log,'Pri Currency : '||i_ae_curr_rec.pri_currency);
3944: fnd_file.put_line(fnd_file.log,'Currency Rate: '||to_char(i_ae_curr_rec.currency_conv_rate));
3945: END IF;
3946:
3947: select

Line 3944: fnd_file.put_line(fnd_file.log,'Currency Rate: '||to_char(i_ae_curr_rec.currency_conv_rate));

3940:
3941: IF l_debug_flag = 'Y' THEN
3942: fnd_file.put_line(fnd_file.log,'Alt Currency : '||i_ae_curr_rec.alt_currency);
3943: fnd_file.put_line(fnd_file.log,'Pri Currency : '||i_ae_curr_rec.pri_currency);
3944: fnd_file.put_line(fnd_file.log,'Currency Rate: '||to_char(i_ae_curr_rec.currency_conv_rate));
3945: END IF;
3946:
3947: select
3948: nvl(i_ae_curr_rec.alt_currency,i_ae_curr_rec.pri_currency)

Line 4013: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Accounted_Value: '||to_char(l_accounted_value));

4009:
4010: END IF;
4011:
4012: IF l_debug_flag = 'Y' THEN
4013: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Accounted_Value: '||to_char(l_accounted_value));
4014: END IF;
4015:
4016: -- ERV does not have an entered amount.
4017: if (l_ae_line_tbl(next_record_avail).ae_line_type = 18) then

Line 4072: FND_FILE.PUT_LINE(FND_FILE.LOG, 'No. of Records: '||to_char(l_ae_line_tbl.COUNT));

4068: l_ae_line_tbl(next_record_avail).reference9 := NULL;
4069: l_ae_line_tbl(next_record_avail).reference10 := NULL;
4070:
4071: IF l_debug_flag = 'Y' THEN
4072: FND_FILE.PUT_LINE(FND_FILE.LOG, 'No. of Records: '||to_char(l_ae_line_tbl.COUNT));
4073: fnd_file.put_line(fnd_file.log,'Insert_Account >>> ');
4074: END IF;
4075:
4076: EXCEPTION

Line 4073: fnd_file.put_line(fnd_file.log,'Insert_Account >>> ');

4069: l_ae_line_tbl(next_record_avail).reference10 := NULL;
4070:
4071: IF l_debug_flag = 'Y' THEN
4072: FND_FILE.PUT_LINE(FND_FILE.LOG, 'No. of Records: '||to_char(l_ae_line_tbl.COUNT));
4073: fnd_file.put_line(fnd_file.log,'Insert_Account >>> ');
4074: END IF;
4075:
4076: EXCEPTION
4077:

Line 4230: fnd_file.put_line(fnd_file.log,'Balance_Account <<<');

4226: l_stmt_num NUMBER;
4227: l_ipv_line_flag NUMBER := 0; /*to find out if there is ipv line */
4228: BEGIN
4229: IF l_debug_flag = 'Y' THEN
4230: fnd_file.put_line(fnd_file.log,'Balance_Account <<<');
4231: END IF;
4232: if (l_ae_line_tbl.exists(1)) then
4233: l_stmt_num := 10;
4234: For i in l_ae_line_tbl.FIRST .. l_ae_line_tbl.LAST loop

Line 4271: fnd_file.put_line(fnd_file.log,'Balancing Dr: '||to_char(l_ae_line_tbl(l_last_rec).entered_dr));

4267:
4268:
4269: if l_ae_line_tbl(l_last_rec).accounted_dr is not NULL then
4270: IF l_debug_flag = 'Y' THEN
4271: fnd_file.put_line(fnd_file.log,'Balancing Dr: '||to_char(l_ae_line_tbl(l_last_rec).entered_dr));
4272: END IF;
4273: l_ae_line_tbl(l_last_rec).accounted_dr :=
4274: l_ae_line_tbl(l_last_rec).accounted_dr - l_acc_value;
4275: l_ae_line_tbl(l_last_rec).entered_dr :=

Line 4279: fnd_file.put_line(fnd_file.log,'Balancing Cr: '||to_char(l_ae_line_tbl(l_last_rec).entered_cr));

4275: l_ae_line_tbl(l_last_rec).entered_dr :=
4276: l_ae_line_tbl(l_last_rec).entered_dr - l_ent_value;
4277: elsif l_ae_line_tbl(l_last_rec).accounted_cr is not NULL then
4278: IF l_debug_flag = 'Y' THEN
4279: fnd_file.put_line(fnd_file.log,'Balancing Cr: '||to_char(l_ae_line_tbl(l_last_rec).entered_cr));
4280: END IF;
4281: l_ae_line_tbl(l_last_rec).accounted_cr :=
4282: l_ae_line_tbl(l_last_rec).accounted_cr + l_acc_value;
4283: l_ae_line_tbl(l_last_rec).entered_cr :=

Line 4289: fnd_file.put_line(fnd_file.log,'Balance_Account >>>');

4285: end if;
4286:
4287: end if;
4288: IF l_debug_flag = 'Y' THEN
4289: fnd_file.put_line(fnd_file.log,'Balance_Account >>>');
4290: END IF;
4291:
4292: EXCEPTION
4293: