diff --git a/PROYECTO/mbsERP.4pw b/PROYECTO/mbsERP.4pw
index 9bf96a6..e8c2dac 100644
--- a/PROYECTO/mbsERP.4pw
+++ b/PROYECTO/mbsERP.4pw
@@ -482,6 +482,7 @@
         <File filePath="nodir/nofmmt019.per"/>
         <File filePath="nodir/nofmmt023.4fd"/>
         <File filePath="nodir/nofmmt024.per"/>
+        <File filePath="nodir/nofmmt025.4fd"/>
       </Library>
       <Library binaryName="FUNCIONES_NO" id="-306412216" label="FUNCIONES_NO">
         <File filePath="nodir/noprgb000.4gl"/>
@@ -532,6 +533,10 @@
         <Configuration commandLineArguments="alopez Lopez2023" id="-700000066" label="Configuration"/>
         <File filePath="nodir/noprmt024.4gl"/>
       </Application>
+      <Application binaryName="noprmt025" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000067" label="noprmt025">
+        <Configuration commandLineArguments="alopez Lopez2023" id="-700000068" label="Configuration"/>
+        <File filePath="nodir/noprmt025.4gl"/>
+      </Application>
     </Group>
     <Group id="1667448785" label="PRODUCTOS TERMINADOS">
       <Library binaryName="FORMULARIOS_IP" dependencies="-1026233879" id="-1826025351" label="FORMULARIOS_IP">
diff --git a/PROYECTO/nodir/nofmmt025.4fd b/PROYECTO/nodir/nofmmt025.4fd
index 70985bd..7c13598 100644
--- a/PROYECTO/nodir/nofmmt025.4fd
+++ b/PROYECTO/nodir/nofmmt025.4fd
@@ -33,7 +33,7 @@
       <Label posX="40" posY="1" text="Monto Excento"/>
       <Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="monto_excento" columnCount="" fieldId="3" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="12" name="notb00023.monto_excento" posX="55" posY="1" precisionDecimal="12" required="true" rowCount="" scaleDecimal="2" sqlTabName="notb00023" sqlType="DECIMAL" stepX="" stepY="" tabIndex="3" table_alias_name="" widget="Edit"/>
       <Label posX="12" posY="2" text="Fecha"/>
-      <Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fecha" columnCount="" fieldId="2" gridHeight="1" gridWidth="10" name="fecha" posX="20" posY="2" rowCount="" sqlTabName="formonly" stepX="" stepY="" tabIndex="4" table_alias_name="" widget="Edit"/>
+      <Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fecha" columnCount="" fieldId="2" format="dd/mm/yyyy" gridHeight="1" gridWidth="10" name="fecha" posX="20" posY="2" rowCount="" sqlTabName="formonly" stepX="" stepY="" tabIndex="4" table_alias_name="" widget="Edit"/>
       <Label posX="49" posY="2" text="15 %"/>
       <Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="porc_15" columnCount="" fieldId="4" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="12" name="notb00023.porc_15" posX="55" posY="2" precisionDecimal="12" required="true" rowCount="" scaleDecimal="2" sqlTabName="notb00023" sqlType="DECIMAL" stepX="" stepY="" tabIndex="5" table_alias_name="" widget="Edit"/>
       <Label posX="49" posY="3" text="20 %"/>
diff --git a/PROYECTO/nodir/noprmt025.4gl b/PROYECTO/nodir/noprmt025.4gl
index 0be08b0..c4a262d 100644
--- a/PROYECTO/nodir/noprmt025.4gl
+++ b/PROYECTO/nodir/noprmt025.4gl
@@ -7,8 +7,9 @@
  FECHA REALIZACION : Friday, 15 December, 2000 
 ------------------------------------------------------------------
 }
-GLOBALS "noprgb000.4gl" 
+GLOBALS "noprgb000.4gl"
    DEFINE relacion RECORD LIKE notb00023.*
+   DEFINE existe_tipo INTEGER
           
 MAIN
  DEFER INTERRUPT
@@ -80,16 +81,16 @@ FUNCTION nopcad023()
                   NEXT FIELD tipo_emp 
                END IF
                
-               SELECT a.* 
+               SELECT COUNT(*) INTO existe_tipo
                  FROM notb00010 a
                 WHERE a.tipo_emp = relacion.tipo_emp
-                  AND a.status_t IS NULL 
+                  AND a.status_t IS NULL
 
-               IF STATUS = NOTFOUND THEN
+               IF existe_tipo = 0 THEN
                   LET numero_msg = 2
                   CALL msg(numero_msg)
                   NEXT FIELD tipo_emp
-               END IF 
+               END IF
 
               IF relacion.tipo_emp = "Q" AND
                   relacion.numero_nomina <= 24 THEN
@@ -192,7 +193,7 @@ FUNCTION nopcmf023()
        RETURN
     END IF
 
-    LET SELEC =  "SELECT a.numero_nomina,a.tipo_emp,convert(varchar(10),a.fecha,101),a.monto_excento,",
+    LET SELEC =  "SELECT a.numero_nomina,a.tipo_emp,a.fecha,a.monto_excento,",
                  "a.porc_15,a.porc_20,a.porc_25,a.monto_ars,a.monto_afp FROM notb00023 a where ",         
                  " a.status_t is null and ",
                    criterio clipped