DBA Data[Home] [Help]

APPS.OZF_TRACING_ORDER_PVT dependencies on OZF_UTILITY_PVT

Line 217: OZF_UTILITY_PVT.debug_message(p_message_text => l_full_name||': Start');

213: END IF;
214:
215: -- Debug Message
216: IF OZF_DEBUG_HIGH_ON THEN
217: OZF_UTILITY_PVT.debug_message(p_message_text => l_full_name||': Start');
218: END IF;
219:
220:
221: -- Initialize API return status to sucess

Line 243: ozf_utility_pvt.error_message('OZF_RESALE_OPEN_LINE_EXIST');

239: CLOSE OPEN_line_count_csr;
240:
241: IF l_count <> 0 THEN
242: --Can not pay if there is an OPEN line
243: ozf_utility_pvt.error_message('OZF_RESALE_OPEN_LINE_EXIST');
244: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
245: ELSE
246: -- Check whether there is a need to do inventory_verification
247: OPEN OZF_RESALE_COMMON_PVT.g_inventory_tracking_csr;

Line 264: OZF_UTILITY_PVT.error_message('OZF_RESALE_INIT_INV_TMP_ERR');

260: ,x_msg_count => l_msg_count
261: ,x_msg_data => l_msg_data
262: );
263: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
264: OZF_UTILITY_PVT.error_message('OZF_RESALE_INIT_INV_TMP_ERR');
265: RAISE FND_API.G_EXC_ERROR;
266: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
267: OZF_UTILITY_PVT.error_message('OZF_RESALE_INIT_INV_TMP_ERR');
268: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 267: OZF_UTILITY_PVT.error_message('OZF_RESALE_INIT_INV_TMP_ERR');

263: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
264: OZF_UTILITY_PVT.error_message('OZF_RESALE_INIT_INV_TMP_ERR');
265: RAISE FND_API.G_EXC_ERROR;
266: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
267: OZF_UTILITY_PVT.error_message('OZF_RESALE_INIT_INV_TMP_ERR');
268: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
269: END IF;
270: END IF;
271:

Line 400: ozf_utility_PVT.debug_message('PROCESS ORDER: ');

396: IF l_order_num_tbl.EXISTS(1) THEN -- IF B
397: FOR k in 1..l_order_num_tbl.LAST LOOP -- FOR C
398:
399: IF OZF_DEBUG_LOW_ON THEN
400: ozf_utility_PVT.debug_message('PROCESS ORDER: ');
401: ozf_utility_PVT.debug_message('ORDER NUMBER: '||l_order_num_tbl(k).order_number);
402: ozf_utility_PVT.debug_message('SOLD_FROM_ACCT: '||l_order_num_tbl(k).sold_from_cust_account_id);
403: ozf_utility_PVT.debug_message('DATE ORDERED: '||l_order_num_tbl(k).date_ordered);
404: END IF;

Line 401: ozf_utility_PVT.debug_message('ORDER NUMBER: '||l_order_num_tbl(k).order_number);

397: FOR k in 1..l_order_num_tbl.LAST LOOP -- FOR C
398:
399: IF OZF_DEBUG_LOW_ON THEN
400: ozf_utility_PVT.debug_message('PROCESS ORDER: ');
401: ozf_utility_PVT.debug_message('ORDER NUMBER: '||l_order_num_tbl(k).order_number);
402: ozf_utility_PVT.debug_message('SOLD_FROM_ACCT: '||l_order_num_tbl(k).sold_from_cust_account_id);
403: ozf_utility_PVT.debug_message('DATE ORDERED: '||l_order_num_tbl(k).date_ordered);
404: END IF;
405:

Line 402: ozf_utility_PVT.debug_message('SOLD_FROM_ACCT: '||l_order_num_tbl(k).sold_from_cust_account_id);

398:
399: IF OZF_DEBUG_LOW_ON THEN
400: ozf_utility_PVT.debug_message('PROCESS ORDER: ');
401: ozf_utility_PVT.debug_message('ORDER NUMBER: '||l_order_num_tbl(k).order_number);
402: ozf_utility_PVT.debug_message('SOLD_FROM_ACCT: '||l_order_num_tbl(k).sold_from_cust_account_id);
403: ozf_utility_PVT.debug_message('DATE ORDERED: '||l_order_num_tbl(k).date_ordered);
404: END IF;
405:
406: -- beginjxwu header_fix

Line 403: ozf_utility_PVT.debug_message('DATE ORDERED: '||l_order_num_tbl(k).date_ordered);

399: IF OZF_DEBUG_LOW_ON THEN
400: ozf_utility_PVT.debug_message('PROCESS ORDER: ');
401: ozf_utility_PVT.debug_message('ORDER NUMBER: '||l_order_num_tbl(k).order_number);
402: ozf_utility_PVT.debug_message('SOLD_FROM_ACCT: '||l_order_num_tbl(k).sold_from_cust_account_id);
403: ozf_utility_PVT.debug_message('DATE ORDERED: '||l_order_num_tbl(k).date_ordered);
404: END IF;
405:
406: -- beginjxwu header_fix
407: -- Here, I assume if a line is the duplicate of another line, then they share

Line 477: OZF_UTILITY_PVT.debug_message('Current line_int_id:' || l_valid_line_id_tbl(j).id);

473: -- I then try to create resale data.
474: FOR j in 1..l_valid_line_id_tbl.last -- FOR E
475: LOOP
476: IF OZF_DEBUG_LOW_ON THEN
477: OZF_UTILITY_PVT.debug_message('Current line_int_id:' || l_valid_line_id_tbl(j).id);
478: END IF;
479: OPEN OZF_RESALE_COMMON_PVT.g_interface_rec_csr(l_valid_line_id_tbl(j).id);
480: FETCH OZF_RESALE_COMMON_PVT.g_interface_rec_csr INTO l_line_int_rec;
481: CLOSE OZF_RESALE_COMMON_PVT.g_interface_rec_csr;

Line 500: OZF_UTILITY_PVT.debug_message('Did NOT pass inventory checking');

496: ,x_msg_data => l_msg_data
497: );
498: IF NOT l_inventory_level_valid THEN
499: IF OZF_DEBUG_LOW_ON THEN
500: OZF_UTILITY_PVT.debug_message('Did NOT pass inventory checking');
501: END IF;
502: -- Here turn thIS line to DISPUTED AND create a dISput code FOR it.
503: UPDATE ozf_resale_lines_int
504: SET status_code = OZF_RESALE_COMMON_PVT.G_BATCH_ADJ_DISPUTED,

Line 551: OZF_UTILITY_PVT.debug_message('header_id is '|| l_header_id);

547: END IF;
548: END IF;
549:
550: IF OZF_DEBUG_LOW_ON THEN
551: OZF_UTILITY_PVT.debug_message('header_id is '|| l_header_id);
552: END IF;
553:
554: IF l_line_int_rec.status_code = OZF_RESALE_COMMON_PVT.G_BATCH_ADJ_PROCESSED THEN
555: IF l_line_int_rec.duplicated_line_id IS NULL THEN

Line 626: OZF_UTILITY_PVT.debug_message('line_id is '|| l_line_id);

622: l_line_id := l_line_int_rec.duplicated_line_id;
623: END IF;
624:
625: IF OZF_DEBUG_LOW_ON THEN
626: OZF_UTILITY_PVT.debug_message('line_id is '|| l_line_id);
627: END IF;
628:
629: IF l_line_int_rec.status_code = OZF_RESALE_COMMON_PVT.G_BATCH_ADJ_PROCESSED OR
630: l_line_int_rec.status_code = OZF_RESALE_COMMON_PVT.G_BATCH_ADJ_DUPLICATED

Line 681: ozf_utility_pvt.error_message('OZF_UPD_RESALE_WRG','TEXT',l_full_name||': END');

677: SET status_code = OZF_RESALE_COMMON_PVT.G_BATCH_CLOSED
678: WHERE resale_batch_id = p_resale_batch_id;
679: EXCEPTION
680: WHEN OTHERS THEN
681: ozf_utility_pvt.error_message('OZF_UPD_RESALE_WRG','TEXT',l_full_name||': END');
682: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
683: END;
684:
685: ELSE

Line 687: ozf_utility_pvt.error_message('OZF_RESALE_WRONG_STAUS_TO_PAY');

683: END;
684:
685: ELSE
686: -- Only disputed and processed batch can be paid.
687: ozf_utility_pvt.error_message('OZF_RESALE_WRONG_STAUS_TO_PAY');
688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
689: END IF;
690:
691: -- Debug Message

Line 693: OZF_UTILITY_PVT.debug_message(p_message_text => l_full_name||': End');

689: END IF;
690:
691: -- Debug Message
692: IF OZF_DEBUG_HIGH_ON THEN
693: OZF_UTILITY_PVT.debug_message(p_message_text => l_full_name||': End');
694: END IF;
695: --Standard call to get message count and if count=1, get the message
696: FND_MSG_PUB.Count_And_Get (
697: p_encoded => FND_API.G_FALSE,

Line 786: OZF_UTILITY_PVT.debug_message(p_message_text => l_full_name||': Start');

782: END IF;
783:
784: -- Debug Message
785: IF OZF_DEBUG_HIGH_ON THEN
786: OZF_UTILITY_PVT.debug_message(p_message_text => l_full_name||': Start');
787: END IF;
788:
789: --Initialize message list if p_init_msg_list is TRUE.
790: IF FND_API.To_Boolean (p_init_msg_list) THEN

Line 833: OZF_UTILITY_PVT.error_message(

829: AND a.error_code ='OZF_RESALE_NON_TRC'
830: );
831: EXCEPTION
832: WHEN OTHERS THEN
833: OZF_UTILITY_PVT.error_message(
834: p_message_name => 'OZF_INS_RESALE_LOG_WRG',
835: p_token_name => 'TEXT',
836: p_token_value => l_full_name||': END');
837: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 852: OZF_UTILITY_PVT.debug_message(p_message_text => l_full_name||': End');

848: END IF;
849:
850: -- Debug Message
851: IF OZF_DEBUG_HIGH_ON THEN
852: OZF_UTILITY_PVT.debug_message(p_message_text => l_full_name||': End');
853: END IF;
854: --Standard call to get message count and if count=1, get the message
855: FND_MSG_PUB.Count_And_Get (
856: p_encoded => FND_API.G_FALSE,

Line 997: OZF_UTILITY_PVT.debug_message(p_message_text => l_full_name||': Start');

993: END IF;
994:
995: -- Debug Message
996: IF OZF_DEBUG_HIGH_ON THEN
997: OZF_UTILITY_PVT.debug_message(p_message_text => l_full_name||': Start');
998: END IF;
999:
1000: --Initialize message list if p_init_msg_list is TRUE.
1001: IF FND_API.To_Boolean (p_init_msg_list) THEN

Line 1062: OZF_UTILITY_PVT.error_message('OZF_RESALE_INIT_INV_TMP_ERR');

1058: ,x_msg_count => l_msg_count
1059: ,x_msg_data => l_msg_data
1060: );
1061: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1062: OZF_UTILITY_PVT.error_message('OZF_RESALE_INIT_INV_TMP_ERR');
1063: RAISE FND_API.G_EXC_ERROR;
1064: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1065: OZF_UTILITY_PVT.error_message('OZF_RESALE_INIT_INV_TMP_ERR');
1066: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1065: OZF_UTILITY_PVT.error_message('OZF_RESALE_INIT_INV_TMP_ERR');

1061: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1062: OZF_UTILITY_PVT.error_message('OZF_RESALE_INIT_INV_TMP_ERR');
1063: RAISE FND_API.G_EXC_ERROR;
1064: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1065: OZF_UTILITY_PVT.error_message('OZF_RESALE_INIT_INV_TMP_ERR');
1066: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1067: END IF;
1068:
1069: /*

Line 1092: ozf_utility_PVT.debug_message('/*--- Processing order for order NUMBER:'||l_order_num_tbl(i)||'---*/');

1088: l_cust_account_id_tbl(i) is not NULL AND
1089: l_order_date_tbl(i) is not NULL THEN
1090:
1091: IF OZF_DEBUG_LOW_ON THEN
1092: ozf_utility_PVT.debug_message('/*--- Processing order for order NUMBER:'||l_order_num_tbl(i)||'---*/');
1093: END IF;
1094: -- Before start process, clean up the data structures if necessary.
1095:
1096: --k:=1;

Line 1112: ozf_utility_PVT.debug_message('after order set'||l_order_set_tbl.LAST);

1108: --END LOOP;
1109: CLOSE order_set_csr;
1110:
1111: IF OZF_DEBUG_LOW_ON THEN
1112: ozf_utility_PVT.debug_message('after order set'||l_order_set_tbl.LAST);
1113: END IF;
1114:
1115: For J in 1..l_order_set_tbl.LAST LOOP
1116: -- Purge the any error message that might be there.

Line 1123: ozf_utility_pvt.error_message('OZF_DEL_RESALE_LOG_WRG');

1119: WHERE resale_id = l_order_set_tbl(J).resale_line_int_id
1120: AND resale_id_type = OZF_RESALE_COMMON_PVT.G_ID_TYPE_IFACE;
1121: EXCEPTION
1122: WHEN OTHERS THEN
1123: ozf_utility_pvt.error_message('OZF_DEL_RESALE_LOG_WRG');
1124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1125: END;
1126:
1127: IF l_inventory_tracking = 'T' THEN

Line 1144: ozf_utility_PVT.debug_message('Did not pass inventory checking');

1140:
1141: IF NOT l_inventory_level_valid THEN
1142:
1143: IF OZF_DEBUG_LOW_ON THEN
1144: ozf_utility_PVT.debug_message('Did not pass inventory checking');
1145: END IF;
1146: -- Here turn this line to disputed and create a disput code for it.
1147: UPDATE ozf_resale_lines_int
1148: SET status_code = OZF_RESALE_COMMON_PVT.G_BATCH_ADJ_DISPUTED,

Line 1177: ozf_utility_PVT.debug_message('/*--- Success: Processing order for order NUMBER:'||l_order_num_tbl(i)||'---*/');

1173: << END_ORDER_LINE >>
1174: NULL;
1175: END LOOP; -- END LOOP for l_order_set_tbl
1176: IF OZF_DEBUG_LOW_ON THEN
1177: ozf_utility_PVT.debug_message('/*--- Success: Processing order for order NUMBER:'||l_order_num_tbl(i)||'---*/');
1178: END IF;
1179: END IF; -- END if for order_NUMBER, date_ordered not NULL
1180: << END_LOOP >>
1181: NULL;

Line 1185: ozf_utility_PVT.debug_message('/*--- No order to process ---*/');

1181: NULL;
1182: END LOOP; -- END LOOP for l_order_num_tbl
1183: ELSE
1184: IF OZF_DEBUG_LOW_ON THEN
1185: ozf_utility_PVT.debug_message('/*--- No order to process ---*/');
1186: END IF;
1187: END IF;
1188:
1189: -- get data regard this process

Line 1214: ozf_utility_pvt.error_message('OZF_UPD_RESALE_BATCH_WRG');

1210: lines_invalid = l_lines_invalid
1211: WHERE resale_batch_id = p_resale_batch_id;
1212: EXCEPTION
1213: WHEN OTHERS THEN
1214: ozf_utility_pvt.error_message('OZF_UPD_RESALE_BATCH_WRG');
1215: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1216: END;
1217:
1218:

Line 1221: OZF_UTILITY_PVT.debug_message(p_message_text => l_full_name||': End');

1217:
1218:
1219: -- Debug Message
1220: IF OZF_DEBUG_HIGH_ON THEN
1221: OZF_UTILITY_PVT.debug_message(p_message_text => l_full_name||': End');
1222: END IF;
1223: --Standard call to get message count and if count=1, get the message
1224: FND_MSG_PUB.Count_And_Get (
1225: p_encoded => FND_API.G_FALSE,