Multiple Case statements in Select generates an error when compiled into a pkg/stored procedure

oracle 8.1.7 database using oracle 9.2.0.4 client. (eventually I will use this in vb.net with odp.net 9.2.0.4.1, very similar error by the way.)

The select statement works very good in sqlplus just the way it is. (The schema's have been changed to protect the innocent.)

One site I found said you can wrap the sql in an execute immediate, but I do not know how to do this within a package, nor with the code below.

The following error is generated when compiling the pkg:
( I inserted the ==>8)

*******
PACKAGE BODY testprod.QUOTE1_DBPKG
On line:  8
PLS-00103: Encountered the symbol "CASE" when expecting one of the following:

   ( - + mod null <an identifier>
   <a double-quoted delimited-identifier> <a bind variable>
   table avg count current
********
my Package code:
CREATE OR REPLACE PACKAGE testprod.QUOTE1_DBPKG AS
  TYPE QuoteCur IS REF CURSOR;
  PROCEDURE GetForSelect (QuoteOutCur OUT QuoteCur);

END QUOTE1_DBPKG;
Package created
 
CREATE OR REPLACE PACKAGE BODY testprod.QUOTE1_DBPKG AS
  PROCEDURE GetForSelect (QuoteOutCur OUT QuoteCur)
  IS
  LocalQuoteCur QuoteCur;
  BEGIN
         OPEN LocalQuoteCur FOR
   SELECT q.quote_key as Quote_Key, q.is_nc_merchant,
==>8         CASE
             WHEN q.is_nc_merchant = 1 THEN (select customer_name
                     from testprod.non_customer nc
                    where q.MERCHANT_CUST_KEY = nc.CUSTOMER_KEY)
             ELSE (select customer_name
                     from prod.customer c
                    where q.MERCHANT_CUST_KEY = c.CUSTOMER_KEY)
             END as Merchant,
         CASE
             WHEN q.is_nc_merchant = 1 THEN (select city
                     from testprod.non_customer nc
                    where q.MERCHANT_CUST_KEY = nc.CUSTOMER_KEY)
             ELSE (select city
                     from prod.customer c
                    where q.MERCHANT_CUST_KEY = c.CUSTOMER_KEY)
             END as Merchant_City,
         CASE
             WHEN q.is_nc_merchant = 1 THEN (select state_code
                     from testprod.non_customer nc
                    where q.MERCHANT_CUST_KEY = nc.CUSTOMER_KEY)
             ELSE (select state_code
                     from prod.customer c
                    where q.MERCHANT_CUST_KEY = c.CUSTOMER_KEY)
             END as Merchant_St,
             q.is_nc_printer,
         CASE
             WHEN q.is_nc_Printer = 1 THEN (select customer_name
                     from testprod.non_customer nc
                    where q.Printer_CUST_KEY = nc.CUSTOMER_KEY)
             ELSE (select customer_name
                     from prod.customer c
                    where q.Printer_CUST_KEY = c.CUSTOMER_KEY)
             END as Printer,
         CASE
             WHEN q.is_nc_Printer = 1 THEN (select city
                     from testprod.non_customer nc
                    where q.Printer_CUST_KEY = nc.CUSTOMER_KEY)
             ELSE (select city
                     from prod.customer c
                    where q.Printer_CUST_KEY = c.CUSTOMER_KEY)
             END as Printer_City,
         CASE
             WHEN q.is_nc_Printer = 1 THEN (select state_code
                     from testprod.non_customer nc
                    where q.Printer_CUST_KEY = nc.CUSTOMER_KEY)
             ELSE (select state_code
                     from prod.customer c
                    where q.Printer_CUST_KEY = c.CUSTOMER_KEY)
             END as Printer_St,
             s.product_line_desc, s.part_master_desc, q.quote_date,
             q.is_order, q.order_nbr
       FROM testprod.quote q,
         testprod.spec s
       WHERE(s.spec_key(+) = q.spec_key)
       ORDER BY QUOTE_KEY;
    QuoteOutCur := LocalQuoteCur;
  END GetForSelect;
END QUOTE1_DBPKG;
Warning: Package body created with compilation errors
 
COMMIT
Commit complete
 
/
GRANT EXECUTE ON  testprod.QUOTE_DBPKG TO testprod_USER_ROLE
Grant succeeded
 
/
COMMIT
Commit complete
 
/