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