Registra adprmt027 (Formulario de Vacaciones) y corrige bugs

- Registra adfmmt027.per (FORMULARIOS_AD) y la aplicacion adprmt027 en
  ADMINISTRACION PERSONAL.
- MAIN: se quitan el usuario y la clave escritos en el fuente (kpolanco);
  vuelve a usar los argumentos de la linea de comandos.
- adpcmf027: CONVERT(CHAR(10),fecha,103) hacia variables DATE -> columna
  directa (-1205).
- La tabla vacaciones no existia en marmotech (.250); se creo con
  adprmt027_vacaciones.sql (14 columnas del esquema viejo).
Verificado contra la BD .250: Nuevo, Buscar, Escoger y eLiminar con la
ficha 110 (el registro de prueba se elimino).

Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com>

PROYECTO/addir/adprmt027.4gl

@@ -30,8 +30,6 @@ MAIN
   CALL ARG_VAL(1) RETURNING usuarios
   CALL ARG_VAL(2) RETURNING clave
   CALL ARG_VAL(3) RETURNING impresor
- let usuarios = "kpolanco" 
- let clave = "RevolutionX3"
  CONNECT to "smarmotech" USER usuarios USING clave
  SELECT a.* INTO p_companias.* FROM companias a
  CALL adprmt027()
@@ -183,8 +181,8 @@ DEFINE elimina CHAR(3)
         
     LET SELEC = " SELECT a.ano,a.num_emp,a.cod_puesto,a.nom1_emp,a.nom2_emp, ",
                 "        a.apell1_emp,a.apell2_emp, ",
-                "        a.cedula,a.serie,a.nomina,CONVERT(CHAR(10),a.fecha_ing,103), ",
-                "        a.nom_puesto,CONVERT(CHAR(10),a.fech_vac,103) ",
+                "        a.cedula,a.serie,a.nomina,a.fecha_ing, ",
+                "        a.nom_puesto,a.fech_vac ",
                 " FROM vacaciones a ",
                  " WHERE ",
                   criterio clipped,

PROYECTO/mbsERP.4pw

@@ -960,6 +960,7 @@
           <File filePath="addir/adfmwd017.per"/>
           <File filePath="addir/adfmwd018.per"/>
           <File filePath="addir/adfmwd019.per"/>
+          <File filePath="addir/adfmmt027.per"/>
         </Library>
         <Library binaryName="FUNCIONES_ADF" id="-700000103" label="FUNCIONES_ADF">
           <File filePath="addir/adfunciones.4gl"/>
@@ -976,6 +977,10 @@
           <File filePath="addir/adprmt017.4gl"/>
           <File filePath="bin/adprmt017.4rp"/>
         </Application>
+        <Application binaryName="adprmt027" dependencies="-1026233879,-764824792,114070979,1612573873" id="-700000104" label="adprmt027">
+          <Configuration commandLineArguments="alopez Lopez2023" id="-700000105" label="Configuration"/>
+          <File filePath="addir/adprmt027.4gl"/>
+        </Application>
       </Group>
       <Group id="942743738" label="NOMINA">
         <Library binaryName="FORMULARIOS_NO" id="-335228674" label="FORMULARIOS_NO">