/*  Procedure INC_PAGO  */
CREATE OR REPLACE PROCEDURE INC_PAGO(NUMPAGO OUT NUMBER) IS
begin
   Select INCPAGO.nextval into NUMPAGO
   from dual;
end;
/
 
/*  Procedure INC_SAL_PEND  */
CREATE OR REPLACE PROCEDURE INC_SAL_PEND(NUM_SALDO_PENDIENTE OUT NUMBER) IS 
BEGIN
   Select INC_SALDOS_PENDIENTES.nextval into NUM_SALDO_PENDIENTE
   from dual;
end;
/
 
/*  Procedure INCABONNE  */
CREATE OR REPLACE PROCEDURE INCABONNE(NUMABONNE OUT NUMBER) IS    
begin
   Select IncNumAbonne.nextval into NumAbonne
   from dual;
end;
/
 
/*  Procedure INCAPPEL  */
CREATE OR REPLACE PROCEDURE INCAPPEL(NUMAPPEL OUT NUMBER) IS 
begin
   Select IncNumAppel.nextval into NumAppel
   from dual;
end;
/
 
/*  Procedure INCBN  */
CREATE OR REPLACE PROCEDURE INCBN(NUMBN OUT NUMBER) IS 
begin
   Select IncNumBN.nextval into NumBN
   from dual;
end;
/
 
/*  Procedure INCBNINT  */
CREATE OR REPLACE PROCEDURE INCBNINT(NUMBNINT OUT NUMBER) IS   
begin
   Select IncNumBNINT.nextval into NumBNInt
   from dual;
end;
/
 
/*  Procedure INCCAMBIO  */
CREATE OR REPLACE PROCEDURE INCCAMBIO(NUMCAMBIO OUT NUMBER) IS      
begin
   Select IncNumCAMBIO.nextval into NumCAMBIO
   from dual;
end;
/
 
/*  Procedure INCEC  */
CREATE OR REPLACE PROCEDURE INCEC(NUMEC OUT NUMBER) IS 
begin
   Select IncNumEC.nextval into NumEC
   from dual;
end;
/
 
/*  Procedure INCHIST  */
CREATE OR REPLACE PROCEDURE INCHIST(NUMHIST  OUT NUMBER) IS   
begin
   Select IncNumHist.nextval into NumHist
   from dual;
end;
/
 
/*  Procedure INCIMP  */
CREATE OR REPLACE PROCEDURE INCIMP(NUMIMP OUT NUMBER) IS  
begin
   Select IncNumImp.nextval into Numimp
   from dual;
end;
/
 
/*  Procedure INCITV  */
CREATE OR REPLACE PROCEDURE INCITV(NUMITV OUT NUMBER) IS  
begin
   Select IncNumITV.nextval into NumITV
   from dual;
end;
/
 
/*  Procedure INCLOGIN  */
CREATE OR REPLACE PROCEDURE INCLOGIN(NUMLOGIN OUT NUMBER) IS   
begin
   Select INCNUMLOGIN.nextval into NUMLOGIN
   from dual;
end;
/
 
/*  xxx Procedure INCLOGRELOJ  */
CREATE OR REPLACE PROCEDURE INCLOGRELOJ(ID OUT NUMBER) IS 
begin
   Select INCLOGRELOJX.nextval into ID
   from dual;
end;
/
 
/*  Procedure INCMAIL  */
CREATE OR REPLACE PROCEDURE INCMAIL(NUMMAIL OUT NUMBER) IS   
begin
   Select INCNUMMAIL.nextval into NUMMAIL
   from dual;
end;
/
 
/*  Procedure INCMOUVEMENT  */
CREATE OR REPLACE PROCEDURE INCMOUVEMENT(NUMMOUVEMENT OUT NUMBER) IS      
begin
   Select IncNumMouvement.nextval into NumMouvement
   from dual;
end;
/
 
/*  Procedure INCNUMIP  */
CREATE OR REPLACE PROCEDURE INCNUMIP(NUMIP OUT NUMBER) IS  
begin
   Select INCIP.nextval into NumIP
   from dual;
end;
/
 
/*  xxx Procedure INCNUMLOTE  */
CREATE OR REPLACE PROCEDURE INCNUMLOTE(NUMLOTE OUT NUMBER) IS      
begin
   Select IncNumLoteX.nextval into NumLote
   from dual;
end;
/
 
/*  Procedure INCORDREPPV  */
CREATE OR REPLACE PROCEDURE INCORDREPPV(NUMORDREPPV OUT NUMBER) IS     
begin
   Select IncNumordrePPV.nextval into NumOrdrePPV
   from dual;
end;
/
 
/*  Procedure INCPAYAV  */
CREATE OR REPLACE PROCEDURE INCPAYAV(NUMPIECE OUT NUMBER) IS     
begin
   Select IncNumPAYAV.nextval into NumPIECE
   from dual;
end;
/
 
/*  Procedure INCRDV  */
CREATE OR REPLACE PROCEDURE INCRDV(NUMRDV OUT NUMBER) IS  
begin
   Select IncNumRDV.nextval into NumRDV
   from dual;
end;
/
 
/*  Procedure INCRECH  */
CREATE OR REPLACE PROCEDURE INCRECH(NUMRECH OUT NUMBER) IS  
begin
   Select IncNumrech .nextval into Numrech
   from dual;
end;
/
 
/*  Procedure INCRECU  */
CREATE OR REPLACE PROCEDURE INCRECU(NUMRECU OUT NUMBER) IS 
begin
   Select IncNumRecu.nextval into NumRecu
   from dual;
end;
/
 
/*  Procedure INCROLE  */
CREATE OR REPLACE PROCEDURE INCROLE(NUMROLE OUT NUMBER) IS       
begin
   Select IncNumROLE.nextval into NumROLE
   from dual;
end;
/
 
/*  Procedure INCSOC  */
CREATE OR REPLACE PROCEDURE INCSOC(NUMSOC OUT NUMBER) IS 
begin
   Select IncNumSoc.nextval into NumSoc
   from dual;
end;
/
 
/*  Procedure INCSTATRECO  */
CREATE OR REPLACE PROCEDURE INCSTATRECO(NUMSTATRECO OUT NUMBER) IS  
begin
   Select IncNumSTATRECO.nextval into NumSTATRECO
   from dual;
end;
/
 
/*  xxx Procedure INCTRANSACDLA  */
CREATE OR REPLACE PROCEDURE INCTRANSACDLA(NUMTRANSACDLA OUT NUMBER) IS    
begin
   Select IncTransacDLAX.nextval into NumTransacDLA
   from dual;
end;
/
 
/*  Procedure INCVENTE  */
CREATE OR REPLACE PROCEDURE INCVENTE(NUMVENTE OUT NUMBER) IS 
begin
   Select IncNumVente.nextval into NumVente
   from dual;
end;
/
 
/*  Procedure INCVISITE  */
CREATE OR REPLACE PROCEDURE INCVISITE(NUMVISITE OUT NUMBER) IS 
begin
   Select IncNumVisite.nextval into NumVisite
   from dual;
end;
/

/* Nuevos */

CREATE OR REPLACE PROCEDURE INC_PL(NUM_PAGO OUT NUMBER) IS
begin
   Select Gen_Pl.nextval INTO NUM_PAGO
   from dual;
end;
/

CREATE OR REPLACE PROCEDURE INC_SOLI_CAMB_PREC(IDSOLICITUD OUT NUMBER) IS
BEGIN
   Select SOLICITUD_CABIO_PRECIO_GEN.nextval into IDSOLICITUD
   from dual;
END;
/
