[Home] [Help]
69: l_org_id NUMBER;
70: BEGIN
71: x_return_status := FND_API.G_RET_STS_SUCCESS;
72: IF OZF_DEBUG_HIGH_ON THEN
73: OZF_UTILITY_PVT.debug_message(l_api_name||': Start');
74: END IF;
75: IF OZF_DEBUG_LOW_ON THEN
76: OZF_UTILITY_PVT.debug_message('id_value:'||p_id_value );
77: OZF_UTILITY_PVT.debug_message('id_type:'||p_id_type );
72: IF OZF_DEBUG_HIGH_ON THEN
73: OZF_UTILITY_PVT.debug_message(l_api_name||': Start');
74: END IF;
75: IF OZF_DEBUG_LOW_ON THEN
76: OZF_UTILITY_PVT.debug_message('id_value:'||p_id_value );
77: OZF_UTILITY_PVT.debug_message('id_type:'||p_id_type );
78: OZF_UTILITY_PVT.debug_message('error_code:'||p_error_code);
79: IF p_error_message is NOT NULL THEN
80: OZF_UTILITY_PVT.debug_message('error_message:'||p_error_message);
73: OZF_UTILITY_PVT.debug_message(l_api_name||': Start');
74: END IF;
75: IF OZF_DEBUG_LOW_ON THEN
76: OZF_UTILITY_PVT.debug_message('id_value:'||p_id_value );
77: OZF_UTILITY_PVT.debug_message('id_type:'||p_id_type );
78: OZF_UTILITY_PVT.debug_message('error_code:'||p_error_code);
79: IF p_error_message is NOT NULL THEN
80: OZF_UTILITY_PVT.debug_message('error_message:'||p_error_message);
81: ELSE
74: END IF;
75: IF OZF_DEBUG_LOW_ON THEN
76: OZF_UTILITY_PVT.debug_message('id_value:'||p_id_value );
77: OZF_UTILITY_PVT.debug_message('id_type:'||p_id_type );
78: OZF_UTILITY_PVT.debug_message('error_code:'||p_error_code);
79: IF p_error_message is NOT NULL THEN
80: OZF_UTILITY_PVT.debug_message('error_message:'||p_error_message);
81: ELSE
82: OZF_UTILITY_PVT.debug_message('error_message:'||fnd_message.get_string('OZF',p_error_code));
76: OZF_UTILITY_PVT.debug_message('id_value:'||p_id_value );
77: OZF_UTILITY_PVT.debug_message('id_type:'||p_id_type );
78: OZF_UTILITY_PVT.debug_message('error_code:'||p_error_code);
79: IF p_error_message is NOT NULL THEN
80: OZF_UTILITY_PVT.debug_message('error_message:'||p_error_message);
81: ELSE
82: OZF_UTILITY_PVT.debug_message('error_message:'||fnd_message.get_string('OZF',p_error_code));
83: END IF;
84: OZF_UTILITY_PVT.debug_message('column_name'||p_column_name);
78: OZF_UTILITY_PVT.debug_message('error_code:'||p_error_code);
79: IF p_error_message is NOT NULL THEN
80: OZF_UTILITY_PVT.debug_message('error_message:'||p_error_message);
81: ELSE
82: OZF_UTILITY_PVT.debug_message('error_message:'||fnd_message.get_string('OZF',p_error_code));
83: END IF;
84: OZF_UTILITY_PVT.debug_message('column_name'||p_column_name);
85: OZF_UTILITY_PVT.debug_message('column_value:'||p_column_value);
86: END IF;
80: OZF_UTILITY_PVT.debug_message('error_message:'||p_error_message);
81: ELSE
82: OZF_UTILITY_PVT.debug_message('error_message:'||fnd_message.get_string('OZF',p_error_code));
83: END IF;
84: OZF_UTILITY_PVT.debug_message('column_name'||p_column_name);
85: OZF_UTILITY_PVT.debug_message('column_value:'||p_column_value);
86: END IF;
87: --
88:
81: ELSE
82: OZF_UTILITY_PVT.debug_message('error_message:'||fnd_message.get_string('OZF',p_error_code));
83: END IF;
84: OZF_UTILITY_PVT.debug_message('column_name'||p_column_name);
85: OZF_UTILITY_PVT.debug_message('column_value:'||p_column_value);
86: END IF;
87: --
88:
89: IF p_error_code IS NOT NULL THEN
119: px_org_id => l_org_id
120: );
121: EXCEPTION
122: WHEN OTHERS THEN
123: OZF_UTILITY_PVT.error_message('OZF_INS_RESALE_LOG_WRG');
124: RAISE FND_API.g_exc_unexpected_error;
125: END;
126: END IF;
127: --
125: END;
126: END IF;
127: --
128: IF OZF_DEBUG_HIGH_ON THEN
129: OZF_UTILITY_PVT.debug_message(l_api_name||': End');
130: END IF;
131: EXCEPTION
132: WHEN FND_API.G_EXC_ERROR THEN
133: x_return_status := FND_API.G_RET_STS_ERROR;
169: -- End: bug # 5997978 fixed
170: BEGIN
171: x_return_status := FND_API.G_RET_STS_SUCCESS;
172: IF OZF_DEBUG_HIGH_ON THEN
173: OZF_UTILITY_PVT.debug_message(l_api_name||': Start');
174: END IF;
175: -- Start: bug # 5997978 fixed
176: OPEN g_resale_batch_org_id_csr(p_batch_id);
177: FETCH g_resale_batch_org_id_csr INTO l_batch_org_id;
177: FETCH g_resale_batch_org_id_csr INTO l_batch_org_id;
178: CLOSE g_resale_batch_org_id_csr;
179: l_org_id := MO_GLOBAL.get_valid_org(l_batch_org_id);
180: IF (l_batch_org_id IS NULL OR l_org_id IS NULL) THEN
181: OZF_UTILITY_PVT.error_message(p_message_name => 'OZF_ORG_ID_NOTFOUND');
182: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
183: END IF;
184: -- End: bug # 5997978 fixed
185:
208: -- End: bug # 5997978 fixed
209: );
210:
211: IF OZF_DEBUG_HIGH_ON THEN
212: OZF_UTILITY_PVT.debug_message(l_api_name||': End');
213: END IF;
214: EXCEPTION
215: WHEN FND_API.G_EXC_ERROR THEN
216: x_return_status := FND_API.G_RET_STS_ERROR;
325: BEGIN
326: x_return_status := FND_API.G_RET_STS_SUCCESS;
327: --
328: IF OZF_DEBUG_HIGH_ON THEN
329: OZF_UTILITY_PVT.debug_message(l_api_name||': Start');
330: END IF;
331:
332: -- get batch start and end date
333: OPEN batch_info_csr (p_batch_id);
342:
343: IF l_id_tbl.exists(1) THEN
344: -- log disputed lines
345: IF OZF_DEBUG_LOW_ON THEN
346: OZF_UTILITY_PVT.debug_message('Number of errors: ' || l_id_tbl.LAST);
347: END IF;
348: Bulk_Insert_Resale_Log (
349: p_id_value => l_id_tbl,
350: p_id_type => G_ID_TYPE_IFACE,
361: END IF;
362: END IF;
363: --
364: IF OZF_DEBUG_HIGH_ON THEN
365: OZF_UTILITY_PVT.debug_message(l_api_name||': End');
366: END IF;
367: EXCEPTION
368: WHEN FND_API.G_EXC_ERROR THEN
369: x_return_status := FND_API.G_RET_STS_ERROR;
487: BEGIN
488: x_return_status := FND_API.G_RET_STS_SUCCESS;
489: -- Debug Message
490: IF OZF_DEBUG_HIGH_ON THEN
491: OZF_UTILITY_PVT.debug_message(l_api_name||': Start');
492: END IF;
493: -- bulk select all lines with missing order numbers
494: OPEN invalid_columns_csr (p_batch_id);
495: FETCH invalid_columns_csr BULK COLLECT INTO l_id_tbl, l_err_tbl, l_col_tbl, l_val_tbl;
498:
499: IF l_id_tbl.exists(1) THEN
500: -- log disputed lines
501: IF OZF_DEBUG_LOW_ON THEN
502: OZF_UTILITY_PVT.debug_message('Number of errors: ' || l_id_tbl.LAST);
503: END IF;
504: -- log disputed lines
505: Bulk_Insert_Resale_Log (
506: p_id_value => l_id_tbl,
519: --
520: END IF;
521:
522: IF OZF_DEBUG_HIGH_ON THEN
523: OZF_UTILITY_PVT.debug_message(l_api_name||': End');
524: END IF;
525: EXCEPTION
526: WHEN FND_API.G_EXC_ERROR THEN
527: x_return_status := FND_API.G_RET_STS_ERROR;
559: --
560: BEGIN
561: x_return_status := FND_API.G_RET_STS_SUCCESS;
562: IF OZF_DEBUG_HIGH_ON THEN
563: OZF_UTILITY_PVT.debug_message(l_api_name||': Start');
564: END IF;
565: --
566: BEGIN
567: UPDATE ozf_resale_lines_int_all orli
588: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
589: END;
590: --
591: IF OZF_DEBUG_HIGH_ON THEN
592: OZF_UTILITY_PVT.debug_message(l_api_name||': End');
593: END IF;
594: EXCEPTION
595: WHEN FND_API.G_EXC_ERROR THEN
596: x_return_status := FND_API.G_RET_STS_ERROR;
696: END IF;
697:
698: -- Debug Message
699: IF OZF_DEBUG_HIGH_ON THEN
700: OZF_UTILITY_PVT.debug_message(p_message_text => l_full_name||': Start');
701: END IF;
702: -- Initialize API return status to sucess
703: x_return_status := FND_API.G_RET_STS_SUCCESS;
704:
735: CLOSE csr_duplicated_dispute_amount;
736: --bug # 6134121 fixed by ateotia(-)
737:
738: IF OZF_DEBUG_LOW_ON THEN
739: OZF_UTILITY_PVT.debug_message('diputed line:' || l_lines_disputed || ' tolerance line' || l_lines_w_tolerance);
740: END IF;
741: --bug # 6134121 fixed by ateotia(+)
742: --IF l_lines_disputed = 0 THEN
743: IF (l_lines_disputed = 0 AND l_lines_duplicated = 0)THEN
825: lines_invalid = l_lines_invalid
826: WHERE resale_batch_id = p_resale_batch_id;
827: EXCEPTION
828: WHEN OTHERS THEN
829: OZF_UTILITY_PVT.error_message('OZF_UPD_RESALE_BATCH_WRG');
830: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
831: END;
832:
833: -- Debug Message
831: END;
832:
833: -- Debug Message
834: IF OZF_DEBUG_HIGH_ON THEN
835: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
836: END IF;
837:
838: --Standard call to get message count AND if count=1, get the message
839: FND_MSG_PUB.Count_and_Get (
938: SAVEPOINT Update_Line_Calculations;
939:
940: -- Debug Message
941: IF OZF_DEBUG_HIGH_ON THEN
942: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
943: END IF;
944: IF OZF_DEBUG_LOW_ON THEN
945: OZF_UTILITY_PVT.debug_message('unit_price:'||p_unit_price);
946: OZF_UTILITY_PVT.debug_message('line_quantity:'||p_line_quantity);
941: IF OZF_DEBUG_HIGH_ON THEN
942: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
943: END IF;
944: IF OZF_DEBUG_LOW_ON THEN
945: OZF_UTILITY_PVT.debug_message('unit_price:'||p_unit_price);
946: OZF_UTILITY_PVT.debug_message('line_quantity:'||p_line_quantity);
947: OZF_UTILITY_PVT.debug_message('Allowed_amount:'|| p_allowed_amount);
948: END IF;
949:
942: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
943: END IF;
944: IF OZF_DEBUG_LOW_ON THEN
945: OZF_UTILITY_PVT.debug_message('unit_price:'||p_unit_price);
946: OZF_UTILITY_PVT.debug_message('line_quantity:'||p_line_quantity);
947: OZF_UTILITY_PVT.debug_message('Allowed_amount:'|| p_allowed_amount);
948: END IF;
949:
950: -- Initialize API return status to sucess
943: END IF;
944: IF OZF_DEBUG_LOW_ON THEN
945: OZF_UTILITY_PVT.debug_message('unit_price:'||p_unit_price);
946: OZF_UTILITY_PVT.debug_message('line_quantity:'||p_line_quantity);
947: OZF_UTILITY_PVT.debug_message('Allowed_amount:'|| p_allowed_amount);
948: END IF;
949:
950: -- Initialize API return status to sucess
951: x_return_status := FND_API.G_RET_STS_SUCCESS;
1064: END IF;
1065: -- bug 5969118 end
1066:
1067: --//Fix for Bug: 16083006
1068: l_total_accepted_amount := OZF_UTILITY_PVT.CurrRound(l_total_accepted_amount, p_resale_line_int_rec.currency_code);
1069: l_total_allowed_amount := OZF_UTILITY_PVT.CurrRound(l_total_allowed_amount, p_resale_line_int_rec.currency_code);
1070:
1071: UPDATE ozf_resale_lines_int_all
1072: SET accepted_amount = l_accepted_amount,
1065: -- bug 5969118 end
1066:
1067: --//Fix for Bug: 16083006
1068: l_total_accepted_amount := OZF_UTILITY_PVT.CurrRound(l_total_accepted_amount, p_resale_line_int_rec.currency_code);
1069: l_total_allowed_amount := OZF_UTILITY_PVT.CurrRound(l_total_allowed_amount, p_resale_line_int_rec.currency_code);
1070:
1071: UPDATE ozf_resale_lines_int_all
1072: SET accepted_amount = l_accepted_amount,
1073: -- total_accepted_amount = l_accepted_amount * ABS(p_line_quantity),
1105: END;
1106:
1107: -- Debug Message
1108: IF OZF_DEBUG_HIGH_ON THEN
1109: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
1110: END IF;
1111: EXCEPTION
1112: WHEN FND_API.G_EXC_ERROR THEN
1113: ROLLBACK TO Update_Line_Calculations;
1573: END IF;
1574:
1575: -- Debug Message
1576: IF OZF_DEBUG_HIGH_ON THEN
1577: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
1578: END IF;
1579:
1580: -- Initialize API return status to sucess
1581: x_return_status := FND_API.G_RET_STS_SUCCESS;
1579:
1580: -- Initialize API return status to sucess
1581: x_return_status := FND_API.G_RET_STS_SUCCESS;
1582: IF OZF_DEBUG_LOW_ON THEN
1583: OZF_UTILITY_PVT.debug_message('resale_line_int_id'||p_resale_line_int_id);
1584: OZF_UTILITY_PVT.debug_message('direct_customer_flag'||p_direct_customer_flag);
1585: OZF_UTILITY_PVT.debug_message('claimed_amount'||p_claimed_amount);
1586: END IF;
1587:
1580: -- Initialize API return status to sucess
1581: x_return_status := FND_API.G_RET_STS_SUCCESS;
1582: IF OZF_DEBUG_LOW_ON THEN
1583: OZF_UTILITY_PVT.debug_message('resale_line_int_id'||p_resale_line_int_id);
1584: OZF_UTILITY_PVT.debug_message('direct_customer_flag'||p_direct_customer_flag);
1585: OZF_UTILITY_PVT.debug_message('claimed_amount'||p_claimed_amount);
1586: END IF;
1587:
1588: IF (l_addl_attrb_dup_check_prfl IS NULL ) THEN
1581: x_return_status := FND_API.G_RET_STS_SUCCESS;
1582: IF OZF_DEBUG_LOW_ON THEN
1583: OZF_UTILITY_PVT.debug_message('resale_line_int_id'||p_resale_line_int_id);
1584: OZF_UTILITY_PVT.debug_message('direct_customer_flag'||p_direct_customer_flag);
1585: OZF_UTILITY_PVT.debug_message('claimed_amount'||p_claimed_amount);
1586: END IF;
1587:
1588: IF (l_addl_attrb_dup_check_prfl IS NULL ) THEN
1589: -- Check with resale data first
1632: p_claimed_amount = l_claimed_amount;
1633: END IF;
1634: --Bug# 8414563 fixed by ateotia(-)
1635: IF OZF_DEBUG_LOW_ON THEN
1636: OZF_UTILITY_PVT.debug_message('l_adjustment_id = '||l_adjustment_id);
1637: OZF_UTILITY_PVT.debug_message('x_dup_adjustment_id = '||x_dup_adjustment_id);
1638: IF x_reprocessing THEN
1639: OZF_UTILITY_PVT.debug_message('x_reprocessing >> Yes');
1640: ELSE
1633: END IF;
1634: --Bug# 8414563 fixed by ateotia(-)
1635: IF OZF_DEBUG_LOW_ON THEN
1636: OZF_UTILITY_PVT.debug_message('l_adjustment_id = '||l_adjustment_id);
1637: OZF_UTILITY_PVT.debug_message('x_dup_adjustment_id = '||x_dup_adjustment_id);
1638: IF x_reprocessing THEN
1639: OZF_UTILITY_PVT.debug_message('x_reprocessing >> Yes');
1640: ELSE
1641: OZF_UTILITY_PVT.debug_message('x_reprocessing >> No');
1635: IF OZF_DEBUG_LOW_ON THEN
1636: OZF_UTILITY_PVT.debug_message('l_adjustment_id = '||l_adjustment_id);
1637: OZF_UTILITY_PVT.debug_message('x_dup_adjustment_id = '||x_dup_adjustment_id);
1638: IF x_reprocessing THEN
1639: OZF_UTILITY_PVT.debug_message('x_reprocessing >> Yes');
1640: ELSE
1641: OZF_UTILITY_PVT.debug_message('x_reprocessing >> No');
1642: END IF;
1643: END IF;
1637: OZF_UTILITY_PVT.debug_message('x_dup_adjustment_id = '||x_dup_adjustment_id);
1638: IF x_reprocessing THEN
1639: OZF_UTILITY_PVT.debug_message('x_reprocessing >> Yes');
1640: ELSE
1641: OZF_UTILITY_PVT.debug_message('x_reprocessing >> No');
1642: END IF;
1643: END IF;
1644:
1645: ELSE
1692: END IF;
1693:
1694:
1695: IF OZF_DEBUG_LOW_ON THEN
1696: OZF_UTILITY_PVT.debug_message('dup adj id' || l_adjustment_id);
1697: OZF_UTILITY_PVT.debug_message('dup line id' || l_line_id);
1698: END IF;
1699:
1700: x_dup_adjustment_id := l_adjustment_id;
1693:
1694:
1695: IF OZF_DEBUG_LOW_ON THEN
1696: OZF_UTILITY_PVT.debug_message('dup adj id' || l_adjustment_id);
1697: OZF_UTILITY_PVT.debug_message('dup line id' || l_line_id);
1698: END IF;
1699:
1700: x_dup_adjustment_id := l_adjustment_id;
1701: x_dup_line_id := l_line_id;
1752: END IF;
1753: --Bug# 8414563 fixed by ateotia(-)
1754:
1755: IF OZF_DEBUG_LOW_ON THEN
1756: OZF_UTILITY_PVT.debug_message('l_adjustment_id = '||l_adjustment_id);
1757: OZF_UTILITY_PVT.debug_message('x_dup_adjustment_id = '||x_dup_adjustment_id);
1758: IF x_reprocessing THEN
1759: OZF_UTILITY_PVT.debug_message('x_reprocessing >> Yes');
1760: ELSE
1753: --Bug# 8414563 fixed by ateotia(-)
1754:
1755: IF OZF_DEBUG_LOW_ON THEN
1756: OZF_UTILITY_PVT.debug_message('l_adjustment_id = '||l_adjustment_id);
1757: OZF_UTILITY_PVT.debug_message('x_dup_adjustment_id = '||x_dup_adjustment_id);
1758: IF x_reprocessing THEN
1759: OZF_UTILITY_PVT.debug_message('x_reprocessing >> Yes');
1760: ELSE
1761: OZF_UTILITY_PVT.debug_message('x_reprocessing >> No');
1755: IF OZF_DEBUG_LOW_ON THEN
1756: OZF_UTILITY_PVT.debug_message('l_adjustment_id = '||l_adjustment_id);
1757: OZF_UTILITY_PVT.debug_message('x_dup_adjustment_id = '||x_dup_adjustment_id);
1758: IF x_reprocessing THEN
1759: OZF_UTILITY_PVT.debug_message('x_reprocessing >> Yes');
1760: ELSE
1761: OZF_UTILITY_PVT.debug_message('x_reprocessing >> No');
1762: END IF;
1763: END IF;
1757: OZF_UTILITY_PVT.debug_message('x_dup_adjustment_id = '||x_dup_adjustment_id);
1758: IF x_reprocessing THEN
1759: OZF_UTILITY_PVT.debug_message('x_reprocessing >> Yes');
1760: ELSE
1761: OZF_UTILITY_PVT.debug_message('x_reprocessing >> No');
1762: END IF;
1763: END IF;
1764: ELSE
1765: -- check to see whether it can be a duplicate of an interface line.
1813: x_reprocessing := true;
1814: END IF;
1815: END IF;
1816: IF OZF_DEBUG_LOW_ON THEN
1817: OZF_UTILITY_PVT.debug_message('dup adj id' || l_adjustment_id);
1818: OZF_UTILITY_PVT.debug_message('dup line id' || l_line_id);
1819: END IF;
1820:
1821: x_dup_adjustment_id := l_adjustment_id;
1814: END IF;
1815: END IF;
1816: IF OZF_DEBUG_LOW_ON THEN
1817: OZF_UTILITY_PVT.debug_message('dup adj id' || l_adjustment_id);
1818: OZF_UTILITY_PVT.debug_message('dup line id' || l_line_id);
1819: END IF;
1820:
1821: x_dup_adjustment_id := l_adjustment_id;
1822: x_dup_line_id := l_line_id;
1871: END IF;
1872: --Bug# 8414563 fixed by ateotia(-)
1873:
1874: IF OZF_DEBUG_LOW_ON THEN
1875: OZF_UTILITY_PVT.debug_message('l_adjustment_id = '||l_adjustment_id);
1876: OZF_UTILITY_PVT.debug_message('x_dup_adjustment_id = '||x_dup_adjustment_id);
1877: IF x_reprocessing THEN
1878: OZF_UTILITY_PVT.debug_message('x_reprocessing >> Yes');
1879: ELSE
1872: --Bug# 8414563 fixed by ateotia(-)
1873:
1874: IF OZF_DEBUG_LOW_ON THEN
1875: OZF_UTILITY_PVT.debug_message('l_adjustment_id = '||l_adjustment_id);
1876: OZF_UTILITY_PVT.debug_message('x_dup_adjustment_id = '||x_dup_adjustment_id);
1877: IF x_reprocessing THEN
1878: OZF_UTILITY_PVT.debug_message('x_reprocessing >> Yes');
1879: ELSE
1880: OZF_UTILITY_PVT.debug_message('x_reprocessing >> No');
1874: IF OZF_DEBUG_LOW_ON THEN
1875: OZF_UTILITY_PVT.debug_message('l_adjustment_id = '||l_adjustment_id);
1876: OZF_UTILITY_PVT.debug_message('x_dup_adjustment_id = '||x_dup_adjustment_id);
1877: IF x_reprocessing THEN
1878: OZF_UTILITY_PVT.debug_message('x_reprocessing >> Yes');
1879: ELSE
1880: OZF_UTILITY_PVT.debug_message('x_reprocessing >> No');
1881: END IF;
1882: END IF;
1876: OZF_UTILITY_PVT.debug_message('x_dup_adjustment_id = '||x_dup_adjustment_id);
1877: IF x_reprocessing THEN
1878: OZF_UTILITY_PVT.debug_message('x_reprocessing >> Yes');
1879: ELSE
1880: OZF_UTILITY_PVT.debug_message('x_reprocessing >> No');
1881: END IF;
1882: END IF;
1883:
1884: ELSE
1933: x_reprocessing := true;
1934: END IF;
1935: END IF;
1936: IF OZF_DEBUG_LOW_ON THEN
1937: OZF_UTILITY_PVT.debug_message('dup adj id' || l_adjustment_id);
1938: OZF_UTILITY_PVT.debug_message('dup line id' || l_line_id);
1939: END IF;
1940:
1941: x_dup_adjustment_id := l_adjustment_id;
1934: END IF;
1935: END IF;
1936: IF OZF_DEBUG_LOW_ON THEN
1937: OZF_UTILITY_PVT.debug_message('dup adj id' || l_adjustment_id);
1938: OZF_UTILITY_PVT.debug_message('dup line id' || l_line_id);
1939: END IF;
1940:
1941: x_dup_adjustment_id := l_adjustment_id;
1942: x_dup_line_id := l_line_id;
1945: END IF;
1946:
1947: -- Debug Message
1948: IF OZF_DEBUG_HIGH_ON THEN
1949: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
1950: END IF;
1951:
1952: --Standard call to get message count AND IF count=1, get the message
1953: FND_MSG_PUB.Count_And_Get (
2069: END IF;
2070:
2071: -- Debug Message
2072: IF OZF_DEBUG_HIGH_ON THEN
2073: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
2074: END IF;
2075:
2076: -- Initialize API return status to sucess
2077: x_return_status := FND_API.G_RET_STS_SUCCESS;
2107: ,x_reprocessing => l_reprocessing
2108: );
2109:
2110: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2111: OZF_UTILITY_PVT.error_message('OZF_RESALE_CHK_DUP_ERR');
2112: ELSE
2113: IF l_dup_adjustment_id IS NOT NULL AND l_reprocessing THEN
2114: -- Set the line and adjustment as duplicates
2115: UPDATE ozf_resale_lines_int
2177: END IF;
2178:
2179: -- Debug Message
2180: IF OZF_DEBUG_HIGH_ON THEN
2181: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
2182: END IF;
2183:
2184: --Standard call to get message count AND IF count=1, get the message
2185: FND_MSG_PUB.Count_And_Get (
2306: END IF;
2307:
2308: -- Debug Message
2309: IF OZF_DEBUG_HIGH_ON THEN
2310: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
2311: END IF;
2312:
2313: -- Initialize API return status to sucess
2314: x_return_status := FND_API.G_RET_STS_SUCCESS;
2323: l_partner_cust_account_id;
2324: CLOSE batch_info_csr;
2325:
2326: IF OZF_DEBUG_LOW_ON THEN
2327: OZF_UTILITY_PVT.debug_message('Report date:' || l_report_date);
2328: OZF_UTILITY_PVT.debug_message('Report Start date:' || l_report_start_date);
2329: OZF_UTILITY_PVT.debug_message('Report End date:' || l_report_end_date);
2330: END IF;
2331:
2324: CLOSE batch_info_csr;
2325:
2326: IF OZF_DEBUG_LOW_ON THEN
2327: OZF_UTILITY_PVT.debug_message('Report date:' || l_report_date);
2328: OZF_UTILITY_PVT.debug_message('Report Start date:' || l_report_start_date);
2329: OZF_UTILITY_PVT.debug_message('Report End date:' || l_report_end_date);
2330: END IF;
2331:
2332: -- Check status
2325:
2326: IF OZF_DEBUG_LOW_ON THEN
2327: OZF_UTILITY_PVT.debug_message('Report date:' || l_report_date);
2328: OZF_UTILITY_PVT.debug_message('Report Start date:' || l_report_start_date);
2329: OZF_UTILITY_PVT.debug_message('Report End date:' || l_report_end_date);
2330: END IF;
2331:
2332: -- Check status
2333: IF l_status_code <> G_BATCH_PROCESSING THEN
2591: END IF;
2592:
2593: -- Debug Message
2594: IF OZF_DEBUG_HIGH_ON THEN
2595: OZF_UTILITY_PVT.debug_message(l_full_name||': END');
2596: END IF;
2597:
2598: --Standard call to get message count AND IF count=1, get the message
2599: FND_MSG_PUB.Count_And_Get (
2677: END IF;
2678:
2679: -- Debug Message
2680: IF OZF_DEBUG_HIGH_ON THEN
2681: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
2682: END IF;
2683:
2684: -- Initialize API return status to sucess
2685: x_return_status := FND_API.G_RET_STS_SUCCESS;
2722: --
2723:
2724: -- Debug Message
2725: IF OZF_DEBUG_HIGH_ON THEN
2726: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
2727: END IF;
2728:
2729: --Standard call to get message count AND IF count=1, get the message
2730: FND_MSG_PUB.Count_And_Get (
2794: ,p_justification IN VARCHAR2
2795: ,p_to_create_utilization IN BOOLEAN
2796: ,x_return_status OUT NOCOPY VARCHAR2
2797: ,p_use_fund_staging_tables IN VARCHAR2
2798: ,px_ozf_act_budgets_tbl IN OUT NOCOPY OZF_UTILITY_PVT.ozf_act_budgets_table
2799: ,px_ozf_funds_old_rectype IN OZF_UTILITY_PVT.ozf_funds_all_b_rectype
2800: ,px_ozf_funds_new_tbl IN OUT NOCOPY OZF_UTILITY_PVT.ozf_funds_table
2801: )
2802: IS
2795: ,p_to_create_utilization IN BOOLEAN
2796: ,x_return_status OUT NOCOPY VARCHAR2
2797: ,p_use_fund_staging_tables IN VARCHAR2
2798: ,px_ozf_act_budgets_tbl IN OUT NOCOPY OZF_UTILITY_PVT.ozf_act_budgets_table
2799: ,px_ozf_funds_old_rectype IN OZF_UTILITY_PVT.ozf_funds_all_b_rectype
2800: ,px_ozf_funds_new_tbl IN OUT NOCOPY OZF_UTILITY_PVT.ozf_funds_table
2801: )
2802: IS
2803: l_api_name CONSTANT VARCHAR2(30) := 'Create_Utilization_Rec';
2796: ,x_return_status OUT NOCOPY VARCHAR2
2797: ,p_use_fund_staging_tables IN VARCHAR2
2798: ,px_ozf_act_budgets_tbl IN OUT NOCOPY OZF_UTILITY_PVT.ozf_act_budgets_table
2799: ,px_ozf_funds_old_rectype IN OZF_UTILITY_PVT.ozf_funds_all_b_rectype
2800: ,px_ozf_funds_new_tbl IN OUT NOCOPY OZF_UTILITY_PVT.ozf_funds_table
2801: )
2802: IS
2803: l_api_name CONSTANT VARCHAR2(30) := 'Create_Utilization_Rec';
2804: l_api_version CONSTANT NUMBER := 1.0;
2822: x_return_status := FND_API.G_RET_STS_SUCCESS;
2823:
2824: --
2825: IF OZF_DEBUG_HIGH_ON THEN
2826: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
2827: END IF;
2828:
2829: -- Create act Utilization Record.
2830: l_pric_act_util_rec.object_type := 'TP_ORDER';
2862: -- get request amount in budget currency
2863: l_pric_act_budgets_rec.request_currency := p_line_int_rec.currency_code;
2864: l_pric_act_budgets_rec.request_amount := p_line_int_rec.total_accepted_amount;
2865:
2866: OZF_UTILITY_PVT.debug_message('l_pric_act_util_rec.plan_currency_code : '||l_pric_act_util_rec.plan_currency_code );
2867:
2868: IF OZF_DEBUG_LOW_ON THEN
2869: OZF_UTILITY_PVT.debug_message('request currency'|| l_pric_act_budgets_rec.request_currency);
2870: OZF_UTILITY_PVT.debug_message('request amount: '||l_pric_act_budgets_rec.request_amount);
2865:
2866: OZF_UTILITY_PVT.debug_message('l_pric_act_util_rec.plan_currency_code : '||l_pric_act_util_rec.plan_currency_code );
2867:
2868: IF OZF_DEBUG_LOW_ON THEN
2869: OZF_UTILITY_PVT.debug_message('request currency'|| l_pric_act_budgets_rec.request_currency);
2870: OZF_UTILITY_PVT.debug_message('request amount: '||l_pric_act_budgets_rec.request_amount);
2871: END IF;
2872:
2873: IF p_batch_type <> G_SPECIAL_PRICING THEN
2866: OZF_UTILITY_PVT.debug_message('l_pric_act_util_rec.plan_currency_code : '||l_pric_act_util_rec.plan_currency_code );
2867:
2868: IF OZF_DEBUG_LOW_ON THEN
2869: OZF_UTILITY_PVT.debug_message('request currency'|| l_pric_act_budgets_rec.request_currency);
2870: OZF_UTILITY_PVT.debug_message('request amount: '||l_pric_act_budgets_rec.request_amount);
2871: END IF;
2872:
2873: IF p_batch_type <> G_SPECIAL_PRICING THEN
2874: l_pric_act_budgets_rec.parent_src_curr :=
2886: l_pric_act_budgets_rec.parent_src_apprvd_amt := p_line_int_rec.total_accepted_amount;
2887:
2888: IF p_line_int_rec.currency_code <> l_pric_act_budgets_rec.parent_src_curr THEN
2889: IF OZF_DEBUG_LOW_ON THEN
2890: OZF_UTILITY_PVT.debug_message('in exchange');
2891: END IF;
2892: -- get convertion type
2893: OPEN OZF_RESALE_COMMON_PVT.g_exchange_rate_type_csr;
2894: FETCH OZF_RESALE_COMMON_PVT.g_exchange_rate_type_csr INTO l_exchange_type;
2893: OPEN OZF_RESALE_COMMON_PVT.g_exchange_rate_type_csr;
2894: FETCH OZF_RESALE_COMMON_PVT.g_exchange_rate_type_csr INTO l_exchange_type;
2895: CLOSE OZF_RESALE_COMMON_PVT.g_exchange_rate_type_csr;
2896:
2897: OZF_UTILITY_PVT.Convert_Currency (
2898: p_from_currency => p_line_int_rec.currency_code
2899: ,p_to_currency => l_pric_act_budgets_rec.parent_src_curr
2900: ,p_conv_type => l_exchange_type
2901: ,p_conv_rate => FND_API.G_MISS_NUM
2915:
2916: END IF;
2917:
2918: IF OZF_DEBUG_LOW_ON THEN
2919: OZF_UTILITY_PVT.debug_message('act currency: '||p_line_int_rec.currency_code);
2920: OZF_UTILITY_PVT.debug_message('par src: '||l_pric_act_budgets_rec.parent_src_curr);
2921: OZF_UTILITY_PVT.debug_message('approve amount: '||l_pric_act_budgets_rec.parent_src_apprvd_amt);
2922: END IF;
2923:
2916: END IF;
2917:
2918: IF OZF_DEBUG_LOW_ON THEN
2919: OZF_UTILITY_PVT.debug_message('act currency: '||p_line_int_rec.currency_code);
2920: OZF_UTILITY_PVT.debug_message('par src: '||l_pric_act_budgets_rec.parent_src_curr);
2921: OZF_UTILITY_PVT.debug_message('approve amount: '||l_pric_act_budgets_rec.parent_src_apprvd_amt);
2922: END IF;
2923:
2924: l_pric_act_budgets_rec.transfer_type := 'UTILIZED';
2917:
2918: IF OZF_DEBUG_LOW_ON THEN
2919: OZF_UTILITY_PVT.debug_message('act currency: '||p_line_int_rec.currency_code);
2920: OZF_UTILITY_PVT.debug_message('par src: '||l_pric_act_budgets_rec.parent_src_curr);
2921: OZF_UTILITY_PVT.debug_message('approve amount: '||l_pric_act_budgets_rec.parent_src_apprvd_amt);
2922: END IF;
2923:
2924: l_pric_act_budgets_rec.transfer_type := 'UTILIZED';
2925: l_pric_act_budgets_rec.justification := p_justification;
2924: l_pric_act_budgets_rec.transfer_type := 'UTILIZED';
2925: l_pric_act_budgets_rec.justification := p_justification;
2926:
2927: -- Add approver_id AND requester_id
2928: l_pric_act_budgets_rec.approver_id := OZF_UTILITY_PVT.get_resource_id (p_approver_id);
2929: l_pric_act_budgets_rec.requester_id := OZF_UTILITY_PVT.get_resource_id (p_approver_id);
2930:
2931: -- Insert INTO ozf_adjustment TABLE.
2932: OPEN OZF_RESALE_COMMON_PVT.g_adjustment_id_csr;
2925: l_pric_act_budgets_rec.justification := p_justification;
2926:
2927: -- Add approver_id AND requester_id
2928: l_pric_act_budgets_rec.approver_id := OZF_UTILITY_PVT.get_resource_id (p_approver_id);
2929: l_pric_act_budgets_rec.requester_id := OZF_UTILITY_PVT.get_resource_id (p_approver_id);
2930:
2931: -- Insert INTO ozf_adjustment TABLE.
2932: OPEN OZF_RESALE_COMMON_PVT.g_adjustment_id_csr;
2933: FETCH OZF_RESALE_COMMON_PVT.g_adjustment_id_csr INTO l_adjustment_id;
3012: WHERE duplicated_line_id = p_line_int_rec.resale_line_int_id
3013: AND duplicated_adjustment_id = -1;
3014:
3015: IF OZF_DEBUG_HIGH_ON THEN
3016: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
3017: END IF;
3018:
3019: EXCEPTION
3020: WHEN FND_API.g_exc_error THEN
3124: ,x_msg_count OUT NOCOPY NUMBER
3125: ,x_utilization_id OUT NOCOPY NUMBER
3126: )IS
3127: l_use_fund_staging_tables VARCHAR2(1) := 'F';
3128: lx_ozf_act_budgets_tbl OZF_UTILITY_PVT.ozf_act_budgets_table;
3129: lx_ozf_funds_old_rectype OZF_UTILITY_PVT.ozf_funds_all_b_rectype;
3130: lx_ozf_funds_new_tbl OZF_UTILITY_PVT.ozf_funds_table;
3131: l_batch_type VARCHAR2(30);
3132: BEGIN
3125: ,x_utilization_id OUT NOCOPY NUMBER
3126: )IS
3127: l_use_fund_staging_tables VARCHAR2(1) := 'F';
3128: lx_ozf_act_budgets_tbl OZF_UTILITY_PVT.ozf_act_budgets_table;
3129: lx_ozf_funds_old_rectype OZF_UTILITY_PVT.ozf_funds_all_b_rectype;
3130: lx_ozf_funds_new_tbl OZF_UTILITY_PVT.ozf_funds_table;
3131: l_batch_type VARCHAR2(30);
3132: BEGIN
3133: Create_Adj_And_Utilization(
3126: )IS
3127: l_use_fund_staging_tables VARCHAR2(1) := 'F';
3128: lx_ozf_act_budgets_tbl OZF_UTILITY_PVT.ozf_act_budgets_table;
3129: lx_ozf_funds_old_rectype OZF_UTILITY_PVT.ozf_funds_all_b_rectype;
3130: lx_ozf_funds_new_tbl OZF_UTILITY_PVT.ozf_funds_table;
3131: l_batch_type VARCHAR2(30);
3132: BEGIN
3133: Create_Adj_And_Utilization(
3134: p_api_version => p_api_version
3192: ,x_msg_count OUT NOCOPY NUMBER
3193: ,x_utilization_id OUT NOCOPY NUMBER
3194: ,p_batch_type IN VARCHAR2
3195: ,p_use_fund_staging_tables IN VARCHAR2
3196: ,px_ozf_act_budgets_tbl IN OUT NOCOPY OZF_UTILITY_PVT.ozf_act_budgets_table
3197: ,px_ozf_funds_old_rectype IN OZF_UTILITY_PVT.ozf_funds_all_b_rectype
3198: ,px_ozf_funds_new_tbl IN OUT NOCOPY OZF_UTILITY_PVT.ozf_funds_table
3199: )IS
3200: l_api_name CONSTANT VARCHAR2(30) := 'Create_Adj_and_Utilization';
3193: ,x_utilization_id OUT NOCOPY NUMBER
3194: ,p_batch_type IN VARCHAR2
3195: ,p_use_fund_staging_tables IN VARCHAR2
3196: ,px_ozf_act_budgets_tbl IN OUT NOCOPY OZF_UTILITY_PVT.ozf_act_budgets_table
3197: ,px_ozf_funds_old_rectype IN OZF_UTILITY_PVT.ozf_funds_all_b_rectype
3198: ,px_ozf_funds_new_tbl IN OUT NOCOPY OZF_UTILITY_PVT.ozf_funds_table
3199: )IS
3200: l_api_name CONSTANT VARCHAR2(30) := 'Create_Adj_and_Utilization';
3201: l_api_version CONSTANT NUMBER := 1.0;
3194: ,p_batch_type IN VARCHAR2
3195: ,p_use_fund_staging_tables IN VARCHAR2
3196: ,px_ozf_act_budgets_tbl IN OUT NOCOPY OZF_UTILITY_PVT.ozf_act_budgets_table
3197: ,px_ozf_funds_old_rectype IN OZF_UTILITY_PVT.ozf_funds_all_b_rectype
3198: ,px_ozf_funds_new_tbl IN OUT NOCOPY OZF_UTILITY_PVT.ozf_funds_table
3199: )IS
3200: l_api_name CONSTANT VARCHAR2(30) := 'Create_Adj_and_Utilization';
3201: l_api_version CONSTANT NUMBER := 1.0;
3202: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME ||'.'|| l_api_name;
3232: END IF;
3233:
3234: -- Debug Message
3235: IF OZF_DEBUG_HIGH_ON THEN
3236: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
3237: END IF;
3238:
3239: -- Initialize API return status to sucess
3240: x_return_status := FND_API.G_RET_STS_SUCCESS;
3239: -- Initialize API return status to sucess
3240: x_return_status := FND_API.G_RET_STS_SUCCESS;
3241:
3242: IF OZF_DEBUG_LOW_ON THEN
3243: OZF_UTILITY_PVT.debug_message('adj_id:' || p_price_adj_rec.resale_adjustment_id ||'line_id:' || p_price_adj_rec.resale_line_id);
3244: IF p_to_create_utilization THEN
3245: OZF_UTILITY_PVT.debug_message('create utilization:T');
3246: ELSE
3247: OZF_UTILITY_PVT.debug_message('create utilization:F');
3241:
3242: IF OZF_DEBUG_LOW_ON THEN
3243: OZF_UTILITY_PVT.debug_message('adj_id:' || p_price_adj_rec.resale_adjustment_id ||'line_id:' || p_price_adj_rec.resale_line_id);
3244: IF p_to_create_utilization THEN
3245: OZF_UTILITY_PVT.debug_message('create utilization:T');
3246: ELSE
3247: OZF_UTILITY_PVT.debug_message('create utilization:F');
3248: END IF;
3249: END IF;
3243: OZF_UTILITY_PVT.debug_message('adj_id:' || p_price_adj_rec.resale_adjustment_id ||'line_id:' || p_price_adj_rec.resale_line_id);
3244: IF p_to_create_utilization THEN
3245: OZF_UTILITY_PVT.debug_message('create utilization:T');
3246: ELSE
3247: OZF_UTILITY_PVT.debug_message('create utilization:F');
3248: END IF;
3249: END IF;
3250:
3251: OZF_UTILITY_PVT.debug_message('Create_Adj_And_Utilization mg '||p_act_util_rec.plan_currency_code);
3247: OZF_UTILITY_PVT.debug_message('create utilization:F');
3248: END IF;
3249: END IF;
3250:
3251: OZF_UTILITY_PVT.debug_message('Create_Adj_And_Utilization mg '||p_act_util_rec.plan_currency_code);
3252:
3253: -- get price_adj_id
3254: IF l_adjustment_id IS NULL THEN
3255: OPEN g_adjustment_id_csr;
3329:
3330: -- Create accrual only when its required
3331: IF p_to_create_utilization THEN
3332: IF OZF_DEBUG_LOW_ON THEN
3333: ozf_utility_pvt.debug_message('p_act_util_rec.object_type = '|| p_act_util_rec.object_type);
3334: ozf_utility_pvt.debug_message('p_act_util_rec.object_id = '|| p_act_util_rec.object_id);
3335: ozf_utility_pvt.debug_message('p_act_util_rec.product_level_type = '|| p_act_util_rec.product_level_type);
3336: ozf_utility_pvt.debug_message('p_act_util_rec.product_id = '|| p_act_util_rec.product_id);
3337: ozf_utility_pvt.debug_message('p_act_util_rec.billto_cust_account_id = '|| p_act_util_rec.billto_cust_account_id);
3330: -- Create accrual only when its required
3331: IF p_to_create_utilization THEN
3332: IF OZF_DEBUG_LOW_ON THEN
3333: ozf_utility_pvt.debug_message('p_act_util_rec.object_type = '|| p_act_util_rec.object_type);
3334: ozf_utility_pvt.debug_message('p_act_util_rec.object_id = '|| p_act_util_rec.object_id);
3335: ozf_utility_pvt.debug_message('p_act_util_rec.product_level_type = '|| p_act_util_rec.product_level_type);
3336: ozf_utility_pvt.debug_message('p_act_util_rec.product_id = '|| p_act_util_rec.product_id);
3337: ozf_utility_pvt.debug_message('p_act_util_rec.billto_cust_account_id = '|| p_act_util_rec.billto_cust_account_id);
3338: ozf_utility_pvt.debug_message('p_act_util_rec.gl_date = '|| p_act_util_rec.gl_date);
3331: IF p_to_create_utilization THEN
3332: IF OZF_DEBUG_LOW_ON THEN
3333: ozf_utility_pvt.debug_message('p_act_util_rec.object_type = '|| p_act_util_rec.object_type);
3334: ozf_utility_pvt.debug_message('p_act_util_rec.object_id = '|| p_act_util_rec.object_id);
3335: ozf_utility_pvt.debug_message('p_act_util_rec.product_level_type = '|| p_act_util_rec.product_level_type);
3336: ozf_utility_pvt.debug_message('p_act_util_rec.product_id = '|| p_act_util_rec.product_id);
3337: ozf_utility_pvt.debug_message('p_act_util_rec.billto_cust_account_id = '|| p_act_util_rec.billto_cust_account_id);
3338: ozf_utility_pvt.debug_message('p_act_util_rec.gl_date = '|| p_act_util_rec.gl_date);
3339: ozf_utility_pvt.debug_message('p_act_util_rec.reference_type = '|| p_act_util_rec.reference_type);
3332: IF OZF_DEBUG_LOW_ON THEN
3333: ozf_utility_pvt.debug_message('p_act_util_rec.object_type = '|| p_act_util_rec.object_type);
3334: ozf_utility_pvt.debug_message('p_act_util_rec.object_id = '|| p_act_util_rec.object_id);
3335: ozf_utility_pvt.debug_message('p_act_util_rec.product_level_type = '|| p_act_util_rec.product_level_type);
3336: ozf_utility_pvt.debug_message('p_act_util_rec.product_id = '|| p_act_util_rec.product_id);
3337: ozf_utility_pvt.debug_message('p_act_util_rec.billto_cust_account_id = '|| p_act_util_rec.billto_cust_account_id);
3338: ozf_utility_pvt.debug_message('p_act_util_rec.gl_date = '|| p_act_util_rec.gl_date);
3339: ozf_utility_pvt.debug_message('p_act_util_rec.reference_type = '|| p_act_util_rec.reference_type);
3340: ozf_utility_pvt.debug_message('p_act_util_rec.reference_id = '|| p_act_util_rec.reference_id);
3333: ozf_utility_pvt.debug_message('p_act_util_rec.object_type = '|| p_act_util_rec.object_type);
3334: ozf_utility_pvt.debug_message('p_act_util_rec.object_id = '|| p_act_util_rec.object_id);
3335: ozf_utility_pvt.debug_message('p_act_util_rec.product_level_type = '|| p_act_util_rec.product_level_type);
3336: ozf_utility_pvt.debug_message('p_act_util_rec.product_id = '|| p_act_util_rec.product_id);
3337: ozf_utility_pvt.debug_message('p_act_util_rec.billto_cust_account_id = '|| p_act_util_rec.billto_cust_account_id);
3338: ozf_utility_pvt.debug_message('p_act_util_rec.gl_date = '|| p_act_util_rec.gl_date);
3339: ozf_utility_pvt.debug_message('p_act_util_rec.reference_type = '|| p_act_util_rec.reference_type);
3340: ozf_utility_pvt.debug_message('p_act_util_rec.reference_id = '|| p_act_util_rec.reference_id);
3341: ozf_utility_pvt.debug_message('p_act_util_rec.price_adjustment_id = '|| p_act_util_rec.price_adjustment_id);
3334: ozf_utility_pvt.debug_message('p_act_util_rec.object_id = '|| p_act_util_rec.object_id);
3335: ozf_utility_pvt.debug_message('p_act_util_rec.product_level_type = '|| p_act_util_rec.product_level_type);
3336: ozf_utility_pvt.debug_message('p_act_util_rec.product_id = '|| p_act_util_rec.product_id);
3337: ozf_utility_pvt.debug_message('p_act_util_rec.billto_cust_account_id = '|| p_act_util_rec.billto_cust_account_id);
3338: ozf_utility_pvt.debug_message('p_act_util_rec.gl_date = '|| p_act_util_rec.gl_date);
3339: ozf_utility_pvt.debug_message('p_act_util_rec.reference_type = '|| p_act_util_rec.reference_type);
3340: ozf_utility_pvt.debug_message('p_act_util_rec.reference_id = '|| p_act_util_rec.reference_id);
3341: ozf_utility_pvt.debug_message('p_act_util_rec.price_adjustment_id = '|| p_act_util_rec.price_adjustment_id);
3342: ozf_utility_pvt.debug_message('p_act_util_rec.utilization_type = '|| p_act_util_rec.utilization_type);
3335: ozf_utility_pvt.debug_message('p_act_util_rec.product_level_type = '|| p_act_util_rec.product_level_type);
3336: ozf_utility_pvt.debug_message('p_act_util_rec.product_id = '|| p_act_util_rec.product_id);
3337: ozf_utility_pvt.debug_message('p_act_util_rec.billto_cust_account_id = '|| p_act_util_rec.billto_cust_account_id);
3338: ozf_utility_pvt.debug_message('p_act_util_rec.gl_date = '|| p_act_util_rec.gl_date);
3339: ozf_utility_pvt.debug_message('p_act_util_rec.reference_type = '|| p_act_util_rec.reference_type);
3340: ozf_utility_pvt.debug_message('p_act_util_rec.reference_id = '|| p_act_util_rec.reference_id);
3341: ozf_utility_pvt.debug_message('p_act_util_rec.price_adjustment_id = '|| p_act_util_rec.price_adjustment_id);
3342: ozf_utility_pvt.debug_message('p_act_util_rec.utilization_type = '|| p_act_util_rec.utilization_type);
3343: ozf_utility_pvt.debug_message('p_act_util_rec.adjustment_type_id = '|| p_act_util_rec.adjustment_type_id);
3336: ozf_utility_pvt.debug_message('p_act_util_rec.product_id = '|| p_act_util_rec.product_id);
3337: ozf_utility_pvt.debug_message('p_act_util_rec.billto_cust_account_id = '|| p_act_util_rec.billto_cust_account_id);
3338: ozf_utility_pvt.debug_message('p_act_util_rec.gl_date = '|| p_act_util_rec.gl_date);
3339: ozf_utility_pvt.debug_message('p_act_util_rec.reference_type = '|| p_act_util_rec.reference_type);
3340: ozf_utility_pvt.debug_message('p_act_util_rec.reference_id = '|| p_act_util_rec.reference_id);
3341: ozf_utility_pvt.debug_message('p_act_util_rec.price_adjustment_id = '|| p_act_util_rec.price_adjustment_id);
3342: ozf_utility_pvt.debug_message('p_act_util_rec.utilization_type = '|| p_act_util_rec.utilization_type);
3343: ozf_utility_pvt.debug_message('p_act_util_rec.adjustment_type_id = '|| p_act_util_rec.adjustment_type_id);
3344: ozf_utility_pvt.debug_message('p_act_util_rec.org_id = '|| p_act_util_rec.org_id);
3337: ozf_utility_pvt.debug_message('p_act_util_rec.billto_cust_account_id = '|| p_act_util_rec.billto_cust_account_id);
3338: ozf_utility_pvt.debug_message('p_act_util_rec.gl_date = '|| p_act_util_rec.gl_date);
3339: ozf_utility_pvt.debug_message('p_act_util_rec.reference_type = '|| p_act_util_rec.reference_type);
3340: ozf_utility_pvt.debug_message('p_act_util_rec.reference_id = '|| p_act_util_rec.reference_id);
3341: ozf_utility_pvt.debug_message('p_act_util_rec.price_adjustment_id = '|| p_act_util_rec.price_adjustment_id);
3342: ozf_utility_pvt.debug_message('p_act_util_rec.utilization_type = '|| p_act_util_rec.utilization_type);
3343: ozf_utility_pvt.debug_message('p_act_util_rec.adjustment_type_id = '|| p_act_util_rec.adjustment_type_id);
3344: ozf_utility_pvt.debug_message('p_act_util_rec.org_id = '|| p_act_util_rec.org_id);
3345:
3338: ozf_utility_pvt.debug_message('p_act_util_rec.gl_date = '|| p_act_util_rec.gl_date);
3339: ozf_utility_pvt.debug_message('p_act_util_rec.reference_type = '|| p_act_util_rec.reference_type);
3340: ozf_utility_pvt.debug_message('p_act_util_rec.reference_id = '|| p_act_util_rec.reference_id);
3341: ozf_utility_pvt.debug_message('p_act_util_rec.price_adjustment_id = '|| p_act_util_rec.price_adjustment_id);
3342: ozf_utility_pvt.debug_message('p_act_util_rec.utilization_type = '|| p_act_util_rec.utilization_type);
3343: ozf_utility_pvt.debug_message('p_act_util_rec.adjustment_type_id = '|| p_act_util_rec.adjustment_type_id);
3344: ozf_utility_pvt.debug_message('p_act_util_rec.org_id = '|| p_act_util_rec.org_id);
3345:
3346: ozf_utility_pvt.debug_message('p_act_budgets_rec.act_budget_used_by_id = '|| p_act_budgets_rec.act_budget_used_by_id);
3339: ozf_utility_pvt.debug_message('p_act_util_rec.reference_type = '|| p_act_util_rec.reference_type);
3340: ozf_utility_pvt.debug_message('p_act_util_rec.reference_id = '|| p_act_util_rec.reference_id);
3341: ozf_utility_pvt.debug_message('p_act_util_rec.price_adjustment_id = '|| p_act_util_rec.price_adjustment_id);
3342: ozf_utility_pvt.debug_message('p_act_util_rec.utilization_type = '|| p_act_util_rec.utilization_type);
3343: ozf_utility_pvt.debug_message('p_act_util_rec.adjustment_type_id = '|| p_act_util_rec.adjustment_type_id);
3344: ozf_utility_pvt.debug_message('p_act_util_rec.org_id = '|| p_act_util_rec.org_id);
3345:
3346: ozf_utility_pvt.debug_message('p_act_budgets_rec.act_budget_used_by_id = '|| p_act_budgets_rec.act_budget_used_by_id);
3347: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_id = '|| p_act_budgets_rec.budget_source_id);
3340: ozf_utility_pvt.debug_message('p_act_util_rec.reference_id = '|| p_act_util_rec.reference_id);
3341: ozf_utility_pvt.debug_message('p_act_util_rec.price_adjustment_id = '|| p_act_util_rec.price_adjustment_id);
3342: ozf_utility_pvt.debug_message('p_act_util_rec.utilization_type = '|| p_act_util_rec.utilization_type);
3343: ozf_utility_pvt.debug_message('p_act_util_rec.adjustment_type_id = '|| p_act_util_rec.adjustment_type_id);
3344: ozf_utility_pvt.debug_message('p_act_util_rec.org_id = '|| p_act_util_rec.org_id);
3345:
3346: ozf_utility_pvt.debug_message('p_act_budgets_rec.act_budget_used_by_id = '|| p_act_budgets_rec.act_budget_used_by_id);
3347: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_id = '|| p_act_budgets_rec.budget_source_id);
3348: ozf_utility_pvt.debug_message('p_act_budgets_rec.status_code = '|| p_act_budgets_rec.status_code);
3342: ozf_utility_pvt.debug_message('p_act_util_rec.utilization_type = '|| p_act_util_rec.utilization_type);
3343: ozf_utility_pvt.debug_message('p_act_util_rec.adjustment_type_id = '|| p_act_util_rec.adjustment_type_id);
3344: ozf_utility_pvt.debug_message('p_act_util_rec.org_id = '|| p_act_util_rec.org_id);
3345:
3346: ozf_utility_pvt.debug_message('p_act_budgets_rec.act_budget_used_by_id = '|| p_act_budgets_rec.act_budget_used_by_id);
3347: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_id = '|| p_act_budgets_rec.budget_source_id);
3348: ozf_utility_pvt.debug_message('p_act_budgets_rec.status_code = '|| p_act_budgets_rec.status_code);
3349: ozf_utility_pvt.debug_message('p_act_budgets_rec.transfer_type = '|| p_act_budgets_rec.transfer_type);
3350: ozf_utility_pvt.debug_message('p_act_budgets_rec.arc_act_budget_used_by= '|| p_act_budgets_rec.arc_act_budget_used_by);
3343: ozf_utility_pvt.debug_message('p_act_util_rec.adjustment_type_id = '|| p_act_util_rec.adjustment_type_id);
3344: ozf_utility_pvt.debug_message('p_act_util_rec.org_id = '|| p_act_util_rec.org_id);
3345:
3346: ozf_utility_pvt.debug_message('p_act_budgets_rec.act_budget_used_by_id = '|| p_act_budgets_rec.act_budget_used_by_id);
3347: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_id = '|| p_act_budgets_rec.budget_source_id);
3348: ozf_utility_pvt.debug_message('p_act_budgets_rec.status_code = '|| p_act_budgets_rec.status_code);
3349: ozf_utility_pvt.debug_message('p_act_budgets_rec.transfer_type = '|| p_act_budgets_rec.transfer_type);
3350: ozf_utility_pvt.debug_message('p_act_budgets_rec.arc_act_budget_used_by= '|| p_act_budgets_rec.arc_act_budget_used_by);
3351: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_type = '|| p_act_budgets_rec.budget_source_type);
3344: ozf_utility_pvt.debug_message('p_act_util_rec.org_id = '|| p_act_util_rec.org_id);
3345:
3346: ozf_utility_pvt.debug_message('p_act_budgets_rec.act_budget_used_by_id = '|| p_act_budgets_rec.act_budget_used_by_id);
3347: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_id = '|| p_act_budgets_rec.budget_source_id);
3348: ozf_utility_pvt.debug_message('p_act_budgets_rec.status_code = '|| p_act_budgets_rec.status_code);
3349: ozf_utility_pvt.debug_message('p_act_budgets_rec.transfer_type = '|| p_act_budgets_rec.transfer_type);
3350: ozf_utility_pvt.debug_message('p_act_budgets_rec.arc_act_budget_used_by= '|| p_act_budgets_rec.arc_act_budget_used_by);
3351: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_type = '|| p_act_budgets_rec.budget_source_type);
3352: ozf_utility_pvt.debug_message('p_act_budgets_rec.approver_id = '|| p_act_budgets_rec.approver_id);
3345:
3346: ozf_utility_pvt.debug_message('p_act_budgets_rec.act_budget_used_by_id = '|| p_act_budgets_rec.act_budget_used_by_id);
3347: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_id = '|| p_act_budgets_rec.budget_source_id);
3348: ozf_utility_pvt.debug_message('p_act_budgets_rec.status_code = '|| p_act_budgets_rec.status_code);
3349: ozf_utility_pvt.debug_message('p_act_budgets_rec.transfer_type = '|| p_act_budgets_rec.transfer_type);
3350: ozf_utility_pvt.debug_message('p_act_budgets_rec.arc_act_budget_used_by= '|| p_act_budgets_rec.arc_act_budget_used_by);
3351: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_type = '|| p_act_budgets_rec.budget_source_type);
3352: ozf_utility_pvt.debug_message('p_act_budgets_rec.approver_id = '|| p_act_budgets_rec.approver_id);
3353: ozf_utility_pvt.debug_message('p_act_budgets_rec.requester_id = '|| p_act_budgets_rec.requester_id);
3346: ozf_utility_pvt.debug_message('p_act_budgets_rec.act_budget_used_by_id = '|| p_act_budgets_rec.act_budget_used_by_id);
3347: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_id = '|| p_act_budgets_rec.budget_source_id);
3348: ozf_utility_pvt.debug_message('p_act_budgets_rec.status_code = '|| p_act_budgets_rec.status_code);
3349: ozf_utility_pvt.debug_message('p_act_budgets_rec.transfer_type = '|| p_act_budgets_rec.transfer_type);
3350: ozf_utility_pvt.debug_message('p_act_budgets_rec.arc_act_budget_used_by= '|| p_act_budgets_rec.arc_act_budget_used_by);
3351: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_type = '|| p_act_budgets_rec.budget_source_type);
3352: ozf_utility_pvt.debug_message('p_act_budgets_rec.approver_id = '|| p_act_budgets_rec.approver_id);
3353: ozf_utility_pvt.debug_message('p_act_budgets_rec.requester_id = '|| p_act_budgets_rec.requester_id);
3354: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_currency = '|| p_act_budgets_rec.request_currency);
3347: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_id = '|| p_act_budgets_rec.budget_source_id);
3348: ozf_utility_pvt.debug_message('p_act_budgets_rec.status_code = '|| p_act_budgets_rec.status_code);
3349: ozf_utility_pvt.debug_message('p_act_budgets_rec.transfer_type = '|| p_act_budgets_rec.transfer_type);
3350: ozf_utility_pvt.debug_message('p_act_budgets_rec.arc_act_budget_used_by= '|| p_act_budgets_rec.arc_act_budget_used_by);
3351: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_type = '|| p_act_budgets_rec.budget_source_type);
3352: ozf_utility_pvt.debug_message('p_act_budgets_rec.approver_id = '|| p_act_budgets_rec.approver_id);
3353: ozf_utility_pvt.debug_message('p_act_budgets_rec.requester_id = '|| p_act_budgets_rec.requester_id);
3354: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_currency = '|| p_act_budgets_rec.request_currency);
3355: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_source_id = '|| p_act_budgets_rec.parent_source_id);
3348: ozf_utility_pvt.debug_message('p_act_budgets_rec.status_code = '|| p_act_budgets_rec.status_code);
3349: ozf_utility_pvt.debug_message('p_act_budgets_rec.transfer_type = '|| p_act_budgets_rec.transfer_type);
3350: ozf_utility_pvt.debug_message('p_act_budgets_rec.arc_act_budget_used_by= '|| p_act_budgets_rec.arc_act_budget_used_by);
3351: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_type = '|| p_act_budgets_rec.budget_source_type);
3352: ozf_utility_pvt.debug_message('p_act_budgets_rec.approver_id = '|| p_act_budgets_rec.approver_id);
3353: ozf_utility_pvt.debug_message('p_act_budgets_rec.requester_id = '|| p_act_budgets_rec.requester_id);
3354: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_currency = '|| p_act_budgets_rec.request_currency);
3355: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_source_id = '|| p_act_budgets_rec.parent_source_id);
3356: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_src_curr = '|| p_act_budgets_rec.parent_src_curr);
3349: ozf_utility_pvt.debug_message('p_act_budgets_rec.transfer_type = '|| p_act_budgets_rec.transfer_type);
3350: ozf_utility_pvt.debug_message('p_act_budgets_rec.arc_act_budget_used_by= '|| p_act_budgets_rec.arc_act_budget_used_by);
3351: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_type = '|| p_act_budgets_rec.budget_source_type);
3352: ozf_utility_pvt.debug_message('p_act_budgets_rec.approver_id = '|| p_act_budgets_rec.approver_id);
3353: ozf_utility_pvt.debug_message('p_act_budgets_rec.requester_id = '|| p_act_budgets_rec.requester_id);
3354: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_currency = '|| p_act_budgets_rec.request_currency);
3355: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_source_id = '|| p_act_budgets_rec.parent_source_id);
3356: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_src_curr = '|| p_act_budgets_rec.parent_src_curr);
3357: ozf_utility_pvt.debug_message('p_act_budgets_rec.justification = '|| p_act_budgets_rec.justification);
3350: ozf_utility_pvt.debug_message('p_act_budgets_rec.arc_act_budget_used_by= '|| p_act_budgets_rec.arc_act_budget_used_by);
3351: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_type = '|| p_act_budgets_rec.budget_source_type);
3352: ozf_utility_pvt.debug_message('p_act_budgets_rec.approver_id = '|| p_act_budgets_rec.approver_id);
3353: ozf_utility_pvt.debug_message('p_act_budgets_rec.requester_id = '|| p_act_budgets_rec.requester_id);
3354: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_currency = '|| p_act_budgets_rec.request_currency);
3355: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_source_id = '|| p_act_budgets_rec.parent_source_id);
3356: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_src_curr = '|| p_act_budgets_rec.parent_src_curr);
3357: ozf_utility_pvt.debug_message('p_act_budgets_rec.justification = '|| p_act_budgets_rec.justification);
3358: ozf_utility_pvt.debug_message('p_act_budgets_rec.arc_act_budget_used_by= '|| p_act_budgets_rec.arc_act_budget_used_by);
3351: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_type = '|| p_act_budgets_rec.budget_source_type);
3352: ozf_utility_pvt.debug_message('p_act_budgets_rec.approver_id = '|| p_act_budgets_rec.approver_id);
3353: ozf_utility_pvt.debug_message('p_act_budgets_rec.requester_id = '|| p_act_budgets_rec.requester_id);
3354: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_currency = '|| p_act_budgets_rec.request_currency);
3355: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_source_id = '|| p_act_budgets_rec.parent_source_id);
3356: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_src_curr = '|| p_act_budgets_rec.parent_src_curr);
3357: ozf_utility_pvt.debug_message('p_act_budgets_rec.justification = '|| p_act_budgets_rec.justification);
3358: ozf_utility_pvt.debug_message('p_act_budgets_rec.arc_act_budget_used_by= '|| p_act_budgets_rec.arc_act_budget_used_by);
3359: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_type = '|| p_act_budgets_rec.budget_source_type);
3352: ozf_utility_pvt.debug_message('p_act_budgets_rec.approver_id = '|| p_act_budgets_rec.approver_id);
3353: ozf_utility_pvt.debug_message('p_act_budgets_rec.requester_id = '|| p_act_budgets_rec.requester_id);
3354: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_currency = '|| p_act_budgets_rec.request_currency);
3355: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_source_id = '|| p_act_budgets_rec.parent_source_id);
3356: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_src_curr = '|| p_act_budgets_rec.parent_src_curr);
3357: ozf_utility_pvt.debug_message('p_act_budgets_rec.justification = '|| p_act_budgets_rec.justification);
3358: ozf_utility_pvt.debug_message('p_act_budgets_rec.arc_act_budget_used_by= '|| p_act_budgets_rec.arc_act_budget_used_by);
3359: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_type = '|| p_act_budgets_rec.budget_source_type);
3360: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_currency = '|| p_act_budgets_rec.request_currency);
3353: ozf_utility_pvt.debug_message('p_act_budgets_rec.requester_id = '|| p_act_budgets_rec.requester_id);
3354: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_currency = '|| p_act_budgets_rec.request_currency);
3355: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_source_id = '|| p_act_budgets_rec.parent_source_id);
3356: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_src_curr = '|| p_act_budgets_rec.parent_src_curr);
3357: ozf_utility_pvt.debug_message('p_act_budgets_rec.justification = '|| p_act_budgets_rec.justification);
3358: ozf_utility_pvt.debug_message('p_act_budgets_rec.arc_act_budget_used_by= '|| p_act_budgets_rec.arc_act_budget_used_by);
3359: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_type = '|| p_act_budgets_rec.budget_source_type);
3360: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_currency = '|| p_act_budgets_rec.request_currency);
3361: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_amount = '|| p_act_budgets_rec.request_amount);
3354: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_currency = '|| p_act_budgets_rec.request_currency);
3355: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_source_id = '|| p_act_budgets_rec.parent_source_id);
3356: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_src_curr = '|| p_act_budgets_rec.parent_src_curr);
3357: ozf_utility_pvt.debug_message('p_act_budgets_rec.justification = '|| p_act_budgets_rec.justification);
3358: ozf_utility_pvt.debug_message('p_act_budgets_rec.arc_act_budget_used_by= '|| p_act_budgets_rec.arc_act_budget_used_by);
3359: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_type = '|| p_act_budgets_rec.budget_source_type);
3360: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_currency = '|| p_act_budgets_rec.request_currency);
3361: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_amount = '|| p_act_budgets_rec.request_amount);
3362: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_src_apprvd_amt = '|| p_act_budgets_rec.parent_src_apprvd_amt);
3355: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_source_id = '|| p_act_budgets_rec.parent_source_id);
3356: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_src_curr = '|| p_act_budgets_rec.parent_src_curr);
3357: ozf_utility_pvt.debug_message('p_act_budgets_rec.justification = '|| p_act_budgets_rec.justification);
3358: ozf_utility_pvt.debug_message('p_act_budgets_rec.arc_act_budget_used_by= '|| p_act_budgets_rec.arc_act_budget_used_by);
3359: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_type = '|| p_act_budgets_rec.budget_source_type);
3360: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_currency = '|| p_act_budgets_rec.request_currency);
3361: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_amount = '|| p_act_budgets_rec.request_amount);
3362: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_src_apprvd_amt = '|| p_act_budgets_rec.parent_src_apprvd_amt);
3363: END IF;
3356: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_src_curr = '|| p_act_budgets_rec.parent_src_curr);
3357: ozf_utility_pvt.debug_message('p_act_budgets_rec.justification = '|| p_act_budgets_rec.justification);
3358: ozf_utility_pvt.debug_message('p_act_budgets_rec.arc_act_budget_used_by= '|| p_act_budgets_rec.arc_act_budget_used_by);
3359: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_type = '|| p_act_budgets_rec.budget_source_type);
3360: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_currency = '|| p_act_budgets_rec.request_currency);
3361: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_amount = '|| p_act_budgets_rec.request_amount);
3362: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_src_apprvd_amt = '|| p_act_budgets_rec.parent_src_apprvd_amt);
3363: END IF;
3364:
3357: ozf_utility_pvt.debug_message('p_act_budgets_rec.justification = '|| p_act_budgets_rec.justification);
3358: ozf_utility_pvt.debug_message('p_act_budgets_rec.arc_act_budget_used_by= '|| p_act_budgets_rec.arc_act_budget_used_by);
3359: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_type = '|| p_act_budgets_rec.budget_source_type);
3360: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_currency = '|| p_act_budgets_rec.request_currency);
3361: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_amount = '|| p_act_budgets_rec.request_amount);
3362: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_src_apprvd_amt = '|| p_act_budgets_rec.parent_src_apprvd_amt);
3363: END IF;
3364:
3365: BEGIN
3358: ozf_utility_pvt.debug_message('p_act_budgets_rec.arc_act_budget_used_by= '|| p_act_budgets_rec.arc_act_budget_used_by);
3359: ozf_utility_pvt.debug_message('p_act_budgets_rec.budget_source_type = '|| p_act_budgets_rec.budget_source_type);
3360: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_currency = '|| p_act_budgets_rec.request_currency);
3361: ozf_utility_pvt.debug_message('p_act_budgets_rec.request_amount = '|| p_act_budgets_rec.request_amount);
3362: ozf_utility_pvt.debug_message('p_act_budgets_rec.parent_src_apprvd_amt = '|| p_act_budgets_rec.parent_src_apprvd_amt);
3363: END IF;
3364:
3365: BEGIN
3366: --
3388: --ER 13333298
3389: x_utilization_id := l_utilization_id;
3390:
3391: IF OZF_DEBUG_LOW_ON THEN
3392: OZF_UTILITY_PVT.debug_message('OZF_FUND_ADJUSTMENT_PVT.Process_Act_Budgets return result: '||l_return_status);
3393: OZF_UTILITY_PVT.debug_message('l_utilization_id '|| l_utilization_id);
3394: OZF_UTILITY_PVT.debug_message('post to budget: budget_source_id:' || p_act_budgets_rec.budget_source_id);
3395: OZF_UTILITY_PVT.debug_message('post to budget: amount:' || p_act_budgets_rec.request_amount);
3396: OZF_UTILITY_PVT.debug_message('x_utilized_amount: '||l_utilized_amount);
3389: x_utilization_id := l_utilization_id;
3390:
3391: IF OZF_DEBUG_LOW_ON THEN
3392: OZF_UTILITY_PVT.debug_message('OZF_FUND_ADJUSTMENT_PVT.Process_Act_Budgets return result: '||l_return_status);
3393: OZF_UTILITY_PVT.debug_message('l_utilization_id '|| l_utilization_id);
3394: OZF_UTILITY_PVT.debug_message('post to budget: budget_source_id:' || p_act_budgets_rec.budget_source_id);
3395: OZF_UTILITY_PVT.debug_message('post to budget: amount:' || p_act_budgets_rec.request_amount);
3396: OZF_UTILITY_PVT.debug_message('x_utilized_amount: '||l_utilized_amount);
3397: END IF;
3390:
3391: IF OZF_DEBUG_LOW_ON THEN
3392: OZF_UTILITY_PVT.debug_message('OZF_FUND_ADJUSTMENT_PVT.Process_Act_Budgets return result: '||l_return_status);
3393: OZF_UTILITY_PVT.debug_message('l_utilization_id '|| l_utilization_id);
3394: OZF_UTILITY_PVT.debug_message('post to budget: budget_source_id:' || p_act_budgets_rec.budget_source_id);
3395: OZF_UTILITY_PVT.debug_message('post to budget: amount:' || p_act_budgets_rec.request_amount);
3396: OZF_UTILITY_PVT.debug_message('x_utilized_amount: '||l_utilized_amount);
3397: END IF;
3398:
3391: IF OZF_DEBUG_LOW_ON THEN
3392: OZF_UTILITY_PVT.debug_message('OZF_FUND_ADJUSTMENT_PVT.Process_Act_Budgets return result: '||l_return_status);
3393: OZF_UTILITY_PVT.debug_message('l_utilization_id '|| l_utilization_id);
3394: OZF_UTILITY_PVT.debug_message('post to budget: budget_source_id:' || p_act_budgets_rec.budget_source_id);
3395: OZF_UTILITY_PVT.debug_message('post to budget: amount:' || p_act_budgets_rec.request_amount);
3396: OZF_UTILITY_PVT.debug_message('x_utilized_amount: '||l_utilized_amount);
3397: END IF;
3398:
3399: IF l_return_status = FND_API.g_ret_sts_error THEN
3392: OZF_UTILITY_PVT.debug_message('OZF_FUND_ADJUSTMENT_PVT.Process_Act_Budgets return result: '||l_return_status);
3393: OZF_UTILITY_PVT.debug_message('l_utilization_id '|| l_utilization_id);
3394: OZF_UTILITY_PVT.debug_message('post to budget: budget_source_id:' || p_act_budgets_rec.budget_source_id);
3395: OZF_UTILITY_PVT.debug_message('post to budget: amount:' || p_act_budgets_rec.request_amount);
3396: OZF_UTILITY_PVT.debug_message('x_utilized_amount: '||l_utilized_amount);
3397: END IF;
3398:
3399: IF l_return_status = FND_API.g_ret_sts_error THEN
3400: RAISE FND_API.g_exc_error;
3402: RAISE FND_API.g_exc_unexpected_error;
3403: END IF;
3404: -- bug 5391758,5216124
3405: IF l_utilized_amount = 0 AND p_act_budgets_rec.request_amount <> 0 THEN
3406: ozf_utility_pvt.error_message ( 'OZF_COMMAMT_LESS_REQAMT');
3407: RAISE fnd_api.g_exc_error;
3408: END IF;
3409:
3410: EXCEPTION
3417: END IF;
3418:
3419: -- Debug Message
3420: IF OZF_DEBUG_HIGH_ON THEN
3421: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
3422: END IF;
3423:
3424: --Standard call to get message count AND IF count=1, get the message
3425: FND_MSG_PUB.Count_And_Get (
3548: )
3549: IS
3550: l_fund_int_rec ozf_funds_pvt.fund_rec_int_type;
3551: l_use_fund_staging_tables VARCHAR2(1) := 'F';
3552: lx_ozf_act_budgets_tbl OZF_UTILITY_PVT.ozf_act_budgets_table;
3553: lx_ozf_funds_old_rectype OZF_UTILITY_PVT.ozf_funds_all_b_rectype;
3554: lx_ozf_funds_new_tbl OZF_UTILITY_PVT.ozf_funds_table;
3555: l_batch_type VARCHAR2(30);
3556: BEGIN
3549: IS
3550: l_fund_int_rec ozf_funds_pvt.fund_rec_int_type;
3551: l_use_fund_staging_tables VARCHAR2(1) := 'F';
3552: lx_ozf_act_budgets_tbl OZF_UTILITY_PVT.ozf_act_budgets_table;
3553: lx_ozf_funds_old_rectype OZF_UTILITY_PVT.ozf_funds_all_b_rectype;
3554: lx_ozf_funds_new_tbl OZF_UTILITY_PVT.ozf_funds_table;
3555: l_batch_type VARCHAR2(30);
3556: BEGIN
3557: Create_Utilization(
3550: l_fund_int_rec ozf_funds_pvt.fund_rec_int_type;
3551: l_use_fund_staging_tables VARCHAR2(1) := 'F';
3552: lx_ozf_act_budgets_tbl OZF_UTILITY_PVT.ozf_act_budgets_table;
3553: lx_ozf_funds_old_rectype OZF_UTILITY_PVT.ozf_funds_all_b_rectype;
3554: lx_ozf_funds_new_tbl OZF_UTILITY_PVT.ozf_funds_table;
3555: l_batch_type VARCHAR2(30);
3556: BEGIN
3557: Create_Utilization(
3558: p_api_version => p_api_version
3613: ,x_return_status OUT NOCOPY VARCHAR2
3614: ,x_msg_data OUT NOCOPY VARCHAR2
3615: ,x_msg_count OUT NOCOPY NUMBER
3616: ,p_batch_type IN VARCHAR2
3617: ,px_ozf_act_budgets_tbl IN OUT NOCOPY OZF_UTILITY_PVT.ozf_act_budgets_table
3618: ,px_ozf_funds_old_rectype IN OZF_UTILITY_PVT.ozf_funds_all_b_rectype
3619: ,px_ozf_funds_new_tbl IN OUT NOCOPY OZF_UTILITY_PVT.ozf_funds_table
3620: )
3621: IS
3614: ,x_msg_data OUT NOCOPY VARCHAR2
3615: ,x_msg_count OUT NOCOPY NUMBER
3616: ,p_batch_type IN VARCHAR2
3617: ,px_ozf_act_budgets_tbl IN OUT NOCOPY OZF_UTILITY_PVT.ozf_act_budgets_table
3618: ,px_ozf_funds_old_rectype IN OZF_UTILITY_PVT.ozf_funds_all_b_rectype
3619: ,px_ozf_funds_new_tbl IN OUT NOCOPY OZF_UTILITY_PVT.ozf_funds_table
3620: )
3621: IS
3622: l_api_name CONSTANT VARCHAR2(30) := 'Create_Utilization';
3615: ,x_msg_count OUT NOCOPY NUMBER
3616: ,p_batch_type IN VARCHAR2
3617: ,px_ozf_act_budgets_tbl IN OUT NOCOPY OZF_UTILITY_PVT.ozf_act_budgets_table
3618: ,px_ozf_funds_old_rectype IN OZF_UTILITY_PVT.ozf_funds_all_b_rectype
3619: ,px_ozf_funds_new_tbl IN OUT NOCOPY OZF_UTILITY_PVT.ozf_funds_table
3620: )
3621: IS
3622: l_api_name CONSTANT VARCHAR2(30) := 'Create_Utilization';
3623: l_api_version CONSTANT NUMBER := 1.0;
3705: END IF;
3706:
3707: -- Debug Message
3708: IF OZF_DEBUG_HIGH_ON THEN
3709: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
3710: END IF;
3711:
3712: -- Initialize API return status to sucess
3713: x_return_status := FND_API.G_RET_STS_SUCCESS;
3712: -- Initialize API return status to sucess
3713: x_return_status := FND_API.G_RET_STS_SUCCESS;
3714:
3715: IF OZF_DEBUG_LOW_ON THEN
3716: OZF_UTILITY_PVT.debug_message('IN create_utilization');
3717: END IF;
3718:
3719: OPEN g_batch_type_csr(l_line_int_rec.resale_batch_id);
3720: FETCH g_batch_type_csr into l_batch_type;
3720: FETCH g_batch_type_csr into l_batch_type;
3721: CLOSE g_batch_type_csr;
3722:
3723: IF OZF_DEBUG_LOW_ON THEN
3724: OZF_UTILITY_PVT.debug_message('batch type' ||l_batch_type);
3725: END IF;
3726:
3727: IF l_batch_type = G_CHARGEBACK THEN
3728: l_utilization_type:= G_CHBK_UTIL_TYPE;
3737: END IF;
3738:
3739: ELSIF l_batch_type = G_SPECIAL_PRICING THEN
3740: IF OZF_DEBUG_LOW_ON THEN
3741: OZF_UTILITY_PVT.debug_message('In batch type as spp.');
3742: END IF;
3743: --POS Batch Processing by profiles by ateotia (+)
3744: OPEN request_header_info_csr(l_line_int_rec.agreement_name, l_line_int_rec.resale_batch_id);
3745: FETCH request_header_info_csr INTO l_spr_ship_from_stock_flag,
3777: */
3778: END IF;
3779:
3780: IF OZF_DEBUG_LOW_ON THEN
3781: OZF_UTILITY_PVT.debug_message('dup line id' ||l_line_int_rec.duplicated_line_id);
3782: OZF_UTILITY_PVT.debug_message('dup_accepted_amount:'||l_dup_total_accepted_amount);
3783: OZF_UTILITY_PVT.debug_message('total_accepted_amount:'||l_line_int_rec.total_accepted_amount);
3784: END IF;
3785:
3778: END IF;
3779:
3780: IF OZF_DEBUG_LOW_ON THEN
3781: OZF_UTILITY_PVT.debug_message('dup line id' ||l_line_int_rec.duplicated_line_id);
3782: OZF_UTILITY_PVT.debug_message('dup_accepted_amount:'||l_dup_total_accepted_amount);
3783: OZF_UTILITY_PVT.debug_message('total_accepted_amount:'||l_line_int_rec.total_accepted_amount);
3784: END IF;
3785:
3786: IF l_line_int_rec.duplicated_line_id IS NOT NULL THEN
3779:
3780: IF OZF_DEBUG_LOW_ON THEN
3781: OZF_UTILITY_PVT.debug_message('dup line id' ||l_line_int_rec.duplicated_line_id);
3782: OZF_UTILITY_PVT.debug_message('dup_accepted_amount:'||l_dup_total_accepted_amount);
3783: OZF_UTILITY_PVT.debug_message('total_accepted_amount:'||l_line_int_rec.total_accepted_amount);
3784: END IF;
3785:
3786: IF l_line_int_rec.duplicated_line_id IS NOT NULL THEN
3787: IF l_line_int_rec.duplicated_adjustment_id = -1 THEN
3823: FETCH dup_adj_csr INTO l_dup_adjustment_id, l_dup_total_accepted_amount;
3824: CLOSE dup_adj_csr;
3825:
3826: IF OZF_DEBUG_LOW_ON THEN
3827: OZF_UTILITY_PVT.debug_message('dup_adj_crs:: l_dup_adjustment_id = ' ||l_dup_adjustment_id);
3828: OZF_UTILITY_PVT.debug_message('dup_adj_crs:: l_dup_total_accepted_amount = '||l_dup_total_accepted_amount);
3829: END IF;
3830:
3831: -- Here the claimed_amount should NOT equal to the current claimed amount
3824: CLOSE dup_adj_csr;
3825:
3826: IF OZF_DEBUG_LOW_ON THEN
3827: OZF_UTILITY_PVT.debug_message('dup_adj_crs:: l_dup_adjustment_id = ' ||l_dup_adjustment_id);
3828: OZF_UTILITY_PVT.debug_message('dup_adj_crs:: l_dup_total_accepted_amount = '||l_dup_total_accepted_amount);
3829: END IF;
3830:
3831: -- Here the claimed_amount should NOT equal to the current claimed amount
3832: IF l_dup_total_accepted_amount IS NULL OR -- bug 5222273
3943: END IF;
3944: END IF;
3945: ELSE
3946: IF OZF_DEBUG_LOW_ON THEN
3947: OZF_UTILITY_PVT.debug_message('In creat utilization with nothing');
3948: END IF;
3949: -- Create utilization using int rec
3950:
3951: -- For Bug#8867381, introduced p_use_fund_staging_tables for staging table impln of chargeback flow
3981: END IF;
3982:
3983: -- Debug Message
3984: IF OZF_DEBUG_HIGH_ON THEN
3985: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
3986: END IF;
3987:
3988: --Standard call to get message count AND IF count=1, get the message
3989: FND_MSG_PUB.Count_And_Get (
4099: END IF;
4100:
4101: -- Debug Message
4102: IF OZF_DEBUG_HIGH_ON THEN
4103: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
4104: END IF;
4105:
4106: --Initialize message LIST IF p_init_msg_LIST IS TRUE.
4107: IF FND_API.To_Boolean (p_init_msg_LIST) THEN
4207: --
4208:
4209: -- Debug Message
4210: IF OZF_DEBUG_HIGH_ON THEN
4211: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
4212: END IF;
4213:
4214: --Standard call to get message count AND IF count=1, get the message
4215: FND_MSG_PUB.Count_And_Get (
4302: END IF;
4303:
4304: -- Debug Message
4305: IF OZF_DEBUG_HIGH_ON THEN
4306: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
4307: END IF;
4308:
4309: --Initialize message LIST IF p_init_msg_LIST IS TRUE.
4310: IF FND_API.To_Boolean (p_init_msg_LIST) THEN
4321:
4322: x_header_id := l_header_id;
4323: l_org_id := p_line_int_rec.org_id; -- bug # 5997978 fixed
4324: IF OZF_DEBUG_LOW_ON THEN
4325: OZF_UTILITY_PVT.debug_message('before INSERT: header_id' || l_header_id);
4326: END IF;
4327:
4328: OZF_RESALE_HEADERS_PKG.Insert_Row(
4329: px_resale_header_id => l_header_id,
4418: px_org_id => l_org_id);
4419:
4420: -- Debug Message
4421: IF OZF_DEBUG_HIGH_ON THEN
4422: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
4423: END IF;
4424:
4425: --Standard call to get message count AND IF count=1, get the message
4426: FND_MSG_PUB.Count_And_Get (
4515: END IF;
4516:
4517: -- Debug Message
4518: IF OZF_DEBUG_HIGH_ON THEN
4519: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
4520: END IF;
4521:
4522: --Initialize message LIST IF p_init_msg_LIST IS TRUE.
4523: IF FND_API.To_Boolean (p_init_msg_LIST) THEN
4532: CLOSE g_line_id_csr;
4533: x_line_id := l_line_id;
4534: l_org_id := p_line_int_rec.org_id; -- bug # 5997978 fixed
4535: IF OZF_DEBUG_LOW_ON THEN
4536: OZF_UTILITY_PVT.debug_message('before line INSERT: header id' || p_header_id);
4537: OZF_UTILITY_PVT.debug_message('before line INSERT:' || l_line_id);
4538: END IF;
4539:
4540: OZF_RESALE_LINES_PKG.Insert_Row(
4533: x_line_id := l_line_id;
4534: l_org_id := p_line_int_rec.org_id; -- bug # 5997978 fixed
4535: IF OZF_DEBUG_LOW_ON THEN
4536: OZF_UTILITY_PVT.debug_message('before line INSERT: header id' || p_header_id);
4537: OZF_UTILITY_PVT.debug_message('before line INSERT:' || l_line_id);
4538: END IF;
4539:
4540: OZF_RESALE_LINES_PKG.Insert_Row(
4541: p_resale_line_id => l_line_id ,
4736:
4737: );
4738:
4739: IF OZF_DEBUG_HIGH_ON THEN
4740: OZF_UTILITY_PVT.debug_message('line INSERT successful id:' || l_line_id);
4741: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
4742: END IF;
4743:
4744: --Standard call to get message count AND IF count=1, get the message
4737: );
4738:
4739: IF OZF_DEBUG_HIGH_ON THEN
4740: OZF_UTILITY_PVT.debug_message('line INSERT successful id:' || l_line_id);
4741: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
4742: END IF;
4743:
4744: --Standard call to get message count AND IF count=1, get the message
4745: FND_MSG_PUB.Count_And_Get (
4833: END IF;
4834:
4835: -- Debug Message
4836: IF OZF_DEBUG_HIGH_ON THEN
4837: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
4838: END IF;
4839:
4840: --Initialize message LIST IF p_init_msg_LIST IS TRUE.
4841: IF FND_API.To_Boolean (p_init_msg_LIST) THEN
4853: FETCH g_resale_batch_org_id_csr INTO l_batch_org_id;
4854: CLOSE g_resale_batch_org_id_csr;
4855: l_org_id := MO_GLOBAL.get_valid_org(l_batch_org_id);
4856: IF (l_batch_org_id IS NULL OR l_org_id IS NULL) THEN
4857: OZF_UTILITY_PVT.error_message(p_message_name => 'OZF_ORG_ID_NOTFOUND');
4858: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4859: END IF;
4860: -- End: bug # 5997978 fixed
4861:
4894: px_org_id => l_org_id);
4895:
4896: -- Debug Message
4897: IF OZF_DEBUG_HIGH_ON THEN
4898: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
4899: END IF;
4900:
4901: --Standard call to get message count AND IF count=1, get the message
4902: FND_MSG_PUB.Count_And_Get (
4983: END IF;
4984:
4985: -- Debug Message
4986: IF OZF_DEBUG_HIGH_ON THEN
4987: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
4988: END IF;
4989:
4990: --Initialize message LIST IF p_init_msg_LIST IS TRUE.
4991: IF FND_API.To_Boolean (p_init_msg_LIST) THEN
5011: );
5012:
5013: -- Debug Message
5014: IF OZF_DEBUG_HIGH_ON THEN
5015: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
5016: END IF;
5017:
5018: --Standard call to get message count AND IF count=1, get the message
5019: FND_MSG_PUB.Count_And_Get (
5120: END IF;
5121:
5122: -- Debug Message
5123: IF OZF_DEBUG_HIGH_ON THEN
5124: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
5125: END IF;
5126:
5127: x_return_status := FND_API.g_ret_sts_success;
5128:
5128:
5129: -- Create Organization
5130: IF px_party_rec.name IS NOT NULL THEN
5131: IF OZF_DEBUG_LOW_ON THEN
5132: OZF_UTILITY_PVT.debug_message('NAME '|| px_party_rec.name);
5133: END IF;
5134: l_organization_rec.organization_name := px_party_rec.name;
5135: -- Bug 4630628 (+)
5136: --l_organization_rec.created_by_module := 'TCA_V2_API';
5154: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5155: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5156: END IF;
5157: IF OZF_DEBUG_LOW_ON THEN
5158: OZF_UTILITY_PVT.debug_message('Party Id '||px_party_rec.party_id);
5159: END IF;
5160: END IF;
5161:
5162: -- Create Location
5185: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5186: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5187: END IF;
5188: IF OZF_DEBUG_LOW_ON THEN
5189: OZF_UTILITY_PVT.debug_message('Location ID '|| l_location_id);
5190: END IF;
5191: END IF;
5192:
5193: -- Create Party Site
5217: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5218: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5219: END IF;
5220: IF OZF_DEBUG_LOW_ON THEN
5221: OZF_UTILITY_PVT.debug_message('Party Site ID '|| px_party_rec.party_site_id);
5222: END IF;
5223: END IF;
5224:
5225: -- Create Party Site Use
5252: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5253: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5254: END IF;
5255: IF OZF_DEBUG_LOW_ON THEN
5256: OZF_UTILITY_PVT.debug_message('Party Site Use ID '|| px_party_rec.party_site_use_id);
5257: END IF;
5258: END IF;
5259:
5260: -- Create Relationship
5294: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5296: END IF;
5297: IF OZF_DEBUG_LOW_ON THEN
5298: OZF_UTILITY_PVT.debug_message('Relationship ID '|| l_relationship_id);
5299: END IF;
5300: END IF;
5301:
5302:
5302:
5303:
5304: -- Debug Message
5305: IF OZF_DEBUG_HIGH_ON THEN
5306: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
5307: END IF;
5308: --Standard call to get message count AND IF count=1, get the message
5309: FND_MSG_PUB.Count_And_Get (
5310: p_encoded => FND_API.G_FALSE,
5328: p_count => x_msg_count,
5329: p_data => x_msg_data
5330: );
5331: WHEN OTHERS THEN
5332: OZF_UTILITY_PVT.debug_message('SQLERRM '|| sqlerrm);
5333:
5334: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5335: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5336: THEN
5383:
5384: BEGIN
5385: -- Debug Message
5386: IF OZF_DEBUG_HIGH_ON THEN
5387: ozf_utility_pvt.debug_message(l_full_name||': start');
5388: END IF;
5389:
5390: IF NOT FND_API.Compatible_API_Call (
5391: l_api_version,
5552: );
5553:
5554: -- Debug Message
5555: IF OZF_DEBUG_HIGH_ON THEN
5556: ozf_utility_pvt.debug_message(l_full_name||': end');
5557: END IF;
5558: EXCEPTION
5559: WHEN FND_API.G_EXC_ERROR THEN
5560: x_return_status := FND_API.G_RET_STS_ERROR;
5636: END IF;
5637:
5638: -- Debug Message
5639: IF OZF_DEBUG_HIGH_ON THEN
5640: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
5641: END IF;
5642:
5643: x_return_status := FND_API.g_ret_sts_success;
5644:
5694: END IF;
5695:
5696: -- Debug Message
5697: IF OZF_DEBUG_HIGH_ON THEN
5698: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
5699: END IF;
5700:
5701: --Standard call to get message count AND IF count=1, get the message
5702: FND_MSG_PUB.Count_And_Get (
5725: );
5726: WHEN OTHERS THEN
5727: ROLLBACK TO Derive_Orig_Parties;
5728: IF OZF_DEBUG_LOW_ON THEN
5729: OZF_UTILITY_PVT.debug_message('SQLERRM '|| sqlerrm);
5730: END IF;
5731: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5732: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5733: THEN
5848: END IF;
5849:
5850: -- Debug Message
5851: IF OZF_DEBUG_HIGH_ON THEN
5852: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
5853: END IF;
5854:
5855: x_return_status := FND_API.g_ret_sts_success;
5856:
5925: END IF;
5926:
5927: -- Debug Message
5928: IF OZF_DEBUG_HIGH_ON THEN
5929: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
5930: END IF;
5931:
5932: --Standard call to get message count AND IF count=1, get the message
5933: FND_MSG_PUB.Count_And_Get (
5956: );
5957: WHEN OTHERS THEN
5958: ROLLBACK TO Derive_Bill_To_Party;
5959: IF OZF_DEBUG_LOW_ON THEN
5960: OZF_UTILITY_PVT.debug_message('SQLERRM '|| sqlerrm);
5961: END IF;
5962: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5963: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5964: THEN
6122:
6123: END IF;
6124: -- Debug Message
6125: IF OZF_DEBUG_HIGH_ON THEN
6126: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
6127: END IF;
6128:
6129: x_return_status := FND_API.g_ret_sts_success;
6130:
6237: END IF;
6238:
6239: -- Debug Message
6240: IF OZF_DEBUG_HIGH_ON THEN
6241: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
6242: END IF;
6243:
6244: --Standard call to get message count AND IF count=1, get the message
6245: FND_MSG_PUB.Count_And_Get (
6268: );
6269: WHEN OTHERS THEN
6270: ROLLBACK TO Derive_Ship_To_Party;
6271: IF OZF_DEBUG_LOW_ON THEN
6272: OZF_UTILITY_PVT.debug_message('SQLERRM '|| sqlerrm);
6273: END IF;
6274: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6275: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6276: THEN
6390: END IF;
6391:
6392: -- Debug Message
6393: IF OZF_DEBUG_HIGH_ON THEN
6394: OZF_UTILITY_PVT.debug_message(l_full_name||': Start');
6395: END IF;
6396:
6397: x_return_status := FND_API.g_ret_sts_success;
6398:
6467: END IF;
6468:
6469: -- Debug Message
6470: IF OZF_DEBUG_HIGH_ON THEN
6471: OZF_UTILITY_PVT.debug_message(l_full_name||': End');
6472: END IF;
6473:
6474: --Standard call to get message count AND IF count=1, get the message
6475: FND_MSG_PUB.Count_And_Get (
6498: );
6499: WHEN OTHERS THEN
6500: ROLLBACK TO Derive_End_Cust_Party;
6501: IF OZF_DEBUG_LOW_ON THEN
6502: OZF_UTILITY_PVT.debug_message('SQLERRM '|| sqlerrm);
6503: END IF;
6504: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6505: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6506: THEN
6855: BEGIN
6856:
6857: SAVEPOINT update_main_tables;
6858:
6859: ozf_utility_pvt.write_conc_log('Concurrent Program updating records from Staging to Main tables - Started');
6860:
6861: -- For TPA Parallel Execution ER - BUG#9614703 (+)
6862: -- Update the main table with the records from staging tables.
6863:
6861: -- For TPA Parallel Execution ER - BUG#9614703 (+)
6862: -- Update the main table with the records from staging tables.
6863:
6864: IF p_batch_id IS NULL THEN
6865: ozf_utility_pvt.write_conc_log('Updating all the records to table OZF_FUNDS_ALL_B, OZF_ACT_BUDGETS when batch_id is null');
6866: ozf_utility_pvt.write_conc_log('p_batch_type: ' || p_batch_type);
6867: ozf_utility_pvt.write_conc_log('p_batch_id: ' || p_batch_id);
6868:
6869: FOR funds_int_rec IN funds_int_csr(p_batch_type)
6862: -- Update the main table with the records from staging tables.
6863:
6864: IF p_batch_id IS NULL THEN
6865: ozf_utility_pvt.write_conc_log('Updating all the records to table OZF_FUNDS_ALL_B, OZF_ACT_BUDGETS when batch_id is null');
6866: ozf_utility_pvt.write_conc_log('p_batch_type: ' || p_batch_type);
6867: ozf_utility_pvt.write_conc_log('p_batch_id: ' || p_batch_id);
6868:
6869: FOR funds_int_rec IN funds_int_csr(p_batch_type)
6870: LOOP
6863:
6864: IF p_batch_id IS NULL THEN
6865: ozf_utility_pvt.write_conc_log('Updating all the records to table OZF_FUNDS_ALL_B, OZF_ACT_BUDGETS when batch_id is null');
6866: ozf_utility_pvt.write_conc_log('p_batch_type: ' || p_batch_type);
6867: ozf_utility_pvt.write_conc_log('p_batch_id: ' || p_batch_id);
6868:
6869: FOR funds_int_rec IN funds_int_csr(p_batch_type)
6870: LOOP
6871: /*
6885: l_rollup_earned_amt,
6886: l_rollup_paid_amt, l_utilized_amt, l_rollup_utilized_amt;
6887: CLOSE funds_rollup_csr;
6888:
6889: ozf_utility_pvt.write_conc_log('Updating funds record '||funds_int_rec.fund_id);
6890:
6891: UPDATE OZF_FUNDS_ALL_B
6892: SET
6893: BUDGET_AMOUNT_TC = NVL(BUDGET_AMOUNT_TC,0) + NVL(funds_int_rec.BUDGET_AMOUNT_TC,0),
6981: ,last_update_login = NVL (fnd_global.conc_login_id, -1)
6982: ,object_version_number = NVL (object_version_number,0) + 1
6983: WHERE activity_budget_id = budgets_int_rec.ACTIVITY_BUDGET_ID;
6984:
6985: ozf_utility_pvt.write_conc_log('Updating ozf_act_budgets record ' || budgets_int_rec.ACTIVITY_BUDGET_ID);
6986:
6987: END LOOP;
6988:
6989:
6994:
6995: FOR funds_util_rec IN funds_util_rec_csr(batch_id_rec.RESALE_BATCH_ID)
6996: LOOP
6997:
6998: ozf_utility_pvt.write_conc_log('p_batch_type: ' || p_batch_type);
6999: ozf_utility_pvt.write_conc_log('Processing batch_id: ' || batch_id_rec.RESALE_BATCH_ID);
7000:
7001: l_utiz_amt := funds_util_rec.amount;
7002: l_fund_req_amt:= funds_util_rec.fund_request_amount;
6995: FOR funds_util_rec IN funds_util_rec_csr(batch_id_rec.RESALE_BATCH_ID)
6996: LOOP
6997:
6998: ozf_utility_pvt.write_conc_log('p_batch_type: ' || p_batch_type);
6999: ozf_utility_pvt.write_conc_log('Processing batch_id: ' || batch_id_rec.RESALE_BATCH_ID);
7000:
7001: l_utiz_amt := funds_util_rec.amount;
7002: l_fund_req_amt:= funds_util_rec.fund_request_amount;
7003: l_amt_rem:= funds_util_rec.amount_remaining;
7132: */
7133: END IF;
7134: END IF;
7135:
7136: ozf_utility_pvt.write_conc_log('Updating OZF_OBJFUNDSUM_PVT for objfundsum_id: ' || l_objfundsum_rec.objfundsum_id);
7137:
7138: IF l_objfundsum_rec.objfundsum_id IS NOT NULL THEN
7139: -- l_objfundsum_rec.fund_id := l_fund_id;
7140: -- l_objfundsum_rec.fund_currency := l_currency_code;
7316: -- Updating the status of all the batches as CLOSED in ozf_resale_batches_all table.
7317: FOR batch_id_int_rec IN batch_id_int_csr(p_batch_type)
7318: LOOP
7319:
7320: ozf_utility_pvt.write_conc_log('updating batch to Closed status - resale_batch_id: ' || batch_id_int_rec.RESALE_BATCH_ID);
7321:
7322: UPDATE ozf_resale_batches_all
7323: SET status_code = OZF_RESALE_COMMON_PVT.G_BATCH_CLOSED,
7324: last_updated_by = NVL(fnd_global.user_id, -1),
7339: l_vol_exists :='N';
7340: END IF;
7341: CLOSE ozf_vol_int_exists_csr;
7342: IF l_vol_exists = 'Y' THEN
7343: ozf_utility_pvt.write_conc_log('deleting records from staging table OZF_VOLUME_SUMMARY_INT for Batch Type '||p_batch_type);
7344: DELETE FROM OZF_VOLUME_SUMMARY_INT WHERE BATCH_TYPE = 'TP_ACCRUAL';
7345: ozf_utility_pvt.write_conc_log('deleted records from staging table OZF_VOLUME_SUMMARY_INT for Batch Type '||p_batch_type);
7346: END IF;
7347:
7341: CLOSE ozf_vol_int_exists_csr;
7342: IF l_vol_exists = 'Y' THEN
7343: ozf_utility_pvt.write_conc_log('deleting records from staging table OZF_VOLUME_SUMMARY_INT for Batch Type '||p_batch_type);
7344: DELETE FROM OZF_VOLUME_SUMMARY_INT WHERE BATCH_TYPE = 'TP_ACCRUAL';
7345: ozf_utility_pvt.write_conc_log('deleted records from staging table OZF_VOLUME_SUMMARY_INT for Batch Type '||p_batch_type);
7346: END IF;
7347:
7348: END IF;
7349:
7346: END IF;
7347:
7348: END IF;
7349:
7350: ozf_utility_pvt.write_conc_log('deleted records from staging tables OZF_FUNDS_ALL_B_INT and OZF_ACT_BUDGETS_INT ');
7351:
7352: ELSIF p_batch_id IS NOT NULL THEN
7353: ozf_utility_pvt.write_conc_log('Updating Records to table OZF_FUNDS_ALL_B, OZF_ACT_BUDGETS for Batch Id: ' || p_batch_id);
7354: ozf_utility_pvt.write_conc_log('Updating Records to table OZF_FUNDS_ALL_B, OZF_ACT_BUDGETS for Batch Type: ' || p_batch_type);
7349:
7350: ozf_utility_pvt.write_conc_log('deleted records from staging tables OZF_FUNDS_ALL_B_INT and OZF_ACT_BUDGETS_INT ');
7351:
7352: ELSIF p_batch_id IS NOT NULL THEN
7353: ozf_utility_pvt.write_conc_log('Updating Records to table OZF_FUNDS_ALL_B, OZF_ACT_BUDGETS for Batch Id: ' || p_batch_id);
7354: ozf_utility_pvt.write_conc_log('Updating Records to table OZF_FUNDS_ALL_B, OZF_ACT_BUDGETS for Batch Type: ' || p_batch_type);
7355:
7356: FOR funds_int_rec2 IN funds_int_wp_csr(p_batch_id, p_batch_type)
7357: LOOP
7350: ozf_utility_pvt.write_conc_log('deleted records from staging tables OZF_FUNDS_ALL_B_INT and OZF_ACT_BUDGETS_INT ');
7351:
7352: ELSIF p_batch_id IS NOT NULL THEN
7353: ozf_utility_pvt.write_conc_log('Updating Records to table OZF_FUNDS_ALL_B, OZF_ACT_BUDGETS for Batch Id: ' || p_batch_id);
7354: ozf_utility_pvt.write_conc_log('Updating Records to table OZF_FUNDS_ALL_B, OZF_ACT_BUDGETS for Batch Type: ' || p_batch_type);
7355:
7356: FOR funds_int_rec2 IN funds_int_wp_csr(p_batch_id, p_batch_type)
7357: LOOP
7358:
7355:
7356: FOR funds_int_rec2 IN funds_int_wp_csr(p_batch_id, p_batch_type)
7357: LOOP
7358:
7359: ozf_utility_pvt.write_conc_log('Updating Fund Records to table OZF_FUNDS_ALL_B for Batch Id: ' || p_batch_id);
7360: ozf_utility_pvt.write_conc_log('Fund id : ' || funds_int_rec2.FUND_ID);
7361:
7362: --added for deadlock issue
7363:
7356: FOR funds_int_rec2 IN funds_int_wp_csr(p_batch_id, p_batch_type)
7357: LOOP
7358:
7359: ozf_utility_pvt.write_conc_log('Updating Fund Records to table OZF_FUNDS_ALL_B for Batch Id: ' || p_batch_id);
7360: ozf_utility_pvt.write_conc_log('Fund id : ' || funds_int_rec2.FUND_ID);
7361:
7362: --added for deadlock issue
7363:
7364: OPEN funds_rollup_csr(funds_int_rec2.FUND_ID);
7441: l_fund_rec.rollup_paid_amt := NVL(l_rollup_paid_amt,0) + NVL(funds_int_rec2.ROLLUP_PAID_AMT,0);
7442: l_fund_rec.rollup_utilized_amt := NVL(l_rollup_utilized_amt,0) + NVL(funds_int_rec2.ROLLUP_UTILIZED_AMT,0);
7443:
7444:
7445: OZF_UTILITY_PVT.write_conc_log('Updating update_rollup_amount from UPDATE_OZF_FUNDS_ALL_B for batch_id='||p_batch_id);
7446:
7447:
7448: ozf_funds_pvt.update_rollup_amount(
7449: p_api_version => l_api_version
7462: LOOP
7463:
7464: l_activity_budget_id := budgets_int_rec2.ACTIVITY_BUDGET_ID;
7465:
7466: ozf_utility_pvt.write_conc_log('Updating Budget Records to table OZF_ACT_BUDGETS for Batch Id: ' || p_batch_id);
7467: ozf_utility_pvt.write_conc_log('Activity Budget id1 : ' || l_activity_budget_id);
7468: UPDATE ozf_act_budgets
7469: SET request_amount = NVL(request_amount, 0) + NVL(budgets_int_rec2.REQUEST_AMOUNT,0)
7470: ,src_curr_request_amt = NVL(src_curr_request_amt, 0) + NVL(budgets_int_rec2.SRC_CURR_REQUEST_AMT,0)
7463:
7464: l_activity_budget_id := budgets_int_rec2.ACTIVITY_BUDGET_ID;
7465:
7466: ozf_utility_pvt.write_conc_log('Updating Budget Records to table OZF_ACT_BUDGETS for Batch Id: ' || p_batch_id);
7467: ozf_utility_pvt.write_conc_log('Activity Budget id1 : ' || l_activity_budget_id);
7468: UPDATE ozf_act_budgets
7469: SET request_amount = NVL(request_amount, 0) + NVL(budgets_int_rec2.REQUEST_AMOUNT,0)
7470: ,src_curr_request_amt = NVL(src_curr_request_amt, 0) + NVL(budgets_int_rec2.SRC_CURR_REQUEST_AMT,0)
7471: ,approved_amount = NVL(approved_amount, 0) + NVL(budgets_int_rec2.APPROVED_AMOUNT,0)
7477: ,last_update_login = NVL (fnd_global.conc_login_id, -1)
7478: ,object_version_number = NVL (object_version_number,0) + 1
7479: WHERE activity_budget_id = l_activity_budget_id;
7480:
7481: ozf_utility_pvt.write_conc_log('Activity Budget id2 : ' || l_activity_budget_id);
7482:
7483: END LOOP;
7484:
7485: /* Obj_Fundsum Changes */
7501: FETCH c_offer_info INTO l_offer_type;
7502: CLOSE c_offer_info;
7503: END IF;
7504:
7505: ozf_utility_pvt.write_conc_log('l_offer_type : ' || l_offer_type);
7506:
7507: ozf_utility_pvt.write_conc_log('component_type : ' || funds_util_rec.component_type);
7508: ozf_utility_pvt.write_conc_log('component_id : ' || funds_util_rec.component_id);
7509: ozf_utility_pvt.write_conc_log('fund_id : ' || funds_util_rec.fund_id);
7503: END IF;
7504:
7505: ozf_utility_pvt.write_conc_log('l_offer_type : ' || l_offer_type);
7506:
7507: ozf_utility_pvt.write_conc_log('component_type : ' || funds_util_rec.component_type);
7508: ozf_utility_pvt.write_conc_log('component_id : ' || funds_util_rec.component_id);
7509: ozf_utility_pvt.write_conc_log('fund_id : ' || funds_util_rec.fund_id);
7510:
7511: l_objfundsum_rec := NULL;
7504:
7505: ozf_utility_pvt.write_conc_log('l_offer_type : ' || l_offer_type);
7506:
7507: ozf_utility_pvt.write_conc_log('component_type : ' || funds_util_rec.component_type);
7508: ozf_utility_pvt.write_conc_log('component_id : ' || funds_util_rec.component_id);
7509: ozf_utility_pvt.write_conc_log('fund_id : ' || funds_util_rec.fund_id);
7510:
7511: l_objfundsum_rec := NULL;
7512: OPEN c_get_objfundsum_rec(funds_util_rec.component_type
7505: ozf_utility_pvt.write_conc_log('l_offer_type : ' || l_offer_type);
7506:
7507: ozf_utility_pvt.write_conc_log('component_type : ' || funds_util_rec.component_type);
7508: ozf_utility_pvt.write_conc_log('component_id : ' || funds_util_rec.component_id);
7509: ozf_utility_pvt.write_conc_log('fund_id : ' || funds_util_rec.fund_id);
7510:
7511: l_objfundsum_rec := NULL;
7512: OPEN c_get_objfundsum_rec(funds_util_rec.component_type
7513: ,funds_util_rec.component_id
7540: l_objfundsum_rec.utilized_amt := NVL(l_objfundsum_rec.utilized_amt, 0) + NVL(l_utiz_amt, 0);
7541: l_objfundsum_rec.plan_curr_utilized_amt := NVL(l_objfundsum_rec.plan_curr_utilized_amt, 0) + NVL(l_fund_req_amt, 0);
7542: l_objfundsum_rec.univ_curr_utilized_amt := NVL(l_objfundsum_rec.univ_curr_utilized_amt, 0) + NVL(l_univ_curr_amount, 0);
7543:
7544: OZF_UTILITY_PVT.write_conc_log('l_objfundsum_rec.utilized_amt='||l_objfundsum_rec.utilized_amt);
7545:
7546: OPEN funds_rec_csr(funds_util_rec.fund_id);
7547: FETCH funds_rec_csr INTO l_fund_type;
7548: CLOSE funds_rec_csr;
7555: l_objfundsum_rec.recal_committed_amt := NVL(l_objfundsum_rec.recal_committed_amt, 0) + NVL(l_utiz_amt, 0);
7556: l_objfundsum_rec.plan_curr_recal_committed_amt := NVL(l_objfundsum_rec.plan_curr_recal_committed_amt, 0) + NVL(l_plan_curr_amount, 0);
7557: l_objfundsum_rec.univ_curr_recal_committed_amt := NVL(l_objfundsum_rec.univ_curr_recal_committed_amt, 0) + NVL(l_univ_curr_amount, 0);
7558:
7559: OZF_UTILITY_PVT.write_conc_log('l_fund_type1='||l_fund_type);
7560:
7561: ELSE
7562:
7563: IF l_utiz_type IN ('ACCRUAL', 'LEAD_ACCRUAL', 'CHARGEBACK') THEN
7560:
7561: ELSE
7562:
7563: IF l_utiz_type IN ('ACCRUAL', 'LEAD_ACCRUAL', 'CHARGEBACK') THEN
7564: OZF_UTILITY_PVT.write_conc_log('ne when l_utiz_type = '|| l_utiz_type);
7565: OZF_UTILITY_PVT.write_conc_log('ne when l_utiz_type = '|| l_utiz_type);
7566: --NULL;
7567:
7568: ELSE
7561: ELSE
7562:
7563: IF l_utiz_type IN ('ACCRUAL', 'LEAD_ACCRUAL', 'CHARGEBACK') THEN
7564: OZF_UTILITY_PVT.write_conc_log('ne when l_utiz_type = '|| l_utiz_type);
7565: OZF_UTILITY_PVT.write_conc_log('ne when l_utiz_type = '|| l_utiz_type);
7566: --NULL;
7567:
7568: ELSE
7569: IF l_comp_type <> 'OFFR' THEN
7607: l_gl_posted_flag := ozf_accrual_engine.G_GL_FLAG_NO;
7608:
7609: END IF;
7610:
7611: OZF_UTILITY_PVT.write_conc_log('l_fund_type2='||l_fund_type);
7612:
7613: END IF; -- IF p_utilization_rec.utilization_type IN ('ADJUSTMENT', 'LEAD_ADJUSTMENT')
7614: END IF; -- IF p_utilization_rec.plan_type <> 'OFFR'
7615: END IF; -- IF p_utilization_rec.utilization_type IN ('ACCRUAL', 'LEAD_ACCRUAL', 'CHARGEBACK')
7632: */
7633: END IF;
7634: END IF;
7635:
7636: ozf_utility_pvt.write_conc_log('Updating OZF_OBJFUNDSUM_PVT for objfundsum_id: ' || l_objfundsum_rec.objfundsum_id);
7637:
7638: IF l_objfundsum_rec.objfundsum_id IS NOT NULL THEN
7639: -- l_objfundsum_rec.fund_id := l_fund_id;
7640: -- l_objfundsum_rec.fund_currency := l_currency_code;
7819:
7820: END IF;
7821:
7822: -- Updating the status of the batch as CLOSED in ozf_resale_batches_all table.
7823: ozf_utility_pvt.write_conc_log('Updating the status of the batch as CLOSED for Batch Id='||p_batch_id);
7824:
7825: UPDATE ozf_resale_batches_all
7826: SET status_code = OZF_RESALE_COMMON_PVT.G_BATCH_CLOSED,
7827: last_updated_by = NVL(fnd_global.user_id, -1),
7828: last_update_date = SYSDATE
7829: WHERE resale_batch_id = p_batch_id;
7830:
7831: -- Delete the staging tables once the records are updated in the main table.
7832: ozf_utility_pvt.write_conc_log('deleting records from staging tables OZF_FUNDS_ALL_B_INT and OZF_ACT_BUDGETS_INT for p_batch_type='||p_batch_type);
7833: DELETE FROM ozf_act_budgets_int WHERE RESALE_BATCH_ID = p_batch_id AND BATCH_TYPE = p_batch_type;
7834: DELETE FROM ozf_funds_all_b_int WHERE RESALE_BATCH_ID = p_batch_id AND BATCH_TYPE = p_batch_type;
7835:
7836: ozf_utility_pvt.write_conc_log('deleted records from staging tables OZF_FUNDS_ALL_B_INT and OZF_ACT_BUDGETS_INT for the Batch Id='||p_batch_id);
7832: ozf_utility_pvt.write_conc_log('deleting records from staging tables OZF_FUNDS_ALL_B_INT and OZF_ACT_BUDGETS_INT for p_batch_type='||p_batch_type);
7833: DELETE FROM ozf_act_budgets_int WHERE RESALE_BATCH_ID = p_batch_id AND BATCH_TYPE = p_batch_type;
7834: DELETE FROM ozf_funds_all_b_int WHERE RESALE_BATCH_ID = p_batch_id AND BATCH_TYPE = p_batch_type;
7835:
7836: ozf_utility_pvt.write_conc_log('deleted records from staging tables OZF_FUNDS_ALL_B_INT and OZF_ACT_BUDGETS_INT for the Batch Id='||p_batch_id);
7837:
7838: IF p_batch_type='TP_ACCRUAL' THEN
7839: l_vol_exists :='N';
7840: OPEN ozf_vol_int_exists_wp_csr(p_batch_id);
7843: l_vol_exists :='N';
7844: END IF;
7845: CLOSE ozf_vol_int_exists_wp_csr;
7846: IF l_vol_exists = 'Y' THEN
7847: ozf_utility_pvt.write_conc_log('deleting records from staging table OZF_VOLUME_SUMMARY_INT for p_batch_type='||p_batch_type ||' and for batch id '|| p_batch_id );
7848: DELETE FROM OZF_VOLUME_SUMMARY_INT WHERE RESALE_BATCH_ID = p_batch_id AND BATCH_TYPE = 'TP_ACCRUAL' ;
7849: ozf_utility_pvt.write_conc_log('deleted records from staging table OZF_VOLUME_SUMMARY_INT for p_batch_type='||p_batch_type ||' and for batch id '|| p_batch_id );
7850: END IF;
7851: END IF;
7845: CLOSE ozf_vol_int_exists_wp_csr;
7846: IF l_vol_exists = 'Y' THEN
7847: ozf_utility_pvt.write_conc_log('deleting records from staging table OZF_VOLUME_SUMMARY_INT for p_batch_type='||p_batch_type ||' and for batch id '|| p_batch_id );
7848: DELETE FROM OZF_VOLUME_SUMMARY_INT WHERE RESALE_BATCH_ID = p_batch_id AND BATCH_TYPE = 'TP_ACCRUAL' ;
7849: ozf_utility_pvt.write_conc_log('deleted records from staging table OZF_VOLUME_SUMMARY_INT for p_batch_type='||p_batch_type ||' and for batch id '|| p_batch_id );
7850: END IF;
7851: END IF;
7852:
7853:
7853:
7854: END IF;
7855: -- For TPA Parallel Execution ER - BUG#9614703 (-)
7856:
7857: ozf_utility_pvt.write_conc_log('Concurrent Program updating records from Staging to Main tables - End');
7858:
7859: EXCEPTION
7860: WHEN error_no_rollback THEN
7861: l_return_status := FND_API.G_RET_STS_ERROR;
7858:
7859: EXCEPTION
7860: WHEN error_no_rollback THEN
7861: l_return_status := FND_API.G_RET_STS_ERROR;
7862: ozf_utility_pvt.write_conc_log('Concurrent Program updating records to main tables failed');
7863: ozf_utility_pvt.write_conc_log('l_return_status := '||l_return_status);
7864: OZF_UTILITY_PVT.Write_Conc_Log;
7865: x_errbuf := 'Error while running staging table Concurrent Program';
7866: x_retcode := 2;
7859: EXCEPTION
7860: WHEN error_no_rollback THEN
7861: l_return_status := FND_API.G_RET_STS_ERROR;
7862: ozf_utility_pvt.write_conc_log('Concurrent Program updating records to main tables failed');
7863: ozf_utility_pvt.write_conc_log('l_return_status := '||l_return_status);
7864: OZF_UTILITY_PVT.Write_Conc_Log;
7865: x_errbuf := 'Error while running staging table Concurrent Program';
7866: x_retcode := 2;
7867: WHEN FND_API.g_exc_error THEN
7860: WHEN error_no_rollback THEN
7861: l_return_status := FND_API.G_RET_STS_ERROR;
7862: ozf_utility_pvt.write_conc_log('Concurrent Program updating records to main tables failed');
7863: ozf_utility_pvt.write_conc_log('l_return_status := '||l_return_status);
7864: OZF_UTILITY_PVT.Write_Conc_Log;
7865: x_errbuf := 'Error while running staging table Concurrent Program';
7866: x_retcode := 2;
7867: WHEN FND_API.g_exc_error THEN
7868: ROLLBACK TO update_main_tables;
7866: x_retcode := 2;
7867: WHEN FND_API.g_exc_error THEN
7868: ROLLBACK TO update_main_tables;
7869: l_return_status := FND_API.G_RET_STS_ERROR;
7870: ozf_utility_pvt.write_conc_log('Concurrent Program updating records to main tables failed');
7871: ozf_utility_pvt.write_conc_log('l_return_status := '||l_return_status);
7872: OZF_UTILITY_PVT.Write_Conc_Log;
7873: x_errbuf := 'Error while running staging table Concurrent Program';
7874: x_retcode := 2;
7867: WHEN FND_API.g_exc_error THEN
7868: ROLLBACK TO update_main_tables;
7869: l_return_status := FND_API.G_RET_STS_ERROR;
7870: ozf_utility_pvt.write_conc_log('Concurrent Program updating records to main tables failed');
7871: ozf_utility_pvt.write_conc_log('l_return_status := '||l_return_status);
7872: OZF_UTILITY_PVT.Write_Conc_Log;
7873: x_errbuf := 'Error while running staging table Concurrent Program';
7874: x_retcode := 2;
7875: WHEN FND_API.g_exc_unexpected_error THEN
7868: ROLLBACK TO update_main_tables;
7869: l_return_status := FND_API.G_RET_STS_ERROR;
7870: ozf_utility_pvt.write_conc_log('Concurrent Program updating records to main tables failed');
7871: ozf_utility_pvt.write_conc_log('l_return_status := '||l_return_status);
7872: OZF_UTILITY_PVT.Write_Conc_Log;
7873: x_errbuf := 'Error while running staging table Concurrent Program';
7874: x_retcode := 2;
7875: WHEN FND_API.g_exc_unexpected_error THEN
7876: ROLLBACK TO update_main_tables;
7874: x_retcode := 2;
7875: WHEN FND_API.g_exc_unexpected_error THEN
7876: ROLLBACK TO update_main_tables;
7877: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7878: ozf_utility_pvt.write_conc_log('Concurrent Program updating records to main tables failed');
7879: ozf_utility_pvt.write_conc_log('l_return_status := '||l_return_status);
7880: OZF_UTILITY_PVT.Write_Conc_Log;
7881: x_errbuf := 'Error while running staging table Concurrent Program';
7882: x_retcode := 2;
7875: WHEN FND_API.g_exc_unexpected_error THEN
7876: ROLLBACK TO update_main_tables;
7877: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7878: ozf_utility_pvt.write_conc_log('Concurrent Program updating records to main tables failed');
7879: ozf_utility_pvt.write_conc_log('l_return_status := '||l_return_status);
7880: OZF_UTILITY_PVT.Write_Conc_Log;
7881: x_errbuf := 'Error while running staging table Concurrent Program';
7882: x_retcode := 2;
7883: WHEN OTHERS THEN
7876: ROLLBACK TO update_main_tables;
7877: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7878: ozf_utility_pvt.write_conc_log('Concurrent Program updating records to main tables failed');
7879: ozf_utility_pvt.write_conc_log('l_return_status := '||l_return_status);
7880: OZF_UTILITY_PVT.Write_Conc_Log;
7881: x_errbuf := 'Error while running staging table Concurrent Program';
7882: x_retcode := 2;
7883: WHEN OTHERS THEN
7884: ROLLBACK TO update_main_tables;
7885: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7886: IF OZF_UNEXP_ERROR THEN
7887: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
7888: END IF;
7889: ozf_utility_pvt.write_conc_log('Concurrent Program updating records to main tables failed');
7890: ozf_utility_pvt.write_conc_log('l_return_status := '||l_return_status);
7891: OZF_UTILITY_PVT.Write_Conc_Log;
7892: x_errbuf := 'Error while running staging table Concurrent Program';
7893: x_retcode := 2;
7886: IF OZF_UNEXP_ERROR THEN
7887: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
7888: END IF;
7889: ozf_utility_pvt.write_conc_log('Concurrent Program updating records to main tables failed');
7890: ozf_utility_pvt.write_conc_log('l_return_status := '||l_return_status);
7891: OZF_UTILITY_PVT.Write_Conc_Log;
7892: x_errbuf := 'Error while running staging table Concurrent Program';
7893: x_retcode := 2;
7894:
7887: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
7888: END IF;
7889: ozf_utility_pvt.write_conc_log('Concurrent Program updating records to main tables failed');
7890: ozf_utility_pvt.write_conc_log('l_return_status := '||l_return_status);
7891: OZF_UTILITY_PVT.Write_Conc_Log;
7892: x_errbuf := 'Error while running staging table Concurrent Program';
7893: x_retcode := 2;
7894:
7895: END update_main_tables;
7975: -- Initialize API return status to sucess
7976: x_return_status := FND_API.G_RET_STS_SUCCESS;
7977:
7978: IF OZF_DEBUG_LOW_ON THEN
7979: OZF_Utility_PVT.write_conc_log('--------- Create_Draft_Utilization ----------');
7980: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: resale_line_int_id : '|| p_resale_line_int_rec.resale_line_int_id);
7981: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: org_id : '|| p_act_util_rec.org_id);
7982: END IF;
7983:
7976: x_return_status := FND_API.G_RET_STS_SUCCESS;
7977:
7978: IF OZF_DEBUG_LOW_ON THEN
7979: OZF_Utility_PVT.write_conc_log('--------- Create_Draft_Utilization ----------');
7980: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: resale_line_int_id : '|| p_resale_line_int_rec.resale_line_int_id);
7981: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: org_id : '|| p_act_util_rec.org_id);
7982: END IF;
7983:
7984:
7977:
7978: IF OZF_DEBUG_LOW_ON THEN
7979: OZF_Utility_PVT.write_conc_log('--------- Create_Draft_Utilization ----------');
7980: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: resale_line_int_id : '|| p_resale_line_int_rec.resale_line_int_id);
7981: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: org_id : '|| p_act_util_rec.org_id);
7982: END IF;
7983:
7984:
7985: IF p_act_util_rec.org_id IS NOT NULL THEN
8012: END IF;
8013: END IF;
8014:
8015: IF OZF_DEBUG_LOW_ON THEN
8016: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: p_act_budgets_rec.request_currency : '|| p_act_budgets_rec.request_currency);
8017: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: l_fc_currency_code : '|| l_fc_currency_code);
8018: END IF;
8019:
8020:
8013: END IF;
8014:
8015: IF OZF_DEBUG_LOW_ON THEN
8016: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: p_act_budgets_rec.request_currency : '|| p_act_budgets_rec.request_currency);
8017: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: l_fc_currency_code : '|| l_fc_currency_code);
8018: END IF;
8019:
8020:
8021: IF p_act_budgets_rec.request_currency <> l_fc_currency_code THEN
8018: END IF;
8019:
8020:
8021: IF p_act_budgets_rec.request_currency <> l_fc_currency_code THEN
8022: OZF_UTILITY_PVT.Convert_Currency
8023: ( p_from_currency => p_act_budgets_rec.request_currency
8024: , p_to_currency => l_fc_currency_code
8025: , p_conv_type => l_exchange_rate_type
8026: , p_conv_date => SYSDATE
8047: l_object_id := p_act_util_rec.object_id;
8048: END IF;
8049:
8050: IF OZF_DEBUG_LOW_ON THEN
8051: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: l_acctd_amount : '|| l_acctd_amount);
8052: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: product_id : '|| p_act_util_rec.product_id);
8053: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: cust_account_id : '|| p_act_util_rec.cust_account_id);
8054: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: billto_cust_account_id : '|| p_act_util_rec.billto_cust_account_id);
8055: END IF;
8048: END IF;
8049:
8050: IF OZF_DEBUG_LOW_ON THEN
8051: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: l_acctd_amount : '|| l_acctd_amount);
8052: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: product_id : '|| p_act_util_rec.product_id);
8053: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: cust_account_id : '|| p_act_util_rec.cust_account_id);
8054: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: billto_cust_account_id : '|| p_act_util_rec.billto_cust_account_id);
8055: END IF;
8056:
8049:
8050: IF OZF_DEBUG_LOW_ON THEN
8051: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: l_acctd_amount : '|| l_acctd_amount);
8052: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: product_id : '|| p_act_util_rec.product_id);
8053: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: cust_account_id : '|| p_act_util_rec.cust_account_id);
8054: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: billto_cust_account_id : '|| p_act_util_rec.billto_cust_account_id);
8055: END IF;
8056:
8057: --//Fix for Bug 16170069
8050: IF OZF_DEBUG_LOW_ON THEN
8051: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: l_acctd_amount : '|| l_acctd_amount);
8052: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: product_id : '|| p_act_util_rec.product_id);
8053: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: cust_account_id : '|| p_act_util_rec.cust_account_id);
8054: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: billto_cust_account_id : '|| p_act_util_rec.billto_cust_account_id);
8055: END IF;
8056:
8057: --//Fix for Bug 16170069
8058: OPEN draft_utilization_id_csr;
8059: FETCH draft_utilization_id_csr into l_draft_utilization_id;
8060: CLOSE draft_utilization_id_csr;
8061:
8062: IF OZF_DEBUG_LOW_ON THEN
8063: OZF_Utility_PVT.write_conc_log('Create_Draft_Utilization: l_draft_utilization_id : '|| l_draft_utilization_id);
8064: END IF;
8065: -- Fix for Bug # 14584673 : Adding accrual details to a table sturcture to be uploaded to ozf_funds_utilized_draft_all table at one shot later
8066: line_count := px_draft_accrual_tbl.count + 1;
8067:
8121: p_data => x_msg_data
8122: );
8123: EXCEPTION
8124: WHEN FND_API.G_EXC_ERROR THEN
8125: ozf_utility_pvt.write_conc_log('ERROR in Create Draft Utilization: '|| SQLERRM);
8126: ROLLBACK TO Create_Draft_Utilization;
8127: x_return_status := FND_API.G_RET_STS_ERROR;
8128: -- Standard call to get message count and if count=1, get the message
8129: FND_MSG_PUB.Count_And_Get (
8131: p_count => x_msg_count,
8132: p_data => x_msg_data
8133: );
8134: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8135: ozf_utility_pvt.write_conc_log('UNEXPECTED ERROR in Create Draft Utilization: '|| SQLERRM);
8136: ROLLBACK TO Create_Draft_Utilization;
8137: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8138: -- Standard call to get message count and if count=1, get the message
8139: FND_MSG_PUB.Count_And_Get (
8141: p_count => x_msg_count,
8142: p_data => x_msg_data
8143: );
8144: WHEN OTHERS THEN
8145: ozf_utility_pvt.write_conc_log('OTHER ERROR in Create Draft Utilization: '|| SQLERRM);
8146: ROLLBACK TO Create_Draft_Utilization;
8147: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8148: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
8149: THEN