1: PACKAGE BODY PO_VENDORS_SV as
2: /* $Header: POXVDVEB.pls 120.4.12020000.3 2013/02/10 15:34:12 vegajula ship $*/
3:
4: -- Read the profile option that enables/disables the debug log
5: g_asn_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('PO_RVCTP_ENABLE_TRACE'),'N');
6:
7: /*===========================================================================
8:
9: FUNCTION NAME: val_vendor()
1145: dbms_sql.close_cursor(cid);
1146: END IF;
1147: p_vendor_record.error_record.error_status := 'U';
1148: p_vendor_record.error_record.error_message := sqlerrm;
1149: IF (g_asn_debug = 'Y') THEN
1150: asn_debug.put_line(p_vendor_record.error_record.error_message);
1151: END IF;
1152:
1153: END derive_vendor_info;
1146: END IF;
1147: p_vendor_record.error_record.error_status := 'U';
1148: p_vendor_record.error_record.error_message := sqlerrm;
1149: IF (g_asn_debug = 'Y') THEN
1150: asn_debug.put_line(p_vendor_record.error_record.error_message);
1151: END IF;
1152:
1153: END derive_vendor_info;
1154:
1315: dbms_sql.close_cursor(X_cid);
1316: END IF;
1317: p_vendor_record.error_record.error_message := sqlerrm;
1318: p_vendor_record.error_record.error_status := 'U';
1319: IF (g_asn_debug = 'Y') THEN
1320: asn_debug.put_line(p_vendor_record.error_record.error_message);
1321: END IF;
1322: -- raise;
1323:
1316: END IF;
1317: p_vendor_record.error_record.error_message := sqlerrm;
1318: p_vendor_record.error_record.error_status := 'U';
1319: IF (g_asn_debug = 'Y') THEN
1320: asn_debug.put_line(p_vendor_record.error_record.error_message);
1321: END IF;
1322: -- raise;
1323:
1324: END validate_vendor_info;