DBA Data[Home] [Help]

APPS.FV_FACTS1_GL_PKG dependencies on FND_LOG

Line 165: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);

161: WHEN OTHERS THEN
162: p_err_code := SQLCODE;
163: p_err_buff := 'When others exception in Main - '||SQLERRM;
164: ROLLBACK;
165: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);
166: END main;
167: --------------------------------------------------------------------------------
168: PROCEDURE CLEANUP
169: IS

Line 179: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);

175: EXCEPTION
176: WHEN OTHERS THEN
177: gbl_err_code := SQLCODE;
178: gbl_err_buff := l_module_name||' - When others exception - '||SQLERRM;
179: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);
180: END CLEANUP;
181: --------------------------------------------------------------------------------
182: -- Get balancing and accounting segments
183: --------------------------------------------------------------------------------

Line 211: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'Balancing Segment: '||gbl_bal_segment);

207: END IF;
208: IF (gbl_bal_segment IS NULL OR gbl_acc_segment IS NULL) THEN
209: RAISE NO_DATA_FOUND;
210: END IF;
211: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'Balancing Segment: '||gbl_bal_segment);
212: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'Accounting Segment: '||gbl_acc_segment);
213: EXCEPTION
214: WHEN NO_DATA_FOUND THEN
215: gbl_err_code := -1 ;

Line 212: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'Accounting Segment: '||gbl_acc_segment);

208: IF (gbl_bal_segment IS NULL OR gbl_acc_segment IS NULL) THEN
209: RAISE NO_DATA_FOUND;
210: END IF;
211: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'Balancing Segment: '||gbl_bal_segment);
212: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'Accounting Segment: '||gbl_acc_segment);
213: EXCEPTION
214: WHEN NO_DATA_FOUND THEN
215: gbl_err_code := -1 ;
216: gbl_err_buff := 'Balancing or Accounting segment not found.';

Line 217: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);

213: EXCEPTION
214: WHEN NO_DATA_FOUND THEN
215: gbl_err_code := -1 ;
216: gbl_err_buff := 'Balancing or Accounting segment not found.';
217: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);
218: WHEN invalid_bal_segment THEN
219: gbl_err_code := -1 ;
220: gbl_err_buff := 'Error while fetching balancing segment.';
221: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);

Line 221: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);

217: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);
218: WHEN invalid_bal_segment THEN
219: gbl_err_code := -1 ;
220: gbl_err_buff := 'Error while fetching balancing segment.';
221: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);
222: WHEN invalid_acc_segment THEN
223: gbl_err_code := -1 ;
224: gbl_err_buff := 'Error while fetching accounting segment.';
225: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);

Line 225: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);

221: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);
222: WHEN invalid_acc_segment THEN
223: gbl_err_code := -1 ;
224: gbl_err_buff := 'Error while fetching accounting segment.';
225: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);
226: WHEN OTHERS THEN
227: gbl_err_code := -1 ;
228: gbl_err_buff := 'When others error while getting
229: Balancing or Accounting segment - '||SQLERRM;

Line 230: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);

226: WHEN OTHERS THEN
227: gbl_err_code := -1 ;
228: gbl_err_buff := 'When others error while getting
229: Balancing or Accounting segment - '||SQLERRM;
230: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);
231: END get_segment_names;
232: --------------------------------------------------------------------------------
233: -- Get the period num for the parameter period and also the first period num
234: -- for the year.

Line 274: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);

270: AND p.period_year = gbl_period_year;
271: IF (gbl_period_num_low = 0 OR gbl_period_num_high = 0) THEN
272: gbl_err_code := 2 ;
273: gbl_err_buff := l_module_name||' Period number '|| 'found zero for the passed fiscal year.' ;
274: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);
275: RETURN;
276: END IF;
277: FV_UTILITY.LOG_MESG('Period Year: '||gbl_period_year);
278: FV_UTILITY.LOG_MESG('Period Number Low: '||gbl_period_num_low);

Line 346: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

342: IS
343: --------------------------------------------------------------------------------
344: l_module_name VARCHAR2(1000);
345: BEGIN
346: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
347: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, module, message_line);
348: END IF;
349: EXCEPTION
350: WHEN OTHERS THEN

Line 347: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, module, message_line);

343: --------------------------------------------------------------------------------
344: l_module_name VARCHAR2(1000);
345: BEGIN
346: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
347: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, module, message_line);
348: END IF;
349: EXCEPTION
350: WHEN OTHERS THEN
351: FV_UTILITY.LOG_MESG('When others error in module: log: '||sqlerrm);

Line 930: FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff

926: gbl_err_code := SQLCODE;
927: gbl_err_buff := l_module_name||' - When others error: '||SQLERRM;
928: FV_UTILITY.LOG_MESG
929: (
930: FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff
931: )
932: ;
933: END process_gl_lines;
934: --------------------------------------------------------------------------------

Line 1053: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1049: -- get the vendor id from Payables (Includes invoice and Payments)
1050: ------------------------------------------------------------------
1051: IF (p_source = 'Payables' ) THEN
1052: --AND p_category <> 'Treasury Confirmation') THEN
1053: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1054: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,P_SOURCE);
1055: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 2: '|| P_REFERENCE_2);
1056: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'p_je_from_sla_flag: '||p_je_from_sla_flag);
1057: END IF;

Line 1054: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,P_SOURCE);

1050: ------------------------------------------------------------------
1051: IF (p_source = 'Payables' ) THEN
1052: --AND p_category <> 'Treasury Confirmation') THEN
1053: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1054: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,P_SOURCE);
1055: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 2: '|| P_REFERENCE_2);
1056: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'p_je_from_sla_flag: '||p_je_from_sla_flag);
1057: END IF;
1058: BEGIN

Line 1055: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 2: '|| P_REFERENCE_2);

1051: IF (p_source = 'Payables' ) THEN
1052: --AND p_category <> 'Treasury Confirmation') THEN
1053: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1054: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,P_SOURCE);
1055: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 2: '|| P_REFERENCE_2);
1056: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'p_je_from_sla_flag: '||p_je_from_sla_flag);
1057: END IF;
1058: BEGIN
1059: IF p_je_from_sla_flag = 'Y' THEN

Line 1056: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'p_je_from_sla_flag: '||p_je_from_sla_flag);

1052: --AND p_category <> 'Treasury Confirmation') THEN
1053: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1054: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,P_SOURCE);
1055: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 2: '|| P_REFERENCE_2);
1056: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'p_je_from_sla_flag: '||p_je_from_sla_flag);
1057: END IF;
1058: BEGIN
1059: IF p_je_from_sla_flag = 'Y' THEN
1060: get_reference_column ('AP_PAYMENTS', p_je_batch_id , p_je_header_id , p_je_line_num , 200, p_jrnl_dc_ind, party_info_tab);

Line 1087: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1083:
1084: l_cust_vend_type := 'V';
1085: ELSE
1086: l_recipient_name := 'Other';
1087: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1088: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_2 I.E. INVOICE_ID IS NULL');
1089: END IF;
1090: END IF;
1091: EXCEPTION

Line 1088: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_2 I.E. INVOICE_ID IS NULL');

1084: l_cust_vend_type := 'V';
1085: ELSE
1086: l_recipient_name := 'Other';
1087: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1088: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_2 I.E. INVOICE_ID IS NULL');
1089: END IF;
1090: END IF;
1091: EXCEPTION
1092: WHEN NO_DATA_FOUND THEN

Line 1093: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'NO DATA FOUND FOR SOURCE = PAYABLES !!');

1089: END IF;
1090: END IF;
1091: EXCEPTION
1092: WHEN NO_DATA_FOUND THEN
1093: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'NO DATA FOUND FOR SOURCE = PAYABLES !!');
1094: l_recipient_name := 'Other';
1095: END;
1096: -------------------------------------------------------------------
1097: -- Get the Vendor ID for Purchasing Inventory Records

Line 1102: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1098: ------------------------------------------------------------------
1099: ELSIF (p_source IN ('Purchasing' , 'Cost Management') AND p_category <> 'Requisitions') THEN
1100: -- IF (p_category = 'Receiving') THEN
1101: IF (p_category IN ('Receiving','Inventory')) THEN
1102: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1103: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 2: '|| P_REFERENCE_2);
1104: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 5: '|| P_REFERENCE_5);
1105: END IF;
1106: BEGIN

Line 1103: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 2: '|| P_REFERENCE_2);

1099: ELSIF (p_source IN ('Purchasing' , 'Cost Management') AND p_category <> 'Requisitions') THEN
1100: -- IF (p_category = 'Receiving') THEN
1101: IF (p_category IN ('Receiving','Inventory')) THEN
1102: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1103: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 2: '|| P_REFERENCE_2);
1104: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 5: '|| P_REFERENCE_5);
1105: END IF;
1106: BEGIN
1107: IF p_je_from_sla_flag = 'Y' THEN

Line 1104: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 5: '|| P_REFERENCE_5);

1100: -- IF (p_category = 'Receiving') THEN
1101: IF (p_category IN ('Receiving','Inventory')) THEN
1102: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1103: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 2: '|| P_REFERENCE_2);
1104: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 5: '|| P_REFERENCE_5);
1105: END IF;
1106: BEGIN
1107: IF p_je_from_sla_flag = 'Y' THEN
1108: l_appl_id := 201;

Line 1144: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1140: l_cust_vend_type := 'V';
1141: ELSE
1142: IF (p_reference_2 IS NULL) THEN
1143: l_recipient_name := 'Other';
1144: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1145: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_2 I.E. PO_HEADER_ID IS NULL');
1146: END IF;
1147: ELSE
1148: l_recipient_name := 'Other';

Line 1145: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_2 I.E. PO_HEADER_ID IS NULL');

1141: ELSE
1142: IF (p_reference_2 IS NULL) THEN
1143: l_recipient_name := 'Other';
1144: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1145: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_2 I.E. PO_HEADER_ID IS NULL');
1146: END IF;
1147: ELSE
1148: l_recipient_name := 'Other';
1149: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1149: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1145: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_2 I.E. PO_HEADER_ID IS NULL');
1146: END IF;
1147: ELSE
1148: l_recipient_name := 'Other';
1149: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1150: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_5 I.E. TRANSACTION_ID IS NULL');
1151: END IF;
1152: END IF;
1153: END IF;

Line 1150: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_5 I.E. TRANSACTION_ID IS NULL');

1146: END IF;
1147: ELSE
1148: l_recipient_name := 'Other';
1149: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1150: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_5 I.E. TRANSACTION_ID IS NULL');
1151: END IF;
1152: END IF;
1153: END IF;
1154: EXCEPTION

Line 1156: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'NO DATA FOUND WHEN SOURCE IS PURCHASING AND CATEGORY IS RECEIVING!!');

1152: END IF;
1153: END IF;
1154: EXCEPTION
1155: WHEN NO_DATA_FOUND THEN
1156: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'NO DATA FOUND WHEN SOURCE IS PURCHASING AND CATEGORY IS RECEIVING!!');
1157: l_recipient_name := 'Other';
1158: END;
1159: ELSIF (p_category IN ('Purchases', 'Release')) THEN
1160: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1160: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1156: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'NO DATA FOUND WHEN SOURCE IS PURCHASING AND CATEGORY IS RECEIVING!!');
1157: l_recipient_name := 'Other';
1158: END;
1159: ELSIF (p_category IN ('Purchases', 'Release')) THEN
1160: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1161: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 2: '|| P_REFERENCE_2);
1162: END IF;
1163: BEGIN
1164: IF p_je_from_sla_flag = 'Y' THEN

Line 1161: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 2: '|| P_REFERENCE_2);

1157: l_recipient_name := 'Other';
1158: END;
1159: ELSIF (p_category IN ('Purchases', 'Release')) THEN
1160: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1161: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 2: '|| P_REFERENCE_2);
1162: END IF;
1163: BEGIN
1164: IF p_je_from_sla_flag = 'Y' THEN
1165: get_reference_column ('PURCHASE_ORDER', p_je_batch_id , p_je_header_id , p_je_line_num , 201, p_jrnl_dc_ind, party_info_tab);

Line 1192: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1188:
1189: l_cust_vend_type := 'V';
1190: ELSE
1191: l_recipient_name := 'Other';
1192: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1193: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_2 I.E. PO HEADER ID IS NULL');
1194: END IF;
1195: END IF;
1196: EXCEPTION

Line 1193: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_2 I.E. PO HEADER ID IS NULL');

1189: l_cust_vend_type := 'V';
1190: ELSE
1191: l_recipient_name := 'Other';
1192: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1193: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_2 I.E. PO HEADER ID IS NULL');
1194: END IF;
1195: END IF;
1196: EXCEPTION
1197: WHEN NO_DATA_FOUND THEN

Line 1198: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'NO DATA FOUND WHEN SOURCE IS PURCHASING AND CATEGORY IS PURCHASES!!');

1194: END IF;
1195: END IF;
1196: EXCEPTION
1197: WHEN NO_DATA_FOUND THEN
1198: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'NO DATA FOUND WHEN SOURCE IS PURCHASING AND CATEGORY IS PURCHASES!!');
1199: l_recipient_name := 'Other';
1200: END;
1201: END IF;
1202: -----------------------------------------------------------

Line 1233: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1229:
1230: l_cust_vend_type := 'C';
1231: ELSE
1232: l_recipient_name := 'Other';
1233: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1234: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_7 I.E. CUSTOMER_ID IS NULL');
1235: END IF;
1236: END IF;
1237: EXCEPTION

Line 1234: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_7 I.E. CUSTOMER_ID IS NULL');

1230: l_cust_vend_type := 'C';
1231: ELSE
1232: l_recipient_name := 'Other';
1233: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1234: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_7 I.E. CUSTOMER_ID IS NULL');
1235: END IF;
1236: END IF;
1237: EXCEPTION
1238: WHEN NO_DATA_FOUND THEN

Line 1240: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO DATA FOUND WHEN SOURCE IS RECEIVABLES!!');

1236: END IF;
1237: EXCEPTION
1238: WHEN NO_DATA_FOUND THEN
1239: l_recipient_name := 'Other';
1240: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO DATA FOUND WHEN SOURCE IS RECEIVABLES!!');
1241: END;
1242: --------------------------------------------------------------------
1243: -- Vendor id for Project Accounting Transactions
1244: --------------------------------------------------------------------

Line 1246: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1242: --------------------------------------------------------------------
1243: -- Vendor id for Project Accounting Transactions
1244: --------------------------------------------------------------------
1245: ELSIF (p_source = 'Project Accounting') THEN
1246: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1247: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'P_SOURCE:' ||p_source);
1248: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 1: '|| p_reference_1);
1249: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'p_je_from_sla_flag: '||p_je_from_sla_flag);
1250: END IF;

Line 1247: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'P_SOURCE:' ||p_source);

1243: -- Vendor id for Project Accounting Transactions
1244: --------------------------------------------------------------------
1245: ELSIF (p_source = 'Project Accounting') THEN
1246: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1247: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'P_SOURCE:' ||p_source);
1248: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 1: '|| p_reference_1);
1249: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'p_je_from_sla_flag: '||p_je_from_sla_flag);
1250: END IF;
1251: BEGIN

Line 1248: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 1: '|| p_reference_1);

1244: --------------------------------------------------------------------
1245: ELSIF (p_source = 'Project Accounting') THEN
1246: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1247: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'P_SOURCE:' ||p_source);
1248: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 1: '|| p_reference_1);
1249: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'p_je_from_sla_flag: '||p_je_from_sla_flag);
1250: END IF;
1251: BEGIN
1252: IF p_je_from_sla_flag = 'Y' THEN

Line 1249: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'p_je_from_sla_flag: '||p_je_from_sla_flag);

1245: ELSIF (p_source = 'Project Accounting') THEN
1246: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1247: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'P_SOURCE:' ||p_source);
1248: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REFERENCE 1: '|| p_reference_1);
1249: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'p_je_from_sla_flag: '||p_je_from_sla_flag);
1250: END IF;
1251: BEGIN
1252: IF p_je_from_sla_flag = 'Y' THEN
1253: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'Before get_reference_column for projects : gbl_run_process :->'||gbl_run_process);

Line 1253: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'Before get_reference_column for projects : gbl_run_process :->'||gbl_run_process);

1249: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'p_je_from_sla_flag: '||p_je_from_sla_flag);
1250: END IF;
1251: BEGIN
1252: IF p_je_from_sla_flag = 'Y' THEN
1253: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'Before get_reference_column for projects : gbl_run_process :->'||gbl_run_process);
1254: get_reference_column ('PROJECTS', p_je_batch_id , p_je_header_id , p_je_line_num , 275, p_jrnl_dc_ind, party_info_tab);
1255: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'FOR SOURCE = PROJECTS WITH p_je_header_id: '||p_je_header_id);
1256: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'After get_reference_column for projects : gbl_run_process :->'||gbl_run_process);
1257:

Line 1255: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'FOR SOURCE = PROJECTS WITH p_je_header_id: '||p_je_header_id);

1251: BEGIN
1252: IF p_je_from_sla_flag = 'Y' THEN
1253: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'Before get_reference_column for projects : gbl_run_process :->'||gbl_run_process);
1254: get_reference_column ('PROJECTS', p_je_batch_id , p_je_header_id , p_je_line_num , 275, p_jrnl_dc_ind, party_info_tab);
1255: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'FOR SOURCE = PROJECTS WITH p_je_header_id: '||p_je_header_id);
1256: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'After get_reference_column for projects : gbl_run_process :->'||gbl_run_process);
1257:
1258: IF (gbl_err_code <> 0) OR (gbl_run_process='N') THEN
1259: return;

Line 1256: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'After get_reference_column for projects : gbl_run_process :->'||gbl_run_process);

1252: IF p_je_from_sla_flag = 'Y' THEN
1253: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'Before get_reference_column for projects : gbl_run_process :->'||gbl_run_process);
1254: get_reference_column ('PROJECTS', p_je_batch_id , p_je_header_id , p_je_line_num , 275, p_jrnl_dc_ind, party_info_tab);
1255: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'FOR SOURCE = PROJECTS WITH p_je_header_id: '||p_je_header_id);
1256: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'After get_reference_column for projects : gbl_run_process :->'||gbl_run_process);
1257:
1258: IF (gbl_err_code <> 0) OR (gbl_run_process='N') THEN
1259: return;
1260: END IF;

Line 1262: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'p_reference_1 ->'||p_reference_1);

1258: IF (gbl_err_code <> 0) OR (gbl_run_process='N') THEN
1259: return;
1260: END IF;
1261: ELSIF (p_reference_1 IS NOT NULL) THEN
1262: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'p_reference_1 ->'||p_reference_1);
1263: BEGIN
1264: OPEN ven_rec(p_reference_1);
1265: FETCH ven_rec INTO l_vendor_id;
1266:

Line 1270: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'ERROR while retreiving vendor id for projects with reference_1:'||p_reference_1);

1266:
1267: CLOSE ven_rec;
1268: EXCEPTION
1269: WHEN OTHERS THEN
1270: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'ERROR while retreiving vendor id for projects with reference_1:'||p_reference_1);
1271: END;
1272: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'l_vendor_id ->'||l_vendor_id);
1273: IF l_vendor_id IS NOT NULL THEN
1274: SELECT v.vendor_id,

Line 1272: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'l_vendor_id ->'||l_vendor_id);

1268: EXCEPTION
1269: WHEN OTHERS THEN
1270: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'ERROR while retreiving vendor id for projects with reference_1:'||p_reference_1);
1271: END;
1272: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'l_vendor_id ->'||l_vendor_id);
1273: IF l_vendor_id IS NOT NULL THEN
1274: SELECT v.vendor_id,
1275: v.vendor_type_lookup_code,
1276: DECODE(gbl_vend_attribute, 'ATTRIBUTE1',

Line 1299: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1295: l_cust_vend_type := 'V';
1296: END IF;
1297: ELSE
1298: l_recipient_name := 'Other';
1299: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1300: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_1 I.E. IS NULL');
1301: END IF;
1302: END IF;
1303: EXCEPTION

Line 1300: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_1 I.E. IS NULL');

1296: END IF;
1297: ELSE
1298: l_recipient_name := 'Other';
1299: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1300: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_1 I.E. IS NULL');
1301: END IF;
1302: END IF;
1303: EXCEPTION
1304: WHEN NO_DATA_FOUND THEN

Line 1305: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'FOR RAISE - NO DATA FOUND FOR SOURCE = PROJECTS !!');

1301: END IF;
1302: END IF;
1303: EXCEPTION
1304: WHEN NO_DATA_FOUND THEN
1305: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'FOR RAISE - NO DATA FOUND FOR SOURCE = PROJECTS !!');
1306: l_recipient_name := 'Other';
1307: END;
1308: --------------------------------------------------------------------
1309: -- Vendor id for TC transactions

Line 1344: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1340:
1341: l_cust_vend_type := 'V';
1342: ELSE
1343: l_recipient_name := 'Other';
1344: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1345: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_3 I.E. CHECK_ID IS NULL');
1346: END IF;
1347: END IF;
1348: EXCEPTION

Line 1345: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_3 I.E. CHECK_ID IS NULL');

1341: l_cust_vend_type := 'V';
1342: ELSE
1343: l_recipient_name := 'Other';
1344: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1345: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'REFERENCE_3 I.E. CHECK_ID IS NULL');
1346: END IF;
1347: END IF;
1348: EXCEPTION
1349: WHEN NO_DATA_FOUND THEN

Line 1385: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'NO DATA FOUND WHEN SOURCE = BUDGETARY TRANSACTION');

1381: l_recipient_name := 'Other';
1382: END IF;
1383: EXCEPTION
1384: WHEN NO_DATA_FOUND THEN
1385: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'NO DATA FOUND WHEN SOURCE = BUDGETARY TRANSACTION');
1386: END;
1387: ELSIF (l_govt_non_govt_ind = 'Y') THEN
1388: log(l_module_name , 'Falls on Manual source as govt non govt = Y');
1389: IF (ln_jrnl_att IS NOT NULL) THEN

Line 1459: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1455: when others then
1456: null;
1457: end;
1458: IF (party_info_tab(i).party_id IS NULL) THEN
1459: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1460: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'VENDOR ID IS NULL');
1461: END IF;
1462: IF ((l_govt_non_govt_ind = 'F' AND l_feeder_flag = 'Y') OR (l_govt_non_govt_ind = 'F' AND l_feeder_flag = 'N' AND party_info_tab(i).elim_dept = '00')) THEN
1463: IF (party_info_tab(i).elim_dept IS NULL OR party_info_tab(i).elim_dept = '00') THEN

Line 1460: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'VENDOR ID IS NULL');

1456: null;
1457: end;
1458: IF (party_info_tab(i).party_id IS NULL) THEN
1459: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1460: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'VENDOR ID IS NULL');
1461: END IF;
1462: IF ((l_govt_non_govt_ind = 'F' AND l_feeder_flag = 'Y') OR (l_govt_non_govt_ind = 'F' AND l_feeder_flag = 'N' AND party_info_tab(i).elim_dept = '00')) THEN
1463: IF (party_info_tab(i).elim_dept IS NULL OR party_info_tab(i).elim_dept = '00') THEN
1464: party_info_tab(i).reported_status := 'W';

Line 1470: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1466: party_info_tab(i).elim_dept := '00';
1467: ELSE
1468: party_info_tab(i).record_category := 'REPORTED';
1469: END IF;
1470: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1471: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'Recipient Name: ' || party_info_tab(i).recipient_name);
1472: END IF;
1473: -- Govt Non Govt Indicator = Y
1474: ELSIF ((l_govt_non_govt_ind = 'Y' AND l_feeder_flag = 'Y') OR (l_govt_non_govt_ind = 'Y' AND l_feeder_flag = 'N')) THEN

Line 1471: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'Recipient Name: ' || party_info_tab(i).recipient_name);

1467: ELSE
1468: party_info_tab(i).record_category := 'REPORTED';
1469: END IF;
1470: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1471: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'Recipient Name: ' || party_info_tab(i).recipient_name);
1472: END IF;
1473: -- Govt Non Govt Indicator = Y
1474: ELSIF ((l_govt_non_govt_ind = 'Y' AND l_feeder_flag = 'Y') OR (l_govt_non_govt_ind = 'Y' AND l_feeder_flag = 'N')) THEN
1475: IF (party_info_tab(i).elim_dept IS NULL) THEN

Line 1486: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1482: party_info_tab(i).reported_status := 'R';
1483: party_info_tab(i).record_category := 'REPORTED';
1484: party_info_tab(i).g_ng_indicator := 'F';
1485: END IF;
1486: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1487: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'Recipient Name: ' || party_info_tab(i).recipient_name);
1488: END IF;
1489: END IF; -- Govt Non Govt = F or Y
1490: ELSE -- l_vendor_id IS NOT NULL

Line 1487: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'Recipient Name: ' || party_info_tab(i).recipient_name);

1483: party_info_tab(i).record_category := 'REPORTED';
1484: party_info_tab(i).g_ng_indicator := 'F';
1485: END IF;
1486: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1487: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, 'Recipient Name: ' || party_info_tab(i).recipient_name);
1488: END IF;
1489: END IF; -- Govt Non Govt = F or Y
1490: ELSE -- l_vendor_id IS NOT NULL
1491: IF (l_feeder_flag = 'Y') THEN

Line 1501: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1497: ELSE
1498: party_info_tab(i).reported_status := 'W';
1499: party_info_tab(i).record_category := 'G_NONFED_VENDOR';
1500: END IF;
1501: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1502: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);
1503: END IF;
1504: ELSIF (l_govt_non_govt_ind = 'F' AND party_info_tab(i).elim_dept IS NULL) THEN
1505: party_info_tab(i).reported_status := 'R';

Line 1502: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);

1498: party_info_tab(i).reported_status := 'W';
1499: party_info_tab(i).record_category := 'G_NONFED_VENDOR';
1500: END IF;
1501: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1502: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);
1503: END IF;
1504: ELSIF (l_govt_non_govt_ind = 'F' AND party_info_tab(i).elim_dept IS NULL) THEN
1505: party_info_tab(i).reported_status := 'R';
1506: party_info_tab(i).elim_dept := '00';

Line 1510: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1506: party_info_tab(i).elim_dept := '00';
1507: --l_govt_non_govt_ind := 'F';
1508: party_info_tab(i).g_ng_indicator := 'F';
1509: party_info_tab(i).record_category := 'REPORTED';
1510: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1511: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);
1512: END IF;
1513: ELSIF (l_govt_non_govt_ind = 'F' AND party_info_tab(i).elim_dept IS NOT NULL) THEN
1514: party_info_tab(i).reported_status := 'R';

Line 1511: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);

1507: --l_govt_non_govt_ind := 'F';
1508: party_info_tab(i).g_ng_indicator := 'F';
1509: party_info_tab(i).record_category := 'REPORTED';
1510: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1511: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);
1512: END IF;
1513: ELSIF (l_govt_non_govt_ind = 'F' AND party_info_tab(i).elim_dept IS NOT NULL) THEN
1514: party_info_tab(i).reported_status := 'R';
1515: party_info_tab(i).record_category := 'REPORTED';

Line 1518: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1514: party_info_tab(i).reported_status := 'R';
1515: party_info_tab(i).record_category := 'REPORTED';
1516: --l_govt_non_govt_ind := 'F';
1517: party_info_tab(i).g_ng_indicator := 'F';
1518: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1519: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' GNG: F');
1520: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);
1521: END IF;
1522: ELSIF (l_govt_non_govt_ind = 'Y' AND (UPPER(party_info_tab(i).vendor_type) <> 'FEDERAL' OR party_info_tab(i).vendor_type IS NULL)) THEN

Line 1519: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' GNG: F');

1515: party_info_tab(i).record_category := 'REPORTED';
1516: --l_govt_non_govt_ind := 'F';
1517: party_info_tab(i).g_ng_indicator := 'F';
1518: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1519: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' GNG: F');
1520: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);
1521: END IF;
1522: ELSIF (l_govt_non_govt_ind = 'Y' AND (UPPER(party_info_tab(i).vendor_type) <> 'FEDERAL' OR party_info_tab(i).vendor_type IS NULL)) THEN
1523: FV_UTILITY.LOG_MESG('NOT A FEDERAL VENDOR -> ');

Line 1520: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);

1516: --l_govt_non_govt_ind := 'F';
1517: party_info_tab(i).g_ng_indicator := 'F';
1518: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1519: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' GNG: F');
1520: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);
1521: END IF;
1522: ELSIF (l_govt_non_govt_ind = 'Y' AND (UPPER(party_info_tab(i).vendor_type) <> 'FEDERAL' OR party_info_tab(i).vendor_type IS NULL)) THEN
1523: FV_UTILITY.LOG_MESG('NOT A FEDERAL VENDOR -> ');
1524: party_info_tab(i).reported_status := 'R';

Line 1529: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1525: party_info_tab(i).record_category := 'REPORTED';
1526: --l_govt_non_govt_ind := 'N';
1527: party_info_tab(i).g_ng_indicator := 'N';
1528: party_info_tab(i).elim_dept := ' ';
1529: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1530: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);
1531: END IF;
1532: ELSIF (l_govt_non_govt_ind = 'Y' AND party_info_tab(i).elim_dept IS NULL) THEN
1533: party_info_tab(i).reported_status := 'R';

Line 1530: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);

1526: --l_govt_non_govt_ind := 'N';
1527: party_info_tab(i).g_ng_indicator := 'N';
1528: party_info_tab(i).elim_dept := ' ';
1529: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1530: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);
1531: END IF;
1532: ELSIF (l_govt_non_govt_ind = 'Y' AND party_info_tab(i).elim_dept IS NULL) THEN
1533: party_info_tab(i).reported_status := 'R';
1534: party_info_tab(i).record_category := 'REPORTED';

Line 1538: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1534: party_info_tab(i).record_category := 'REPORTED';
1535: --l_govt_non_govt_ind := 'F';
1536: party_info_tab(i).g_ng_indicator := 'F';
1537: party_info_tab(i).elim_dept := '00';
1538: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1539: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);
1540: END IF;
1541: ELSIF (l_govt_non_govt_ind = 'Y' AND party_info_tab(i).elim_dept IS NOT NULL) THEN
1542: party_info_tab(i).reported_status := 'R';

Line 1539: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);

1535: --l_govt_non_govt_ind := 'F';
1536: party_info_tab(i).g_ng_indicator := 'F';
1537: party_info_tab(i).elim_dept := '00';
1538: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1539: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);
1540: END IF;
1541: ELSIF (l_govt_non_govt_ind = 'Y' AND party_info_tab(i).elim_dept IS NOT NULL) THEN
1542: party_info_tab(i).reported_status := 'R';
1543: party_info_tab(i).record_category := 'REPORTED';

Line 1546: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1542: party_info_tab(i).reported_status := 'R';
1543: party_info_tab(i).record_category := 'REPORTED';
1544: --l_govt_non_govt_ind := 'F';
1545: party_info_tab(i).g_ng_indicator := 'F';
1546: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1547: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' IN VIEW');
1548: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' VENDOR ID IS NOT NULL (' || party_info_tab(i).party_ID || ')');
1549: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' ELIMINATIONS ID IS NOT NULL');
1550: END IF;

Line 1547: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' IN VIEW');

1543: party_info_tab(i).record_category := 'REPORTED';
1544: --l_govt_non_govt_ind := 'F';
1545: party_info_tab(i).g_ng_indicator := 'F';
1546: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1547: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' IN VIEW');
1548: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' VENDOR ID IS NOT NULL (' || party_info_tab(i).party_ID || ')');
1549: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' ELIMINATIONS ID IS NOT NULL');
1550: END IF;
1551: END IF; -- l_govt_non_govt_ind

Line 1548: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' VENDOR ID IS NOT NULL (' || party_info_tab(i).party_ID || ')');

1544: --l_govt_non_govt_ind := 'F';
1545: party_info_tab(i).g_ng_indicator := 'F';
1546: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1547: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' IN VIEW');
1548: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' VENDOR ID IS NOT NULL (' || party_info_tab(i).party_ID || ')');
1549: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' ELIMINATIONS ID IS NOT NULL');
1550: END IF;
1551: END IF; -- l_govt_non_govt_ind
1552: END IF; -- l_feeder_flag

Line 1549: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' ELIMINATIONS ID IS NOT NULL');

1545: party_info_tab(i).g_ng_indicator := 'F';
1546: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1547: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' IN VIEW');
1548: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' VENDOR ID IS NOT NULL (' || party_info_tab(i).party_ID || ')');
1549: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' ELIMINATIONS ID IS NOT NULL');
1550: END IF;
1551: END IF; -- l_govt_non_govt_ind
1552: END IF; -- l_feeder_flag
1553: END IF; -- l_vendor_id

Line 1560: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1556: party_info_tab(i).reported_status := 'R';
1557: --l_govt_non_govt_ind := 'F';
1558: party_info_tab(i).g_ng_indicator := 'F';
1559: party_info_tab(i).record_category := 'REPORTED';
1560: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1561: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' IN VIEW');
1562: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' ELIMINATIONS ID IS NOT NULL');
1563: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);
1564: END IF;

Line 1561: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' IN VIEW');

1557: --l_govt_non_govt_ind := 'F';
1558: party_info_tab(i).g_ng_indicator := 'F';
1559: party_info_tab(i).record_category := 'REPORTED';
1560: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1561: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' IN VIEW');
1562: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' ELIMINATIONS ID IS NOT NULL');
1563: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);
1564: END IF;
1565: END IF; -- l_govt_non_govt_ind

Line 1562: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' ELIMINATIONS ID IS NOT NULL');

1558: party_info_tab(i).g_ng_indicator := 'F';
1559: party_info_tab(i).record_category := 'REPORTED';
1560: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1561: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' IN VIEW');
1562: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' ELIMINATIONS ID IS NOT NULL');
1563: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);
1564: END IF;
1565: END IF; -- l_govt_non_govt_ind
1566: END IF; -- l_feeder_system

Line 1563: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);

1559: party_info_tab(i).record_category := 'REPORTED';
1560: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1561: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' IN VIEW');
1562: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' ELIMINATIONS ID IS NOT NULL');
1563: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name, ' RECIPIENT NAME: ' || party_info_tab(i).RECIPIENT_NAME);
1564: END IF;
1565: END IF; -- l_govt_non_govt_ind
1566: END IF; -- l_feeder_system
1567: log(l_module_name, 'Ending get_party_info with....');

Line 1592: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name|| '.final_exception',gbl_err_buff);

1588: EXCEPTION
1589: WHEN OTHERS THEN
1590: gbl_err_code := 2 ;
1591: gbl_err_buff := 'GET_PARTY_INFO - Exception (Others) - ' || TO_CHAR(SQLCODE) || ' - ' || SQLERRM;
1592: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name|| '.final_exception',gbl_err_buff);
1593: END get_party_info;
1594: --------------------------------------------------------------------------------
1595: PROCEDURE INSERT_EXCEPTION_RECS
1596: IS

Line 1629: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name|| gbl_err_buff);

1625: EXCEPTION
1626: WHEN OTHERS THEN
1627: gbl_err_code := 2 ;
1628: gbl_err_buff := l_module_name||' - When others exception - ' || TO_CHAR(SQLCODE) || ' - ' || SQLERRM;
1629: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name|| gbl_err_buff);
1630: END insert_exception_recs;
1631: --------------------------------------------------------------------------------
1632: PROCEDURE SUBMIT_EXCEPTION_REPORT
1633: IS

Line 1658: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);

1654: FV_UTILITY.LOG_MESG(l_module_name|| ' Request ID for exception report = '|| TO_CHAR(L_REQ_ID));
1655: IF (l_req_id = 0) THEN
1656: gbl_err_code := '2';
1657: gbl_err_buff := 'Cannot submit FACTS Exception report';
1658: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,gbl_err_buff);
1659: RETURN;
1660: ELSE
1661: COMMIT;
1662: call_status := Fnd_concurrent.Wait_for_request(l_req_id, 20, 0, rphase, rstatus, dphase, dstatus, MESSAGE);

Line 1711: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, gbl_err_buff);

1707: NULL;
1708: WHEN OTHERS THEN
1709: gbl_err_code := SQLCODE;
1710: gbl_err_buff := SQLERRM || 'When others error in UPDATE_FACTS1_RUN - '||SQLERRM;
1711: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, gbl_err_buff);
1712: END UPDATE_FACTS1_RUN;
1713: --------------------------------------------------------------------------------
1714: PROCEDURE get_reference_column
1715: (

Line 1908: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'NO DATA FOUND WHEN SOURCE = :'||p_entity_code);

1904: log(l_module_name,'line_amount: '||p_party_info_tab(i).party_line_amount);
1905: log(l_module_name,'vendor_type: '||p_party_info_tab(i).vendor_type);
1906: EXCEPTION
1907: WHEN NO_DATA_FOUND THEN
1908: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, 'NO DATA FOUND WHEN SOURCE = :'||p_entity_code);
1909: p_party_info_tab(i).party_line_amount := be_rec.amount;
1910: p_party_info_tab(i).recipient_name := 'Other';
1911: END;
1912: i := i + 1;

Line 2004: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, gbl_err_buff);

2000: END LOOP;
2001: if i<=1 then
2002: gbl_run_process:='N';
2003: gbl_err_buff :='No data found error for PROJECTS get_reference_column- '||SQLERRM;
2004: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, gbl_err_buff);
2005: RETURN;
2006: end if;
2007: END IF;
2008:

Line 2014: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, gbl_err_buff);

2010: IF i <=1 THEN
2011: gbl_err_code := SQLCODE;
2012: --gbl_err_code :=2;
2013: gbl_err_buff :='No data found error in get_reference_column - '||SQLERRM;
2014: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, gbl_err_buff);
2015: RETURN;
2016: END IF ;
2017: EXCEPTION
2018: WHEN NO_DATA_FOUND THEN

Line 2022: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, gbl_err_buff);

2018: WHEN NO_DATA_FOUND THEN
2019: gbl_err_code := SQLCODE;
2020: --gbl_err_code :=0;
2021: gbl_err_buff := 'No data found error in get_reference_column - '||SQLERRM;
2022: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, gbl_err_buff);
2023: WHEN OTHERS THEN
2024: gbl_err_code := SQLCODE;
2025: gbl_err_buff := 'When others error in get_reference_column - '||SQLERRM;
2026: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, gbl_err_buff);

Line 2026: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, gbl_err_buff);

2022: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, gbl_err_buff);
2023: WHEN OTHERS THEN
2024: gbl_err_code := SQLCODE;
2025: gbl_err_buff := 'When others error in get_reference_column - '||SQLERRM;
2026: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, gbl_err_buff);
2027: END get_reference_column;
2028: --------------------------------------------------------------------------------
2029: BEGIN
2030: g_module_name := 'fv.plsql.FV_FACTS1_GL_PKG.';