declare @plantilla NUMERIC
select @plantilla = max(NumIdplantilla) 
	from Merlin_Plantillas

if(@plantilla is null )
	set @plantilla = 1
else 
	set @plantilla = @plantilla + 1 

INSERT INTO dbo.Merlin_Plantillas (NumIdPlantilla, StrDescripcionPlantilla, DatFechaCreacion, StrUsuario, NumIdCss, BitRequiereIdentificarTerceros, BitRequiereFirma, IntModoEncriptar, StrArchivo, StrArchivoImpresion)
VALUES (@plantilla, 'EVOLUCION VETERINARIA 2019', '2019-09-30 17:15:40.723', 'PABLO', 0, 1, 1, 0, 'Cl-2029', 'Cl-2028')


INSERT INTO dbo.Merlin_Plantillas_Secciones (NumIdplantilla, IntIdSeccion, StrSeccion, StrListaPropiedades, IntOrden)
VALUES (@plantilla, 1, 'EVOLUCION', 'BackColor = 14171687,BorderStyle = 0,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,AutoSize = .F.,BackStyle = 1,LineColor = 14171687, TitleWidth=100, CAPTION="*++**++*"', 3)


INSERT INTO dbo.Merlin_Plantillas_Secciones (NumIdplantilla, IntIdSeccion, StrSeccion, StrListaPropiedades, IntOrden)
VALUES (@plantilla, 2, 'Encabezado propietario', 'BackColor = 14171687,BorderStyle = 0,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,AutoSize = .F.,BackStyle = 1,LineColor = 14171687, TitleWidth=100, CAPTION="*++**++*"', 1)


INSERT INTO dbo.Merlin_Plantillas_Secciones (NumIdplantilla, IntIdSeccion, StrSeccion, StrListaPropiedades, IntOrden)
VALUES (@plantilla, 3, 'Encabezado Mascota', 'BackColor = 14171687,BorderStyle = 0,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,AutoSize = .F.,BackStyle = 1,LineColor = 14171687, TitleWidth=100, CAPTION="*++**++*"', 2)


INSERT INTO dbo.Merlin_PlantillasEncabezado (NumIdPlantilla, NumIdEncPlantilla, StrEncabezado, IntIdTipoPresentacion, StrDescripcionEncabezado, StrListaPropiedadesEncabezado, StrNombreObjeto, IntIdSeccion, IntOrden)
VALUES (@plantilla, 279, 'FECHA', 12, '', 'BackColor = 16697265,BorderStyle = 0,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,AutoSize = .F.,BackStyle = 1,LineColor = 16625811,TitleWidth = 15, CAPTION="FECHA"', '', 1, 1)


INSERT INTO dbo.Merlin_PlantillasEncabezado (NumIdPlantilla, NumIdEncPlantilla, StrEncabezado, IntIdTipoPresentacion, StrDescripcionEncabezado, StrListaPropiedadesEncabezado, StrNombreObjeto, IntIdSeccion, IntOrden)
VALUES (@plantilla, 280, 'OBSERVACIONES', 1, '', 'BackColor = 16697265,BorderStyle = 0,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,AutoSize = .F.,BackStyle = 1,LineColor = 16625811,TitleWidth = 100, CAPTION="OBSERVACIONES"', '', 1, 2)


INSERT INTO dbo.Merlin_PlantillasEncabezado (NumIdPlantilla, NumIdEncPlantilla, StrEncabezado, IntIdTipoPresentacion, StrDescripcionEncabezado, StrListaPropiedadesEncabezado, StrNombreObjeto, IntIdSeccion, IntOrden)
VALUES (@plantilla, 284, 'Veterinario', 12, 'Veterinario', 'BackColor = 16697265,BorderStyle = 0,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,AutoSize = .F.,BackStyle = 1,LineColor = 16625811,TitleWidth = 50, CAPTION="Veterinario"', '', 1, 3)


INSERT INTO dbo.Merlin_PlantillasEncabezado (NumIdPlantilla, NumIdEncPlantilla, StrEncabezado, IntIdTipoPresentacion, StrDescripcionEncabezado, StrListaPropiedadesEncabezado, StrNombreObjeto, IntIdSeccion, IntOrden)
VALUES (@plantilla, 287, '.', 1, '', 'BackColor = 16697265,BorderStyle = 0,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,AutoSize = .F.,BackStyle = 1,LineColor = 16625811,TitleWidth = 100, CAPTION="."', '', 284, 1)


INSERT INTO dbo.Merlin_PlantillasEncabezado (NumIdPlantilla, NumIdEncPlantilla, StrEncabezado, IntIdTipoPresentacion, StrDescripcionEncabezado, StrListaPropiedadesEncabezado, StrNombreObjeto, IntIdSeccion, IntOrden)
VALUES (@plantilla, 288, 'Nombres Propietario', 12, 'Nombres y apellidos', 'BackColor = 16697265,BorderStyle = 0,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,AutoSize = .F.,BackStyle = 1,LineColor = 16625811,TitleWidth = 40, CAPTION="Nombres Propietario"', '', 2, 1)


INSERT INTO dbo.Merlin_PlantillasEncabezado (NumIdPlantilla, NumIdEncPlantilla, StrEncabezado, IntIdTipoPresentacion, StrDescripcionEncabezado, StrListaPropiedadesEncabezado, StrNombreObjeto, IntIdSeccion, IntOrden)
VALUES (@plantilla, 289, 'Identificacion', 12, 'Identificacion', 'BackColor = 16697265,BorderStyle = 0,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,AutoSize = .F.,BackStyle = 1,LineColor = 16625811,TitleWidth = 20, CAPTION="Identificacion"', '', 2, 2)


INSERT INTO dbo.Merlin_PlantillasEncabezado (NumIdPlantilla, NumIdEncPlantilla, StrEncabezado, IntIdTipoPresentacion, StrDescripcionEncabezado, StrListaPropiedadesEncabezado, StrNombreObjeto, IntIdSeccion, IntOrden)
VALUES (@plantilla, 343, 'Nombre', 12, 'Nombre de la mascota', 'BackColor = 16697265,BorderStyle = 0,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,AutoSize = .F.,BackStyle = 1,LineColor = 16625811,TitleWidth = 25, CAPTION="Nombre"', '', 3, 1)


INSERT INTO dbo.Merlin_PlantillasEncabezado (NumIdPlantilla, NumIdEncPlantilla, StrEncabezado, IntIdTipoPresentacion, StrDescripcionEncabezado, StrListaPropiedadesEncabezado, StrNombreObjeto, IntIdSeccion, IntOrden)
VALUES (@plantilla, 344, 'Raza', 12, 'Raza', 'BackColor = 16697265,BorderStyle = 0,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,AutoSize = .F.,BackStyle = 1,LineColor = 16625811,TitleWidth = 25, CAPTION="Raza"', '', 3, 3)


INSERT INTO dbo.Merlin_PlantillasEncabezado (NumIdPlantilla, NumIdEncPlantilla, StrEncabezado, IntIdTipoPresentacion, StrDescripcionEncabezado, StrListaPropiedadesEncabezado, StrNombreObjeto, IntIdSeccion, IntOrden)
VALUES (@plantilla, 345, 'Especie', 12, 'Especie', 'BackColor = 16697265,BorderStyle = 0,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,AutoSize = .F.,BackStyle = 1,LineColor = 16625811,TitleWidth = 25, CAPTION="Especie"', '', 3, 2)


INSERT INTO dbo.Merlin_PlantillasEncabezado (NumIdPlantilla, NumIdEncPlantilla, StrEncabezado, IntIdTipoPresentacion, StrDescripcionEncabezado, StrListaPropiedadesEncabezado, StrNombreObjeto, IntIdSeccion, IntOrden)
VALUES (@plantilla, 346, 'Telefono Fijo', 12, 'Telefono fijo', 'BackColor = 16697265,BorderStyle = 0,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,AutoSize = .F.,BackStyle = 1,LineColor = 16625811,TitleWidth = 20, CAPTION="Telefono Fijo"', '', 2, 3)


INSERT INTO dbo.Merlin_PlantillasEncabezado (NumIdPlantilla, NumIdEncPlantilla, StrEncabezado, IntIdTipoPresentacion, StrDescripcionEncabezado, StrListaPropiedadesEncabezado, StrNombreObjeto, IntIdSeccion, IntOrden)
VALUES (@plantilla, 347, 'Telefono Celular', 12, 'Telefono celular', 'BackColor = 16697265,BorderStyle = 0,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,AutoSize = .F.,BackStyle = 1,LineColor = 16625811,TitleWidth = 20, CAPTION="Telefono Celular"', '', 2, 4)


INSERT INTO dbo.Merlin_PlantillasEncabezado (NumIdPlantilla, NumIdEncPlantilla, StrEncabezado, IntIdTipoPresentacion, StrDescripcionEncabezado, StrListaPropiedadesEncabezado, StrNombreObjeto, IntIdSeccion, IntOrden)
VALUES (@plantilla, 348, 'Sexo', 12, 'Sexo', 'BackColor = 16697265,BorderStyle = 0,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,AutoSize = .F.,BackStyle = 1,LineColor = 16625811,TitleWidth = 25, CAPTION="Sexo"', '', 3, 4)


INSERT INTO dbo.Merlin_PlantillasSubEncabezado (NumIdPlantilla, NumIdEncPlantilla, NumIdSubEncPlantilla, StrSubEncabezado, StrListaPropiedadesDetalle)
VALUES (@plantilla, 279, 556, 'FECHA', 'BorderStyle = 1,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,DataSource = DATETIME(),TitleToLeft = .F.,TitleToLeftWidth = 50')


INSERT INTO dbo.Merlin_PlantillasSubEncabezado (NumIdPlantilla, NumIdEncPlantilla, NumIdSubEncPlantilla, StrSubEncabezado, StrListaPropiedadesDetalle)
VALUES (@plantilla, 280, 557, 'OBSERVACIONES', 'BorderStyle = 1,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,DataSource = []')


INSERT INTO dbo.Merlin_PlantillasSubEncabezado (NumIdPlantilla, NumIdEncPlantilla, NumIdSubEncPlantilla, StrSubEncabezado, StrListaPropiedadesDetalle)
VALUES (@plantilla, 284, 560, 'Veterinario', 'BorderStyle = 1,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,DataSource = [],TitleToLeft = .F.,TitleToLeftWidth = 50')


INSERT INTO dbo.Merlin_PlantillasSubEncabezado (NumIdPlantilla, NumIdEncPlantilla, NumIdSubEncPlantilla, StrSubEncabezado, StrListaPropiedadesDetalle)
VALUES (@plantilla, 288, 561, 'Nombre y apellidos propietario', 'BorderStyle = 1,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,DataSource = GTP(THIS.PARENT.Hist&5&NumIdterceroAtendido&4&.F.&4&&6&StrNombreUsuario&6&),TitleToLeft = .F.,TitleToLeftWidth = 50')


INSERT INTO dbo.Merlin_PlantillasSubEncabezado (NumIdPlantilla, NumIdEncPlantilla, NumIdSubEncPlantilla, StrSubEncabezado, StrListaPropiedadesDetalle)
VALUES (@plantilla, 289, 562, 'Identificacion', 'BorderStyle = 1,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,DataSource = GTP(THIS.PARENT.Hist&5&NumIdterceroAtendido&4&.F.&4&&6&StrNitUsuario&6&),TitleToLeft = .F.,TitleToLeftWidth = 50')


INSERT INTO dbo.Merlin_PlantillasSubEncabezado (NumIdPlantilla, NumIdEncPlantilla, NumIdSubEncPlantilla, StrSubEncabezado, StrListaPropiedadesDetalle)
VALUES (@plantilla, 343, 663, 'NombreMascota', 'BorderStyle = 1,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,DataSource = MASCOTA&5&PARM(THIS.parent.Hist&5&Numidterceroatendidovete&4&&6&nombre&6&),TitleToLeft = .F.,TitleToLeftWidth = 50')


INSERT INTO dbo.Merlin_PlantillasSubEncabezado (NumIdPlantilla, NumIdEncPlantilla, NumIdSubEncPlantilla, StrSubEncabezado, StrListaPropiedadesDetalle)
VALUES (@plantilla, 344, 664, 'Raza', 'BorderStyle = 1,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,DataSource = MASCOTA&5&PARM(THIS.parent.Hist&5&Numidterceroatendidovete&4&&6&NombreRaza&6&),TitleToLeft = .F.,TitleToLeftWidth = 50')


INSERT INTO dbo.Merlin_PlantillasSubEncabezado (NumIdPlantilla, NumIdEncPlantilla, NumIdSubEncPlantilla, StrSubEncabezado, StrListaPropiedadesDetalle)
VALUES (@plantilla, 345, 665, 'Especie', 'BorderStyle = 1,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,DataSource = MASCOTA&5&PARM(THIS.parent.Hist&5&Numidterceroatendidovete&4&&6&NombreEspecie&6&),TitleToLeft = .F.,TitleToLeftWidth = 50')


INSERT INTO dbo.Merlin_PlantillasSubEncabezado (NumIdPlantilla, NumIdEncPlantilla, NumIdSubEncPlantilla, StrSubEncabezado, StrListaPropiedadesDetalle)
VALUES (@plantilla, 346, 666, 'TelefonoFijo', 'BorderStyle = 1,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,DataSource = GTP(THIS.parent.Hist&5&NumIdterceroAtendido&4&.F.&4&"StrTelefono"&4&"merlin&5&vw&5&contratos"),TitleToLeft = .F.,TitleToLeftWidth = 50')


INSERT INTO dbo.Merlin_PlantillasSubEncabezado (NumIdPlantilla, NumIdEncPlantilla, NumIdSubEncPlantilla, StrSubEncabezado, StrListaPropiedadesDetalle)
VALUES (@plantilla, 347, 667, 'Telefono Celular', 'BorderStyle = 1,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,DataSource = GTP(THIS.parent.Hist&5&NumIdterceroAtendido&4&.F.&4&"StrTeleFonoMoviltercero"&4&"merlin&5&vw&5&contratos"),TitleToLeft = .F.,TitleToLeftWidth = 50')


INSERT INTO dbo.Merlin_PlantillasSubEncabezado (NumIdPlantilla, NumIdEncPlantilla, NumIdSubEncPlantilla, StrSubEncabezado, StrListaPropiedadesDetalle)
VALUES (@plantilla, 348, 668, 'Sexo', 'BorderStyle = 1,FontBold = .F.,FontItalic = .F.,FontName = "Tahoma",FontSize = 9,FontUnderline = .F.,ForeColor = 0,DataSource = MASCOTA&5&PARM(THIS.parent.Hist&5&Numidterceroatendidovete&4&&6&NombreSexo&6&),TitleToLeft = .F.,TitleToLeftWidth = 50')


