{
================================================================================
FORMULARIO     : IPFMMT007
OBJETIVO       : Capturar Los Precios Minimos Y de Lista
DESENO         : JUAN F. SOTO
FECHA          : AGOSTO 25, 1997.
================================================================================
}
database marmotech
screen size 24 by 80
{

 Codigo Del Producto  [a]-[b]-[c ]-[d  ] 
                      [des                                                ][un ]
 Precio Minimo        [f004          ]

 Precio De Lista      [f005          ]
 [f]
 Usuario Creador      [f006     ] Fecha Creacion     [f007            ]
 Usuario Modificador  [f008     ] Fecha Modificacion [f009            ]
}
end
tables
iptb00014
attributes
a = iptb00014.cod_n,required,comments = "Digite Codigo Producto";
b = iptb00014.cod_grupo,required,comments = "Digite Codigo Producto";
c = iptb00014.cod_tipo,required,comments = "Digite Codigo Producto";
d = iptb00014.cod_sec,required,comments = "Digite Codigo Producto";
des = formonly.descripcion;
f004 = iptb00014.precio_min,default = 0,comments = "Digite Precio Minimo";
f005 = iptb00014.precio_lista,default = 0,comments = "Digite Precio De Lista";
un   = formonly.unidad;
f = iptb00014.status_t,noentry;
f006 = iptb00014.us_crea,noentry;
f007 = iptb00014.fech_crea,noentry;
f008 = iptb00014.us_mod,noentry;
f009 = iptb00014.fech_mod,noentry;
instructions
delimiters " "
end