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 948: fnd_file.put_line(fnd_file.log,'Create_Rcv_Ae_Lines <<< ');

944: l_rcv_ou_id NUMBER; /* Bug 5555888 */
945: BEGIN
946:
947: IF l_debug_flag = 'Y' THEN
948: fnd_file.put_line(fnd_file.log,'Create_Rcv_Ae_Lines <<< ');
949: END IF;
950: l_ae_line_tbl := CSTPALTY.cst_ae_line_tbl_type();
951:
952: -- Initialize local variables.

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

998: rt6.transaction_id = prior rt6.parent_transaction_id;
999:
1000:
1001: IF l_debug_flag = 'Y' THEN
1002: fnd_file.put_line(fnd_file.log,'Parent Receive Txn: '||to_char(l_par_rcv_txn));
1003: END IF;
1004:
1005: END IF; /*end if receipt or match*/
1006:

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

1040: crac.cost_group_id = i_ae_txn_rec.cost_group_id;
1041:
1042: IF (l_nqr = 0 AND nvl(i_ae_txn_rec.lcm_flag,'N') = 'N' ) THEN
1043: IF l_debug_flag = 'Y' THEN
1044: fnd_file.put_line(fnd_file.log, 'The Net Quantity Received is Zero');
1045: END IF;
1046: return;
1047: END IF;
1048:

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

1103: and rt.po_line_location_id = poll.line_location_id
1104: and cracd.source_type = 'PO';
1105: IF (l_acq_cost_ent_po < 0) THEN
1106: IF l_debug_flag = 'Y' THEN
1107: fnd_file.put_line(fnd_file.log,'Error: No Acquisition Rate');
1108: END IF;
1109: l_err_rec.l_err_num := 999;
1110: raise process_error;
1111: END IF;

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

1116: l_acq_cost_ent := 0;
1117: END IF;
1118: ELSE
1119: IF l_debug_flag = 'Y' THEN
1120: fnd_file.put_line(fnd_file.log,'No Acquisition Cost');
1121: END IF;
1122: return;
1123: END IF;
1124:

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

1192: ------------------------------------------------------------------------------
1193:
1194: IF (i_ae_txn_rec.txn_type = l_correct) THEN
1195: IF l_debug_flag = 'Y' THEN
1196: fnd_file.put_line(fnd_file.log,'Parent of Correct: '||l_par_txn_type);
1197: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));
1198: END IF;
1199:
1200: IF (l_par_txn_type in (l_receive,l_match,l_rtv)) THEN

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

1193:
1194: IF (i_ae_txn_rec.txn_type = l_correct) THEN
1195: IF l_debug_flag = 'Y' THEN
1196: fnd_file.put_line(fnd_file.log,'Parent of Correct: '||l_par_txn_type);
1197: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));
1198: END IF;
1199:
1200: IF (l_par_txn_type in (l_receive,l_match,l_rtv)) THEN
1201: l_stage := 1;

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

1213: ELSE
1214: l_net_receipt := 1;
1215: END IF;
1216: IF l_debug_flag = 'Y' THEN
1217: fnd_file.put_line(fnd_file.log,'Net Receipt or Return: '||to_char(l_net_receipt));
1218: END IF;
1219: ------------------------------------------------------------
1220: -- A receipt can be at the shipment level or the distribution level:
1221: -- When receiving and delivering in one step, it is at the distribution level

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

1237: WHERE
1238: rt.transaction_id = i_ae_txn_rec.transaction_id;
1239:
1240: IF l_debug_flag = 'Y' THEN
1241: fnd_file.put_line(fnd_file.log,'Document Level: '||l_doc_level);
1242: fnd_file.put_line(fnd_file.log,'Document ID: '||to_char(l_doc_id));
1243: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));
1244: END IF;
1245:

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

1238: rt.transaction_id = i_ae_txn_rec.transaction_id;
1239:
1240: IF l_debug_flag = 'Y' THEN
1241: fnd_file.put_line(fnd_file.log,'Document Level: '||l_doc_level);
1242: fnd_file.put_line(fnd_file.log,'Document ID: '||to_char(l_doc_id));
1243: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));
1244: END IF;
1245:
1246: SELECT

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

1239:
1240: IF l_debug_flag = 'Y' THEN
1241: fnd_file.put_line(fnd_file.log,'Document Level: '||l_doc_level);
1242: fnd_file.put_line(fnd_file.log,'Document ID: '||to_char(l_doc_id));
1243: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));
1244: END IF;
1245:
1246: SELECT
1247: count(*)

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

1259: -- end fix for perf bug 2581067. replaced the following:
1260:
1261: IF (l_dist_count = 0) THEN
1262: IF l_debug_flag = 'Y' THEN
1263: fnd_file.put_line(fnd_file.log,'Error: No Distributions for Document: '||to_char(l_doc_id));
1264: END IF;
1265: RAISE CST_NO_PO_DIST;
1266: END IF;
1267:

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

1411:
1412:
1413: IF l_debug_flag = 'Y' THEN
1414: IF (l_dr_flag) THEN
1415: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1416: ELSE
1417: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1418: END IF;
1419: END IF;

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

1413: IF l_debug_flag = 'Y' THEN
1414: IF (l_dr_flag) THEN
1415: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1416: ELSE
1417: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1418: END IF;
1419: END IF;
1420:
1421: IF ( c_receipts_rec.dist_quantity = 0 ) THEN

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

1471: l_curr_rec.alt_currency);
1472:
1473: IF l_debug_flag = 'Y' THEN
1474: IF (l_dr_flag) THEN
1475: fnd_file.put_line(fnd_file.log,'DR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1476: ELSE
1477: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1478: END IF;
1479: END IF;

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

1473: IF l_debug_flag = 'Y' THEN
1474: IF (l_dr_flag) THEN
1475: fnd_file.put_line(fnd_file.log,'DR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1476: ELSE
1477: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1478: END IF;
1479: END IF;
1480:
1481: IF ( c_receipts_rec.dist_quantity = 0 ) THEN

Line 1528: 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 ));

1524: l_curr_rec.alt_currency);
1525:
1526: IF l_debug_flag = 'Y' THEN
1527: IF (l_dr_flag) THEN
1528: 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 ));
1529: ELSE
1530: 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 ));
1531: END IF;
1532: END IF;

Line 1530: 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 ));

1526: IF l_debug_flag = 'Y' THEN
1527: IF (l_dr_flag) THEN
1528: 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 ));
1529: ELSE
1530: 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 ));
1531: END IF;
1532: END IF;
1533:
1534: IF ( c_receipts_rec.dist_quantity = 0 ) THEN

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

1633: --acq cost is a combination of po and invoice rate and is in functional currency
1634:
1635: IF l_debug_flag = 'Y' THEN
1636: IF (l_dr_flag) THEN
1637: fnd_file.put_line(fnd_file.log,'DR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1638: ELSE
1639: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1640: END IF;
1641: END IF;

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

1635: IF l_debug_flag = 'Y' THEN
1636: IF (l_dr_flag) THEN
1637: fnd_file.put_line(fnd_file.log,'DR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1638: ELSE
1639: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1640: END IF;
1641: END IF;
1642:
1643: /* Bug 2686598. Use the quantity in the po_distribution to calcualte rate_or_amount

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

1721:
1722: l_stmt_num := 752;
1723:
1724: IF l_debug_flag = 'Y' THEN
1725: fnd_file.put_line(fnd_file.log,'PO OU / Rcv OU '|| l_po_ou_id ||' / '|| l_rcv_ou_id);
1726: END IF;
1727:
1728: l_stmt_num := 753;
1729:

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

1733:
1734: l_stmt_num := 754;
1735:
1736: IF l_debug_flag = 'Y' THEN
1737: fnd_file.put_line(fnd_file.log,'GP scenario. Trxn val: '||to_char(c_receipts_rec.dist_quantity * l_acq_cost_ent));
1738: END IF;
1739:
1740: l_ae_line_rec.transaction_value := c_receipts_rec.dist_quantity * l_acq_cost_ent;
1741:

Line 1757: 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)));

1753:
1754: l_stmt_num := 755;
1755:
1756: IF l_debug_flag = 'Y' THEN
1757: 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)));
1758: END IF;
1759:
1760: l_ae_line_rec.transaction_value := c_receipts_rec.dist_quantity * (l_po_price + c_receipts_rec.tax);
1761:

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

1768: l_stmt_num := 756;
1769:
1770: IF l_debug_flag = 'Y' THEN
1771: IF (l_dr_flag) THEN
1772: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1773: ELSE
1774: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1775: END IF;
1776: END IF;

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

1770: IF l_debug_flag = 'Y' THEN
1771: IF (l_dr_flag) THEN
1772: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1773: ELSE
1774: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1775: END IF;
1776: END IF;
1777:
1778: /* Bug 2686598. Use the quantity in the po_distribution to calcualte rate_or_amount

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

1860: l_curr_rec.currency_conv_type := c_chg_rec.exchange_rate_type;
1861:
1862: IF l_debug_flag = 'Y' THEN
1863: IF (l_dr_flag) THEN
1864: fnd_file.put_line(fnd_file.log,'DR Special Charges: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1865: ELSE
1866: fnd_file.put_line(fnd_file.log,'CR Special Charges: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1867: END IF;
1868: END IF;

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

1862: IF l_debug_flag = 'Y' THEN
1863: IF (l_dr_flag) THEN
1864: fnd_file.put_line(fnd_file.log,'DR Special Charges: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1865: ELSE
1866: fnd_file.put_line(fnd_file.log,'CR Special Charges: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1867: END IF;
1868: END IF;
1869:
1870: /* Bug 2686598. Use the quantity in the po_distribution to calcualte rate_or_amount

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

1973: l_correct_ipv_amount := 0;
1974: END;
1975:
1976: IF l_debug_flag = 'Y' THEN
1977: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Original IPV: '||to_char(c_ipv_rec.invoice_price_variance));
1978: FND_FILE.PUT_LINE(FND_FILE.LOG, 'IPV - Price Correction Invoice: '||to_char(l_correct_ipv_amount));
1979: END IF;
1980:
1981: l_total_ipv := c_ipv_rec.invoice_price_variance + l_correct_ipv_amount;

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

1974: END;
1975:
1976: IF l_debug_flag = 'Y' THEN
1977: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Original IPV: '||to_char(c_ipv_rec.invoice_price_variance));
1978: FND_FILE.PUT_LINE(FND_FILE.LOG, 'IPV - Price Correction Invoice: '||to_char(l_correct_ipv_amount));
1979: END IF;
1980:
1981: l_total_ipv := c_ipv_rec.invoice_price_variance + l_correct_ipv_amount;
1982:

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

1993: l_curr_rec.currency_conv_type := c_ipv_rec.exchange_rate_type;
1994:
1995: IF l_debug_flag = 'Y' THEN
1996: IF (l_dr_flag) THEN
1997: fnd_file.put_line(fnd_file.log,'DR IPV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1998: ELSE
1999: fnd_file.put_line(fnd_file.log,'CR IPV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2000: END IF;
2001: END IF;

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

1995: IF l_debug_flag = 'Y' THEN
1996: IF (l_dr_flag) THEN
1997: fnd_file.put_line(fnd_file.log,'DR IPV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
1998: ELSE
1999: fnd_file.put_line(fnd_file.log,'CR IPV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2000: END IF;
2001: END IF;
2002:
2003: /* Bug 2686598. Use the quantity in the po_distribution to calcualte rate_or_amount

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

2078: l_curr_rec.currency_conv_type := null;
2079:
2080: IF l_debug_flag = 'Y' THEN
2081: IF (l_dr_flag) THEN
2082: fnd_file.put_line(fnd_file.log,'DR ERV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2083: ELSE
2084: fnd_file.put_line(fnd_file.log,'CR ERV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2085: END IF;
2086: END IF;

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

2080: IF l_debug_flag = 'Y' THEN
2081: IF (l_dr_flag) THEN
2082: fnd_file.put_line(fnd_file.log,'DR ERV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2083: ELSE
2084: fnd_file.put_line(fnd_file.log,'CR ERV: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2085: END IF;
2086: END IF;
2087:
2088: /* Bug 2686598. Use the quantity in the po_distribution to calcualte rate_or_amount

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

2230: l_ae_line_rec.ae_line_type := 5;
2231:
2232: IF l_debug_flag = 'Y' THEN
2233: IF (l_dr_flag) THEN
2234: fnd_file.put_line(fnd_file.log,'DR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2235: ELSE
2236: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2237: END IF;
2238: END IF;

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

2232: IF l_debug_flag = 'Y' THEN
2233: IF (l_dr_flag) THEN
2234: fnd_file.put_line(fnd_file.log,'DR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2235: ELSE
2236: fnd_file.put_line(fnd_file.log,'CR RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2237: END IF;
2238: END IF;
2239:
2240: /* Bug 2686598. Use the quantity in the po_distribution to calcualte rate_or_amount

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

2262: l_ae_line_rec.ae_line_type := 16;
2263:
2264: IF l_debug_flag = 'Y' THEN
2265: IF (l_dr_flag) THEN
2266: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2267: ELSE
2268: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2269: END IF;
2270: END IF;

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

2264: IF l_debug_flag = 'Y' THEN
2265: IF (l_dr_flag) THEN
2266: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2267: ELSE
2268: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2269: END IF;
2270: END IF;
2271:
2272: /* Bug 2686598. Use the quantity in the po_distribution to calcualte rate_or_amount

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

2322: END IF;
2323:
2324: IF l_debug_flag = 'Y' THEN
2325: IF (l_dr_flag) THEN
2326: fnd_file.put_line(fnd_file.log,'DR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2327: ELSE
2328: fnd_file.put_line(fnd_file.log,'CR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2329: END IF;
2330: END IF;

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

2324: IF l_debug_flag = 'Y' THEN
2325: IF (l_dr_flag) THEN
2326: fnd_file.put_line(fnd_file.log,'DR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2327: ELSE
2328: fnd_file.put_line(fnd_file.log,'CR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2329: END IF;
2330: END IF;
2331:
2332:

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

2352: END IF;
2353:
2354: IF l_debug_flag = 'Y' THEN
2355: IF (l_dr_flag) THEN
2356: fnd_file.put_line(fnd_file.log,'DR RI: '||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 RI: '||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 RI: '||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 RI: '||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 RI: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2359: END IF;
2360: END IF;
2361:
2362: CSTPAPPR.insert_account (i_ae_txn_rec,

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

2392: -- no encumbrance reversal is necessary
2393:
2394: IF (c_receipts_rec.encumbrance_account_id = -1) THEN
2395: IF l_debug_flag = 'Y' THEN
2396: fnd_file.put_line(fnd_file.log,'No Encumbrance account at PO level');
2397: END IF;
2398: ELSE
2399:
2400: CSTPAPPR.check_encumbrance(

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

2433: l_quantity_delivered := CSTPAPPR.get_net_del_qty(
2434: c_receipts_rec.po_distribution_id,
2435: i_ae_txn_rec.transaction_id);
2436: IF l_debug_flag = 'Y' THEN
2437: fnd_file.put_line(fnd_file.log,'Delivered Quantity: '||to_char(l_quantity_delivered));
2438: END IF;
2439:
2440: l_stmt_num := 86;
2441:

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

2553: l_ae_line_rec.encum_type_id := l_purch_encumbrance_type_id;
2554:
2555: IF l_debug_flag = 'Y' THEN
2556: IF (l_dr_flag) THEN
2557: fnd_file.put_line(fnd_file.log,'DR Enc: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2558: ELSE
2559: fnd_file.put_line(fnd_file.log,'CR Enc: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2560: END IF;
2561: END IF;

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

2555: IF l_debug_flag = 'Y' THEN
2556: IF (l_dr_flag) THEN
2557: fnd_file.put_line(fnd_file.log,'DR Enc: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2558: ELSE
2559: fnd_file.put_line(fnd_file.log,'CR Enc: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
2560: END IF;
2561: END IF;
2562: /* Bug 2686598. Use the quantity in the po_distribution to calcualte rate_or_amount
2563: not the primary quantity on the transaction */

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

2599: -- ------------------------------
2600: l_stmt_num := 90;
2601: o_ae_line_rec_tbl := l_ae_line_tbl;
2602: IF l_debug_flag = 'Y' THEN
2603: fnd_file.put_line(fnd_file.log,'Create_Rcv_Ae_Lines >>> ');
2604: END IF;
2605:
2606: EXCEPTION
2607:

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

2655:
2656: BEGIN
2657:
2658: IF l_debug_flag = 'Y' THEN
2659: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Create_Adj_Ae_Lines <<<');
2660: END IF;
2661:
2662: -- Initialize the collection
2663: l_ae_line_tbl := CSTPALTY.cst_ae_line_tbl_type();

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

2682: l_curr_rec.currency_conv_rate := p_ae_txn_rec.currency_conv_rate;
2683:
2684:
2685: IF l_debug_flag = 'Y' THEN
2686: FND_FILE.PUT_LINE(FND_FILE.LOG, l_curr_rec.pri_currency || ' '||l_curr_rec.alt_currency);
2687: END IF;
2688:
2689: -- Populate the Accounting Line Record
2690:

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

2706: AND COST_TYPE_ID = P_AE_TXN_REC.COST_TYPE_ID
2707: AND COST_GROUP_ID = P_AE_TXN_REC.COST_GROUP_ID;
2708:
2709: IF l_debug_flag = 'Y' THEN
2710: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Debit Account: '||to_char(l_debit_account));
2711: END IF;
2712:
2713: IF l_debit_account = -1 THEN
2714: RAISE INVALID_RETRO_ADJ_ACCOUNT;

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

2773:
2774: l_ae_line_rec.transaction_value := l_ae_line_rec.accounted_value;
2775:
2776: IF l_debug_flag = 'Y' THEN
2777: FND_FILE.PUT_LINE(FND_FILE.log, 'l_ae_line_rec.accounted_value: '||to_char(l_ae_line_rec.accounted_value));
2778: END IF;
2779:
2780: l_ae_line_rec.source_table := 'RAE';
2781: l_ae_line_rec.source_id := p_ae_txn_rec.transaction_id;

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

2810:
2811: l_ae_line_rec.account := p_ae_txn_rec.credit_account;
2812: l_ae_line_rec.ae_line_type := 16;
2813: IF l_debug_flag = 'Y' THEN
2814: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Credit Account: '||to_char(l_ae_line_rec.account));
2815: END IF;
2816:
2817: l_stmt_num := 70;
2818:

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

2830: -- Copy the local structure to the Output
2831: x_ae_line_rec_tbl := l_ae_line_tbl;
2832:
2833: IF l_debug_flag = 'Y' THEN
2834: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Create_Adj_Ae_Lines >>>');
2835: END IF;
2836:
2837: EXCEPTION
2838: WHEN INVALID_RETRO_ADJ_ACCOUNT THEN

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

2839: l_err_rec.l_err_num := SQLCODE;
2840: l_err_rec.l_err_code := 'No Periodic Retroactive Adjustment Account Specified';
2841: l_err_rec.l_err_msg := 'CSTPAPPR:( '||to_char(l_stmt_num)||' ): ' || l_err_rec.l_err_code;
2842: x_ae_err_rec := l_err_rec;
2843: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);
2844:
2845: WHEN PROCESS_ERROR THEN
2846: x_ae_err_rec := l_err_rec;
2847: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);

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

2843: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);
2844:
2845: WHEN PROCESS_ERROR THEN
2846: x_ae_err_rec := l_err_rec;
2847: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);
2848:
2849: WHEN OTHERS THEN
2850: l_err_rec.l_err_num := SQLCODE;
2851: l_err_rec.l_err_code := '';

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

2850: l_err_rec.l_err_num := SQLCODE;
2851: l_err_rec.l_err_code := '';
2852: l_err_rec.l_err_msg := 'CSTPAPPR:( '||to_char(l_stmt_num)||' ): ' || to_char(SQLCODE);
2853: x_ae_err_rec := l_err_rec;
2854: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);
2855:
2856: END create_adj_ae_lines;
2857:
2858: /*LCM CHANGES */

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

2877:
2878: BEGIN
2879:
2880: IF l_debug_flag = 'Y' THEN
2881: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Create_LC_Adj_Ae_Lines <<<');
2882: END IF;
2883:
2884: -- Initialize the collection
2885: l_ae_line_tbl := CSTPALTY.cst_ae_line_tbl_type();

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

2904: l_curr_rec.currency_conv_rate := p_ae_txn_rec.currency_conv_rate;
2905:
2906:
2907: IF l_debug_flag = 'Y' THEN
2908: FND_FILE.PUT_LINE(FND_FILE.LOG, l_curr_rec.pri_currency || ' '||l_curr_rec.alt_currency);
2909: END IF;
2910:
2911: l_stmt_num := 30;
2912:

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

2936: END IF;
2937:
2938:
2939: IF l_debug_flag = 'Y' THEN
2940: FND_FILE.PUT_LINE(FND_FILE.log, 'l_ae_line_rec.accounted_value: '||to_char(l_ae_line_rec.accounted_value));
2941: END IF;
2942:
2943: l_ae_line_rec.source_table := 'RAE';
2944: l_ae_line_rec.source_id := p_ae_txn_rec.transaction_id;

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

2989: END IF;
2990: END IF;
2991:
2992: IF l_debug_flag = 'Y' THEN
2993: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Credit Account: '||to_char(l_ae_line_rec.account));
2994: END IF;
2995:
2996: l_stmt_num := 70;
2997:

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

3009: -- Copy the local structure to the Output
3010: x_ae_line_rec_tbl := l_ae_line_tbl;
3011:
3012: IF l_debug_flag = 'Y' THEN
3013: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Create_LC_Adj_Ae_Lines >>>');
3014: END IF;
3015:
3016: EXCEPTION
3017: WHEN PROCESS_ERROR THEN

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

3015:
3016: EXCEPTION
3017: WHEN PROCESS_ERROR THEN
3018: x_ae_err_rec := l_err_rec;
3019: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);
3020:
3021: WHEN OTHERS THEN
3022: l_err_rec.l_err_num := SQLCODE;
3023: l_err_rec.l_err_code := '';

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

3022: l_err_rec.l_err_num := SQLCODE;
3023: l_err_rec.l_err_code := '';
3024: l_err_rec.l_err_msg := 'CSTPAPPR:( '||to_char(l_stmt_num)||' ): ' || to_char(SQLCODE);
3025: x_ae_err_rec := l_err_rec;
3026: FND_FILE.PUT_LINE(FND_FILE.LOG, l_err_rec.l_err_msg);
3027:
3028: END create_lc_adj_ae_lines;
3029: /*============================================================================+
3030: | This procedure processes the transaction data and creates accounting entry |

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

3069:
3070: BEGIN
3071:
3072: IF l_debug_flag = 'Y' THEN
3073: fnd_file.put_line(fnd_file.log,'Create_Per_End_Ae_Lines <<<');
3074: END IF;
3075:
3076: -- Initialize API return status to success
3077: l_return_status := FND_API.G_RET_STS_SUCCESS;

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

3120: WHERE
3121: rt.transaction_id = i_ae_txn_rec.transaction_id;
3122:
3123: IF l_debug_flag = 'Y' THEN
3124: fnd_file.put_line(fnd_file.log,'Document Level: '||l_doc_level);
3125: fnd_file.put_line(fnd_file.log,'Document ID: '||to_char(l_doc_id));
3126: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));
3127: END IF;
3128:

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

3121: rt.transaction_id = i_ae_txn_rec.transaction_id;
3122:
3123: IF l_debug_flag = 'Y' THEN
3124: fnd_file.put_line(fnd_file.log,'Document Level: '||l_doc_level);
3125: fnd_file.put_line(fnd_file.log,'Document ID: '||to_char(l_doc_id));
3126: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));
3127: END IF;
3128:
3129: SELECT

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

3122:
3123: IF l_debug_flag = 'Y' THEN
3124: fnd_file.put_line(fnd_file.log,'Document Level: '||l_doc_level);
3125: fnd_file.put_line(fnd_file.log,'Document ID: '||to_char(l_doc_id));
3126: fnd_file.put_line(fnd_file.log,'Quantity: '||to_char(i_ae_txn_rec.primary_quantity));
3127: END IF;
3128:
3129: SELECT
3130: count(*)

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

3140: AND rownum <= 1;
3141:
3142: IF (l_dist_count = 0) THEN
3143: IF l_debug_flag = 'Y' THEN
3144: fnd_file.put_line(fnd_file.log,'Error: No distributions for the Document: '||to_char(l_doc_id));
3145: END IF;
3146: RAISE CST_NO_PO_DIST;
3147: END IF;
3148:

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

3260: l_ae_line_rec.account := c_receipts_rec.expense_account_id;
3261: l_ae_line_rec.ae_line_type := 20;
3262: IF l_debug_flag = 'Y' THEN
3263: IF (l_dr_flag) THEN
3264: fnd_file.put_line(fnd_file.log,'DR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3265: ELSE
3266: fnd_file.put_line(fnd_file.log,'CR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3267: END IF;
3268: END IF;

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

3262: IF l_debug_flag = 'Y' THEN
3263: IF (l_dr_flag) THEN
3264: fnd_file.put_line(fnd_file.log,'DR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3265: ELSE
3266: fnd_file.put_line(fnd_file.log,'CR Expense: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3267: END IF;
3268: END IF;
3269:
3270: CSTPAPPR.insert_account (i_ae_txn_rec,

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

3284: l_ae_line_rec.ae_line_type := 16;
3285:
3286: IF l_debug_flag = 'Y' THEN
3287: IF (l_dr_flag) THEN
3288: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3289: ELSE
3290: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3291: END IF;
3292: END IF;

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

3286: IF l_debug_flag = 'Y' THEN
3287: IF (l_dr_flag) THEN
3288: fnd_file.put_line(fnd_file.log,'DR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3289: ELSE
3290: fnd_file.put_line(fnd_file.log,'CR Accrual: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3291: END IF;
3292: END IF;
3293: CSTPAPPR.insert_account (i_ae_txn_rec,
3294: l_curr_rec,

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

3320: -- no encumbrance reversal is necessary
3321:
3322: IF (c_receipts_rec.encumbrance_account_id = -1) THEN
3323: IF l_debug_flag = 'Y' THEN
3324: fnd_file.put_line(fnd_file.log,'No Encumbrance account at PO level');
3325: END IF;
3326: ELSE
3327:
3328: CSTPAPPR.check_encumbrance(

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

3355: l_ae_line_rec.encum_type_id := l_purch_encumbrance_type_id;
3356:
3357: IF l_debug_flag = 'Y' THEN
3358: IF (l_dr_flag) THEN
3359: fnd_file.put_line(fnd_file.log,'DR Encumbrance: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3360: ELSE
3361: fnd_file.put_line(fnd_file.log,'CR Encumbrance: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3362: END IF;
3363: END IF;

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

3357: IF l_debug_flag = 'Y' THEN
3358: IF (l_dr_flag) THEN
3359: fnd_file.put_line(fnd_file.log,'DR Encumbrance: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3360: ELSE
3361: fnd_file.put_line(fnd_file.log,'CR Encumbrance: '||to_char( l_ae_line_rec.transaction_value * l_curr_rec.currency_conv_rate ));
3362: END IF;
3363: END IF;
3364: CSTPAPPR.insert_account (i_ae_txn_rec,
3365: l_curr_rec,

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

3387: -- ------------------------------
3388: l_stmt_num := 90;
3389: o_ae_line_rec_tbl := l_ae_line_tbl;
3390: IF l_debug_flag = 'Y' THEN
3391: fnd_file.put_line(fnd_file.log,'Create_Per_End_Ae_Lines >>>');
3392: END IF;
3393:
3394: EXCEPTION
3395:

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

3432: cst_no_enc_account exception;
3433:
3434: BEGIN
3435: IF l_debug_flag = 'Y' THEN
3436: fnd_file.put_line(fnd_file.log,'Check_Encumbrance <<<');
3437: fnd_file.put_line(fnd_file.log,'Encumbrance Account: '||to_char(i_encumbrance_account_id));
3438: END IF;
3439:
3440: l_stmt_num := 10;

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

3433:
3434: BEGIN
3435: IF l_debug_flag = 'Y' THEN
3436: fnd_file.put_line(fnd_file.log,'Check_Encumbrance <<<');
3437: fnd_file.put_line(fnd_file.log,'Encumbrance Account: '||to_char(i_encumbrance_account_id));
3438: END IF;
3439:
3440: l_stmt_num := 10;
3441: SELECT

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

3498: END IF;
3499: */
3500:
3501: IF l_debug_flag = 'Y' THEN
3502: fnd_file.put_line(fnd_file.log,'Check_Encumbrance >>>');
3503: END IF;
3504: EXCEPTION
3505: WHEN CST_NO_ENC_ACCOUNT THEN
3506: o_ae_err_rec.l_err_num := 30010;

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

3536:
3537: BEGIN
3538:
3539: IF l_debug_flag = 'Y' THEN
3540: fnd_file.put_line(fnd_file.log,'Insert_Account <<< ');
3541: END IF;
3542: -- Initialize variables.
3543: -- ---------------------
3544: l_err_rec.l_err_num := 0;

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

3568:
3569: l_stmt_num := 30;
3570:
3571: IF l_debug_flag = 'Y' THEN
3572: fnd_file.put_line(fnd_file.log,'Alt Currency : '||i_ae_curr_rec.alt_currency);
3573: fnd_file.put_line(fnd_file.log,'Pri Currency : '||i_ae_curr_rec.pri_currency);
3574: fnd_file.put_line(fnd_file.log,'Currency Rate: '||to_char(i_ae_curr_rec.currency_conv_rate));
3575: END IF;
3576:

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

3569: l_stmt_num := 30;
3570:
3571: IF l_debug_flag = 'Y' THEN
3572: fnd_file.put_line(fnd_file.log,'Alt Currency : '||i_ae_curr_rec.alt_currency);
3573: fnd_file.put_line(fnd_file.log,'Pri Currency : '||i_ae_curr_rec.pri_currency);
3574: fnd_file.put_line(fnd_file.log,'Currency Rate: '||to_char(i_ae_curr_rec.currency_conv_rate));
3575: END IF;
3576:
3577: select

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

3570:
3571: IF l_debug_flag = 'Y' THEN
3572: fnd_file.put_line(fnd_file.log,'Alt Currency : '||i_ae_curr_rec.alt_currency);
3573: fnd_file.put_line(fnd_file.log,'Pri Currency : '||i_ae_curr_rec.pri_currency);
3574: fnd_file.put_line(fnd_file.log,'Currency Rate: '||to_char(i_ae_curr_rec.currency_conv_rate));
3575: END IF;
3576:
3577: select
3578: nvl(i_ae_curr_rec.alt_currency,i_ae_curr_rec.pri_currency)

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

3639:
3640: END IF;
3641:
3642: IF l_debug_flag = 'Y' THEN
3643: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Accounted_Value: '||to_char(l_accounted_value));
3644: END IF;
3645:
3646: -- ERV does not have an entered amount.
3647: if (l_ae_line_tbl(next_record_avail).ae_line_type = 18) then

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

3686: l_ae_line_tbl(next_record_avail).reference9 := NULL;
3687: l_ae_line_tbl(next_record_avail).reference10 := NULL;
3688:
3689: IF l_debug_flag = 'Y' THEN
3690: FND_FILE.PUT_LINE(FND_FILE.LOG, 'No. of Records: '||to_char(l_ae_line_tbl.COUNT));
3691: fnd_file.put_line(fnd_file.log,'Insert_Account >>> ');
3692: END IF;
3693:
3694: EXCEPTION

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

3687: l_ae_line_tbl(next_record_avail).reference10 := NULL;
3688:
3689: IF l_debug_flag = 'Y' THEN
3690: FND_FILE.PUT_LINE(FND_FILE.LOG, 'No. of Records: '||to_char(l_ae_line_tbl.COUNT));
3691: fnd_file.put_line(fnd_file.log,'Insert_Account >>> ');
3692: END IF;
3693:
3694: EXCEPTION
3695:

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

3844: l_stmt_num NUMBER;
3845: l_ipv_line_flag NUMBER := 0; /*to find out if there is ipv line */
3846: BEGIN
3847: IF l_debug_flag = 'Y' THEN
3848: fnd_file.put_line(fnd_file.log,'Balance_Account <<<');
3849: END IF;
3850: if (l_ae_line_tbl.exists(1)) then
3851: l_stmt_num := 10;
3852: For i in l_ae_line_tbl.FIRST .. l_ae_line_tbl.LAST loop

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

3885:
3886:
3887: if l_ae_line_tbl(l_last_rec).accounted_dr is not NULL then
3888: IF l_debug_flag = 'Y' THEN
3889: fnd_file.put_line(fnd_file.log,'Balancing Dr: '||to_char(l_ae_line_tbl(l_last_rec).entered_dr));
3890: END IF;
3891: l_ae_line_tbl(l_last_rec).accounted_dr :=
3892: l_ae_line_tbl(l_last_rec).accounted_dr - l_acc_value;
3893: l_ae_line_tbl(l_last_rec).entered_dr :=

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

3893: l_ae_line_tbl(l_last_rec).entered_dr :=
3894: l_ae_line_tbl(l_last_rec).entered_dr - l_ent_value;
3895: elsif l_ae_line_tbl(l_last_rec).accounted_cr is not NULL then
3896: IF l_debug_flag = 'Y' THEN
3897: fnd_file.put_line(fnd_file.log,'Balancing Cr: '||to_char(l_ae_line_tbl(l_last_rec).entered_cr));
3898: END IF;
3899: l_ae_line_tbl(l_last_rec).accounted_cr :=
3900: l_ae_line_tbl(l_last_rec).accounted_cr + l_acc_value;
3901: l_ae_line_tbl(l_last_rec).entered_cr :=

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

3903: end if;
3904:
3905: end if;
3906: IF l_debug_flag = 'Y' THEN
3907: fnd_file.put_line(fnd_file.log,'Balance_Account >>>');
3908: END IF;
3909:
3910: EXCEPTION
3911: