35 lines
1.2 KiB
Plaintext
35 lines
1.2 KiB
Plaintext
{
|
|
==========================================================================
|
|
FORMULARIO :VEFMWD16
|
|
OBJETIVO :MANTENIMIENTO CORPORACIONES
|
|
PROGRAMADOR : JUAN F. SOTO
|
|
FECHA : ABRIL 1, 2003
|
|
==========================================================================
|
|
}
|
|
DATABASE rayovac
|
|
screen size 24 by 80
|
|
{
|
|
Codigo [co ][de ]
|
|
============================================================
|
|
Clientes Nombres
|
|
============================================================
|
|
[a ][a1 ][b ]
|
|
[a ][a1 ][b ]
|
|
[a ][a1 ][b ]
|
|
[a ][a1 ][b ]
|
|
[a ][a1 ][b ]
|
|
[a ][a1 ][b ]
|
|
[a ][a1 ][b ]
|
|
}
|
|
tables
|
|
vetb00052,vetb00004
|
|
attributes
|
|
co = vetb00052.codigo_grupo;
|
|
de = vetb00052.descripcion;
|
|
a = vetb00052.tipo_cliente;
|
|
a1 = vetb00052.sec_cliente;
|
|
b = vetb00004.nombre,noentry;
|
|
instructions
|
|
screen record s_datos[7](tipo_cliente,sec_cliente,nombre)
|
|
end
|