1265: END;
1266:
1267: /*===========================================================================
1268:
1269: PROCEDURE NAME: get_ap_terms()
1270:
1271: ===========================================================================*/
1272: PROCEDURE get_ap_terms(x_terms_id IN number,
1273: x_ap_terms_name IN OUT NOCOPY varchar2) is
1268:
1269: PROCEDURE NAME: get_ap_terms()
1270:
1271: ===========================================================================*/
1272: PROCEDURE get_ap_terms(x_terms_id IN number,
1273: x_ap_terms_name IN OUT NOCOPY varchar2) is
1274:
1275: x_progress varchar2(3) := '000';
1276: cursor c1 is
1269: PROCEDURE NAME: get_ap_terms()
1270:
1271: ===========================================================================*/
1272: PROCEDURE get_ap_terms(x_terms_id IN number,
1273: x_ap_terms_name IN OUT NOCOPY varchar2) is
1274:
1275: x_progress varchar2(3) := '000';
1276: cursor c1 is
1277: select name
1274:
1275: x_progress varchar2(3) := '000';
1276: cursor c1 is
1277: select name
1278: from ap_terms
1279: where term_id = x_terms_id;
1280:
1281: BEGIN
1282:
1280:
1281: BEGIN
1282:
1283: OPEN c1;
1284: FETCH c1 into x_ap_terms_name;
1285: IF c1%NOTFOUND then
1286: x_ap_terms_name := NULL;
1287: END IF;
1288: CLOSE c1;
1282:
1283: OPEN c1;
1284: FETCH c1 into x_ap_terms_name;
1285: IF c1%NOTFOUND then
1286: x_ap_terms_name := NULL;
1287: END IF;
1288: CLOSE c1;
1289:
1290: EXCEPTION
1288: CLOSE c1;
1289:
1290: EXCEPTION
1291: WHEN OTHERS THEN
1292: po_message_s.sql_error('po_inq_sv.get_ap_terms', x_progress, sqlcode);
1293: raise;
1294: END;
1295:
1296: /*===========================================================================
1324: x_wip_entity_name IN OUT NOCOPY varchar2,
1325: x_wip_line_code IN OUT NOCOPY varchar2,
1326: x_bom_resource_code IN OUT NOCOPY varchar2,
1327: x_bom_uom IN OUT NOCOPY varchar2,
1328: x_ap_terms_name IN OUT NOCOPY varchar2,
1329: x_vendor_name IN OUT NOCOPY varchar2,
1330: x_vendor_site_code IN OUT NOCOPY varchar2,
1331: --< Shared Proc FPJ Start >
1332: x_purchasing_ou_coa_id OUT NOCOPY NUMBER,
1466: FETCH c2 into x_terms_id;
1467: if c2%FOUND then
1468:
1469: x_progress := '005';
1470: get_ap_terms(x_terms_id,
1471: x_ap_terms_name);
1472: end if;
1473:
1474: CLOSE c2;
1467: if c2%FOUND then
1468:
1469: x_progress := '005';
1470: get_ap_terms(x_terms_id,
1471: x_ap_terms_name);
1472: end if;
1473:
1474: CLOSE c2;
1475: