27 lines
742 B
Plaintext
27 lines
742 B
Plaintext
{
|
|
==========================================================================
|
|
FORMULARIO : VEFMWD016
|
|
OBJETIVO : DESPLEGAR MAESTRA DE CLIENTES
|
|
PROGRAMADOR : JUAN F. SOTO
|
|
FECHA : OCTUBRE 16, 1997
|
|
==========================================================================
|
|
}
|
|
DATABASE marmotech
|
|
screen size 24 by 80
|
|
{
|
|
==================================================
|
|
Valor Fecha Vencimiento
|
|
==================================================
|
|
[fs1 ][f2 ]
|
|
[fs1 ][f2 ]
|
|
[fs1 ][f2 ]
|
|
}
|
|
tables
|
|
vetb00004
|
|
attributes
|
|
fs1 = formonly.valor;
|
|
f2 = formonly.fecha_ven type date,format = "dd/mm/yy";
|
|
instructions delimiters " "
|
|
screen record s_parte[3](valor,fecha_ven)
|
|
end
|