primer commit subida

2026-09-22 20:38:51 -04:00
commit 07649704b1
10247 changed files with 3271751 additions and 0 deletions
@@ -0,0 +1,51 @@
+{
+===========================================================================
+   Formulario  : infmmt017
+   Sistema     : Inventario de Material
+   Objetivo    : Formulario a usar para captura de informacion en el modulo
+                 inprmt017 (datos referentes a maestra de formulas)
+   Autor       : Tadeo A. Ferreras
+   Fecha       : Julio 22,1993
+===========================================================================
+}
+database exterior    
+screen
+{
+
+ Codigo  [a][b] [desc                         ]
+
+\g----------------------------------------------------------------------------\g
+  Material                                           Unidad         Cantidad
+\g----------------------------------------------------------------------------\g
+ [c]-[d]-[g  ]-[f  ] [desc1                        ]  [und]  [cant          ]
+ [c]-[d]-[g  ]-[f  ] [desc1                        ]  [und]  [cant          ]
+ [c]-[d]-[g  ]-[f  ] [desc1                        ]  [und]  [cant          ]
+ [c]-[d]-[g  ]-[f  ] [desc1                        ]  [und]  [cant          ]
+ [c]-[d]-[g  ]-[f  ] [desc1                        ]  [und]  [cant          ]
+ [c]-[d]-[g  ]-[f  ] [desc1                        ]  [und]  [cant          ]
+}
+end
+tables
+intb00016
+intb00022
+attributes
+a     = intb00016.cod_n_p,autonext,include = (3),default = 3,comments =
+    "Digite codigo del tipo de pila";
+b     = intb00016.cod_grupo_p,autonext,include = (1,2,3),comments =
+    "1 = Pila tipo D      2 = Pila tipo C      3 = Pila tipo AA";
+desc  = formonly.descrip type char,color = yellow, noentry;
+c     = intb00016.cod_n,autonext,comments =
+    "Digite codigo del material";
+d     = intb00016.cod_grupo,autonext,comments =
+    "Digite codigo del material";
+g     = intb00016.cod_tipo,autonext,comments =
+    "Digite codigo del material";
+f     = intb00016.cod_sec,autonext,comments =
+    "Digite codigo del material";
+desc1 = formonly.descrip1 type char,color = yellow,noentry;
+und   = formonly.unidad type char,color = yellow,noentry;
+cant  = intb00016.cantidad,comments = "Digite la cantidad Expresada en Millar";
+instructions delimiters " "
+   screen record arr_form1[6](cod_n,cod_grupo,cod_tipo,cod_sec,descrip1,unidad,
+                           cantidad)
+end