# Haga todo los cambios y monte todo.
# Eso si lo de pago en linea no lo suelte hasta que usted haga algunas pruebas
# y verifiquemos que funciona. Pruebe reversar tambien.



create table xxvp as select * from venpeloperacion;
drop table venpeloperacion;
create table venpeloperacion
( cia            char(3)      not null,
  caja           char(3)      not null,
  documento      number(10)   not null,
  mensaje        varchar2(4)  not null,
  lectura        varchar2(3)  not null,
  tarjeta        varchar2(19) not null,
  vence          varchar2(4)  not null,
  fecha          date         not null,
  cliente        varchar2(25) not null,
  nombre         varchar2(50) not null,
  monto          number(14,2) not null,
  terminal       varchar2(8)  not null,
  dia            date         not null,
  usuario        varchar2(30) not null,
  banda          varchar2(40),
  pago           number(10),
  consecutivo    varchar2(10),
  referencia     varchar2(12),
  autorizacion   varchar2(6),
  respuesta      varchar2(2),
  estado         char(1)     not null
     constraint venpeloperacion_estado_ck check (estado in ('I','P','E','A','R')),
  constraint venpeloperacion_pk 
     primary key(cia, caja, documento)
);


insert into venpeloperacion
select cia, caja, documento, decode(mensaje,'A','0200','0400'),'020',tarjeta,
       vence, fecha, cliente, nombre, monto, terminal, dia, usuario,
       banda, pago, consecutivo, referencia, autorizacion, respuesta, estado
from xxvp;

start ventas\eclientpkg.sql
start ventas\eclientbod.sql

insert into genprefscla (MODULO, OBJETO,  CLAVE, DESCRIPCION)
values ('POS', 'PTOVENTAS','PRE.BODEGAUBI','Bodega para ubicacion de apartados:');

alter table aprentrega add(bodega char(3));