RE: Error in Package

From: Ramon Estevez <com.banilejas_at_codetel.net.do>
Date: Mon, 17 Dec 2001 11:24:56 -0800
Message-ID: <F001.003DE359.20011217110117@fatcity.com>

Thanks
Jack, Igor and all that reply.
 
Ramon E.
Estevez
<A
href="mailto:com.banilejas_at_codetel.net.do">com.banilejas_at_codetel.net.do Dominican Republic
809-565-3121

  <FONT face=Tahoma
  size=2>-----Mensaje original-----De: root_at_fatcity.com   [mailto:root_at_fatcity.com]En nombre de Jack C. ApplewhiteEnviado   el: Monday, 17 December, 2001 11:45 AMPara: Multiple recipients   of list ORACLE-LAsunto: RE: Error in Package   <SPAN
  class=968394416-17122001>Ramon,
  <SPAN
  class=968394416-17122001> 
  <SPAN
  class=968394416-17122001>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.
  <SPAN
  class=968394416-17122001> 
  <SPAN
  class=968394416-17122001>Jack

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

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

<FONT face=Tahoma

    size=2>-----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> 
<FONT

    size=3>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 - 13:24:56 CST