From 69b4500eed3dbe651bbb0edfd7758d1f633e8e2a Mon Sep 17 00:00:00 2001
From: Jeilyn Peguero <jpeguero@marmotech.com.do>
Date: Thu, 27 Aug 2026 16:57:10 -0400
Subject: [PATCH] Corrige inprmt046, agrega inprmt036 y arreglos de
 fecha/impresion

- inprmt046: agrega columnas Maquina/Clasf.Bloque faltantes en la
  tabla, ensancha combos para legibilidad, corrige formato de fecha
  (CONVERT 103 requiere DBDATE=DMY4/ configurado). Saca la funcion
  maquinaria() de un archivo local a una compartida (maquinaria.4gl)
  para evitar duplicado.
- inprmt036 (Requisicion de Materiales): agrega formulario, campo
  Impresion (MATRICIAL/PDF), corrige nombre_d y agrega columna
  Existencia faltante en la tabla.
- Agrega funcion compartida configureOutput (stub, Report Writer 2.0
  no disponible en FGL 6.00.01).
- Requiere variables de entorno DBDATE=DMY4/ y FGLSPOOL (carpeta
  PROYECTO/spool) al abrir Genero Studio para reportes/fechas.
---
 PROYECTO/codir/departamento.4gl |  2 +-
 PROYECTO/indir/defecto.4gl      |  8 +++
 PROYECTO/indir/infmmt036.4fd    | 98 ++++++++++++++++-----------------
 PROYECTO/indir/infmmt036.per    |  9 +--
 PROYECTO/indir/infmmt046.4fd    | 67 +++++++++++++---------
 PROYECTO/indir/infmmt046.per    | 16 ++++--
 PROYECTO/indir/inprfu000.4gl    |  2 +-
 PROYECTO/indir/inprmt046.4gl    | 21 -------
 PROYECTO/indir/maquinaria.4gl   | 21 +++++++
 PROYECTO/mbsERP.4pw             |  2 +
 10 files changed, 138 insertions(+), 108 deletions(-)
 create mode 100644 PROYECTO/indir/maquinaria.4gl

diff --git a/PROYECTO/codir/departamento.4gl b/PROYECTO/codir/departamento.4gl
index f154a4b..0c3db1e 100644
--- a/PROYECTO/codir/departamento.4gl
+++ b/PROYECTO/codir/departamento.4gl
@@ -2,7 +2,7 @@ FUNCTION busca_departamento()
 DEFINE pdepartamento ui.combobox,                                              
         kdepartamento SMALLINT,kdescripcion CHAR(30) 
    
-       LET  pdepartamento = ui.combobox.forname("formonly.depto_a")
+       LET  pdepartamento = ui.combobox.forname("formonly.departamento")
        CALL pdepartamento.clear()                                         
        DECLARE pagar CURSOR FOR                                           
          SELECT departamento, nom_dpto FROM adtb00001                     
diff --git a/PROYECTO/indir/defecto.4gl b/PROYECTO/indir/defecto.4gl
index a5d3bcc..f8c0bd7 100644
--- a/PROYECTO/indir/defecto.4gl
+++ b/PROYECTO/indir/defecto.4gl
@@ -142,3 +142,11 @@ RETURN imprime,negrillas_on,negrillas_off,doble_on,doble_off,
        comp_on,comp_off,doce,normal,archivo,copia
 
 END FUNCTION
+
+FUNCTION configureOutput(tipo_file)
+    DEFINE tipo_file CHAR(3)
+    -- La API fgl_report_* (Report Writer 2.0) no esta disponible en este
+    -- FGL 6.00.01. Esta salida (XML/XLS/PDF por handler) no esta soportada
+    -- en este entorno; usar r_output = 'MA' (impresion clasica) en su lugar.
+    RETURN NULL
+END FUNCTION
diff --git a/PROYECTO/indir/infmmt036.4fd b/PROYECTO/indir/infmmt036.4fd
index 911be99..88e1a45 100644
--- a/PROYECTO/indir/infmmt036.4fd
+++ b/PROYECTO/indir/infmmt036.4fd
@@ -1,75 +1,69 @@
 <?xml version="1.0" encoding="UTF-8" ?>
-<ManagedForm databaseName="smarmotech" fileVersion="31400" gstVersion="3140a" name="ManagedForm" uid="{e7174189-8870-4ba4-8809-0d7723748408}">
+<ManagedForm databaseName="smarmotech" fileVersion="40100" gstVersion="60003" name="ManagedForm" uid="{2588a591-b057-476a-b4a8-b08042d6f2f7}">
   <AGSettings>
-    <DynamicProperties version="2"/>
+    <DynamicProperties version="4"/>
   </AGSettings>
-  <Record name="record1" uid="{5f98391b-bea0-4211-a080-65f585d7f377}">
-    <RecordField colName="num_doc" fieldIdRef="0" fieldType="TABLE_COLUMN" name="intb00006.num_doc" sqlTabName="intb00006" uid="{d2a35378-2bc5-4c14-a5b2-d9d31602318b}"/>
-    <RecordField colName="fecha" fieldIdRef="1" fieldType="TABLE_COLUMN" name="intb00006.fecha" sqlTabName="intb00006" uid="{b2c2e592-dc75-4e19-a9ff-93cc5b1f77c2}"/>
-    <RecordField colName="depto_a" fieldIdRef="2" fieldType="TABLE_COLUMN" name="intb00006.depto_a" sqlTabName="intb00006" uid="{acbbeead-342c-4c6f-a091-347f83c07636}"/>
-    <RecordField colName="nom_dpto" fieldIdRef="3" fieldType="NON_DATABASE" name="nombre_d" sqlTabName="adtb00001" uid="{0dac7bb5-0381-4afe-8c40-96b4b36dd9cd}"/>
-    <RecordField colName="bodega" fieldIdRef="10" fieldType="TABLE_COLUMN" name="intb00006.bodega" sqlTabName="intb00006" uid="{cadd22d3-f600-4af7-9fc9-696c6e7f1bbb}"/>
-    <RecordField fieldIdRef="4" name="cod_mov" uid="{fc7dc520-056a-4e29-9fd9-06882be58fd6}"/>
-    <RecordField fieldIdRef="5" name="descrip_mov" uid="{db6f3fa0-9339-4078-8c1f-c07b259095f4}"/>
-    <RecordField fieldIdRef="6" name="nombre" uid="{9601d4ae-5d55-452b-9426-6235f628d523}"/>
-    <RecordField fieldIdRef="7" name="apellido" uid="{7ab2f8e2-4efd-4810-aac8-f702974f3d82}"/>
-    <RecordField fieldIdRef="9" name="impresion" uid="{77ff2cb8-ae51-4e61-9880-5bedaf2864ef}"/>
+  <Record name="s_movi1" uid="{ea5f2f49-b9ed-4006-89ed-1b0ccb85921a}">
+    <RecordField colName="cod_n" fieldIdRef="4" fieldType="TABLE_COLUMN" name="intb00006.cod_n" sqlTabName="intb00006" uid="{035e9495-92e7-49b4-b08b-9c0d186cda04}"/>
+    <RecordField colName="cod_grupo" fieldIdRef="5" fieldType="TABLE_COLUMN" name="intb00006.cod_grupo" sqlTabName="intb00006" uid="{5fd30570-d08f-4a17-a017-2e344b0e17e7}"/>
+    <RecordField colName="cod_tipo" fieldIdRef="6" fieldType="TABLE_COLUMN" name="intb00006.cod_tipo" sqlTabName="intb00006" uid="{e25df3e0-273a-437a-8175-bcb27619b24a}"/>
+    <RecordField colName="cod_sec" fieldIdRef="7" fieldType="TABLE_COLUMN" name="intb00006.cod_sec" sqlTabName="intb00006" uid="{7c65560d-d48e-4bf5-b7f9-b20d9569c99e}"/>
+    <RecordField colName="cantidad_1" fieldIdRef="8" fieldType="TABLE_COLUMN" name="intb00006.cantidad_1" sqlTabName="intb00006" uid="{1175d8c0-9c6c-454d-bcb7-55661372b958}"/>
+    <RecordField colName="cantidad_2" fieldIdRef="9" fieldType="TABLE_COLUMN" name="intb00006.cantidad_2" sqlTabName="intb00006" uid="{ed4c635e-94b8-4c6e-bedf-23ec775579f8}"/>
+    <RecordField colName="unidad_med" fieldIdRef="13" fieldType="TABLE_COLUMN" name="intb00001.unidad_med" sqlTabName="intb00001" uid="{ead4e1e1-a2fe-45e1-b2c7-6561bd53f367}"/>
+    <RecordField colName="descrip_esp" fieldIdRef="12" fieldType="TABLE_COLUMN" name="intb00001.descrip_esp" sqlTabName="intb00001" uid="{9d609a5f-5f39-478f-826e-5bc411f55e52}"/>
+    <RecordField colName="existencia" fieldIdRef="14" name="existencia" sqlTabName="formonly" uid="{a1b2c3d4-4444-4001-8001-000000000001}"/>
   </Record>
-  <Record name="s_movi1" uid="{f4a6ba20-de96-44b0-846f-190d18414d47}">
-    <RecordField fieldIdRef="13" name="cod_n" uid="{db75acf0-1055-476c-8243-3de0be0ff959}"/>
-    <RecordField fieldIdRef="14" name="cod_grupo" uid="{5f8f596e-eac0-4b35-b7c4-b1a8a3c6ef0d}"/>
-    <RecordField fieldIdRef="15" name="cod_tipo" uid="{1ccef9ef-ed49-42c7-a21d-0057636e5c93}"/>
-    <RecordField fieldIdRef="16" name="cod_Sec" uid="{39fdf508-1f80-4033-8ef6-5cccac37de36}"/>
-    <RecordField fieldIdRef="17" name="cantidad_1" uid="{7d6c051e-7772-4f29-bc49-2db9b7f3317f}"/>
-    <RecordField fieldIdRef="18" name="cantidad_2" uid="{228f3fb6-d439-4bdb-8304-2ea2a813db1c}"/>
-    <RecordField fieldIdRef="19" name="unidad_med" uid="{5776cd4e-a3f2-4ff0-b540-a00b6e0fdf5e}"/>
-    <RecordField fieldIdRef="20" name="descrip_esp" uid="{73bfd3ea-3edd-4965-a5e8-cdc35e4a16f8}"/>
-    <RecordField fieldIdRef="8" name="existencia" uid="{b583914e-c5af-4370-80a5-ba66b7779a23}"/>
+  <Record name="record1" uid="{5cc1cbdd-fac8-4ffc-98e4-331d5c9fb810}">
+    <RecordField colName="num_doc" fieldIdRef="0" fieldType="TABLE_COLUMN" name="intb00006.num_doc" sqlTabName="intb00006" uid="{3dcc2cab-2a20-4581-b11b-95c27ba55b87}"/>
+    <RecordField colName="fecha" fieldIdRef="1" fieldType="TABLE_COLUMN" name="intb00006.fecha" sqlTabName="intb00006" uid="{effe3be7-6235-4ebb-88d9-4d99fe14bf42}"/>
+    <RecordField colName="depto_a" fieldIdRef="2" fieldType="TABLE_COLUMN" name="intb00006.depto_a" sqlTabName="intb00006" uid="{408aa475-0b97-4d2c-aa5e-b6695c0b4299}"/>
+    <RecordField colName="nombre_d" fieldIdRef="3" name="nombre_d" sqlTabName="formonly" uid="{b2e366d3-59b8-4d1e-96ca-68a7eac26f2b}"/>
+    <RecordField colName="bodega" fieldIdRef="10" fieldType="TABLE_COLUMN" name="intb00006.bodega" sqlTabName="intb00006" uid="{9befab7b-9bfd-4fb5-ac59-646fca90afe9}"/>
+    <RecordField colName="impresion" defaultValue="MATRICIAL" fieldIdRef="11" name="impresion" sqlTabName="formonly" uid="{97a456ba-6f98-44dd-962d-203916eabb50}"/>
   </Record>
-  <Form gridHeight="22" gridWidth="92" name="infmmt036" text="REQUISICION MATERIALES">
+  <Form gridHeight="18" gridWidth="100" name="infmmt036" text="REQUISICION MATERIALES">
     <ToolBar name="toolbar1">
       <ToolBarItem comment="Nuevo Documento" image="new" name="nuevo" text="Documento"/>
       <ToolBarItem comment="Criterio de busqueda" image="find" name="buscar" text="Buscar Documentos"/>
       <ToolBarSeparator name="toolbarseparator1"/>
       <ToolBarItem image="quit" name="salir" text="Salir"/>
     </ToolBar>
-    <Grid gridHeight="22" gridWidth="92" name="grid1" posX="0" posY="0">
-      <Group gridHeight="7" gridWidth="83" name="group1" posX="1" posY="1">
+    <Grid gridHeight="18" gridWidth="100" name="grid1" posX="0" posY="0">
+      <Group gridHeight="5" gridWidth="78" name="group1" posX="1" posY="1">
         <Label gridHeight="1" gridWidth="9" name="label1" posX="1" posY="1" text="Documento"/>
         <Edit colName="num_doc" fieldId="0" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="6" name="intb00006.num_doc" noEntry="true" posX="17" posY="1" sqlTabName="intb00006" tabIndex="1" widget="Edit"/>
         <Label gridHeight="1" gridWidth="6" name="label2" posX="28" posY="1" text="Fecha"/>
         <Edit autoNext="true" colName="fecha" comment="Digite Fecha Documento" fieldId="1" fieldType="TABLE_COLUMN" format="dd/mm/yyyy" gridHeight="1" gridWidth="10" name="intb00006.fecha" posX="35" posY="1" sqlTabName="intb00006" tabIndex="2" widget="Edit"/>
         <Label gridHeight="1" gridWidth="15" name="label3" posX="1" posY="2" text="Codigo de Dpto"/>
-        <Edit autoNext="true" colName="depto_a" comment="Digite Codigo Departamento" fieldId="2" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="5" name="intb00006.depto_a" posX="17" posY="2" sqlTabName="intb00006" tabIndex="3" widget="Edit"/>
-        <Edit colName="nom_dpto" fieldId="3" fieldType="NON_DATABASE" gridHeight="1" gridWidth="30" length="30" name="nombre_d" noEntry="true" posX="24" posY="2" sqlTabName="adtb00001" sqlType="CHAR" tabIndex="4" widget="Edit"/>
+        <Edit autoNext="true" colName="depto_a" comment="Digite Codigo Departamento" fieldId="2" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="4" name="intb00006.depto_a" posX="17" posY="2" sqlTabName="intb00006" tabIndex="3" widget="Edit"/>
+        <Edit colName="nombre_d" fieldId="3" gridHeight="1" gridWidth="30" name="nombre_d" noEntry="true" posX="24" posY="2" sqlTabName="formonly" tabIndex="4" widget="Edit"/>
         <Label gridHeight="1" gridWidth="8" name="label4" posX="1" posY="3" text="Bodega :"/>
-        <Edit autoNext="true" colName="bodega" comment="Digite el codigo de la bodega de almacenamiento" fieldId="10" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="5" name="intb00006.bodega" posX="17" posY="3" sqlTabName="intb00006" tabIndex="5" widget="Edit"/>
-        <RadioGroup fieldId="9" gridHeight="1" gridWidth="10" items="PDF, MATRICIAL" name="impresion" posX="27" posY="3" tabIndex="-1" title="radiogroup1" widget="RadioGroup">
-          <Item lstrtext="false" name="PDF" text="PDF"/>
-          <Item lstrtext="false" name="MATRICIAL" text="MATRICIAL"/>
+        <Edit autoNext="true" colName="bodega" comment="Digite el codigo de la bodega de almacenamiento" fieldId="10" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="2" name="intb00006.bodega" posX="17" posY="3" sqlTabName="intb00006" tabIndex="5" widget="Edit"/>
+        <Label gridHeight="1" gridWidth="10" name="label5" posX="24" posY="3" text="Impresion"/>
+        <RadioGroup colName="impresion" defaultValue="MATRICIAL" fieldId="11" gridHeight="1" gridWidth="3" items="MATRICIAL, PDF" name="impresion" posX="35" posY="3" sqlTabName="formonly" tabIndex="6" widget="RadioGroup">
+          <Item name="MATRICIAL" text="MATRICIAL"/>
+          <Item name="PDF" text="PDF"/>
         </RadioGroup>
-        <Label gridHeight="1" gridWidth="10" name="label5" posX="1" posY="4" text="Codigo Mov"/>
-        <Edit fieldId="4" gridHeight="1" gridWidth="5" name="cod_mov" posX="17" posY="4" tabIndex="-1" title="edit1" widget="Edit"/>
-        <Edit fieldId="5" gridHeight="1" gridWidth="30" name="descrip_mov" posX="24" posY="4" tabIndex="-1" title="edit1" widget="Edit"/>
-        <Edit fieldId="6" gridHeight="1" gridWidth="10" name="nombre" posX="24" posY="5" tabIndex="-1" title="edit1" widget="Edit"/>
-        <Edit fieldId="7" gridHeight="1" gridWidth="10" name="apellido" posX="36" posY="5" tabIndex="-1" title="edit2" widget="Edit"/>
       </Group>
-      <Group gridHeight="11" gridWidth="90" name="group2" posX="2" posY="9" text="Detalle">
-        <Table gridHeight="8" gridWidth="82" name="table1" posX="7" posY="2" totalRows="5">
-          <Edit fieldId="13" gridHeight="1" gridWidth="8" name="cod_n" posX="0" posY="0" tabIndex="-1" title="Codigo" widget="Edit"/>
-          <Edit fieldId="14" gridHeight="1" gridWidth="8" name="cod_grupo" posX="8" posY="0" tabIndex="-1" widget="Edit"/>
-          <Edit fieldId="15" gridHeight="1" gridWidth="8" name="cod_tipo" posX="16" posY="0" tabIndex="-1" widget="Edit"/>
-          <Edit fieldId="16" gridHeight="1" gridWidth="8" name="cod_Sec" posX="24" posY="0" tabIndex="-1" widget="Edit"/>
-          <Edit fieldId="17" gridHeight="1" gridWidth="8" name="cantidad_1" posX="32" posY="0" tabIndex="-1" title="Ordenada" widget="Edit"/>
-          <Edit fieldId="18" gridHeight="1" gridWidth="8" name="cantidad_2" posX="40" posY="0" tabIndex="-1" title="Entregada" widget="Edit"/>
-          <Edit fieldId="19" gridHeight="1" gridWidth="8" name="unidad_med" posX="48" posY="0" tabIndex="-1" title="Unidad Med" widget="Edit"/>
-          <Edit fieldId="20" gridHeight="1" gridWidth="8" name="descrip_esp" posX="56" posY="0" scroll="true" tabIndex="-1" title="Descripcion" widget="Edit"/>
-          <Edit fieldId="8" gridHeight="1" gridWidth="8" name="existencia" posX="64" posY="0" tabIndex="-1" title="Existencia" widget="Edit"/>
-        </Table>
+      <Group gridHeight="12" gridWidth="98" name="group2" posX="1" posY="6">
+        <Label gridHeight="1" gridWidth="15" name="label6" posX="19" posY="1" text="C A N T I D A D"/>
+        <Label gridHeight="1" gridWidth="6" name="label7" posX="2" posY="2" text="Codigo"/>
+        <Label gridHeight="1" gridWidth="8" name="label8" posX="18" posY="2" text="Ordenada"/>
+        <Label gridHeight="1" gridWidth="9" name="label9" posX="31" posY="2" text="Entregada"/>
+        <Label gridHeight="1" gridWidth="6" name="label10" posX="42" posY="2" text="Unidad"/>
+        <Label gridHeight="1" gridWidth="21" name="label11" posX="53" posY="2" text="D e s c r i p c i o n"/>
+        <Edit autoNext="true" colName="cod_n" columnCount="1" comment="Digite Codigo Articulo" fieldId="4" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="3" name="intb00006.cod_n" posX="3" posY="4" repeat="true" rowCount="6" sqlTabName="intb00006" stepX="1" stepY="0" tabIndex="7" widget="Edit"/>
+        <Edit autoNext="true" colName="cod_grupo" columnCount="1" comment="Digite Codigo Articulo" fieldId="5" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="3" name="intb00006.cod_grupo" posX="8" posY="4" repeat="true" rowCount="6" sqlTabName="intb00006" stepX="1" stepY="0" tabIndex="8" widget="Edit"/>
+        <Edit autoNext="true" colName="cod_tipo" columnCount="1" comment="Digite Codigo Articulo" fieldId="6" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="3" name="intb00006.cod_tipo" posX="13" posY="4" repeat="true" rowCount="6" sqlTabName="intb00006" stepX="1" stepY="0" tabIndex="9" widget="Edit"/>
+        <Edit autoNext="true" colName="cod_sec" columnCount="1" comment="Digite Codigo Articulo" fieldId="7" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="4" name="intb00006.cod_sec" posX="18" posY="4" repeat="true" rowCount="6" sqlTabName="intb00006" stepX="1" stepY="0" tabIndex="10" widget="Edit"/>
+        <Edit autoNext="true" colName="cantidad_1" columnCount="1" comment="Digite La Cantidad Ordenada" fieldId="8" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="11" name="intb00006.cantidad_1" posX="24" posY="4" repeat="true" rowCount="6" sqlTabName="intb00006" stepX="1" stepY="0" tabIndex="11" widget="Edit"/>
+        <Edit autoNext="true" colName="cantidad_2" columnCount="1" comment="Digite La Cantidad Entregada" fieldId="9" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="11" name="intb00006.cantidad_2" posX="37" posY="4" repeat="true" rowCount="6" sqlTabName="intb00006" stepX="1" stepY="0" tabIndex="12" widget="Edit"/>
+        <Edit colName="unidad_med" columnCount="1" fieldId="13" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="3" name="intb00001.unidad_med" noEntry="true" posX="50" posY="4" repeat="true" rowCount="6" sqlTabName="intb00001" stepX="1" stepY="0" tabIndex="13" widget="Edit"/>
+        <Edit autoNext="true" colName="descrip_esp" columnCount="1" fieldId="12" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="31" name="intb00001.descrip_esp" noEntry="true" posX="55" posY="4" repeat="true" rowCount="6" sqlTabName="intb00001" stepX="1" stepY="0" tabIndex="14" widget="Edit"/>
+        <Label gridHeight="1" gridWidth="10" name="label12" posX="87" posY="2" text="Existencia"/>
+        <Edit colName="existencia" columnCount="1" fieldId="14" gridHeight="1" gridWidth="10" name="existencia" noEntry="true" posX="87" posY="4" repeat="true" rowCount="6" sqlTabName="formonly" stepX="1" stepY="0" tabIndex="15" widget="Edit"/>
       </Group>
     </Grid>
   </Form>
-  <DiagramLayout>
-    <![CDATA[AAAAAgAAAEwAewA1AGYAOQA4ADMAOQAxAGIALQBiAGUAYQAwAC0ANAAyADEAMQAtAGEAMAA4ADAALQA2ADUAZgA1ADgANQBkADcAZgAzADcANwB9QGqZmcGAABhAIAAAGAAADz9gYk3S8an8AQAAAEwAewBmADQAYQA2AGIAYQAyADAALQBkAGUAOQA2AC0ANAA0AGIAMAAtADgANAA2AGYALQAxADkAMABkADEAOAA0ADEANABkADQANwB9QICszOXQABBANMzM7AAAEz9wYk3S8an8AQ==]]>
-  </DiagramLayout>
 </ManagedForm>
\ No newline at end of file
diff --git a/PROYECTO/indir/infmmt036.per b/PROYECTO/indir/infmmt036.per
index 9f268db..2a6450f 100644
--- a/PROYECTO/indir/infmmt036.per
+++ b/PROYECTO/indir/infmmt036.per
@@ -22,8 +22,8 @@ LAYOUT (TEXT="REQUISICION MATERIALES")
  <g                                                                           >
   Documento      [f000  ]    Fecha [f001      ]                              
   Codigo de Dpto [f4  ] [a1                            ]              
-  Bodega :       [a7]                                                         
-  
+  Bodega :       [a7]    Impresion [imp]
+
  <g                                                                                    >
                     C A N T I D A D 
    Codigo          Ordenada     Entregada  Unidad     D e s c r i p c i o n
@@ -49,7 +49,7 @@ f001 = intb00006.fecha, format = "dd/mm/yyyy",autonext,
 f4 = intb00006.depto_a,autonext,
        comments = "Digite Codigo Departamento";
 
-a1   = adtb00001.nom_dpto,noentry; 
+a1   = formonly.nombre_d,noentry;
 a    = intb00006.cod_n,autonext,
        comments = "Digite Codigo Articulo";
 b    = intb00006.cod_grupo,autonext,
@@ -63,7 +63,8 @@ f02  = intb00006.cantidad_1,autonext,
 f03  = intb00006.cantidad_2,autonext, 
        comments = "Digite La Cantidad Entregada";
 a7   = intb00006.bodega,autonext,
-       comments = "Digite el codigo de la bodega de almacenamiento"; 
+       comments = "Digite el codigo de la bodega de almacenamiento";
+RADIOGROUP imp = formonly.impresion,ITEMS=(("MATRICIAL","MATRICIAL"),("PDF","PDF")),DEFAULT="MATRICIAL";
 k    = intb00001.descrip_esp,noentry,autonext; 
 p    = intb00001.unidad_med,noentry;
 
diff --git a/PROYECTO/indir/infmmt046.4fd b/PROYECTO/indir/infmmt046.4fd
index 5aad16d..4e68284 100644
--- a/PROYECTO/indir/infmmt046.4fd
+++ b/PROYECTO/indir/infmmt046.4fd
@@ -12,6 +12,8 @@
     <RecordField colName="unidad_med" fieldIdRef="15" fieldType="TABLE_COLUMN" name="intb00001.unidad_med" sqlTabName="intb00001" uid="{5d253d6f-9d68-4c95-9a22-76aabe75fa79}"/>
     <RecordField colName="descrip_esp" fieldIdRef="14" fieldType="TABLE_COLUMN" name="intb00001.descrip_esp" sqlTabName="intb00001" uid="{ff167e69-f067-4d4c-ac10-5ec84b88decd}"/>
     <RecordField colName="existencia" fieldIdRef="0" name="existencia" sqlTabName="formonly" uid="{efcd0bfb-50b3-4fae-b2fc-1649d7f569da}"/>
+    <RecordField colName="maquina" fieldIdRef="25" name="codigo" sqlTabName="formonly" uid="{a1b2c3d4-3333-4001-8001-000000000001}"/>
+    <RecordField colName="clasf_bloque" fieldIdRef="26" name="clasf_bloque" sqlTabName="formonly" uid="{a1b2c3d4-3333-4001-8001-000000000002}"/>
   </Record>
   <Record name="record1" uid="{43dfdfd8-2c00-47d0-888c-3c710875f92b}">
     <RecordField colName="num_doc" fieldIdRef="7" fieldType="TABLE_COLUMN" name="intb00006.num_doc" sqlTabName="intb00006" uid="{3654cddf-82ff-4ffc-8f10-5ee4ab25b47c}"/>
@@ -20,50 +22,65 @@
     <RecordField colName="descrip_mov" fieldIdRef="18" name="descrip_mov" sqlTabName="formonly" uid="{813f8ba1-8157-4849-a0e8-f3140299e9ce}"/>
     <RecordField colName="fecha" fieldIdRef="8" fieldType="TABLE_COLUMN" name="intb00006.fecha" sqlTabName="intb00006" uid="{f2a62dee-1ec8-465f-aa1c-f58542f4edd1}"/>
     <RecordField colName="bodega" fieldIdRef="16" name="bodega" sqlTabName="formonly" uid="{41b65fc5-5db4-45f6-99af-ff9c385e505b}"/>
-    <RecordField colName="depto_a" fieldIdRef="2" name="depto_a" sqlTabName="formonly" uid="{6bdacdf3-1238-4efc-8288-c9e414078e9f}"/>
-    <RecordField colName="nombre_d" fieldIdRef="3" name="nombre_d" sqlTabName="formonly" uid="{17baeaa2-59e8-43c6-acfa-36eab3ba34dd}"/>
+    <RecordField colName="departamento" fieldIdRef="2" name="departamento" sqlTabName="formonly" uid="{6bdacdf3-1238-4efc-8288-c9e414078e9f}"/>
+    <RecordField colName="conduce" fieldIdRef="19" name="conduce" sqlTabName="formonly" uid="{a1b2c3d4-2222-4001-8001-000000000001}"/>
+    <RecordField colName="cod_transp" fieldIdRef="20" name="cod_transp" sqlTabName="formonly" uid="{a1b2c3d4-2222-4001-8001-000000000002}"/>
+    <RecordField colName="sec_transp" fieldIdRef="21" name="sec_transp" sqlTabName="formonly" uid="{a1b2c3d4-2222-4001-8001-000000000003}"/>
+    <RecordField colName="nombre_transp" fieldIdRef="22" name="nombre_transp" sqlTabName="formonly" uid="{a1b2c3d4-2222-4001-8001-000000000004}"/>
+    <RecordField colName="ficha_vehiculo" fieldIdRef="23" name="ficha_vehiculo" sqlTabName="formonly" uid="{a1b2c3d4-2222-4001-8001-000000000005}"/>
+    <RecordField colName="placa" fieldIdRef="24" name="placa" sqlTabName="formonly" uid="{a1b2c3d4-2222-4001-8001-000000000006}"/>
     <RecordField colName="pnum_emp" fieldIdRef="4" name="pnum_emp" sqlTabName="formonly" uid="{bfe61fca-3b3d-4e21-b8e1-5932090c7559}"/>
     <RecordField colName="nombre" fieldIdRef="5" name="nombre" sqlTabName="formonly" uid="{60a5474c-aa47-4275-a45f-98d878404e80}"/>
     <RecordField colName="apellido" fieldIdRef="6" name="apellido" sqlTabName="formonly" uid="{7c4796f9-5c66-4c91-a3d5-c3a44527d85e}"/>
   </Record>
-  <Form gridHeight="16" gridWidth="87" name="infmmt046" text="TRANSACCIONES INVENTARIOS">
+  <Form gridHeight="19" gridWidth="87" name="infmmt046" text="TRANSACCIONES INVENTARIOS">
     <ToolBar name="toolbar1">
       <ToolBarItem comment="Nuevo Documento" image="new" name="nuevo" text="Documento"/>
       <ToolBarItem comment="Criterio de busqueda" image="find" name="buscar" text="Buscar Documento"/>
       <ToolBarSeparator name="toolbarseparator1"/>
       <ToolBarItem image="quit" name="salir" text="Salir"/>
     </ToolBar>
-    <Grid gridHeight="16" gridWidth="87" name="grid1" posX="0" posY="0">
-      <Group gridHeight="7" gridWidth="83" name="group1" posX="1" posY="1">
+    <Grid gridHeight="19" gridWidth="87" name="grid1" posX="0" posY="0">
+      <Group gridHeight="10" gridWidth="83" name="group1" posX="1" posY="1">
         <Label gridHeight="1" gridWidth="17" name="label1" posX="2" posY="1" text="Documento Numero"/>
         <Edit autoNext="true" colName="num_doc" fieldId="7" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="6" name="intb00006.num_doc" noEntry="true" posX="20" posY="1" sqlTabName="intb00006" tabIndex="1" widget="Edit"/>
         <Label gridHeight="1" gridWidth="13" name="label2" posX="32" posY="1" text="Orden Compra"/>
         <Edit colName="orden_compra" fieldId="1" gridHeight="1" gridWidth="7" name="orden_compra" posX="46" posY="1" sqlTabName="formonly" tabIndex="2" widget="Edit"/>
         <Label gridHeight="1" gridWidth="17" name="label3" posX="2" posY="2" text="Codigo Movimiento"/>
-        <ComboBox autoNext="true" colName="cod_mov" comment="Digite codigo del movimiento" fieldId="17" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="2" name="intb00006.cod_mov" posX="20" posY="2" sqlTabName="intb00006" tabIndex="3" widget="ComboBox"/>
-        <Edit colName="descrip_mov" fieldId="18" gridHeight="1" gridWidth="34" name="descrip_mov" noEntry="true" posX="25" posY="2" sqlTabName="formonly" tabIndex="4" widget="Edit"/>
+        <ComboBox autoNext="true" colName="cod_mov" comment="Digite codigo del movimiento" fieldId="17" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="35" name="intb00006.cod_mov" posX="20" posY="2" sqlTabName="intb00006" tabIndex="3" widget="ComboBox"/>
+        <Edit colName="descrip_mov" fieldId="18" gridHeight="1" gridWidth="26" name="descrip_mov" noEntry="true" posX="56" posY="2" sqlTabName="formonly" tabIndex="4" widget="Edit"/>
         <Label gridHeight="1" gridWidth="5" name="label4" posX="2" posY="3" text="Fecha"/>
         <Edit autoNext="true" colName="fecha" comment="Digite Fecha Documento" fieldId="8" fieldType="TABLE_COLUMN" format="dd/mm/yyyy" gridHeight="1" gridWidth="10" name="intb00006.fecha" posX="20" posY="3" sqlTabName="intb00006" tabIndex="5" widget="Edit"/>
         <Label gridHeight="1" gridWidth="8" name="label5" posX="32" posY="3" text="Bodega :"/>
-        <ComboBox autoNext="true" colName="bodega" fieldId="16" gridHeight="1" gridWidth="3" name="bodega" posX="41" posY="3" sqlTabName="formonly" tabIndex="6" widget="ComboBox"/>
-        <Label gridHeight="1" gridWidth="7" name="label6" posX="45" posY="3" text="Conduce"/>
-        <Label gridHeight="1" gridWidth="12" name="label7" posX="2" posY="4" text="DEPARTAMENTO"/>
-        <ComboBox colName="depto_a" fieldId="2" gridHeight="1" gridWidth="4" name="depto_a" posX="20" posY="4" sqlTabName="formonly" tabIndex="7" widget="ComboBox"/>
-        <Edit colName="nombre_d" fieldId="3" gridHeight="1" gridWidth="23" name="nombre_d" noEntry="true" posX="26" posY="4" sqlTabName="formonly" tabIndex="8" widget="Edit"/>
-        <Label gridHeight="1" gridWidth="13" name="label8" posX="2" posY="5" text="Operador Grua"/>
-        <Edit colName="pnum_emp" fieldId="4" gridHeight="1" gridWidth="4" name="pnum_emp" posX="20" posY="5" sqlTabName="formonly" tabIndex="9" widget="Edit"/>
-        <Edit colName="nombre" fieldId="5" gridHeight="1" gridWidth="17" name="nombre" noEntry="true" posX="26" posY="5" sqlTabName="formonly" tabIndex="10" widget="Edit"/>
-        <Edit colName="apellido" fieldId="6" gridHeight="1" gridWidth="23" name="apellido" noEntry="true" posX="45" posY="5" sqlTabName="formonly" tabIndex="11" widget="Edit"/>
+        <ComboBox autoNext="true" colName="bodega" fieldId="16" gridHeight="1" gridWidth="35" name="bodega" posX="41" posY="3" sqlTabName="formonly" tabIndex="6" widget="ComboBox"/>
+        <Label gridHeight="1" gridWidth="7" name="label6" posX="2" posY="4" text="Conduce"/>
+        <Edit colName="conduce" fieldId="19" gridHeight="1" gridWidth="9" name="conduce" posX="20" posY="4" sqlTabName="formonly" tabIndex="7" widget="Edit"/>
+        <Label gridHeight="1" gridWidth="12" name="label7" posX="2" posY="5" text="DEPARTAMENTO"/>
+        <ComboBox colName="departamento" fieldId="2" gridHeight="1" gridWidth="35" name="departamento" posX="20" posY="5" sqlTabName="formonly" tabIndex="8" widget="ComboBox"/>
+        <Label gridHeight="1" gridWidth="13" name="label8" posX="2" posY="6" text="Operador Grua"/>
+        <Edit colName="pnum_emp" fieldId="4" gridHeight="1" gridWidth="4" name="pnum_emp" posX="20" posY="6" sqlTabName="formonly" tabIndex="9" widget="Edit"/>
+        <Edit colName="nombre" fieldId="5" gridHeight="1" gridWidth="17" name="nombre" noEntry="true" posX="26" posY="6" sqlTabName="formonly" tabIndex="10" widget="Edit"/>
+        <Edit colName="apellido" fieldId="6" gridHeight="1" gridWidth="23" name="apellido" noEntry="true" posX="45" posY="6" sqlTabName="formonly" tabIndex="11" widget="Edit"/>
+        <Label gridHeight="1" gridWidth="13" name="label9" posX="2" posY="7" text="Transportista"/>
+        <Edit colName="cod_transp" fieldId="20" gridHeight="1" gridWidth="4" name="cod_transp" posX="20" posY="7" sqlTabName="formonly" tabIndex="12" widget="Edit"/>
+        <Edit colName="sec_transp" fieldId="21" gridHeight="1" gridWidth="4" name="sec_transp" posX="25" posY="7" sqlTabName="formonly" tabIndex="13" widget="Edit"/>
+        <Edit colName="nombre_transp" fieldId="22" gridHeight="1" gridWidth="30" name="nombre_transp" noEntry="true" posX="30" posY="7" sqlTabName="formonly" tabIndex="14" widget="Edit"/>
+        <Label gridHeight="1" gridWidth="14" name="label10" posX="2" posY="8" text="Ficha Vehiculo"/>
+        <Edit colName="ficha_vehiculo" fieldId="23" gridHeight="1" gridWidth="20" name="ficha_vehiculo" posX="20" posY="8" sqlTabName="formonly" tabIndex="15" widget="Edit"/>
+        <Label gridHeight="1" gridWidth="6" name="label11" posX="42" posY="8" text="Placa"/>
+        <Edit colName="placa" fieldId="24" gridHeight="1" gridWidth="15" name="placa" posX="49" posY="8" sqlTabName="formonly" tabIndex="16" widget="Edit"/>
       </Group>
-      <Table gridHeight="7" gridWidth="86" name="table1" posX="1" posY="8" totalRows="6" unitWidth="characters" width="86">
-        <Edit colName="cod_n" comment="Digite el NIVEL" fieldId="9" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="2" name="intb00006.cod_n" posX="0" posY="0" sqlTabName="intb00006" tabIndex="12" title="CODIGO" widget="Edit"/>
-        <Edit autoNext="true" colName="cod_grupo" comment="Digite el GRUPO" fieldId="10" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="3" name="intb00006.cod_grupo" posX="2" posY="0" sqlTabName="intb00006" tabIndex="13" widget="Edit"/>
-        <Edit autoNext="true" colName="cod_tipo" comment="Digite el TIPO" fieldId="11" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="3" name="intb00006.cod_tipo" posX="5" posY="0" sqlTabName="intb00006" tabIndex="14" widget="Edit"/>
-        <Edit autoNext="true" colName="cod_sec" comment="Digite la SECUENCIA   " fieldId="12" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="4" name="intb00006.cod_sec" posX="8" posY="0" sqlTabName="intb00006" tabIndex="15" widget="Edit"/>
-        <Edit colName="cantidad_2" comment="Digite La Cantidad Ordenada" fieldId="13" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="11" name="intb00006.cantidad_2" posX="12" posY="0" sqlTabName="intb00006" tabIndex="16" title="CANTIDAD" widget="Edit"/>
-        <Edit colName="unidad_med" fieldId="15" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="3" name="intb00001.unidad_med" noEntry="true" posX="23" posY="0" sqlTabName="intb00001" tabIndex="17" widget="Edit"/>
-        <Edit colName="descrip_esp" fieldId="14" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="30" name="intb00001.descrip_esp" posX="26" posY="0" sqlTabName="intb00001" tabIndex="18" title="DESCRIPCION" widget="Edit"/>
-        <Edit colName="existencia" fieldId="0" gridHeight="1" gridWidth="8" name="existencia" posX="56" posY="0" sqlTabName="formonly" tabIndex="19" title="EXISTENCIA" widget="Edit"/>
+      <Table gridHeight="7" gridWidth="86" name="table1" posX="1" posY="11" totalRows="6" unitWidth="characters" width="114">
+        <Edit colName="cod_n" comment="Digite el NIVEL" fieldId="9" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="2" name="intb00006.cod_n" posX="0" posY="0" sqlTabName="intb00006" tabIndex="18" title="CODIGO" widget="Edit"/>
+        <Edit autoNext="true" colName="cod_grupo" comment="Digite el GRUPO" fieldId="10" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="3" name="intb00006.cod_grupo" posX="2" posY="0" sqlTabName="intb00006" tabIndex="19" widget="Edit"/>
+        <Edit autoNext="true" colName="cod_tipo" comment="Digite el TIPO" fieldId="11" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="3" name="intb00006.cod_tipo" posX="5" posY="0" sqlTabName="intb00006" tabIndex="20" widget="Edit"/>
+        <Edit autoNext="true" colName="cod_sec" comment="Digite la SECUENCIA   " fieldId="12" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="4" name="intb00006.cod_sec" posX="8" posY="0" sqlTabName="intb00006" tabIndex="21" widget="Edit"/>
+        <Edit colName="cantidad_2" comment="Digite La Cantidad Ordenada" fieldId="13" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="11" name="intb00006.cantidad_2" posX="12" posY="0" sqlTabName="intb00006" tabIndex="22" title="CANTIDAD" widget="Edit"/>
+        <Edit colName="unidad_med" fieldId="15" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="3" name="intb00001.unidad_med" noEntry="true" posX="23" posY="0" sqlTabName="intb00001" tabIndex="23" widget="Edit"/>
+        <Edit colName="descrip_esp" fieldId="14" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="30" name="intb00001.descrip_esp" posX="26" posY="0" sqlTabName="intb00001" tabIndex="24" title="DESCRIPCION" widget="Edit"/>
+        <Edit colName="existencia" fieldId="0" gridHeight="1" gridWidth="8" name="existencia" posX="56" posY="0" sqlTabName="formonly" tabIndex="25" title="EXISTENCIA" widget="Edit"/>
+        <ComboBox colName="maquina" fieldId="25" gridHeight="1" gridWidth="25" name="codigo" posX="64" posY="0" sqlTabName="formonly" tabIndex="26" title="MAQUINA" widget="ComboBox"/>
+        <ComboBox colName="clasf_bloque" fieldId="26" gridHeight="1" gridWidth="25" name="clasf_bloque" posX="89" posY="0" sqlTabName="formonly" tabIndex="27" title="CLASF. BLOQUE" widget="ComboBox"/>
       </Table>
     </Grid>
   </Form>
diff --git a/PROYECTO/indir/infmmt046.per b/PROYECTO/indir/infmmt046.per
index 0c0dc71..6515ac3 100644
--- a/PROYECTO/indir/infmmt046.per
+++ b/PROYECTO/indir/infmmt046.per
@@ -13,9 +13,11 @@ GRID
 <G                                                                                >
   Documento Numero [f000  ]     Orden Compra [ord    ]                                             
   Codigo Movimiento[m ] [m1                                ]          
-  Fecha            [f001      ] Bodega :[p1 ]Conduce                     
-  DEPARTAMENTO     [f1  ][d1                     ]                                 
-  Operador Grua    [op  ][nomop            ][ap                     ]            
+  Fecha            [f001      ] Bodega :[p1 ]Conduce [f002    ]
+  DEPARTAMENTO     [f1  ][d1                     ]
+  Operador Grua    [op  ][nomop            ][ap                     ]
+  Transportista    [tr1 ][tr2 ][nomtr                            ]
+  Ficha Vehiculo   [fveh                            ] Placa [pplaca         ]
 
 <t                                                                                   >  
    [a ][b  ][c  ][d   ][f02        ] [p  ][k                             ] [ex1     ]
@@ -34,11 +36,17 @@ cotb00001
 ATTRIBUTES
 ex1   = formonly.existencia, TITLE="EXISTENCIA";
 ord   = formonly.orden_compra;
-f1    = formonly.depto_a;
+COMBOBOX f1 = formonly.departamento;
 d1   = formonly.nombre_d,noentry;
 op   = formonly.pnum_emp;
 nomop  = formonly.nombre,noentry;
 ap     = formonly.apellido,noentry;
+f002   = formonly.conduce;
+tr1    = formonly.cod_transp;
+tr2    = formonly.sec_transp;
+nomtr  = formonly.nombre_transp,noentry;
+fveh   = formonly.ficha_vehiculo;
+pplaca = formonly.placa;
 f000 = intb00006.num_doc,autonext,noentry;
 f001 = intb00006.fecha, format = "dd/mm/yyyy",autonext,
     comments = "Digite Fecha Documento";
diff --git a/PROYECTO/indir/inprfu000.4gl b/PROYECTO/indir/inprfu000.4gl
index b450703..3643832 100644
--- a/PROYECTO/indir/inprfu000.4gl
+++ b/PROYECTO/indir/inprfu000.4gl
@@ -11,7 +11,7 @@ FUNCTION reimprime(xprograma)
   
   IF xprograma = 'inprmt046' THEN
      CONSTRUCT criterio ON a.cod_mov,a.num_doc,a.fecha,a.depto_a,a.bodega FROM
-                          cod_mov,num_doc,fecha,depto_a,bodega
+                          cod_mov,num_doc,fecha,departamento,bodega
       BEFORE CONSTRUCT
            CALL cincodmov()
            CALL busca_departamento()      
diff --git a/PROYECTO/indir/inprmt046.4gl b/PROYECTO/indir/inprmt046.4gl
index 378746f..3edc187 100644
--- a/PROYECTO/indir/inprmt046.4gl
+++ b/PROYECTO/indir/inprmt046.4gl
@@ -663,24 +663,3 @@ FUNCTION inprad046()
     END INPUT
 END FUNCTION
 
-FUNCTION maquinaria()
-
-    DEFINE
-        kmaquina VARCHAR(14),
-        kdescripcion CHAR(75),
-        maquinas ui.ComboBox
-        
-    LET maquinas = ui.combobox.forname("formonly.codigo")
-
-    DECLARE busca_maquinas1 CURSOR FOR
-        SELECT a.cod_maquina, a.descrip_maquina
-            FROM intb00059 a
-            ORDER BY a.cod_maquina
-
-    CALL maquinas.clear()
-
-    FOREACH busca_maquinas1 INTO kmaquina, kdescripcion
-        CALL maquinas.additem(kmaquina, kdescripcion)
-    END FOREACH
-
-END FUNCTION
diff --git a/PROYECTO/indir/maquinaria.4gl b/PROYECTO/indir/maquinaria.4gl
new file mode 100644
index 0000000..5e2fba0
--- /dev/null
+++ b/PROYECTO/indir/maquinaria.4gl
@@ -0,0 +1,21 @@
+FUNCTION maquinaria()
+
+    DEFINE
+        kmaquina VARCHAR(14),
+        kdescripcion CHAR(75),
+        maquinas ui.ComboBox
+
+    LET maquinas = ui.combobox.forname("formonly.codigo")
+
+    DECLARE busca_maquinas1 CURSOR FOR
+        SELECT a.cod_maquina, a.descrip_maquina
+            FROM intb00059 a
+            ORDER BY a.cod_maquina
+
+    CALL maquinas.clear()
+
+    FOREACH busca_maquinas1 INTO kmaquina, kdescripcion
+        CALL maquinas.additem(kmaquina, kdescripcion)
+    END FOREACH
+
+END FUNCTION
diff --git a/PROYECTO/mbsERP.4pw b/PROYECTO/mbsERP.4pw
index dd995f1..6b2e02f 100644
--- a/PROYECTO/mbsERP.4pw
+++ b/PROYECTO/mbsERP.4pw
@@ -335,6 +335,7 @@
         <File filePath="indir/infmmt005.4fd"/>
         <File filePath="indir/infmmt013.4fd"/>
         <File filePath="indir/infmmt046.4fd"/>
+        <File filePath="indir/infmmt036.4fd"/>
       </Library>
       <Library binaryName="FUNCIONES_IN" dependencies="-1026233879" id="-801525068" label="FUNCIONES_IN">
         <File filePath="indir/inprgb000.4gl"/>
@@ -347,6 +348,7 @@
         <File filePath="otrodir/clasf_bloques.4gl"/>
         <File filePath="otrodir/medidas.4gl"/>
         <File filePath="indir/defecto.4gl"/>
+        <File filePath="indir/maquinaria.4gl"/>
       </Library>
       <Application binaryName="inprmt002" dependencies="-801525068,-1026233879,-764824792" id="-900000001" label="inprmt002">
         <Configuration commandLineArguments="jpeguero Peguero2023" id="-900000002" label="Configuration"/>