ALTER TABLE PARAMETROS ADD NRO_PUNTO_VENTA_PORTAL INTEGER DEFAULT 0 NOT NULL ;
-----
ALTER TABLE PARAMETROS ADD NRO_RECIBO_PORTAL INTEGER DEFAULT 0 NOT NULL ;
-----
CREATE PROCEDURE PROXIMO_RECIBO (E_PORTAL BOOLEAN)
RETURNS (
  NRO_PUNTO_VENTA INTEGER,
  NUMERO_RECIBO INTEGER
)
AS
BEGIN
  IF (:E_PORTAL) THEN BEGIN
    UPDATE PARAMETROS SET NRO_RECIBO_PORTAL = NRO_RECIBO_PORTAL + 1; 
    SELECT
        NRO_PUNTO_VENTA_PORTAL,
        NRO_RECIBO_PORTAL
      FROM PARAMETROS
      INTO
        :NRO_PUNTO_VENTA,
        :NUMERO_RECIBO;
  END ELSE BEGIN
    UPDATE PARAMETROS SET NRO_RECIBO = NRO_RECIBO + 1; 
    SELECT
        NRO_PUNTO_VENTA,
        NRO_RECIBO
      FROM PARAMETROS
      INTO
        :NRO_PUNTO_VENTA,
        :NUMERO_RECIBO;
  END
  SUSPEND;
END

