Alta de registros

Me da error de expecion y no se porque no añade el registro: este es el código de mi button:
Declare
xcan NUMBER;
BEGIN
SELECT COUNT(*) INTO xcan
FROM socio WHERE ci=:socio.ci;
IF xcan>=1 THEN
message('El Registro ya existe');
pause;
ELSE
INSERT INTO socio (ci,nombre,apepat,apemat,direcc,fec_nac,sexo)
VALUES(
:socio.ci||:socio.oci,
:Socio. Nombre,
:Socio.apepat,
:Socio.apemat,
:socio.direcc,
TO_DATE(:socio.fec_nac,'dd-mm-yyyy'),
:Socio. Sexo
);
COMMIT;
END IF;
EXCEPTION
WHEN OTHERS THEN
message('Error Indefinido');
pause;
END;
** otra interrogante tengo los botones en el mismo bloque de datos que los campos text .. Es correcto ??? Que me aconseja ??
1

1 Respuesta

24.050 pts. Experto Oracle PL/SQL, DBA
Con respecto a Forms no puedo ayudarte mucho...
Con respecto a porque no hace el INSERT, debes ver exactamente el error de Oracle que te da (oerrm) ORA-XXX, y ahí podrás solucionarlo o bien poner udbms. output_put. Line() para imprimir el insert y bien debuguear el procedure para ver que trae valores para insertar o algún campo está vacío...
Éxitos!
:=)

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas