Corrige prprrp116 (reporte STATUS ORDENES PEDIDOS) y agrega modulo MATERIA PRIMA

- prprrp116: agrega form faltante, corrige encabezado del reporte (p_compania.nombre), evita crash cuando no hay registros, agrega opcion EXCEL en Visualizacion, quita filtros <blank>/<not blank> del combo Status Orden. - prprcs001: corrige CONSTRUCT con columna inexistente (fecha_oc). - prprmt022: quita filtros <blank>/<not blank> del combo Estado. - Agrega los 13 programas de MATERIA PRIMA al proyecto (mbsERP.4pw).
2026-08-25 12:21:24 -04:00
parent f13b57e592
commit 9ce99926e1
6 changed files with 198 additions and 34 deletions
@@ -40,7 +40,7 @@
      <Label gridHeight="1" gridWidth="8" name="label2" posX="24" posY="1" text="FECHA FINAL"/>
      <DateEdit fieldId="16" gridHeight="1" gridWidth="13" name="fech_final" posX="33" posY="1" tabIndex="-1" title="dateedit2" widget="DateEdit"/>
      <Label gridHeight="1" gridWidth="6" name="label3" posX="47" posY="1" text="ESTADO "/>
-      <ComboBox fieldId="17" gridHeight="1" gridWidth="12" items="ABIERTA, CERRADA" name="estado1" posX="54" posY="1" tabIndex="-1" title="combobox1" widget="ComboBox">
+      <ComboBox fieldId="17" gridHeight="1" gridWidth="12" items="ABIERTA, CERRADA" name="estado1" notNull="true" posX="54" posY="1" tabIndex="-1" title="combobox1" widget="ComboBox">
        <Item lstrtext="false" name="ABIERTA" text="ABIERTA"/>
        <Item lstrtext="false" name="CERRADA" text="CERRADA"/>
      </ComboBox>
@@ -0,0 +1,72 @@
+<?xml version="1.0" encoding="UTF-8" ?>
+<ManagedForm databaseName="smarmotech" fileVersion="40100" gstVersion="60003" name="ManagedForm" uid="{50926d70-025d-4be1-a15f-45acbf1b2888}">
+  <AGSettings>
+    <DynamicProperties version="4"/>
+  </AGSettings>
+  <Record name="record1" uid="{ae577ed1-a849-40c1-a3a8-3df0bfba35f6}">
+    <RecordField colName="cotizacion_no" fieldIdRef="5" name="cotizacion_no" sqlTabName="formonly" uid="{34fb79d0-ea3c-45e5-bd43-bd2484db0e24}"/>
+    <RecordField colName="num_oc" fieldIdRef="12" name="num_oc" sqlTabName="formonly" uid="{1b817c74-fb63-4453-9c9e-580cd0ebe8dd}"/>
+    <RecordField colName="cerrada" fieldIdRef="10" name="cerrada" sqlTabName="formonly" uid="{a0ade89e-f809-4801-83fc-82267e75339d}"/>
+    <RecordField colName="sec_vend" fieldIdRef="13" name="sec_vend" sqlTabName="formonly" uid="{532f53e9-4b3f-4c15-8919-c4afedd6e638}"/>
+    <RecordField colName="historico" defaultValue="N" fieldIdRef="0" name="historico" sqlTabName="formonly" uid="{a297c185-81e7-4ae6-8988-2224946811de}"/>
+    <RecordField colName="fecha" fieldIdRef="11" name="fecha" sqlTabName="formonly" sqlType="DATE" uid="{62430a14-a00f-413f-b6b1-766e90f9315e}"/>
+    <RecordField colName="tipo_cliente" fieldIdRef="7" name="tipo_cliente" sqlTabName="formonly" uid="{7cf8df86-dc57-4cd8-9b40-6636785559c9}"/>
+    <RecordField colName="sec_cliente" fieldIdRef="8" name="sec_cliente" sqlTabName="formonly" uid="{c77b4cbf-8ab9-4072-b566-5ce5401f170b}"/>
+    <RecordField colName="nombre_cliente" fieldIdRef="6" name="nombre_cliente" sqlTabName="formonly" uid="{b775b626-23dd-4f6c-8fda-b729a1e40605}"/>
+    <RecordField colName="telefono_r" fieldIdRef="9" name="telefono_r" sqlTabName="formonly" uid="{c545bc0e-23c1-465b-9688-5d5039b27597}"/>
+    <RecordField colName="cod_n" fieldIdRef="1" name="cod_n" sqlTabName="formonly" uid="{a8bcc1fa-5503-4b65-8249-fdaa1e91c258}"/>
+    <RecordField colName="cod_grupo" fieldIdRef="2" name="cod_grupo" sqlTabName="formonly" uid="{71e68d6d-8151-44c2-a42c-4e9465dd3c2b}"/>
+    <RecordField colName="cod_tipo" fieldIdRef="3" name="cod_tipo" sqlTabName="formonly" uid="{a5d7c1ab-90d7-4feb-b86d-6a74f1966b44}"/>
+    <RecordField colName="cod_sec" fieldIdRef="4" name="cod_sec" sqlTabName="formonly" uid="{0fed854c-cd15-4a85-b593-c3a9f114d277}"/>
+    <RecordField colName="salida" defaultValue="Detallado" fieldIdRef="14" name="salida" sqlTabName="formonly" uid="{72b478e3-81f8-4d24-ad49-d777be1c0608}"/>
+    <RecordField colName="visualiza" defaultValue="PANTALLA" fieldIdRef="15" name="visualiza" sqlTabName="formonly" uid="{7c7aa938-7433-4dd6-bcc2-c27d6b3e2e34}"/>
+  </Record>
+  <Form gridHeight="10" gridWidth="67" name="prfmrp116" text="STATUS ORDENES PEDIDOS">
+    <ActionDefaultList name="actiondefaultlist1">
+      <ActionDefault image="print" name="ejecutar" text="Genera Reporte"/>
+    </ActionDefaultList>
+    <Grid gridHeight="10" gridWidth="67" name="grid1" posX="0" posY="0">
+      <Label gridHeight="1" gridWidth="10" name="label1" posX="3" posY="0" text="Cotizacion"/>
+      <Edit colName="cotizacion_no" comment="Digite un numero de cotizacion o deje en blanco para todas" fieldId="5" gridHeight="1" gridWidth="10" name="cotizacion_no" posX="19" posY="0" sqlTabName="formonly" tabIndex="1" widget="Edit"/>
+      <Label gridHeight="1" gridWidth="5" name="label2" posX="3" posY="1" text="Orden"/>
+      <Edit colName="num_oc" comment="Digite un numero de orden o deje en blanco para todas" fieldId="12" gridHeight="1" gridWidth="10" name="num_oc" posX="19" posY="1" sqlTabName="formonly" tabIndex="2" widget="Edit"/>
+      <Label gridHeight="1" gridWidth="12" name="label3" posX="34" posY="1" text="Status Orden"/>
+      <ComboBox colName="cerrada" fieldId="10" gridHeight="1" gridWidth="14" items="Cerrada, Abiertas" name="cerrada" notNull="true" posX="47" posY="1" sqlTabName="formonly" tabIndex="3" widget="ComboBox">
+        <Item name="S" text="Cerrada"/>
+        <Item name="N" text="Abiertas"/>
+      </ComboBox>
+      <Label gridHeight="1" gridWidth="8" name="label4" posX="3" posY="2" text="Vendedor"/>
+      <Edit colName="sec_vend" comment="Digite un numero de vendedor o deje en blanco para todos" fieldId="13" gridHeight="1" gridWidth="10" name="sec_vend" posX="19" posY="2" sqlTabName="formonly" tabIndex="4" widget="Edit"/>
+      <RadioGroup colName="historico" defaultValue="N" fieldId="0" gridHeight="1" gridWidth="26" items="HISTORICO, ACTUAL" name="historico" posX="35" posY="2" sqlTabName="formonly" tabIndex="5" widget="RadioGroup">
+        <Item name="H" text="HISTORICO"/>
+        <Item name="N" text="ACTUAL"/>
+      </RadioGroup>
+      <Label gridHeight="1" gridWidth="5" name="label5" posX="3" posY="3" text="Fecha"/>
+      <DateEdit colName="fecha" fieldId="11" format="dd/mm/yyyy" gridHeight="1" gridWidth="10" name="fecha" posX="19" posY="3" sqlTabName="formonly" sqlType="DATE" tabIndex="6" widget="DateEdit"/>
+      <Label gridHeight="1" gridWidth="15" name="label6" posX="3" posY="4" text="Codigo Cliente"/>
+      <Edit colName="tipo_cliente" fieldId="7" gridHeight="1" gridWidth="3" name="tipo_cliente" posX="19" posY="4" sqlTabName="formonly" tabIndex="7" widget="Edit"/>
+      <Label gridHeight="1" gridWidth="1" name="label7" posX="23" posY="4" text="-"/>
+      <Edit colName="sec_cliente" fieldId="8" gridHeight="1" gridWidth="6" name="sec_cliente" posX="25" posY="4" sqlTabName="formonly" tabIndex="8" widget="Edit"/>
+      <Label gridHeight="1" gridWidth="15" name="label8" posX="3" posY="5" text="Nombre Cliente"/>
+      <Edit colName="nombre_cliente" comment="Utilice el simbolo (*) para buscar nombres similares al que desea" fieldId="6" gridHeight="1" gridWidth="47" name="nombre_cliente" posX="19" posY="5" sqlTabName="formonly" tabIndex="9" widget="Edit"/>
+      <Label gridHeight="1" gridWidth="13" name="label9" posX="3" posY="6" text="Telefono Res."/>
+      <Edit colName="telefono_r" fieldId="9" gridHeight="1" gridWidth="15" name="telefono_r" posX="19" posY="6" sqlTabName="formonly" tabIndex="10" widget="Edit"/>
+      <Label gridHeight="1" gridWidth="8" name="label10" posX="3" posY="7" text="Producto"/>
+      <Edit colName="cod_n" fieldId="1" gridHeight="1" gridWidth="5" name="cod_n" posX="19" posY="7" sqlTabName="formonly" tabIndex="11" widget="Edit"/>
+      <Edit colName="cod_grupo" fieldId="2" gridHeight="1" gridWidth="6" name="cod_grupo" posX="26" posY="7" sqlTabName="formonly" tabIndex="12" widget="Edit"/>
+      <Edit colName="cod_tipo" fieldId="3" gridHeight="1" gridWidth="6" name="cod_tipo" posX="34" posY="7" sqlTabName="formonly" tabIndex="13" widget="Edit"/>
+      <Edit colName="cod_sec" fieldId="4" gridHeight="1" gridWidth="7" name="cod_sec" posX="42" posY="7" sqlTabName="formonly" tabIndex="14" widget="Edit"/>
+      <Label gridHeight="1" gridWidth="15" name="label11" posX="3" posY="8" text="Salida Reporte"/>
+      <ComboBox colName="salida" defaultValue="Detallado" fieldId="14" gridHeight="1" gridWidth="15" items="Detallado, Resumido" name="salida" posX="19" posY="8" sqlTabName="formonly" tabIndex="15" widget="ComboBox">
+        <Item name="prprrp116.4rp" text="Detallado"/>
+        <Item name="prprrp016a.4rp" text="Resumido"/>
+      </ComboBox>
+      <Label gridHeight="1" gridWidth="13" name="label12" posX="3" posY="9" text="Visualizacion"/>
+      <ComboBox colName="visualiza" defaultValue="PANTALLA" fieldId="15" gridHeight="1" gridWidth="15" items="PANTALLA, ACROBAT READER, EXCEL" name="visualiza" posX="19" posY="9" sqlTabName="formonly" tabIndex="16" widget="ComboBox">
+        <Item name="SVG" text="PANTALLA"/>
+        <Item name="PDF" text="ACROBAT READER"/>
+        <Item name="XLSX" text="EXCEL"/>
+      </ComboBox>
+    </Grid>
+  </Form>
+</ManagedForm>
@@ -48,7 +48,7 @@ DATEEDIT f1   = formonly.fecha type date,format = "dd/mm/yyyy";
 o1   = formonly.num_oc,comments="Digite un numero de orden o deje en blanco para todas";
 v1   = formonly.sec_vend,comments="Digite un numero de vendedor o deje en blanco para todos";
 COMBOBOX s=formonly.salida,ITEMS=(("prprrp116.4rp","Detallado"),("prprrp016a.4rp","Resumido")),default="Detallado";
-COMBOBOX v=formonly.visualiza,ITEMS=(("SVG","PANTALLA"),("PDF","ACROBAT READER")),default="PANTALLA";
+COMBOBOX v=formonly.visualiza,ITEMS=(("SVG","PANTALLA"),("PDF","ACROBAT READER"),("XLSX","EXCEL")),default="PANTALLA";
 instructions
 delimiters " "
 end
@@ -71,7 +71,9 @@ DEFINE hoy DATE
     END INPUT

    CONSTRUCT BY NAME criterio ON a.tipo_cliente,a.sec_cliente,
-                                  a.num_oc,a.fecha
+                                  a.num_oc,a.fecha_oc
+                             FROM tipo_cliente,sec_cliente,
+                                  num_oc,fecha
                                    
       AFTER CONSTRUCT
         IF tipo_orden = 'N' THEN
@@ -79,6 +79,8 @@ FUNCTION prprrp016()
   END RECORD,
     salida,visualiza CHAR(20)

+ DEFINE hay_datos SMALLINT
+
 OPTIONS
 PROMPT  LINE 23,
 FORM LINE 8,
@@ -205,6 +207,40 @@ FUNCTION prprrp016()
   PREPARE comando FROM selec
   DECLARE busca CURSOR FOR comando

+   -- Verifica primero si hay registros: si el reporte se inicia sin filas,
+   -- el motor de reportes falla al no poder resolver p_compania.nombre
+   -- (variable "look ahead" del encabezado) porque nunca se llega a imprimir nada.
+   OPEN busca
+   FETCH busca INTO busqueda.cotizacion_no,busqueda.fecha,busqueda.tipo_cliente,
+                     busqueda.sec_cliente,busqueda.nombre_proyecto,busqueda.direccion_proyecto,
+                     busqueda.telefono_r,busqueda.nombre,busqueda.num_oc,busqueda.fecha_oc,
+                     busqueda.fecha_entrega,busqueda.fecha_cierre,busqueda.cod_n,
+                     busqueda.cod_grupo,busqueda.cod_tipo,busqueda.cod_sec,
+                     busqueda.descrip_esp,busqueda.unidad_med,busqueda.cantidad,
+                     busqueda.precio,busqueda.cantidad_2,busqueda.cod_mov,
+                     busqueda.fecha_doc,busqueda.documento,busqueda.status_mov,
+                     busqueda.simbolo,busqueda.vendedor,busqueda.monto_cotizacion,
+                     busqueda.condicion,busqueda.estado_orden,busqueda.telefono,
+                     busqueda.celular,busqueda.email,busqueda.contacto
+   IF STATUS = NOTFOUND THEN
+      CALL fgl_winmessage("WARNING","NO EXISTEN REGISTROS CON ESA CONDICION","SOP")
+      LET hay_datos = FALSE
+   ELSE
+      LET hay_datos = TRUE
+   END IF
+
+   # El formulario solo guarda el texto visible del combo (no el valor interno
+   # que tenia el .per original), asi que aqui se traduce de vuelta.
+   CASE salida CLIPPED
+      WHEN "Detallado" LET salida = "prprrp116.4rp"
+      WHEN "Resumido"  LET salida = "prprrp016a.4rp"
+   END CASE
+   CASE visualiza CLIPPED
+      WHEN "PANTALLA"       LET visualiza = "SVG"
+      WHEN "ACROBAT READER" LET visualiza = "PDF"
+      WHEN "EXCEL"          LET visualiza = "XLSX"
+   END CASE
+
   LET r_filename = salida CLIPPED

   IF fgl_report_loadCurrentSettings(r_filename) THEN    -- load the .4rp file
@@ -216,30 +252,13 @@ FUNCTION prprrp016()
   END IF


-IF handler IS NOT NULL THEN           -- report engine was configured ok
+IF handler IS NOT NULL AND hay_datos THEN           -- report engine was configured ok and there is data to print

   START REPORT reporte_16 TO XML HANDLER handler

-        
-        
-   FOREACH busca INTO busqueda.cotizacion_no,busqueda.fecha,busqueda.tipo_cliente,
-                      busqueda.sec_cliente,busqueda.nombre_proyecto,busqueda.direccion_proyecto,
-                      busqueda.telefono_r,busqueda.nombre,busqueda.num_oc,busqueda.fecha_oc,
-                      busqueda.fecha_entrega,busqueda.fecha_cierre,busqueda.cod_n,
-                      busqueda.cod_grupo,busqueda.cod_tipo,busqueda.cod_sec,
-                      busqueda.descrip_esp,busqueda.unidad_med,busqueda.cantidad,
-                      busqueda.precio,busqueda.cantidad_2,busqueda.cod_mov,
-                      busqueda.fecha_doc,busqueda.documento,busqueda.status_mov,
-                      busqueda.simbolo,busqueda.vendedor,busqueda.monto_cotizacion,
-                      busqueda.condicion,busqueda.estado_orden,busqueda.telefono,
-                      busqueda.celular,busqueda.email,busqueda.contacto
-     
-        
-        
-       IF STATUS = NOTFOUND THEN
-          CALL fgl_winmessage("WARNING","NO EXISTEN REGISTROS CON ESA CONDICION","SOP")
-          EXIT FOREACH
-       END IF
+   -- La primera fila ya fue leida arriba (para saber si hay_datos); aqui se
+   -- procesa esa fila y se sigue con FETCH manual hasta agotar el cursor.
+   WHILE hay_datos
       IF busqueda.cantidad_2 IS NULL THEN
          LET busqueda.cantidad_2 = 0
       END IF
@@ -268,9 +287,25 @@ IF handler IS NOT NULL THEN           -- report engine was configured ok
       END IF

       OUTPUT TO REPORT reporte_16(busqueda.*)
-   END FOREACH
+
+       FETCH busca INTO busqueda.cotizacion_no,busqueda.fecha,busqueda.tipo_cliente,
+                         busqueda.sec_cliente,busqueda.nombre_proyecto,busqueda.direccion_proyecto,
+                         busqueda.telefono_r,busqueda.nombre,busqueda.num_oc,busqueda.fecha_oc,
+                         busqueda.fecha_entrega,busqueda.fecha_cierre,busqueda.cod_n,
+                         busqueda.cod_grupo,busqueda.cod_tipo,busqueda.cod_sec,
+                         busqueda.descrip_esp,busqueda.unidad_med,busqueda.cantidad,
+                         busqueda.precio,busqueda.cantidad_2,busqueda.cod_mov,
+                         busqueda.fecha_doc,busqueda.documento,busqueda.status_mov,
+                         busqueda.simbolo,busqueda.vendedor,busqueda.monto_cotizacion,
+                         busqueda.condicion,busqueda.estado_orden,busqueda.telefono,
+                         busqueda.celular,busqueda.email,busqueda.contacto
+       IF STATUS = NOTFOUND THEN
+          LET hay_datos = FALSE
+       END IF
+   END WHILE
   FINISH REPORT reporte_16
 END IF
+ CLOSE busca


 AFTER DIALOG
@@ -349,7 +384,7 @@ BEFORE GROUP OF x.cotizacion_no

 PRINTX x.cotizacion_no,x.direccion_proyecto,x.nombre_proyecto,
        x.tipo_cliente,x.sec_cliente,x.telefono_r,x.num_oc,x.fecha,x.fecha_cierre,
-        x.fecha_entrega,x.fecha_oc
+        x.fecha_entrega,x.fecha_oc,p_compania.nombre
        
 
 BEFORE GROUP OF x.codigo
@@ -284,7 +284,61 @@
    </Group>
    <Group id="202834315" label="MATERIA PRIMA">
      <Library binaryName="FORMULARIOS_IN" id="-863149381" label="FORMULARIOS_IN"/>
-      <Library binaryName="FUNCIONES_IN" id="-801525068" label="FUNCIONES_IN"/>
+      <Library binaryName="FUNCIONES_IN" dependencies="-1026233879" id="-801525068" label="FUNCIONES_IN">
+        <File filePath="../PROYECTOS/indir/inprgb000.4gl"/>
+      </Library>
+      <Application binaryName="inprmt002" dependencies="-801525068,-1026233879,-764824792" id="-900000001" label="inprmt002">
+        <Configuration commandLineArguments="jpeguero Peguero2023" id="-900000002" label="Configuration"/>
+        <File filePath="../PROYECTOS/indir/inprmt002.4gl"/>
+      </Application>
+      <Application binaryName="inprmt005" dependencies="-801525068,-1026233879,-764824792" id="-900000003" label="inprmt005">
+        <Configuration commandLineArguments="jpeguero Peguero2023" id="-900000004" label="Configuration"/>
+        <File filePath="../PROYECTOS/indir/inprmt005.4gl"/>
+      </Application>
+      <Application binaryName="inprmt013" dependencies="-801525068,-1026233879,-764824792" id="-900000005" label="inprmt013">
+        <Configuration commandLineArguments="jpeguero Peguero2023" id="-900000006" label="Configuration"/>
+        <File filePath="../PROYECTOS/indir/inprmt013.4gl"/>
+      </Application>
+      <Application binaryName="inprmt046" dependencies="-801525068,-1026233879,-764824792" id="-900000007" label="inprmt046">
+        <Configuration commandLineArguments="jpeguero Peguero2023" id="-900000008" label="Configuration"/>
+        <File filePath="../PROYECTOS/indir/inprmt046.4gl"/>
+      </Application>
+      <Application binaryName="inprmt036" dependencies="-801525068,-1026233879,-764824792" id="-900000009" label="inprmt036">
+        <Configuration commandLineArguments="jpeguero Peguero2023" id="-900000010" label="Configuration"/>
+        <File filePath="../PROYECTOS/indir/inprmt036.4gl"/>
+      </Application>
+      <Application binaryName="inprmt066" dependencies="-801525068,-1026233879,-764824792" id="-900000011" label="inprmt066">
+        <Configuration commandLineArguments="jpeguero Peguero2023" id="-900000012" label="Configuration"/>
+        <File filePath="../PROYECTOS/indir/inprmt066.4gl"/>
+      </Application>
+      <Application binaryName="inprcs006" dependencies="-801525068,-1026233879,-764824792" id="-900000013" label="inprcs006">
+        <Configuration commandLineArguments="jpeguero Peguero2023" id="-900000014" label="Configuration"/>
+        <File filePath="../PROYECTOS/indir/inprcs006.4gl"/>
+      </Application>
+      <Application binaryName="inprrp003" dependencies="-801525068,-1026233879,-764824792" externalDependencies="libgre.42x" id="-900000015" label="inprrp003">
+        <Configuration commandLineArguments="jpeguero Peguero2023" id="-900000016" label="Configuration"/>
+        <File compilerOptions="--build-rdd" filePath="../PROYECTOS/indir/inprrp003.4gl"/>
+      </Application>
+      <Application binaryName="inprrp005" dependencies="-801525068,-1026233879,-764824792" externalDependencies="libgre.42x" id="-900000017" label="inprrp005">
+        <Configuration commandLineArguments="jpeguero Peguero2023" id="-900000018" label="Configuration"/>
+        <File compilerOptions="--build-rdd" filePath="../PROYECTOS/indir/inprrp005.4gl"/>
+      </Application>
+      <Application binaryName="inprrp008" dependencies="-801525068,-1026233879,-764824792" externalDependencies="libgre.42x" id="-900000019" label="inprrp008">
+        <Configuration commandLineArguments="jpeguero Peguero2023" id="-900000020" label="Configuration"/>
+        <File compilerOptions="--build-rdd" filePath="../PROYECTOS/indir/inprrp008.4gl"/>
+      </Application>
+      <Application binaryName="inprrp009" dependencies="-801525068,-1026233879,-764824792" externalDependencies="libgre.42x" id="-900000021" label="inprrp009">
+        <Configuration commandLineArguments="jpeguero Peguero2023" id="-900000022" label="Configuration"/>
+        <File compilerOptions="--build-rdd" filePath="../PROYECTOS/indir/inprrp009.4gl"/>
+      </Application>
+      <Application binaryName="inprrp028" dependencies="-801525068,-1026233879,-764824792" externalDependencies="libgre.42x" id="-900000023" label="inprrp028">
+        <Configuration commandLineArguments="jpeguero Peguero2023" id="-900000024" label="Configuration"/>
+        <File compilerOptions="--build-rdd" filePath="../PROYECTOS/indir/inprrp028.4gl"/>
+      </Application>
+      <Application binaryName="inprrp011" dependencies="-801525068,-1026233879,-764824792" externalDependencies="libgre.42x" id="-900000025" label="inprrp011">
+        <Configuration commandLineArguments="jpeguero Peguero2023" id="-900000026" label="Configuration"/>
+        <File compilerOptions="--build-rdd" filePath="../PROYECTOS/indir/inprrp011.4gl"/>
+      </Application>
    </Group>
    <Group id="1302820616" label="NOMINA">
      <Library binaryName="FORMULARIOS_NO" id="-335228674" label="FORMULARIOS_NO"/>
@@ -323,7 +377,7 @@
        <Configuration commandLineArguments="jpeguero Peguero2023" id="-974560942" label="Configuration"/>
        <File compilerOptions="--build-rdd" filePath="PRDIR/prprmt021.4gl"/>
      </Application>
-      <Application binaryName="prprmt020" dependencies="-837156229,-1026233879,-764824792" id="-358374666" label="prprmt020">
+      <Application binaryName="prprmt020" dependencies="-837156229,-1026233879,-764824792,493047263" id="-358374666" label="prprmt020">
        <Configuration commandLineArguments="jpeguero Peguero2023" id="240197034" label="Configuration"/>
        <File filePath="PRDIR/prprmt020.4gl"/>
      </Application>
@@ -340,7 +394,7 @@
        <File compilerOptions="--build-rdd" filePath="PRDIR/prprrp116.4gl"/>
      </Application>
      <Library binaryName="FORMULARIOS_PR" dependencies="-1026233879" id="-956683955" label="FORMULARIOS_PR">
-        <File filePath="PRDIR/prfmrp116.per"/>
+        <File filePath="PRDIR/prfmrp116.4fd"/>
        <File filePath="PRDIR/prfmmt008.4fd"/>
        <File filePath="vedir/vefmwd002.4fd"/>
        <File filePath="ctdir/prfmmt003.per"/>
@@ -373,6 +427,7 @@
        <File filePath="PRDIR/pretiquetas.4gl"/>
        <File filePath="PRDIR/prempacar.4gl"/>
        <File filePath="otrodir/bcode128.4gl"/>
+        <File filePath="../PROYECTOS/otrodir/codmov.4gl"/>
      </Library>
    </Group>
    <Group id="46006545" label="RECURSOS HUMANOS">