44 lines
1.8 KiB
Plaintext
44 lines
1.8 KiB
Plaintext
database marmotech
|
|
screen size 24 by 80
|
|
{
|
|
Cantidad Meses a Proyectar [f ] Fecha Inicial [e ]
|
|
|
|
Producto Terminado [a][b][c ][d ] [g ]
|
|
\g--------------------------------------------------------------------
|
|
Fecha Fecha Cantidad a
|
|
Inicial Final Mes Producir
|
|
\g--------------------------------------------------------------------
|
|
[f000 ] [f001 ] [f002 ] [f007 ]
|
|
[f000 ] [f001 ] [f002 ] [f007 ]
|
|
[f000 ] [f001 ] [f002 ] [f007 ]
|
|
[f000 ] [f001 ] [f002 ] [f007 ]
|
|
[f000 ] [f001 ] [f002 ] [f007 ]
|
|
}
|
|
end
|
|
tables
|
|
intb00001,
|
|
cotb00026
|
|
attributes
|
|
e = formonly.fecha_inicial type date,autonext , format = "dd/mm/yy",
|
|
comments = "Digite la Fecha Inicial del Plan. Use el formato DDMMAA";
|
|
f = formonly.cantidad_meses,autonext ,
|
|
comments = "Digite la Cantidad de Meses del Plan";
|
|
a = cotb00026.cod_n,autonext,
|
|
comments = "Digite el Codigo del Producto Terminado o Ctrl-W para Busqueda";
|
|
b = cotb00026.cod_grupo,autonext,
|
|
comments = "Digite el Codigo del Producto Terminado o Ctrl-W para Busqueda";
|
|
c = cotb00026.cod_tipo,autonext,
|
|
comments = "Digite el Codigo del Producto Terminado o Ctrl-W para Busqueda";
|
|
d = cotb00026.cod_sec,autonext,
|
|
comments = "Digite la Codigo del Producto Terminado o Ctrl-W para Busqueda";
|
|
g = intb00001.descrip_esp, noentry;
|
|
f000 = formonly.fecha_ini,noentry;
|
|
f001 = formonly.fecha_fin,noentry;
|
|
f002 = formonly.mes,noentry;
|
|
f007 = cotb00026.cantidad,autonext;
|
|
|
|
INSTRUCTIONS
|
|
screen record sc_plan_prod[5] (fecha_ini,fecha_fin,mes,cantidad)
|
|
end
|
|
|