58 lines
2.2 KiB
Plaintext
58 lines
2.2 KiB
Plaintext
|
|
|
|
{
|
|
=============================================================================
|
|
FORMULARIO : IPFMWD009
|
|
OBJETIVO : Desplegar los codigos y nombres de la maestra de
|
|
clientes
|
|
PROGRAMA Q. LO USA : IPPRMT044
|
|
AUTOR : JUAN F. SOTO
|
|
FECHA : FEBRERO 6, 1999
|
|
=============================================================================
|
|
}
|
|
DATABASE smarmotech
|
|
SCREEN
|
|
{
|
|
|
|
DESCRIPCION:[cod ][des ][und ]
|
|
\g------------------------------------------------------------------------------\g
|
|
--MEDIDA RECIBIDAS---
|
|
Bloque Lado 1 Lado 2 Lado 3 Cantidad Medidas
|
|
\g------------------------------------------------------------------------------\g
|
|
[et ][b ] [c ] [d ][l1 ][l2 ][l3 ][c1 ][m ]
|
|
[et ][b ] [c ] [d ][l1 ][l2 ][l3 ][c1 ][m ]
|
|
[et ][b ] [c ] [d ][l1 ][l2 ][l3 ][c1 ][m ]
|
|
[et ][b ] [c ] [d ][l1 ][l2 ][l3 ][c1 ][m ]
|
|
[et ][b ] [c ] [d ][l1 ][l2 ][l3 ][c1 ][m ]
|
|
[et ][b ] [c ] [d ][l1 ][l2 ][l3 ][c1 ][m ]
|
|
[et ][b ] [c ] [d ][l1 ][l2 ][l3 ][c1 ][m ]
|
|
[et ][b ] [c ] [d ][l1 ][l2 ][l3 ][c1 ][m ]
|
|
============
|
|
[t1 ]
|
|
}
|
|
end
|
|
tables
|
|
vetb00004
|
|
attributes
|
|
cod = formonly.cod_prod;
|
|
et = formonly.codigo_bloque,noentry;
|
|
t1 = formonly.total_medida;
|
|
des = formonly.descripcion;
|
|
und = formonly.medida;
|
|
b = formonly. ancho1;
|
|
c = formonly.largo1;
|
|
d = formonly.espesor1;
|
|
l1 = formonly.medida1;
|
|
l2 = formonly.ancho2;
|
|
l3 = formonly.largo2;
|
|
c1 = formonly.espesor2;
|
|
m = formonly.medida2;
|
|
m1 = formonly.cantidad;
|
|
|
|
instructions delimiters " "
|
|
screen record sdespiece[8](codigo_bloque,cod_,ancho1,largo1,espesor1,medida1,ancho2,largo2,
|
|
espesor2,medida2,cantidad)
|
|
end
|
|
|
|
|