-------- -----------------------------------------------------------------
9/5      PL/SQL: SQL Statement ignored
12/2     PL/SQL: ORA-00911: invalid character

 CREATE OR REPLACE PACKAGE BODY APPS.xbsi_printer_pkg
 AS
 PROCEDURE printer_select (errbuf OUT VARCHAR2
                         ,   retcode OUT VARCHAR2
                         ,   p_name  FND_CONCURRENT_PROGRAMS.PRINTER_NAME%Type
                         ,   C_name  fnd_concurrent_programs_tl.USER_CONCURRENT_PROGRAM_NAME%TYPe
     IS
 BEGIN    
     UPDATE fnd_concurrent_programs
     SET printer_name = p_name
     WHERE concurrent_program_id = (SELECT concurrent_program_id FROM fnd_concurrent_programs_tl

                                    where  USER_CONCURRENT_PROGRAM_NAME = C_name);--COMMIT; 
    END printer_select;
 END xbsi_printer_pkg;
 /

SQL> l
  1  CREATE OR REPLACE PACKAGE BODY xbsi_printer_pkg
  2   AS
  3   PROCEDURE printer_select (errbuf OUT VARCHAR2
  4                           ,   retcode OUT VARCHAR2
  5                           ,   p_name  FND_CONCURRENT_PROGRAMS.PRINTER_NAME%Type
  6                           ,   C_name  fnd_concurrent_programs_tl.USER_CONCURRENT_PROGRAM_NAME%TYPe
  7       IS
  8   BEGIN
  9       UPDATE fnd_concurrent_programs
 10       SET printer_name = p_name
 11       WHERE concurrent_program_id = (SELECT concurrent_program_id FROM fnd_concurrent_programs_tl
 12
 13                                      where  USER_CONCURRENT_PROGRAM_NAME = C_name);--COMMIT;
 14      END printer_select;
 15*  END xbsi_printer_pkg;
SQL> /

Warning: Package Body created with compilation errors.

SQL> sho err
Errors for PACKAGE BODY XBSI_PRINTER_PKG:
LINE/COL ERROR
-------- -------------------------------------------------------------------------------------
7/6      PLS-00103: Encountered the symbol "IS" when expecting one of the following:
         := ) , default character
         The symbol ")" was substituted for "IS" to continue.

SQL> set sqlblanklines on
SQL> select *
  2
  3  from dual
  4  /
D
-
X

1 row selected.