home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a524 / 37.ddi / demo / demo3_pls.sql < prev    next >
Encoding:
Text File  |  1991-03-04  |  434 b   |  13 lines

  1. rem
  2. rem $Header: demo3_pls.sql,v 6.1 90/02/16 18:40:06 nsalah Exp $ demo3_pls.sql Copyr (c) 1989 Oracle
  3. rem
  4. DECLARE
  5.     prod_name   inventory_table.product%TYPE;
  6.         /* prod_name will automatically have the same length **
  7.         **  as the inventory_table.product column.           */
  8. BEGIN
  9.     SELECT product INTO prod_name FROM inventory_table
  10.       WHERE prod_id = 2741;
  11.     INSERT INTO temp(message) VALUES (prod_name);
  12. END;
  13.