diff --git a/Source/Informes/EtiquetasBlister.fr3 b/Source/Informes/EtiquetasBlister.fr3
index fc0cbbd..66d66b6 100644
--- a/Source/Informes/EtiquetasBlister.fr3
+++ b/Source/Informes/EtiquetasBlister.fr3
@@ -1,10 +1,10 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="4.7.71" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="40861,4874193981" ReportOptions.Description.Text="" ReportOptions.LastChange="40878,7869206134" ScriptLanguage="PascalScript" ScriptText.Text="&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" PropData="044C656674027903546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C4600000020446174615365743D226672784442446574616C6C6573456E426C69737465722220446174615365744E616D653D226672784442446574616C6C6573456E426C69737465722200010C4C00000020446174615365743D226672784442446574616C6C65734675657261426C69737465722220446174615365744E616D653D226672784442446574616C6C65734675657261426C6973746572220000095661726961626C65730100055374796C6501010C7A000000204E616D653D225469746C652220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22312220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31362220466F6E742E4E616D653D22417269616C2220466F6E742E5374796C653D22312200010C7B000000204E616D653D224865616465722220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22312220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D22417269616C2220466F6E742E5374796C653D22312200010C8F000000204E616D653D2247726F7570206865616465722220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22312220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D22417269616C2220466F6E742E5374796C653D223022204672616D652E5479703D22382200010C79000000204E616D653D22446174612220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22312220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D22417269616C2220466F6E742E5374796C653D22302200010C8F000000204E616D653D2247726F757020666F6F7465722220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22312220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D22417269616C2220466F6E742E5374796C653D223022204672616D652E5479703D22342200010C9E000000204E616D653D22486561646572206C696E652220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22312220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D22417269616C2220466F6E742E5374796C653D223022204672616D652E5479703D223822204672616D652E57696474683D2232220000">
+<TfrxReport Version="4.7.71" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="40861,4874193981" ReportOptions.Description.Text="" ReportOptions.LastChange="40886,4808489236" ScriptLanguage="PascalScript" ScriptText.Text="&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" PropData="044C656674027903546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C4600000020446174615365743D226672784442446574616C6C6573456E426C69737465722220446174615365744E616D653D226672784442446574616C6C6573456E426C69737465722200010C4C00000020446174615365743D226672784442446574616C6C65734675657261426C69737465722220446174615365744E616D653D226672784442446574616C6C65734675657261426C6973746572220000095661726961626C65730100055374796C6501010C7A000000204E616D653D225469746C652220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22312220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31362220466F6E742E4E616D653D22417269616C2220466F6E742E5374796C653D22312200010C7B000000204E616D653D224865616465722220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22312220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D22417269616C2220466F6E742E5374796C653D22312200010C8F000000204E616D653D2247726F7570206865616465722220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22312220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D22417269616C2220466F6E742E5374796C653D223022204672616D652E5479703D22382200010C79000000204E616D653D22446174612220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22312220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D22417269616C2220466F6E742E5374796C653D22302200010C8F000000204E616D653D2247726F757020666F6F7465722220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22312220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D22417269616C2220466F6E742E5374796C653D223022204672616D652E5479703D22342200010C9E000000204E616D653D22486561646572206C696E652220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22312220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D22417269616C2220466F6E742E5374796C653D223022204672616D652E5479703D223822204672616D652E57696474683D2232220000">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <TfrxReportPage Name="Page1" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Orientation="poLandscape" PaperWidth="159,99883333" PaperHeight="61,9998125" PaperSize="256" LeftMargin="3,96875" RightMargin="3,96875" TopMargin="3,96875" BottomMargin="3,96875" ColumnWidth="0" ColumnPositions.Text="" LargeDesignHeight="True" HGuides.Text="" VGuides.Text="">
     <TfrxMemoView Name="Memo2" Left="0" Top="124" Width="574" Height="51" ShowHint="False" Font.Charset="1" Font.Color="12632256" Font.Height="-48" Font.Name="Arial" Font.Style="1" Frame.Width="3" HAlign="haCenter" ParentFont="False" Text="FUERA DEL BLISTER"/>
     <TfrxMasterData Name="MasterData1" Height="33" Left="0" Top="16" Width="574,720371160735" ColumnWidth="0" ColumnGap="0" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" PrintIfDetailEmpty="True" RowCount="0">
-      <TfrxMemoView Name="Memo8" Align="baWidth" Left="0" Top="14" Width="574,720371160735" Height="14" ShowHint="False" AllowHTMLTags="True" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Farmacéutico: &#60;b&#62;[frxDBCabecera.&#34;FARMACEUTICO&#34;]&#60;/b&#62; - Tlf: &#60;b&#62;[frxDBCabecera.&#34;TELEFONO_FARM&#34;]&#60;/b&#62; - Móvil: &#60;b&#62;[frxDBCabecera.&#34;MOVIL_FARM&#34;]&#60;/b&#62;"/>
+      <TfrxMemoView Name="Memo8" Align="baWidth" Left="0" Top="14" Width="574,720371160735" Height="14" ShowHint="False" AllowHTMLTags="True" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Farmacéutico: &#60;b&#62;[frxDBCabecera.&#34;FARMACEUTICO&#34;]&#60;/b&#62; - Tlf: &#60;b&#62;[frxDBCabecera.&#34;TELEFONO_FARM&#34;]&#60;/b&#62;"/>
       <TfrxMemoView Name="Memo9" Align="baWidth" Left="0" Top="0" Width="574,720371160735" Height="14" ShowHint="False" AllowHTMLTags="True" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Blister Nº: &#60;b&#62;[frxDBCabecera.&#34;REFERENCIA&#34;]&#60;/b&#62; - Inicio: &#60;b&#62;[frxDBCabecera.&#34;FECHA_DESDE&#34;]&#60;/b&#62; - Fin: &#60;b&#62;[frxDBCabecera.&#34;FECHA_HASTA&#34;]&#60;/b&#62; - Paciente: &#60;b&#62;[frxDBCabecera.&#34;PACIENTE&#34;]&#60;/b&#62;"/>
     </TfrxMasterData>
     <TfrxDetailData Name="DetailData1" Height="16" Left="0" Top="105" Width="574,720371160735" ColumnWidth="0" ColumnGap="0" DataSet="frxDBDetallesFueraBlister" DataSetName="frxDBDetallesFueraBlister" KeepHeader="True" KeepTogether="True" RowCount="0" Stretched="True">
diff --git a/Source/Modulos/Medicaciones/Views/uEditorMedicaciones.pas b/Source/Modulos/Medicaciones/Views/uEditorMedicaciones.pas
index b7d4a5c..2259b48 100644
--- a/Source/Modulos/Medicaciones/Views/uEditorMedicaciones.pas
+++ b/Source/Modulos/Medicaciones/Views/uEditorMedicaciones.pas
@@ -44,6 +44,7 @@ type
     procedure ImprimirInterno; override;
     procedure PrevisualizarInterno; override;
     procedure RefrescarInterno; override;
+    procedure NuevoInterno; override;
 
     //Si queremos crear otra vista para el editor heredado solo tendriamos que
     //sobreescribir este método
@@ -258,6 +259,13 @@ begin
   FController.Ver(Medicaciones);
 end;
 
+procedure TfEditorMedicaciones.NuevoInterno;
+begin
+  inherited;
+  FController.Anadir(Medicaciones);
+  FController.Ver(Medicaciones);
+end;
+
 procedure TfEditorMedicaciones.PonerTitulos(const ATitulo: string);
 var
   FTitulo : String;