RE: Error in Package

From: Jack C. Applewhite <japplewhite_at_inetprofit.com>
Date: Mon, 17 Dec 2001 09:13:12 -0800
Message-ID: <F001.003DE092.20011217084526@fatcity.com>

Ramon,

You've
declared the Procedure SELECCIONAR differently in the package spec and body. Oracle must think you're creating an overloaded procedure with different arguments for each version. The spec and body declarations must match.

Jack

--------------------------------Jack C.

ApplewhiteDatabase Administrator/DeveloperOCP Oracle8 DBAiNetProfit, Inc.Austin,
Texaswww.iNetProfit.comjapplewhite_at_inetprofit.com(512)327-9068

-----Original Message-----From: root_at_fatcity.com [mailto:root_at_fatcity.com]On Behalf Of Ramon EstevezSent: Monday, December 17, 2001 9:21 AMTo: Multiple recipients of list ORACLE-LSubject: Error in Package
 Hi
 List,
<SPAN

 class=995141516-17122001>
 What is wrong with this
 package, I compared it to one example in a book and looks equal, but still
 get an error.
<SPAN

 class=995141516-17122001>
 CREATE OR
 REPLACE PACKAGE MANTENIMIENTO_COMPROBANTES AS TYPE COMPROBANTES_RECORD IS

  RECORD        ( 
            
  GRUPO

  COMPROBANTES.GRUPO%TYPE,
  COMPANIA
  COMPROBANTES.AGENCIA%TYPE,
  TIPO_COMPROBANTE
  COMPROBANTES.TIPO_COMPROBANTE%TYPE,            COMPROBANTE
  COMPROBANTES.COMPROBANTE%TYPE,

  FECHA

  COMPROBANTES.FECHA%TYPE,
  AG_CUENTA
  COMPROBANTES.AG_CUENTA%TYPE,

  CUENTA

  COMPROBANTES.CUENTA%TYPE,
  DETALLE
  COMPROBANTES.DETALLE%TYPE,
  CONCEPTO
  COMPROBANTES.CONCEPTO%TYPE,
  ESTATUS
  COMPROBANTES.ESTATUS%TYPE,
  ESTATUS_IMPRESION
  COMPROBANTES.ESTATUS_IMPRESION%TYPE,            DESC_AGENCIA
  AGENCIAS.DESCRIPCION%TYPE,
  CUENTA_CONTABLE
  DATOS_BALANCES.CUENTA_CONTABLE%TYPE,            DESC_CUENTA
  CUENTAS.DESCRIPCION%TYPE,
  DESC_CLIENTE
  CLIENTES.NOMBRE_COMERCIAL%TYPE           );---- Para Seleccionar Registros de la Tabla--        TYPE COMPROBANTES_REFCURSOR IS REF   CURSOR        RETURN
  COMPROBANTES_RECORD;---- Para Instrucciones   DML--     TYPE
  TABLA_COMPROBANTES        IS TABLE OF   COMPROBANTES_RECORD        INDEX BY
  BINARY_INTEGER;---- Procedimiento para Seleccionar registros de la   tabla--     PROCEDURE SELECCIONAR
  (PCOMPROBANTESQRY IN OUT

                                    
  COMPROBANTES_REFCURSOR,

PGRUPO IN

                                    
  COMPROBANTES.GRUPO%TYPE,

PCOMPANIA IN

                                    
  COMPROBANTES.COMPANIA%TYPE,

PTIPO_COMPROBANTE IN

                                    
  COMPROBANTES.TIPO_COMPROBANTE%TYPE,

PCOMPROBANTE IN

                                    
  COMPROBANTES.COMPROBANTE%TYPE

);
<SPAN

 class=995141516-17122001>
 END
 MANTENIMIENTO_COMPROBANTES;
<SPAN

 class=995141516-17122001>
 The
 package header creates fine.
<FONT

 size=3>
<FONT

 size=3>This is the package body
<FONT

 size=3>
<FONT

 size=3>
 1
 -- 2 -- Desarrollo del Paquete para Mantenimiento Tabla de Comprobantes 3 -- 4 CREATE OR REPLACE PACKAGE BODY MANTENIMIENTO_COMPROBANTES AS 5 -- 6 -- Procedimiento para Seleccionar registros de la tabla 7 -- 8 PROCEDURE SELECCIONAR
 (PCOMPROBANTESQRY IN OUT COMPROBANTES_REFCURSOR,

  9                              
  PGRUPO            IN 
  NUMBER, 10

PCOMPANIA IN

  NUMBER, 11

PTIPO_COMPROBANTE IN

  NUMBER, 12

  PCOMPROBANTE      IN NUMBER)
  IS 13
  BEGIN 14          OPEN
  PCOMPROBANTESQRY 15

  FOR 16          SELECT 
  C.GRUPO,           
  C.COMPANIA,          
  C.TIPO_COMPROBANTE, 17                 
  C.COMPROBANTE,     
  C.FECHA,             
  C.AG_CUENTA, 18                 
  C.CUENTA,          
  C.DETALLE,           
  C.CONCEPTO, 19                 
  C.ESTATUS,

C.ESTATUS_IMPRESION,

  A.DESCRIPCION 20                   
  DESC_AGENCIA,    D.CUENTA_CONTABLE,   
  CT.DESCRIPCION 21                   
  DESC_CUENTA,     CTE.NOMBRE_COMERCIAL

  DESC_CLIENTE 22
  FROM 23
  COMPROBANTES C, AGENCIAS A, DATOS_BALANCES

  D, 24             
  CUENTAS CT,     CLIENTES 
  CTE 25          
  WHERE 26             
  C.GRUPO

  PGRUPO               
  AND 27             
  C.COMPANIA            = 
  PCOMPANIA            
  AND 28

C.TIPO_COMPROBANTE = PTIPO_COMPROBANTE

  AND 29             
  C.COMPROBANTE         = 
  PCOMPROBANTE         
  AND 30             
  A.AGENCIA             
  = C.AGENCIA            
  AND 31             
  D.GRUPO(+)            = 
  C.GRUPO              
  AND 32             
  D.COMPANIA(+)         = 
  C.COMPANIA           
  AND 33             
  D.AGENCIA(+)          = 
  C.AG_CUENTA          
  AND 34             
  D.CUENTA(+)           = 
  C.CUENTA             
  AND 35             
  CT.GRUPO(+)           = 
  D.GRUPO              
  AND 36             
  CT.COMPANIA(+)        = 
  D.COMPANIA           
  AND 37             
  CT.CUENTA(+)          = 
  D.CUENTA_CONTABLE    
  AND 38

  CTE.CLIENTE           =
  D.CLIENTE; 39       END
  SELECCIONAR; 40* END MANTENIMIENTO_COMPROBANTES; 41   /

  Warning: Package
  Body created with compilation errors.

  SQL> SHOW
  ERRORS PACKAGE BODY MANTENIMIENTO_COMPROBANTES;Errors for PACKAGE BODY   MANTENIMIENTO_COMPROBANTES:

  LINE/COL
  ERROR--------

  -----------------------------------------------------------------35/16

PLS-00323: subprogram or cursor 'SELECCIONAR' is declared in a package specification
 and must be defined in the package body Any help, suggestions
 would be appreciated !!!

<SPAN

 class=995141516-17122001>
 Ramon E.
 Estevez
<A

 href="mailto:com.banilejas_at_codetel.net.do">com.banilejas_at_codetel.net.do Dominican Republic
 809-565-3121
 Received on Mon Dec 17 2001 - 11:13:12 CST