jsoto/MBS
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Corrige inprmt046, agrega inprmt036 y arreglos de fecha/impresion

Browse Source 
- 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.
This commit is contained in:
jpeguero
2026-08-27 16:57:10 -04:00
parent 7b6cb1e111
commit 69b4500eed
10 changed files with 138 additions and 108 deletions
Download Patch File Download Diff File Expand all files Collapse all files
PROYECTO/indir/infmmt046.4fd
+42 -25
View File
@@ -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>