Files
MBS/PROYECTO/codir/cofmrp020.per
T

34 lines
976 B
Plaintext

database marmotech
screen size 24 by 80
{
Fecha Inicial [f1 ]
Fecha Final [f2 ]
Suplidor [s1][s2 ]
Orden Compra [f03 ]
Tipo Orden [tp]
Codigo Material [a]-[b]-[c ]-[d ]
}
end
tables
intb00001
cotb00015
attributes
s1 = formonly.cod_sp;
s2 = formonly.cod_sp_sec;
f03 = formonly.num_oc, comments =
"Digite numero orden de compra";
f1 = formonly.fech_in type date,format = "dd/mm/yy",comments =
"Digite la fecha inicial para condicion de busqueda";
f2 = formonly.fech_fi type date,format = "dd/mm/yy",comments =
"Digite la fecha finasl para condicion de busqueda";
tp = cotb00015.tipo,include = ("01","02","03","04"),comments =
"Tipo de Orden : (01) General (02) ROV Ltd (03) Locales (04) Miscelaneo";
a = intb00001.cod_n;
b = intb00001.cod_grupo;
c = intb00001.cod_tipo;
d = intb00001.cod_sec;
instructions
delimiters " "
end