database marmotech
screen size 24 by 80
{
Tipo de Venta  [a] [b          ]
Producto Terminado  [c]-[d]-[e ]-[f  ] [h                             ] [l  ]
Cliente  [f4]-[f005] [m                             ]
Precio   [f006        ]

[j]
Usuario Creador  [f007     ]              Usuario Modificador [f009     ]
Fecha Creacion   [f008            ]       Fecha Modificacion  [f010            ]
}
end
tables
vetb00025,vetb00003
attributes
a = vetb00025.ventas,autonext,include = ("1","2"),
  comments = "Digite 1 - Local, 2 - Exportacion";
b = formonly.descventa,noentry;
c = vetb00025.cod_n,autonext,
  comments = "Presione Ctrl-W para busqueda o digite el nivel del producto";
d = vetb00025.cod_grupo,autonext,
  comments = "Presione Ctrl-W para busqueda o digite el grupo del producto";
e = vetb00025.cod_tipo,autonext,
  comments = "Presione Ctrl-W para busqueda o digite el tipo del producto";
f = vetb00025.cod_sec,autonext,
  comments = "Presione Ctrl-W para busqueda o digite la secuencia del producto";
h = formonly.descrip1,noentry;
l = formonly.medida,noentry;
f4 = vetb00025.tipo_cliente,autonext,
  comments = "Presione Ctrl-W para busqueda o digite el codigo del cliente";
f005 = vetb00025.sec_cliente,autonext,
  comments = "Presione Ctrl-W para busqueda o digite el codigo del cliente";
m = formonly.nom_cliente,noentry;
f006 = vetb00025.precio;
j = vetb00025.status_t,noentry;
f007 = vetb00025.us_crea,noentry;
f008 = vetb00025.fech_crea,noentry;
f009 = vetb00025.us_mod,noentry;
f010 = vetb00025.fech_mod,noentry;
instructions
 delimiters " "
end