Skip to main content
1 de 2

insert into reg.Tablas (cIdTabla,cDescripcion,cAbrev,cValor) values ('0100','TIPOS DE DOCUMENTO DE INDENTIFICACION','TipoDoc',''), ('0101','DNI','DNI',''), ('0102','PARTIDA DE NACIMIENTO','P. NAC',''), ('0103','PASAPORTE','PASS','') go

insert into reg.Tablas (cIdTabla,cDescripcion,cAbrev,cValor) values ('0200','ESTADOS CIVILES','EstCiv',''), ('0201','SOLTERO(A)','SOLT',''), ('0202','CASADO(A)','CAS',''), ('0203','VIUDO(A)','VIU',''), ('0204','DIVORCIADO(A)','DIVOR','') go

insert into reg.Parametros(cIdParametro,cParametro,cValor) values ('IdCliente','Identificador de Clientes','0000000') go

insert into reg.Agencia(cIdAgencia,cAgencia,cDireccion,dFechaReg) values ('001','OFICINA PRINCIPAL','Plaza de Armas',GETDATE()) go

insert into reg.Tablas (cIdTabla,cDescripcion,cAbrev,cValor) values ('0100','TIPOS DE DOCUMENTO DE INDENTIFICACION','TipoDoc',''), ('0101','DNI','DNI',''), ('0102','PARTIDA DE NACIMIENTO','P. NAC',''), ('0103','PASAPORTE','PASS','') go

insert into reg.Tablas (cIdTabla,cDescripcion,cAbrev,cValor) values ('0200','ESTADOS CIVILES','EstCiv',''), ('0201','SOLTERO(A)','SOLT',''), ('0202','CASADO(A)','CAS',''), ('0203','VIUDO(A)','VIU',''), ('0204','DIVORCIADO(A)','DIVOR','') go

insert into reg.Parametros(cIdParametro,cParametro,cValor) values ('IdCliente','Identificador de Clientes','0000000') go

insert into reg.Agencia(cIdAgencia,cAgencia,cDireccion,dFechaReg) values ('001','OFICINA PRINCIPAL','Plaza de Armas',GETDATE()) go

create procedure reg.SpReg_ListarTabla (@cIdTabla char(4)) as begin set nocount on

select cIdTabla, cDescripcion from reg.Tablas where cIdTabla like concat(left(@cIdTabla,2),'%') and cIdTabla <> @cIdTabla

end go

create procedure reg.SpReg_DevSecuenciaParametro (@cIdParametro varchar(15), @iTam int) as begin set nocount on

select 'Valor' = right(concat('0000000000',cast(cValor as int) + 1), @iTam) from reg.Parametros where cIdParametro = @cIdParametro

end go

create procedure reg.SpReg_GuardarSecuenciaParametro (@cIdParametro varchar(15), @cValor varchar(10)) as begin update reg.Parametros set cValor=@cValor where cIdParametro = @cIdParametro end go

create procedure reg.SpReg_RegistrarCliente ( @cIdCliente char(7) ,@cIdTipoDocu char(4) ,@cNroDocu varchar(12) ,@cApePat varchar(45) ,@cApeMat varchar(45) ,@cNombres varchar(50) ,@dFechaNac date ,@cSexo char(1) ,@cIdEstCivil char(4) ,@cDireccion varchar(80) ,@cTelefono varchar(15) ,@cIdAgencia char(3) ,@cIdUser char(6) ) as begin insert into reg.Cliente (cIdCliente ,cIdTipoDocu
,cNroDocu
,cApePat
,cApeMat
,cNombres
,dFechaNac
,cSexo
,cIdEstCivil
,cDireccion ,cTelefono
,dFechaIngreso
,dFechaReg
,cHoraReg
,cIdAgencia ,cIdUser) values (@cIdCliente
,@cIdTipoDocu
,@cNroDocu
,@cApePat
,@cApeMat
,@cNombres
,@dFechaNac ,@cSexo ,@cIdEstCivil
,@cDireccion
,@cTelefono ,getdate()
,getdate() ,CONVERT(varchar(8),getdate(),108)
,@cIdAgencia
,@cIdUser)

end go